haskell-src-exts-1.23.1/src/0000755000000000000000000000000013534314632013750 5ustar0000000000000000haskell-src-exts-1.23.1/src/Language/0000755000000000000000000000000013534314632015473 5ustar0000000000000000haskell-src-exts-1.23.1/src/Language/Haskell/0000755000000000000000000000000013534314632017056 5ustar0000000000000000haskell-src-exts-1.23.1/src/Language/Haskell/Exts/0000755000000000000000000000000013665335376020016 5ustar0000000000000000haskell-src-exts-1.23.1/src/Language/Preprocessor/0000755000000000000000000000000013534314632020161 5ustar0000000000000000haskell-src-exts-1.23.1/tests/0000755000000000000000000000000013534314632014323 5ustar0000000000000000haskell-src-exts-1.23.1/tests/examples/0000755000000000000000000000000013665335376016156 5ustar0000000000000000haskell-src-exts-1.23.1/src/Language/Haskell/Exts.hs0000644000000000000000000001674713534314632020354 0ustar0000000000000000----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts -- Copyright : (c) Niklas Broberg 2004-2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- An umbrella module for the various functionality -- of the package. Also provides some convenient -- functionality for dealing directly with source files. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts ( -- * Re-exported modules module Language.Haskell.Exts.Syntax , module Language.Haskell.Exts.Build , module Language.Haskell.Exts.Lexer , module Language.Haskell.Exts.Pretty , module Language.Haskell.Exts.Fixity , module Language.Haskell.Exts.ExactPrint , module Language.Haskell.Exts.SrcLoc , module Language.Haskell.Exts.Comments , module Language.Haskell.Exts.Extension , module Language.Haskell.Exts.Parser -- * Parsing of Haskell source files , parseFile , parseFileWithMode , parseFileWithExts , parseFileWithComments , parseFileWithCommentsAndPragmas , parseFileContents , parseFileContentsWithMode , parseFileContentsWithExts , parseFileContentsWithComments -- * Read extensions declared in LANGUAGE pragmas , readExtensions ) where import Language.Haskell.Exts.Build import Language.Haskell.Exts.Comments import Language.Haskell.Exts.Parser import Language.Haskell.Exts.Syntax import Language.Haskell.Exts.Lexer ( lexTokenStream, lexTokenStreamWithMode, Token(..) ) import Language.Haskell.Exts.Pretty import Language.Haskell.Exts.Fixity import Language.Haskell.Exts.ExactPrint import Language.Haskell.Exts.SrcLoc import Language.Haskell.Exts.Extension import Data.List import Data.Maybe (fromMaybe) import Language.Preprocessor.Unlit import System.IO -- | Parse a source file on disk, using the default parse mode. parseFile :: FilePath -> IO (ParseResult (Module SrcSpanInfo)) parseFile fp = parseFileWithMode (defaultParseMode { parseFilename = fp }) fp -- | Parse a source file on disk, with an extra set of extensions to know about -- on top of what the file itself declares. parseFileWithExts :: [Extension] -> FilePath -> IO (ParseResult (Module SrcSpanInfo)) parseFileWithExts exts fp = parseFileWithMode (defaultParseMode { extensions = exts, parseFilename = fp }) fp -- | Parse a source file on disk, supplying a custom parse mode. parseFileWithMode :: ParseMode -> FilePath -> IO (ParseResult (Module SrcSpanInfo)) parseFileWithMode p fp = readUTF8File fp >>= return . parseFileContentsWithMode p parseFileWithComments :: ParseMode -> FilePath -> IO (ParseResult (Module SrcSpanInfo, [Comment])) parseFileWithComments p fp = readUTF8File fp >>= return . parseFileContentsWithComments p -- | Parse a source file on disk, supplying a custom parse mode, and retaining comments -- as well as unknown pragmas. parseFileWithCommentsAndPragmas :: ParseMode -> FilePath -> IO (ParseResult (Module SrcSpanInfo, [Comment], [UnknownPragma])) parseFileWithCommentsAndPragmas p fp = readUTF8File fp >>= return . parseFileContentsWithCommentsAndPragmas p -- | Parse a source file from a string using a custom parse mode retaining comments -- as well as unknown pragmas. parseFileContentsWithCommentsAndPragmas :: ParseMode -> String -> ParseResult (Module SrcSpanInfo, [Comment], [UnknownPragma]) parseFileContentsWithCommentsAndPragmas pmode str = separatePragmas parseResult where parseResult = parseFileContentsWithComments pmode str -- | Parse a source file from a string using the default parse mode. parseFileContents :: String -> ParseResult (Module SrcSpanInfo) parseFileContents = parseFileContentsWithMode defaultParseMode -- | Parse a source file from a string, with an extra set of extensions to know about -- on top of what the file itself declares. parseFileContentsWithExts :: [Extension] -> String -> ParseResult (Module SrcSpanInfo) parseFileContentsWithExts exts = parseFileContentsWithMode (defaultParseMode { extensions = exts }) -- | Parse a source file from a string using a custom parse mode. parseFileContentsWithMode :: ParseMode -> String -> ParseResult (Module SrcSpanInfo) parseFileContentsWithMode p@(ParseMode fn oldLang exts ign _ _ _) rawStr = let md = delit fn $ ppContents rawStr (bLang, extraExts) = case (ign, readExtensions md) of (False, Just (mLang, es)) -> (fromMaybe oldLang mLang, es) _ -> (oldLang, []) in -- trace (fn ++ ": " ++ show extraExts) $ parseModuleWithMode (p { baseLanguage = bLang, extensions = exts ++ extraExts }) md parseFileContentsWithComments :: ParseMode -> String -> ParseResult (Module SrcSpanInfo, [Comment]) parseFileContentsWithComments p@(ParseMode fn oldLang exts ign _ _ _) rawStr = let md = delit fn $ ppContents rawStr (bLang, extraExts) = case (ign, readExtensions md) of (False, Just (mLang, es)) -> (fromMaybe oldLang mLang, es) _ -> (oldLang, []) in parseModuleWithComments (p { baseLanguage = bLang, extensions = exts ++ extraExts }) md -- | Gather the extensions declared in LANGUAGE pragmas -- at the top of the file. Returns 'Nothing' if the -- parse of the pragmas fails. readExtensions :: String -> Maybe (Maybe Language, [Extension]) readExtensions str = case getTopPragmas str of ParseOk pgms -> extractLang $ concatMap getExts pgms _ -> Nothing where getExts :: ModulePragma l -> [Either Language Extension] getExts (LanguagePragma _ ns) = map readExt ns getExts _ = [] readExt (Ident _ e) = case classifyLanguage e of UnknownLanguage _ -> Right $ classifyExtension e lang -> Left lang readExt Symbol {} = error "readExt: Symbol" extractLang = extractLang' Nothing [] extractLang' lacc eacc [] = Just (lacc, eacc) extractLang' Nothing eacc (Left l : rest) = extractLang' (Just l) eacc rest extractLang' (Just l1) eacc (Left l2:rest) | l1 == l2 = extractLang' (Just l1) eacc rest | otherwise = Nothing extractLang' lacc eacc (Right ext : rest) = extractLang' lacc (ext:eacc) rest ppContents :: String -> String ppContents = unlines . f . lines where f (('#':_):rest) = rest f x = x delit :: String -> String -> String delit fn = if ".lhs" `isSuffixOf` fn then unlit fn else id readUTF8File :: FilePath -> IO String readUTF8File fp = do h <- openFile fp ReadMode hSetEncoding h utf8 hGetContents h -- | Converts a parse result with comments to a parse result with comments and -- unknown pragmas. separatePragmas :: ParseResult (Module SrcSpanInfo, [Comment]) -> ParseResult (Module SrcSpanInfo, [Comment], [UnknownPragma]) separatePragmas r = case r of ParseOk (m, comments) -> let (pragmas, comments') = partition pragLike comments in ParseOk (m, comments', map commentToPragma pragmas) where commentToPragma (Comment _ l s) = UnknownPragma l $ init $ drop 1 s pragLike (Comment b _ s) = b && pcond s pcond s = length s > 1 && take 1 s == "#" && last s == '#' ParseFailed l s -> ParseFailed l s haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Lexer.hs0000644000000000000000000000263413534314632021421 0ustar0000000000000000----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Lexer -- Copyright : (c) The GHC Team, 1997-2000 -- (c) Niklas Broberg, 2004-2012 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, niklas.broberg@chalmers.se -- Stability : stable -- Portability : portable -- -- Lexer for Haskell with extensions. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Lexer ( lexTokenStream, lexTokenStreamWithMode, Token(..), Loc(..), showToken ) where import Language.Haskell.Exts.InternalLexer import Language.Haskell.Exts.ParseMonad import Language.Haskell.Exts.SrcLoc -- | Lex a string into a list of Haskell 2010 source tokens. lexTokenStream :: String -> ParseResult [Loc Token] lexTokenStream = lexTokenStreamWithMode defaultParseMode -- | Lex a string into a list of Haskell source tokens, using an explicit mode. lexTokenStreamWithMode :: ParseMode -> String -> ParseResult [Loc Token] lexTokenStreamWithMode mode = runParserWithMode mode lexIt where lexIt :: P [Loc Token] lexIt = runL go return go :: Lex [Loc Token] [Loc Token] go = do ltok <- topLexer case ltok of Loc _ EOF -> return [] _ -> do ts <- go return (ltok:ts) haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Pretty.hs0000644000000000000000000021535413603723515021637 0ustar0000000000000000{-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Pretty -- Copyright : (c) Niklas Broberg 2004-2009, -- (c) The GHC Team, Noel Winstanley 1997-2000 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Pretty printer for Haskell with extensions. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Pretty ( -- * Pretty printing Pretty, prettyPrintStyleMode, prettyPrintWithMode, prettyPrint, -- * Pretty-printing styles (from "Text.PrettyPrint.HughesPJ") P.Style(..), P.style, P.Mode(..), -- * Haskell formatting modes PPHsMode(..), Indent, PPLayout(..), defaultMode -- * Primitive Printers , prettyPrim, prettyPrimWithMode ) where import Language.Haskell.Exts.Syntax import qualified Language.Haskell.Exts.ParseSyntax as P import Language.Haskell.Exts.SrcLoc hiding (loc) import Prelude hiding ( exp #if MIN_VERSION_base(4,11,0) , (<>) #endif ) import qualified Text.PrettyPrint as P import Data.List (intersperse) import Data.Maybe (isJust , fromMaybe) #if __GLASGOW_HASKELL__ < 710 import Control.Applicative (Applicative(..), (<$>)) #endif import qualified Control.Monad as M (ap) infixl 5 $$$ ----------------------------------------------------------------------------- -- | Varieties of layout we can use. data PPLayout = PPOffsideRule -- ^ classical layout | PPSemiColon -- ^ classical layout made explicit | PPInLine -- ^ inline decls, with newlines between them | PPNoLayout -- ^ everything on a single line deriving Eq type Indent = Int -- | Pretty-printing parameters. -- -- /Note:/ the 'onsideIndent' must be positive and less than all other indents. data PPHsMode = PPHsMode { -- | indentation of a class or instance classIndent :: Indent, -- | indentation of a @do@-expression doIndent :: Indent, -- | indentation of the body of a -- @case@ expression multiIfIndent :: Indent, -- | indentation of the body of a -- multi-@if@ expression caseIndent :: Indent, -- | indentation of the declarations in a -- @let@ expression letIndent :: Indent, -- | indentation of the declarations in a -- @where@ clause whereIndent :: Indent, -- | indentation added for continuation -- lines that would otherwise be offside onsideIndent :: Indent, -- | blank lines between statements? spacing :: Bool, -- | Pretty-printing style to use layout :: PPLayout, -- | add GHC-style @LINE@ pragmas to output? linePragmas :: Bool } -- | The default mode: pretty-print using the offside rule and sensible -- defaults. defaultMode :: PPHsMode defaultMode = PPHsMode{ classIndent = 8, doIndent = 3, multiIfIndent = 3, caseIndent = 4, letIndent = 4, whereIndent = 6, onsideIndent = 2, spacing = True, layout = PPOffsideRule, linePragmas = False } -- | Pretty printing monad newtype DocM s a = DocM (s -> a) instance Functor (DocM s) where fmap f xs = do x <- xs; return (f x) instance Applicative (DocM s) where pure = retDocM (<*>) = M.ap instance Monad (DocM s) where (>>=) = thenDocM (>>) = then_DocM return = retDocM {-# INLINE thenDocM #-} {-# INLINE then_DocM #-} {-# INLINE retDocM #-} {-# INLINE unDocM #-} {-# INLINE getPPEnv #-} thenDocM :: DocM s a -> (a -> DocM s b) -> DocM s b thenDocM m k = DocM $ \s -> case unDocM m s of a -> unDocM (k a) s then_DocM :: DocM s a -> DocM s b -> DocM s b then_DocM m k = DocM $ \s -> case unDocM m s of _ -> unDocM k s retDocM :: a -> DocM s a retDocM a = DocM $ const a unDocM :: DocM s a -> s -> a unDocM (DocM f) = f -- all this extra stuff, just for this one function. getPPEnv :: DocM s s getPPEnv = DocM id -- So that pp code still looks the same -- this means we lose some generality though -- | The document type produced by these pretty printers uses a 'PPHsMode' -- environment. type Doc = DocM PPHsMode P.Doc -- | Things that can be pretty-printed, including all the syntactic objects -- in "Language.Haskell.Exts.Syntax". class Pretty a where -- | Pretty-print something in isolation. pretty :: a -> Doc -- | Pretty-print something in a precedence context. prettyPrec :: Int -> a -> Doc pretty = prettyPrec 0 prettyPrec _ = pretty -- The pretty printing combinators empty :: Doc empty = return P.empty nest :: Int -> Doc -> Doc nest i m = m >>= return . P.nest i -- Literals text :: String -> Doc text = return . P.text char :: Char -> Doc char = return . P.char int :: Int -> Doc int = return . P.int integer :: Integer -> Doc integer = return . P.integer float :: Float -> Doc float = return . P.float double :: Double -> Doc double = return . P.double -- rational :: Rational -> Doc -- rational = return . P.rational -- Simple Combining Forms parens, brackets, braces, doubleQuotes :: Doc -> Doc parens d = d >>= return . P.parens brackets d = d >>= return . P.brackets braces d = d >>= return . P.braces -- quotes :: Doc -> Doc -- quotes d = d >>= return . P.quotes doubleQuotes d = d >>= return . P.doubleQuotes parensIf :: Bool -> Doc -> Doc parensIf True = parens parensIf False = id -- Constants semi,comma,space,equals :: Doc semi = return P.semi comma = return P.comma -- colon :: Doc -- colon = return P.colon space = return P.space equals = return P.equals {- lparen,rparen,lbrack,rbrack,lbrace,rbrace :: Doc lparen = return P.lparen rparen = return P.rparen lbrack = return P.lbrack rbrack = return P.rbrack lbrace = return P.lbrace rbrace = return P.rbrace -} -- Combinators (<>),(<+>),($$) :: Doc -> Doc -> Doc aM <> bM = do{a<-aM;b<-bM;return (a P.<> b)} aM <+> bM = do{a<-aM;b<-bM;return (a P.<+> b)} aM $$ bM = do{a<-aM;b<-bM;return (a P.$$ b)} ($+$) :: Doc -> Doc -> Doc aM $+$ bM = do{a<-aM;b<-bM;return (a P.$+$ b)} hcat,hsep,vcat,fsep :: [Doc] -> Doc hcat dl = sequence dl >>= return . P.hcat hsep dl = sequence dl >>= return . P.hsep vcat dl = sequence dl >>= return . P.vcat -- sep, cat, fcat :: [Doc] -> Doc -- sep dl = sequence dl >>= return . P.sep -- cat dl = sequence dl >>= return . P.cat fsep dl = sequence dl >>= return . P.fsep -- fcat dl = sequence dl >>= return . P.fcat -- Some More -- hang :: Doc -> Int -> Doc -> Doc -- hang dM i rM = do{d<-dM;r<-rM;return $ P.hang d i r} -- Yuk, had to cut-n-paste this one from Pretty.hs punctuate :: Doc -> [Doc] -> [Doc] punctuate _ [] = [] punctuate p (d1:ds) = go d1 ds where go d [] = [d] go d (e:es) = (d <> p) : go e es -- | render the document with a given style and mode. renderStyleMode :: P.Style -> PPHsMode -> Doc -> String renderStyleMode ppStyle ppMode d = P.renderStyle ppStyle . unDocM d $ ppMode -- | render the document with a given mode. -- renderWithMode :: PPHsMode -> Doc -> String -- renderWithMode = renderStyleMode P.style -- | render the document with 'defaultMode'. -- render :: Doc -> String -- render = renderWithMode defaultMode -- | pretty-print with a given style and mode. prettyPrintStyleMode :: Pretty a => P.Style -> PPHsMode -> a -> String prettyPrintStyleMode ppStyle ppMode = renderStyleMode ppStyle ppMode . pretty -- | pretty-print with the default style and a given mode. prettyPrintWithMode :: Pretty a => PPHsMode -> a -> String prettyPrintWithMode = prettyPrintStyleMode P.style -- | pretty-print with the default style and 'defaultMode'. prettyPrint :: Pretty a => a -> String prettyPrint = prettyPrintWithMode defaultMode -- fullRenderWithMode :: PPHsMode -> P.Mode -> Int -> Float -> -- (P.TextDetails -> a -> a) -> a -> Doc -> a -- fullRenderWithMode ppMode m i f fn e mD = -- P.fullRender m i f fn e $ (unDocM mD) ppMode -- fullRender :: P.Mode -> Int -> Float -> (P.TextDetails -> a -> a) -- -> a -> Doc -> a -- fullRender = fullRenderWithMode defaultMode -- | pretty-print with the default style and 'defaultMode'. prettyPrim :: Pretty a => a -> P.Doc prettyPrim = prettyPrimWithMode defaultMode -- | pretty-print with the default style and a given mode. prettyPrimWithMode :: Pretty a => PPHsMode -> a -> P.Doc prettyPrimWithMode pphs doc = unDocM (pretty doc) pphs ------------------------- Pretty-Print a Module -------------------- {- instance Pretty (Module l) where pretty (Module pos m os mbWarn mbExports imp decls) = markLine pos $ (myVcat $ map pretty os) $$ myVcat ( (if m == ModuleName "" then id else \x -> [topLevel (ppModuleHeader m mbWarn mbExports) x]) (map pretty imp ++ ppDecls (m /= ModuleName "" || not (null imp) || not (null os)) decls]-} -------------------------- Module Header ------------------------------ instance Pretty (ModuleHead l) where pretty (ModuleHead _ m mbWarn mbExportList) = mySep [ text "module", pretty m, maybePP ppWarnTxt mbWarn, maybePP pretty mbExportList, text "where"] instance Pretty (ExportSpecList l) where pretty (ExportSpecList _ especs) = parenList $ map pretty especs ppWarnTxt :: WarningText l -> Doc ppWarnTxt (DeprText _ s) = mySep [text "{-# DEPRECATED", text (show s), text "#-}"] ppWarnTxt (WarnText _ s) = mySep [text "{-# WARNING", text (show s), text "#-}"] instance Pretty (ModuleName l) where pretty (ModuleName _ modName) = text modName instance Pretty (Namespace l) where pretty NoNamespace {} = empty pretty TypeNamespace {} = text "type" pretty PatternNamespace {} = text "pattern" instance Pretty (ExportSpec l) where pretty (EVar _ name) = pretty name pretty (EAbs _ ns name) = pretty ns <+> pretty name pretty (EThingWith _ wc name nameList) = let prettyNames = map pretty nameList names = case wc of NoWildcard {} -> prettyNames EWildcard _ n -> let (before,after) = splitAt n prettyNames in before ++ [text ".."] ++ after in pretty name <> (parenList names) pretty (EModuleContents _ m) = text "module" <+> pretty m instance Pretty (ImportDecl l) where pretty (ImportDecl _ m qual src safe mbPkg mbName mbSpecs) = mySep [text "import", if src then text "{-# SOURCE #-}" else empty, if safe then text "safe" else empty, if qual then text "qualified" else empty, maybePP (\s -> text (show s)) mbPkg, pretty m, maybePP (\m' -> text "as" <+> pretty m') mbName, maybePP pretty mbSpecs] instance Pretty (ImportSpecList l) where pretty (ImportSpecList _ b ispecs) = (if b then text "hiding" else empty) <+> parenList (map pretty ispecs) instance Pretty (ImportSpec l) where pretty (IVar _ name ) = pretty name pretty (IAbs _ ns name) = pretty ns <+> pretty name pretty (IThingAll _ name) = pretty name <> text "(..)" pretty (IThingWith _ name nameList) = pretty name <> (parenList . map pretty $ nameList) instance Pretty (TypeEqn l) where pretty (TypeEqn _ pat eqn) = mySep [pretty pat, equals, pretty eqn] ------------------------- Declarations ------------------------------ class Pretty a => PrettyDeclLike a where wantsBlankline :: a -> Bool instance PrettyDeclLike (Decl l) where wantsBlankline (FunBind {}) = False wantsBlankline (PatBind {}) = False wantsBlankline _ = True condBlankline :: PrettyDeclLike a => a -> Doc condBlankline d = (if wantsBlankline d then blankline else id) $ pretty d ppDecls :: PrettyDeclLike a => Bool -> [a] -> [Doc] ppDecls True ds = map condBlankline ds ppDecls False (d:ds) = pretty d : map condBlankline ds ppDecls _ _ = [] --ppDecls = map condBlankline instance Pretty (InjectivityInfo l) where pretty (InjectivityInfo _ from to) = char '|' <+> pretty from <+> text "->" <+> hsep (map pretty to) instance Pretty (ResultSig l) where pretty (KindSig _ kind) = text "::" <+> pretty kind pretty (TyVarSig _ tv) = char '=' <+> pretty tv instance Pretty (Decl l) where pretty (TypeDecl _ dHead htype) = mySep ( [text "type", pretty dHead] ++ [equals, pretty htype]) pretty (DataDecl _ don context dHead constrList derives) = mySep ( [pretty don, maybePP pretty context, pretty dHead]) <+> (myVcat (zipWith (<+>) (equals : repeat (char '|')) (map pretty constrList)) $$$ ppIndent letIndent (map pretty derives)) pretty (GDataDecl _ don context dHead optkind gadtList derives) = mySep ( [pretty don, maybePP pretty context, pretty dHead] ++ ppOptKind optkind ++ [text "where"]) $$$ ppBody classIndent (map pretty gadtList) $$$ ppIndent letIndent (map pretty derives) pretty (TypeFamDecl _ dHead optkind optinj) = mySep ([text "type", text "family", pretty dHead , maybePP pretty optkind, maybePP pretty optinj]) pretty (ClosedTypeFamDecl _ dHead optkind optinj eqns) = mySep ([text "type", text "family", pretty dHead , maybePP pretty optkind ,maybePP pretty optinj , text "where"]) $$$ ppBody classIndent (map pretty eqns) pretty (DataFamDecl _ context dHead optkind) = mySep ( [text "data", text "family", maybePP pretty context, pretty dHead , maybePP pretty optkind]) pretty (TypeInsDecl _ ntype htype) = mySep [text "type", text "instance", pretty ntype, equals, pretty htype] pretty (DataInsDecl _ don ntype constrList derives) = mySep [pretty don, text "instance ", pretty ntype] <+> (myVcat (zipWith (<+>) (equals : repeat (char '|')) (map pretty constrList)) $$$ ppIndent letIndent (map pretty derives)) pretty (GDataInsDecl _ don ntype optkind gadtList derives) = mySep ( [pretty don, text "instance ", pretty ntype] ++ ppOptKind optkind ++ [text "where"]) $$$ ppBody classIndent (map pretty gadtList) $$$ ppIndent letIndent (map pretty derives) --m{spacing=False} -- special case for empty class declaration pretty (ClassDecl _ context dHead fundeps Nothing) = mySep ( [text "class", maybePP pretty context, pretty dHead , ppFunDeps fundeps]) pretty (ClassDecl _ context dHead fundeps declList) = mySep ( [text "class", maybePP pretty context, pretty dHead , ppFunDeps fundeps, text "where"]) $$$ ppBody classIndent (fromMaybe [] ((ppDecls False) <$> declList)) -- m{spacing=False} -- special case for empty instance declaration pretty (InstDecl _ moverlap iHead Nothing) = mySep ( [text "instance", maybePP pretty moverlap, pretty iHead]) pretty (InstDecl _ overlap iHead declList) = mySep ( [ text "instance", maybePP pretty overlap , pretty iHead, text "where"]) $$$ ppBody classIndent (fromMaybe [] ((ppDecls False) <$> declList)) pretty (DerivDecl _ mds overlap irule) = mySep ( [ text "deriving" , maybePP pretty mds , text "instance" , maybePP pretty overlap , pretty irule]) pretty (DefaultDecl _ htypes) = text "default" <+> parenList (map pretty htypes) pretty (SpliceDecl _ splice) = pretty splice pretty (TSpliceDecl _ splice) = pretty splice pretty (TypeSig _ nameList qualType) = mySep ((punctuate comma . map pretty $ nameList) ++ [text "::", pretty qualType]) -- Req can be ommitted if it is empty -- We must print prov if req is nonempty pretty (PatSynSig _ ns mtvs prov mtvs2 req t) = let contexts = [maybePP pretty prov, ppForall mtvs2, maybePP pretty req] in mySep ( [text "pattern" ] ++ punctuate comma (map pretty ns) ++ [ text "::", ppForall mtvs] ++ contexts ++ [pretty t] ) pretty (FunBind _ matches) = do e <- fmap layout getPPEnv case e of PPOffsideRule -> foldr ($$$) empty (map pretty matches) _ -> hsep $ punctuate semi (map pretty matches) pretty (PatBind _ pat rhs whereBinds) = myFsep [pretty pat, pretty rhs] $$$ ppWhere whereBinds pretty (InfixDecl _ assoc prec opList) = mySep ([pretty assoc, maybePP int prec] ++ (punctuate comma . map pretty $ opList)) pretty (PatSyn _ pat rhs dir) = let sep = case dir of ImplicitBidirectional {} -> "=" ExplicitBidirectional {} -> "<-" Unidirectional {} -> "<-" in (mySep ([text "pattern", pretty pat, text sep, pretty rhs])) $$$ (case dir of ExplicitBidirectional _ ds -> nest 2 (text "where" $$$ ppBody whereIndent (ppDecls False ds)) _ -> empty) pretty (ForImp _ cconv saf str name typ) = mySep [text "foreign import", pretty cconv, maybePP pretty saf, maybe empty (text . show) str, pretty name, text "::", pretty typ] pretty (ForExp _ cconv str name typ) = mySep [text "foreign export", pretty cconv, text (show str), pretty name, text "::", pretty typ] pretty (RulePragmaDecl _ rules) = myVcat $ text "{-# RULES" : map pretty rules ++ [text " #-}"] pretty (DeprPragmaDecl _ deprs) = myVcat $ text "{-# DEPRECATED" : map ppWarnDepr deprs ++ [text " #-}"] pretty (WarnPragmaDecl _ deprs) = myVcat $ text "{-# WARNING" : map ppWarnDepr deprs ++ [text " #-}"] pretty (InlineSig _ inl activ name) = mySep [text (if inl then "{-# INLINE" else "{-# NOINLINE") , maybePP pretty activ, pretty name, text "#-}"] pretty (InlineConlikeSig _ activ name) = mySep [ text "{-# INLINE CONLIKE", maybePP pretty activ , pretty name, text "#-}"] pretty (SpecSig _ activ name types) = mySep $ [text "{-# SPECIALISE", maybePP pretty activ , pretty name, text "::"] ++ punctuate comma (map pretty types) ++ [text "#-}"] pretty (SpecInlineSig _ inl activ name types) = mySep $ [text "{-# SPECIALISE", text (if inl then "INLINE" else "NOINLINE"), maybePP pretty activ, pretty name, text "::"] ++ (punctuate comma $ map pretty types) ++ [text "#-}"] pretty (InstSig _ irule) = mySep $ [ text "{-# SPECIALISE", text "instance", pretty irule , text "#-}"] pretty (AnnPragma _ annp) = mySep [text "{-# ANN", pretty annp, text "#-}"] pretty (MinimalPragma _ b) = let bs = case b of { Just b' -> pretty b'; _ -> empty } in myFsep [text "{-# MINIMAL", bs, text "#-}"] pretty (RoleAnnotDecl _ qn rs) = mySep ( [text "type", text "role", pretty qn] ++ map pretty rs ) pretty (CompletePragma _ cls opt_ts) = let cls_p = punctuate comma $ map pretty cls ts_p = maybe empty (\tc -> text "::" <+> pretty tc) opt_ts in myFsep $ [text "{-# COMPLETE"] ++ cls_p ++ [ts_p, text "#-}"] instance Pretty (InstRule l) where pretty (IRule _ tvs mctxt qn) = mySep [ppForall tvs , maybePP pretty mctxt, pretty qn] pretty (IParen _ ih) = parens (pretty ih) instance Pretty (InstHead l) where pretty (IHCon _ qn) = pretty qn pretty (IHInfix _ ta qn) = mySep [pretty ta, pretty qn] pretty (IHParen _ ih) = parens (pretty ih) pretty (IHApp _ ih t) = myFsep [pretty ih, pretty t] instance Pretty (Annotation l) where pretty (Ann _ n e) = myFsep [pretty n, pretty e] pretty (TypeAnn _ n e) = myFsep [text "type", pretty n, pretty e] pretty (ModuleAnn _ e) = myFsep [text "module", pretty e] instance Pretty (BooleanFormula l) where pretty (VarFormula _ n) = pretty n pretty (AndFormula _ bs) = myFsep $ punctuate (text " ,") $ map pretty bs pretty (OrFormula _ bs) = myFsep $ punctuate (text " |") $ map pretty bs pretty (ParenFormula _ b) = parens $ pretty b instance Pretty (Role l) where pretty RoleWildcard{} = char '_' pretty Nominal{} = text "nominal" pretty Representational{} = text "representational" pretty Phantom{} = text "phantom" instance Pretty (DataOrNew l) where pretty DataType{} = text "data" pretty NewType{} = text "newtype" instance Pretty (Assoc l) where pretty AssocNone{} = text "infix" pretty AssocLeft{} = text "infixl" pretty AssocRight{} = text "infixr" instance Pretty (Match l) where pretty (InfixMatch _ l op rs rhs wbinds) = let lhs = case rs of [] -> [] -- Should never reach (r:rs') -> let hd = [prettyPrec 2 l, ppNameInfix op, prettyPrec 2 r] in if null rs' then hd else parens (myFsep hd) : map (prettyPrec 3) rs' in myFsep (lhs ++ [pretty rhs]) $$$ ppWhere wbinds pretty (Match _ f ps rhs whereBinds) = myFsep (pretty f : map (prettyPrec 3) ps ++ [pretty rhs]) $$$ ppWhere whereBinds ppWhere :: Maybe (Binds l) -> Doc ppWhere Nothing = empty ppWhere (Just (BDecls _ l)) = nest 2 (text "where" $$$ ppBody whereIndent (ppDecls False l)) ppWhere (Just (IPBinds _ b)) = nest 2 (text "where" $$$ ppBody whereIndent (ppDecls False b)) instance PrettyDeclLike (ClassDecl l) where wantsBlankline (ClsDecl _ d) = wantsBlankline d wantsBlankline (ClsDefSig {}) = True wantsBlankline _ = False instance Pretty (ClassDecl l) where pretty (ClsDecl _ decl) = pretty decl pretty (ClsDataFam _ context declHead optkind) = mySep ( [text "data", maybePP pretty context, pretty declHead , maybePP pretty optkind]) pretty (ClsTyFam _ declHead optkind optinj) = mySep ( [text "type", pretty declHead , maybePP pretty optkind, maybePP pretty optinj]) pretty (ClsTyDef _ ntype) = mySep [text "type", pretty ntype] pretty (ClsDefSig _ name typ) = mySep [ text "default", pretty name, text "::", pretty typ] instance Pretty (DeclHead l) where pretty (DHead _ n) = pretty n pretty (DHInfix _ tv n) = pretty tv <+> ppNameInfix n pretty (DHParen _ d) = parens (pretty d) pretty (DHApp _ dh tv) = pretty dh <+> pretty tv instance PrettyDeclLike (InstDecl l) where wantsBlankline (InsDecl _ d) = wantsBlankline d wantsBlankline _ = False instance Pretty (InstDecl l) where pretty (InsDecl _ decl) = pretty decl pretty (InsType _ ntype htype) = mySep [text "type", pretty ntype, equals, pretty htype] pretty (InsData _ don ntype constrList derives) = mySep [pretty don, pretty ntype] <+> (myVcat (zipWith (<+>) (equals : repeat (char '|')) (map pretty constrList)) $$$ ppIndent letIndent (map pretty derives)) pretty (InsGData _ don ntype optkind gadtList derives) = mySep ( [pretty don, pretty ntype] ++ ppOptKind optkind ++ [text "where"]) $$$ ppBody classIndent (map pretty gadtList) $$$ ppIndent letIndent (map pretty derives) -- pretty (InsInline loc inl activ name) = -- markLine loc $ -- mySep [text (if inl then "{-# INLINE" else "{-# NOINLINE"), pretty activ, pretty name, text "#-}"] ------------------------- FFI stuff ------------------------------------- instance Pretty (Safety l) where pretty PlayRisky {} = text "unsafe" pretty (PlaySafe _ b) = text $ if b then "threadsafe" else "safe" pretty PlayInterruptible {} = text "interruptible" instance Pretty (CallConv l) where pretty StdCall {} = text "stdcall" pretty CCall {} = text "ccall" pretty CPlusPlus {} = text "cplusplus" pretty DotNet {} = text "dotnet" pretty Jvm {} = text "jvm" pretty Js {} = text "js" pretty JavaScript {} = text "javascript" pretty CApi {} = text "capi" ------------------------- Pragmas --------------------------------------- ppWarnDepr :: ([Name l], String) -> Doc ppWarnDepr (names, txt) = mySep $ punctuate comma (map pretty names) ++ [text $ show txt] instance Pretty (Rule l) where pretty (Rule _ tag activ rvs rhs lhs) = mySep [text $ show tag, maybePP pretty activ, maybePP ppRuleVars rvs, pretty rhs, char '=', pretty lhs] ppRuleVars :: [RuleVar l] -> Doc ppRuleVars [] = empty ppRuleVars rvs = mySep $ text "forall" : map pretty rvs ++ [char '.'] instance Pretty (Activation l) where pretty (ActiveFrom _ i) = char '[' <> int i <> char ']' pretty (ActiveUntil _ i) = text "[~" <> int i <> char ']' instance Pretty (Overlap l) where pretty Overlap {} = text "{-# OVERLAP #-}" pretty Overlaps {} = text "{-# OVERLAPS #-}" pretty Overlapping {} = text "{-# OVERLAPPING #-}" pretty Overlappable {} = text "{-# OVERLAPPABLE #-}" pretty NoOverlap {} = text "{-# NO_OVERLAP #-}" pretty Incoherent {} = text "{-# INCOHERENT #-}" instance Pretty (RuleVar l) where pretty (RuleVar _ n) = pretty n pretty (TypedRuleVar _ n t) = parens $ mySep [pretty n, text "::", pretty t] -- Spaces are stripped from the pragma text but other whitespace -- is not. ppOptionsPragma :: Doc -> String -> Doc ppOptionsPragma opt s = case s of ('\n':_) -> opt <> text s <> text "#-}" _ -> myFsep [opt, text s <> text "#-}"] instance Pretty (ModulePragma l) where pretty (LanguagePragma _ ns) = myFsep $ text "{-# LANGUAGE" : punctuate (char ',') (map pretty ns) ++ [text "#-}"] pretty (OptionsPragma _ (Just tool) s) = ppOptionsPragma (text "{-# OPTIONS_" <> pretty tool) s pretty (OptionsPragma _ _ s) = ppOptionsPragma (text "{-# OPTIONS") s pretty (AnnModulePragma _ mann) = myFsep [text "{-# ANN", pretty mann, text "#-}"] instance Pretty Tool where pretty (UnknownTool s) = text s pretty t = text $ show t ------------------------- Data & Newtype Bodies ------------------------- instance Pretty (QualConDecl l) where pretty (QualConDecl _pos tvs ctxt con) = myFsep [ppForall tvs, maybePP pretty ctxt, pretty con] instance Pretty (GadtDecl l) where pretty (GadtDecl _pos name tvs ctxt names ty) = case names of Nothing -> myFsep [pretty name, text "::", pretty ty] Just ts' -> myFsep [pretty name, text "::" , ppForall tvs, maybePP pretty ctxt, braceList . map pretty $ ts', text "->", pretty ty] instance Pretty (ConDecl l) where pretty (RecDecl _ name fieldList) = pretty name <> braceList (map pretty fieldList) {- pretty (ConDecl name@(Symbol _) [l, r]) = myFsep [prettyPrec prec_btype l, ppName name, prettyPrec prec_btype r] -} pretty (ConDecl _ name typeList) = mySep $ pretty name : map (prettyPrec prec_atype) typeList pretty (InfixConDecl _ l name r) = myFsep [prettyPrec prec_btype l, ppNameInfix name, prettyPrec prec_btype r] instance Pretty (FieldDecl l) where pretty (FieldDecl _ names ty) = myFsepSimple $ (punctuate comma . map pretty $ names) ++ [text "::", pretty ty] instance Pretty (BangType l) where pretty BangedTy {} = char '!' pretty LazyTy {} = char '~' pretty NoStrictAnnot {} = empty instance Pretty (Unpackedness l) where pretty Unpack {} = text "{-# UNPACK #-} " pretty NoUnpack {} = text "{-# NOUNPACK #-} " pretty NoUnpackPragma {} = empty instance Pretty (Deriving l) where pretty (Deriving _ mds d) = hsep [ text "deriving" , pp_strat_before , pp_dct , pp_strat_after ] where pp_dct = case d of [d'] -> pretty d' _ -> parenList (map pretty d) -- @via@ is unique in that in comes /after/ the class being derived, -- so we must special-case it. (pp_strat_before, pp_strat_after) = case mds of Just (via@DerivVia{}) -> (empty, pretty via) _ -> (maybePP pretty mds, empty) instance Pretty (DerivStrategy l) where pretty ds = case ds of DerivStock _ -> text "stock" DerivAnyclass _ -> text "anyclass" DerivNewtype _ -> text "newtype" DerivVia _ ty -> text "via" <+> pretty ty ------------------------- Types ------------------------- ppBType :: Type l -> Doc ppBType = prettyPrec prec_btype ppAType :: Type l -> Doc ppAType = prettyPrec prec_atype -- precedences for types prec_btype, prec_atype :: Int prec_btype = 1 -- left argument of ->, -- or either argument of an infix data constructor prec_atype = 2 -- argument of type or data constructor, or of a class instance Pretty (Type l) where prettyPrec p (TyForall _ mtvs ctxt htype) = parensIf (p > 0) $ myFsep [ppForall mtvs, maybePP pretty ctxt, pretty htype] prettyPrec _ (TyStar _) = text "*" prettyPrec p (TyFun _ a b) = parensIf (p > 0) $ myFsep [ppBType a, text "->", pretty b] prettyPrec _ (TyTuple _ bxd l) = let ds = map pretty l in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds prettyPrec _ (TyUnboxedSum _ es) = unboxedSumType (map pretty es) prettyPrec _ (TyList _ t) = brackets $ pretty t prettyPrec _ (TyParArray _ t) = bracketColonList [pretty t] prettyPrec p (TyApp _ a b) = {- | a == list_tycon = brackets $ pretty b -- special case | otherwise = -} parensIf (p > prec_btype) $ myFsep [pretty a, ppAType b] prettyPrec _ (TyVar _ name) = pretty name prettyPrec _ (TyCon _ name) = pretty name prettyPrec _ (TyParen _ t) = parens (pretty t) prettyPrec _ (TyInfix _ a op b) = myFsep [pretty a, pretty op, pretty b] prettyPrec _ (TyKind _ t k) = parens (myFsep [pretty t, text "::", pretty k]) prettyPrec _ (TyPromoted _ p) = pretty p prettyPrec p (TyEquals _ a b) = parensIf (p > 0) (myFsep [pretty a, text "~", pretty b]) prettyPrec _ (TySplice _ s) = pretty s prettyPrec _ (TyBang _ b u t) = pretty u <> pretty b <> prettyPrec prec_atype t prettyPrec _ (TyWildCard _ mn) = char '_' <> maybePP pretty mn prettyPrec _ (TyQuasiQuote _ n qt) = text ("[" ++ n ++ "|" ++ qt ++ "|]") instance Pretty (MaybePromotedName l) where pretty (PromotedName _ q) = char '\'' <> ppQNameInfix q pretty (UnpromotedName _ q) = ppQNameInfix q instance Pretty (Promoted l) where pretty p = case p of PromotedInteger _ n _ -> integer n PromotedString _ s _ -> doubleQuotes $ text s PromotedCon _ hasQuote qn -> addQuote hasQuote (pretty qn) PromotedList _ hasQuote list -> addQuote hasQuote $ bracketList . punctuate comma . map pretty $ list PromotedTuple _ list -> addQuote True $ parenList $ map pretty list PromotedUnit {} -> addQuote True $ text "()" where addQuote True doc = char '\'' <> doc addQuote False doc = doc instance Pretty (TyVarBind l) where pretty (KindedVar _ var kind) = parens $ myFsep [pretty var, text "::", pretty kind] pretty (UnkindedVar _ var) = pretty var ppForall :: Maybe [TyVarBind l] -> Doc ppForall Nothing = empty ppForall (Just []) = empty ppForall (Just vs) = myFsep (text "forall" : map pretty vs ++ [char '.']) ---------------------------- Kinds ---------------------------- ppOptKind :: Maybe (Kind l) -> [Doc] ppOptKind Nothing = [] ppOptKind (Just k) = [text "::", pretty k] ------------------- Functional Dependencies ------------------- instance Pretty (FunDep l) where pretty (FunDep _ from to) = myFsep $ map pretty from ++ [text "->"] ++ map pretty to ppFunDeps :: [FunDep l] -> Doc ppFunDeps [] = empty ppFunDeps fds = myFsep $ (char '|':) . punctuate comma . map pretty $ fds ------------------------- Expressions ------------------------- instance Pretty (Rhs l) where pretty (UnGuardedRhs _ e) = equals <+> pretty e pretty (GuardedRhss _ guardList) = myVcat . map pretty $ guardList instance Pretty (GuardedRhs l) where pretty (GuardedRhs _pos guards ppBody') = myFsep $ [char '|'] ++ (punctuate comma . map pretty $ guards) ++ [equals, pretty ppBody'] newtype GuardedAlts l = GuardedAlts (Rhs l) newtype GuardedAlt l = GuardedAlt (GuardedRhs l) instance Pretty (GuardedAlts l) where pretty (GuardedAlts (UnGuardedRhs _ e)) = text "->" <+> pretty e pretty (GuardedAlts (GuardedRhss _ guardList)) = myVcat . map (pretty . GuardedAlt) $ guardList instance Pretty (GuardedAlt l) where pretty (GuardedAlt (GuardedRhs _pos guards ppBody')) = myFsep $ [char '|'] ++ (punctuate comma . map pretty $ guards) ++ [text "->", pretty ppBody'] instance Pretty (Literal l) where pretty (Int _ i _) = integer i pretty (Char _ c _) = text (show c) pretty (String _ s _) = text (show s) pretty (Frac _ r _) = double (fromRational r) -- GHC unboxed literals: pretty (PrimChar _ c _) = text (show c) <> char '#' pretty (PrimString _ s _) = text (show s) <> char '#' pretty (PrimInt _ i _) = integer i <> char '#' pretty (PrimWord _ w _) = integer w <> text "##" pretty (PrimFloat _ r _) = float (fromRational r) <> char '#' pretty (PrimDouble _ r _) = double (fromRational r) <> text "##" instance Pretty (Exp l) where prettyPrec _ (Lit _ l) = pretty l -- lambda stuff -- WARNING: This stuff is fragile. See #152 for one example of how -- things can break. prettyPrec p (InfixApp _ a op b) = parensIf (p > 2) $ myFsep [prettyPrec 1 a, pretty op, prettyPrec 1 b] prettyPrec p (NegApp _ e) = parensIf (p > 0) $ char '-' <> prettyPrec 2 e prettyPrec p (App _ a b) = parensIf (p > 3) $ myFsep [prettyPrec 3 a, prettyPrec 4 b] prettyPrec p (Lambda _loc patList ppBody') = parensIf (p > 1) $ myFsep $ char '\\' : map (prettyPrec 3) patList ++ [text "->", pretty ppBody'] -- keywords -- two cases for lets prettyPrec p (Let _ (BDecls _ declList) letBody) = parensIf (p > 1) $ ppLetExp declList letBody prettyPrec p (Let _ (IPBinds _ bindList) letBody) = parensIf (p > 1) $ ppLetExp bindList letBody prettyPrec p (If _ cond thenexp elsexp) = parensIf (p > 1) $ myFsep [text "if", pretty cond, text "then", pretty thenexp, text "else", pretty elsexp] prettyPrec p (MultiIf _ alts) = parensIf (p > 1) $ text "if" $$$ ppBody multiIfIndent (map (pretty . GuardedAlt) alts) prettyPrec p (Case _ cond altList) = parensIf (p > 1) $ myFsep ([text "case", pretty cond, text "of"] ++ if null altList then [text "{", text "}"] else []) $$$ ppBody caseIndent (map pretty altList) prettyPrec p (Do _ stmtList) = parensIf (p > 1) $ text "do" $$$ ppBody doIndent (map pretty stmtList) prettyPrec p (MDo _ stmtList) = parensIf (p > 1) $ text "mdo" $$$ ppBody doIndent (map pretty stmtList) -- Constructors & Vars prettyPrec _ (Var _ name) = pretty name prettyPrec _ (OverloadedLabel _ name) = text ('#':name) prettyPrec _ (IPVar _ ipname) = pretty ipname prettyPrec _ (Con _ name) = pretty name prettyPrec _ (Tuple _ bxd expList) = let ds = map pretty expList in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds prettyPrec _ (UnboxedSum _ before after exp) = printUnboxedSum before after exp prettyPrec _ (TupleSection _ bxd mExpList) = let ds = map (maybePP pretty) mExpList in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds -- weird stuff prettyPrec _ (Paren _ e) = parens . pretty $ e prettyPrec _ (LeftSection _ e op) = parens (pretty e <+> pretty op) prettyPrec _ (RightSection _ op e) = parens (pretty op <+> pretty e) prettyPrec _ (RecConstr _ c fieldList) = pretty c <> (braceList . map pretty $ fieldList) prettyPrec _ (RecUpdate _ e fieldList) = pretty e <> (braceList . map pretty $ fieldList) -- Lists and parallel arrays prettyPrec _ (List _ list) = bracketList . punctuate comma . map pretty $ list prettyPrec _ (ParArray _ arr) = bracketColonList . map pretty $ arr prettyPrec _ (EnumFrom _ e) = bracketList [pretty e, text ".."] prettyPrec _ (EnumFromTo _ from to) = bracketList [pretty from, text "..", pretty to] prettyPrec _ (EnumFromThen _ from thenE) = bracketList [pretty from <> comma, pretty thenE, text ".."] prettyPrec _ (EnumFromThenTo _ from thenE to) = bracketList [pretty from <> comma, pretty thenE, text "..", pretty to] prettyPrec _ (ParArrayFromTo _ from to) = bracketColonList [pretty from, text "..", pretty to] prettyPrec _ (ParArrayFromThenTo _ from thenE to) = bracketColonList [pretty from <> comma, pretty thenE, text "..", pretty to] prettyPrec _ (ListComp _ e qualList) = bracketList ([pretty e, char '|'] ++ (punctuate comma . map pretty $ qualList)) prettyPrec _ (ParComp _ e qualLists) = bracketList (punctuate (char '|') $ pretty e : map (hsep . punctuate comma . map pretty) qualLists) prettyPrec _ (ParArrayComp _ e qualArrs) = bracketColonList (punctuate (char '|') $ pretty e : map (hsep . punctuate comma . map pretty) qualArrs) prettyPrec p (ExpTypeSig _pos e ty) = parensIf (p > 0) $ myFsep [pretty e, text "::", pretty ty] -- Template Haskell prettyPrec _ (BracketExp _ b) = pretty b prettyPrec _ (SpliceExp _ s) = pretty s prettyPrec _ (TypQuote _ t) = text "\'\'" <> pretty t prettyPrec _ (VarQuote _ x) = text "\'" <> pretty x prettyPrec _ (QuasiQuote _ n qt) = text ("[" ++ n ++ "|" ++ qt ++ "|]") -- Hsx prettyPrec _ (XTag _ n attrs mattr cs) = let ax = maybe [] (return . pretty) mattr in hcat $ (myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [char '>']): map pretty cs ++ [myFsep [text " pretty n, char '>']] prettyPrec _ (XETag _ n attrs mattr) = let ax = maybe [] (return . pretty) mattr in myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [text "/>"] prettyPrec _ (XPcdata _ s) = text s prettyPrec _ (XExpTag _ e) = myFsep [text "<%", pretty e, text "%>"] prettyPrec _ (XChildTag _ cs) = myFsep $ text "<%>" : map pretty cs ++ [text ""] -- Pragmas prettyPrec _ (CorePragma _ s e) = myFsep $ map text ["{-# CORE", show s, "#-}"] ++ [pretty e] prettyPrec _ (SCCPragma _ s e) = myFsep $ map text ["{-# SCC", show s, "#-}"] ++ [pretty e] prettyPrec _ (GenPragma _ s (a,b) (c,d) e) = myFsep [text "{-# GENERATED", text $ show s, int a, char ':', int b, char '-', int c, char ':', int d, text "#-}", pretty e] -- Arrows prettyPrec p (Proc _ pat e) = parensIf (p > 1) $ myFsep [text "proc", pretty pat, text "->", pretty e] prettyPrec p (LeftArrApp _ l r) = parensIf (p > 0) $ myFsep [pretty l, text "-<", pretty r] prettyPrec p (RightArrApp _ l r) = parensIf (p > 0) $ myFsep [pretty l, text ">-", pretty r] prettyPrec p (LeftArrHighApp _ l r) = parensIf (p > 0) $ myFsep [pretty l, text "-<<", pretty r] prettyPrec p (RightArrHighApp _ l r) = parensIf (p > 0) $ myFsep [pretty l, text ">>-", pretty r] prettyPrec _ (ArrOp _ e) = myFsep [text "(|", pretty e, text "|)"] -- LamdaCase prettyPrec p (LCase _ altList) = parensIf (p > 1) $ myFsep (text "\\case": if null altList then [text "{", text "}"] else []) $$$ ppBody caseIndent (map pretty altList) prettyPrec _ (TypeApp _ ty) = char '@' <> pretty ty printUnboxedSum :: Pretty e => Int -> Int -> e -> Doc printUnboxedSum before after exp = hashParens . myFsep $ (replicate before (text "|") ++ [pretty exp] ++ (replicate after (text "|"))) instance Pretty (XAttr l) where pretty (XAttr _ n v) = myFsep [pretty n, char '=', pretty v] instance Pretty (XName l) where pretty (XName _ n) = text n pretty (XDomName _ d n) = text d <> char ':' <> text n ppLetExp :: (PrettyDeclLike a, Pretty b) => [a] -> b -> Doc ppLetExp l b = myFsep [text "let" <+> ppBody letIndent (ppDecls False l), text "in", pretty b] --------------------- Template Haskell ------------------------- instance Pretty (Bracket l) where pretty (ExpBracket _ e) = ppBracket "[|" e pretty (TExpBracket _ e) = myFsep [text "[||", pretty e, text "||]"] pretty (PatBracket _ p) = ppBracket "[p|" p pretty (TypeBracket _ t) = ppBracket "[t|" t pretty (DeclBracket _ d) = myFsep $ text "[d|" : ppDecls True d ++ [text "|]"] ppBracket :: Pretty a => String -> a -> Doc ppBracket o x = myFsep [text o, pretty x, text "|]"] instance Pretty (Splice l) where pretty (IdSplice _ s) = char '$' <> text s pretty (TIdSplice _ s) = char '$' <> char '$' <> text s pretty (TParenSplice _ e) = myFsep [text "$$(", pretty e, char ')'] pretty (ParenSplice _ e) = myFsep [text "$(", pretty e, char ')'] ------------------------- Patterns ----------------------------- instance Pretty (Pat l) where prettyPrec _ (PVar _ name) = pretty name prettyPrec _ (PLit _ (Signless {}) lit) = pretty lit prettyPrec p (PLit _ (Negative{}) lit) = parensIf (p > 1) $ char '-' <> pretty lit prettyPrec p (PInfixApp l a op b) = parensIf (p > 0) $ myFsep [prettyPrec 1 a, pretty (QConOp l op), prettyPrec 1 b] prettyPrec p (PApp _ n ps) = parensIf (p > 2 && not (null ps)) $ myFsep (pretty n : map (prettyPrec 3) ps) prettyPrec _ (PTuple _ bxd ps) = let ds = map pretty ps in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds prettyPrec _ (PUnboxedSum _ before after exp) = printUnboxedSum before after exp prettyPrec _ (PList _ ps) = bracketList . punctuate comma . map pretty $ ps prettyPrec _ (PParen _ pat) = parens . pretty $ pat prettyPrec _ (PRec _ c fields) = pretty c <> (braceList . map pretty $ fields) -- special case that would otherwise be buggy prettyPrec _ (PAsPat _ name (PIrrPat _ pat)) = myFsep [pretty name <> char '@', char '~' <> prettyPrec 3 pat] prettyPrec _ (PAsPat _ name pat) = hcat [pretty name, char '@', prettyPrec 3 pat] prettyPrec _ PWildCard {} = char '_' prettyPrec _ (PIrrPat _ pat) = char '~' <> prettyPrec 3 pat prettyPrec p (PatTypeSig _pos pat ty) = parensIf (p > 0) $ myFsep [pretty pat, text "::", pretty ty] prettyPrec p (PViewPat _ e pat) = parensIf (p > 0) $ myFsep [pretty e, text "->", pretty pat] prettyPrec p (PNPlusK _ n k) = parensIf (p > 0) $ myFsep [pretty n, text "+", text $ show k] -- HaRP prettyPrec _ (PRPat _ rs) = bracketList . punctuate comma . map pretty $ rs -- Hsx prettyPrec _ (PXTag _ n attrs mattr cp) = let ap = maybe [] (return . pretty) mattr in hcat $ -- TODO: should not introduce blanks (myFsep $ (char '<' <> pretty n): map pretty attrs ++ ap ++ [char '>']): map pretty cp ++ [myFsep [text " pretty n, char '>']] prettyPrec _ (PXETag _ n attrs mattr) = let ap = maybe [] (return . pretty) mattr in myFsep $ (char '<' <> pretty n): map pretty attrs ++ ap ++ [text "/>"] prettyPrec _ (PXPcdata _ s) = text s prettyPrec _ (PXPatTag _ p) = myFsep [text "<%", pretty p, text "%>"] prettyPrec _ (PXRPats _ ps) = myFsep $ text "<[" : map pretty ps ++ [text "%>"] -- BangPatterns prettyPrec _ (PBangPat _ pat) = text "!" <> prettyPrec 3 pat prettyPrec _ (PSplice _ s) = pretty s prettyPrec _ (PQuasiQuote _ n qt) = text ("[$" ++ n ++ "|" ++ qt ++ "|]") instance Pretty (PXAttr l) where pretty (PXAttr _ n p) = myFsep [pretty n, char '=', pretty p] instance Pretty (PatField l) where pretty (PFieldPat _ name pat) = myFsep [pretty name, equals, pretty pat] pretty (PFieldPun _ name) = pretty name pretty (PFieldWildcard{}) = text ".." --------------------- Regular Patterns ------------------------- instance Pretty (RPat l) where pretty (RPOp _ r op) = pretty r <> pretty op pretty (RPEither _ r1 r2) = parens . myFsep $ [pretty r1, char '|', pretty r2] pretty (RPSeq _ rs) = myFsep $ text "(|" : (punctuate comma . map pretty $ rs) ++ [text "|)"] pretty (RPGuard _ r gs) = myFsep $ text "(|" : pretty r : char '|' : (punctuate comma . map pretty $ gs) ++ [text "|)"] -- special case that would otherwise be buggy pretty (RPCAs _ n (RPPat _ (PIrrPat _ p))) = myFsep [pretty n <> text "@:", char '~' <> pretty p] pretty (RPCAs _ n r) = hcat [pretty n, text "@:", pretty r] -- special case that would otherwise be buggy pretty (RPAs _ n (RPPat _ (PIrrPat _ p))) = myFsep [pretty n <> text "@:", char '~' <> pretty p] pretty (RPAs _ n r) = hcat [pretty n, char '@', pretty r] pretty (RPPat _ p) = pretty p pretty (RPParen _ rp) = parens . pretty $ rp instance Pretty (RPatOp l) where pretty RPStar{} = char '*' pretty RPStarG{} = text "*!" pretty RPPlus{} = char '+' pretty RPPlusG{} = text "+!" pretty RPOpt{} = char '?' pretty RPOptG{} = text "?!" ------------------------- Case bodies ------------------------- instance Pretty (Alt l) where pretty (Alt _pos e gAlts binds) = pretty e <+> pretty (GuardedAlts gAlts) $$$ ppWhere binds ------------------------- Statements in monads, guards & list comprehensions ----- instance Pretty (Stmt l) where pretty (Generator _loc e from) = pretty e <+> text "<-" <+> pretty from pretty (Qualifier _ e) = pretty e -- two cases for lets pretty (LetStmt _ (BDecls _ declList)) = ppLetStmt declList pretty (LetStmt _ (IPBinds _ bindList)) = ppLetStmt bindList pretty (RecStmt _ stmtList) = text "rec" $$$ ppBody letIndent (map pretty stmtList) ppLetStmt :: Pretty a => [a] -> Doc ppLetStmt l = text "let" $$$ ppBody letIndent (map pretty l) instance Pretty (QualStmt l) where pretty (QualStmt _ s) = pretty s pretty (ThenTrans _ f) = myFsep [text "then", pretty f] pretty (ThenBy _ f e) = myFsep [text "then", pretty f, text "by", pretty e] pretty (GroupBy _ e) = myFsep [text "then", text "group", text "by", pretty e] pretty (GroupUsing _ f) = myFsep [text "then", text "group", text "using", pretty f] pretty (GroupByUsing _ e f) = myFsep [text "then", text "group", text "by", pretty e, text "using", pretty f] ------------------------- Record updates instance Pretty (FieldUpdate l) where pretty (FieldUpdate _ name e) = myFsep [pretty name, equals, pretty e] pretty (FieldPun _ name) = pretty name pretty (FieldWildcard {}) = text ".." ------------------------- Names ------------------------- instance Pretty (QOp l) where pretty (QVarOp _ n) = ppQNameInfix n pretty (QConOp _ n) = ppQNameInfix n ppQNameInfix :: QName l -> Doc ppQNameInfix name | isSymbolQName name = ppQName name | otherwise = char '`' <> ppQName name <> char '`' instance Pretty (QName l) where pretty name = case name of UnQual _ (Symbol _ ('#':_)) -> char '(' <+> ppQName name <+> char ')' _ -> parensIf (isSymbolQName name) (ppQName name) ppQName :: QName l -> Doc ppQName (UnQual _ name) = ppName name ppQName (Qual _ m name) = pretty m <> char '.' <> ppName name ppQName (Special _ sym) = pretty sym instance Pretty (Op l) where pretty (VarOp _ n) = ppNameInfix n pretty (ConOp _ n) = ppNameInfix n ppNameInfix :: Name l -> Doc ppNameInfix name | isSymbolName name = ppName name | otherwise = char '`' <> ppName name <> char '`' instance Pretty (Name l) where pretty name = case name of Symbol _ ('#':_) -> char '(' <+> ppName name <+> char ')' _ -> parensIf (isSymbolName name) (ppName name) ppName :: Name l -> Doc ppName (Ident _ s) = text s ppName (Symbol _ s) = text s instance Pretty (IPName l) where pretty (IPDup _ s) = char '?' <> text s pretty (IPLin _ s) = char '%' <> text s instance PrettyDeclLike (IPBind l) where wantsBlankline _ = False instance Pretty (IPBind l) where pretty (IPBind _loc ipname exp) = myFsep [pretty ipname, equals, pretty exp] instance Pretty (CName l) where pretty (VarName _ n) = pretty n pretty (ConName _ n) = pretty n instance Pretty (SpecialCon l) where pretty (UnitCon {}) = text "()" pretty (ListCon {}) = text "[]" pretty (FunCon {}) = text "->" pretty (TupleCon _ b n) = listFun $ foldr (<>) empty (replicate (n-1) comma) where listFun = if b == Unboxed then hashParens else parens pretty (Cons {}) = text ":" pretty (UnboxedSingleCon {}) = text "(# #)" pretty (ExprHole {}) = text "_" isSymbolName :: Name l -> Bool isSymbolName (Symbol {}) = True isSymbolName _ = False isSymbolQName :: QName l -> Bool isSymbolQName (UnQual _ n) = isSymbolName n isSymbolQName (Qual _ _ n) = isSymbolName n isSymbolQName (Special _ (Cons {})) = True isSymbolQName (Special _ (FunCon {})) = True isSymbolQName _ = False --getSpecialName :: QName l -> Maybe (SpecialCon l) --getSpecialName (Special _ n) = Just n --getSpecialName _ = Nothing -- Contexts are "sets" of assertions. Several members really means it's a -- CxTuple, but we can't represent that in our list of assertions. -- Therefore: print single member contexts without parenthesis, and treat -- larger contexts as tuples. instance (Pretty (Context l)) where pretty (CxEmpty _) = text "()" <+> text "=>" pretty (CxSingle _ ctxt) = pretty ctxt <+> text "=>" pretty (CxTuple _ context) = mySep [parenList (map pretty context), text "=>"] instance Pretty (Asst l) where pretty (TypeA _ t) = pretty t pretty (IParam _ i t) = myFsep [pretty i, text "::", pretty t] pretty (ParenA _ a) = parens (pretty a) -- Pretty print a source location, useful for printing out error messages instance Pretty SrcLoc where pretty srcLoc = return $ P.hcat [ colonFollow (P.text $ srcFilename srcLoc) , colonFollow (P.int $ srcLine srcLoc) , P.int $ srcColumn srcLoc ] colonFollow :: P.Doc -> P.Doc colonFollow p = P.hcat [ p, P.colon ] instance Pretty SrcSpan where pretty srcSpan = return $ P.hsep [ colonFollow (P.text $ srcSpanFilename srcSpan) , P.hcat [ P.text "(" , P.int $ srcSpanStartLine srcSpan , P.colon , P.int $ srcSpanStartColumn srcSpan , P.text ")" ] , P.text "-" , P.hcat [ P.text "(" , P.int $ srcSpanEndLine srcSpan , P.colon , P.int $ srcSpanEndColumn srcSpan , P.text ")" ] ] --------------------------------------------------------------------- -- Annotated version ------------------------- Pretty-Print a Module -------------------- instance Pretty (Module pos) where pretty (Module _ mbHead os imp decls) = myVcat $ map pretty os ++ (case mbHead of Nothing -> id Just h -> \x -> [topLevel (pretty h) x]) (map pretty imp ++ ppDecls (isJust mbHead || not (null imp) || not (null os)) decls) pretty (XmlPage _ _mn os n attrs mattr cs) = myVcat $ map pretty os ++ [let ax = maybe [] (return . pretty) mattr in hcat $ (myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [char '>']): map pretty cs ++ [myFsep [text " pretty n, char '>']]] pretty (XmlHybrid _ mbHead os imp decls n attrs mattr cs) = myVcat $ map pretty os ++ [text "<%"] ++ (case mbHead of Nothing -> id Just h -> \x -> [topLevel (pretty h) x]) (map pretty imp ++ ppDecls (isJust mbHead || not (null imp) || not (null os)) decls ++ [let ax = maybe [] (return . pretty) mattr in hcat $ (myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [char '>']): map pretty cs ++ [myFsep [text " pretty n, char '>']]]) ------------------------- pp utils ------------------------- maybePP :: (a -> Doc) -> Maybe a -> Doc maybePP _ Nothing = empty maybePP pp (Just a) = pp a parenList :: [Doc] -> Doc parenList = parens . myFsepSimple . punctuate comma hashParenList :: [Doc] -> Doc hashParenList = hashParens . myFsepSimple . punctuate comma unboxedSumType :: [Doc] -> Doc unboxedSumType = hashParens . myFsepSimple . punctuate (text " |") hashParens :: Doc -> Doc hashParens = parens . hashes where hashes doc = char '#' <+> doc <+> char '#' braceList :: [Doc] -> Doc braceList = braces . myFsepSimple . punctuate comma bracketList :: [Doc] -> Doc bracketList = brackets . myFsepSimple bracketColonList :: [Doc] -> Doc bracketColonList = bracketColons . myFsepSimple where bracketColons = brackets . colons colons doc = char ':' <> doc <> char ':' -- Wrap in braces and semicolons, with an extra space at the start in -- case the first doc begins with "-", which would be scanned as {- flatBlock :: [Doc] -> Doc flatBlock = braces . (space <>) . hsep . punctuate semi -- Same, but put each thing on a separate line prettyBlock :: [Doc] -> Doc prettyBlock = braces . (space <>) . vcat . punctuate semi -- Monadic PP Combinators -- these examine the env blankline :: Doc -> Doc blankline dl = do{e<-getPPEnv;if spacing e && layout e /= PPNoLayout then text "" $+$ dl else dl} topLevel :: Doc -> [Doc] -> Doc topLevel header dl = do e <- fmap layout getPPEnv case e of PPOffsideRule -> header $$ vcat dl PPSemiColon -> header $$ prettyBlock dl PPInLine -> header $$ prettyBlock dl PPNoLayout -> header <+> flatBlock dl ppBody :: (PPHsMode -> Int) -> [Doc] -> Doc ppBody f dl = do e <- fmap layout getPPEnv case e of PPOffsideRule -> indent PPSemiColon -> indentExplicit _ -> flatBlock dl where indent = do{i <-fmap f getPPEnv;nest i . vcat $ dl} indentExplicit = do {i <- fmap f getPPEnv; nest i . prettyBlock $ dl} -- | Indent without braces. Useful for deriving clauses etc. ppIndent :: (PPHsMode -> Int) -> [Doc] -> Doc ppIndent f dl = do i <- fmap f getPPEnv nest i . vcat $ dl ($$$) :: Doc -> Doc -> Doc a $$$ b = layoutChoice (a $$) (a <+>) b mySep :: [Doc] -> Doc mySep = layoutChoice mySep' hsep where -- ensure paragraph fills with indentation. mySep' [x] = x mySep' (x:xs) = x <+> fsep xs mySep' [] = error "Internal error: mySep" myVcat :: [Doc] -> Doc myVcat = layoutChoice vcat hsep myFsepSimple :: [Doc] -> Doc myFsepSimple = layoutChoice fsep hsep -- same, except that continuation lines are indented, -- which is necessary to avoid triggering the offside rule. myFsep :: [Doc] -> Doc myFsep = layoutChoice fsep' hsep where fsep' [] = empty fsep' (d:ds) = do e <- getPPEnv let n = onsideIndent e nest n (fsep (nest (-n) d:ds)) layoutChoice :: (a -> Doc) -> (a -> Doc) -> a -> Doc layoutChoice a b dl = do e <- getPPEnv if layout e == PPOffsideRule || layout e == PPSemiColon then a dl else b dl -------------------------------------------------------------------------------- -- Pretty-printing of internal constructs, for error messages while parsing instance SrcInfo loc => Pretty (P.PExp loc) where pretty (P.Lit _ l) = pretty l pretty (P.InfixApp _ a op b) = myFsep [pretty a, pretty op, pretty b] pretty (P.NegApp _ e) = myFsep [char '-', pretty e] pretty (P.App _ a b) = myFsep [pretty a, pretty b] pretty (P.Lambda _loc expList ppBody') = myFsep $ char '\\' : map pretty expList ++ [text "->", pretty ppBody'] pretty (P.Let _ (BDecls _ declList) letBody) = ppLetExp declList letBody pretty (P.Let _ (IPBinds _ bindList) letBody) = ppLetExp bindList letBody pretty (P.If _ cond thenexp elsexp) = myFsep [text "if", pretty cond, text "then", pretty thenexp, text "else", pretty elsexp] pretty (P.MultiIf _ alts) = text "if" $$$ ppBody caseIndent (map pretty alts) pretty (P.Case _ cond altList) = myFsep [text "case", pretty cond, text "of"] $$$ ppBody caseIndent (map pretty altList) pretty (P.Do _ stmtList) = text "do" $$$ ppBody doIndent (map pretty stmtList) pretty (P.MDo _ stmtList) = text "mdo" $$$ ppBody doIndent (map pretty stmtList) pretty (P.Var _ name) = pretty name pretty (P.OverloadedLabel _ name) = text name pretty (P.IPVar _ ipname) = pretty ipname pretty (P.Con _ name) = pretty name pretty (P.TupleSection _ bxd mExpList) = let ds = map (maybePP pretty) mExpList in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds pretty (P.UnboxedSum _ before after exp) = printUnboxedSum before after exp pretty (P.Paren _ e) = parens . pretty $ e pretty (P.RecConstr _ c fieldList) = pretty c <> (braceList . map pretty $ fieldList) pretty (P.RecUpdate _ e fieldList) = pretty e <> (braceList . map pretty $ fieldList) pretty (P.List _ list) = bracketList . punctuate comma . map pretty $ list pretty (P.ParArray _ arr) = bracketColonList . punctuate comma . map pretty $ arr pretty (P.EnumFrom _ e) = bracketList [pretty e, text ".."] pretty (P.EnumFromTo _ from to) = bracketList [pretty from, text "..", pretty to] pretty (P.EnumFromThen _ from thenE) = bracketList [pretty from <> comma, pretty thenE, text ".."] pretty (P.EnumFromThenTo _ from thenE to) = bracketList [pretty from <> comma, pretty thenE, text "..", pretty to] pretty (P.ParArrayFromTo _ from to) = bracketColonList [pretty from, text "..", pretty to] pretty (P.ParArrayFromThenTo _ from thenE to) = bracketColonList [pretty from <> comma, pretty thenE, text "..", pretty to] pretty (P.ParComp _ e qualLists) = bracketList (intersperse (char '|') $ pretty e : (punctuate comma . concatMap (map pretty) $ qualLists)) pretty (P.ParArrayComp _ e qualArrs) = bracketColonList (intersperse (char '|') $ pretty e : (punctuate comma . concatMap (map pretty) $ qualArrs)) pretty (P.ExpTypeSig _pos e ty) = myFsep [pretty e, text "::", pretty ty] pretty (P.BracketExp _ b) = pretty b pretty (P.SpliceExp _ s) = pretty s pretty (P.TypQuote _ t) = text "\'\'" <> pretty t pretty (P.VarQuote _ x) = text "\'" <> pretty x pretty (P.QuasiQuote _ n qt) = text ("[$" ++ n ++ "|" ++ qt ++ "|]") pretty (P.XTag _ n attrs mattr cs) = let ax = maybe [] (return . pretty) mattr in hcat $ (myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [char '>']): map pretty cs ++ [myFsep [text " pretty n, char '>']] pretty (P.XETag _ n attrs mattr) = let ax = maybe [] (return . pretty) mattr in myFsep $ (char '<' <> pretty n): map pretty attrs ++ ax ++ [text "/>"] pretty (P.XPcdata _ s) = text s pretty (P.XExpTag _ e) = myFsep [text "<%", pretty e, text "%>"] pretty (P.XChildTag _ es) = myFsep $ text "<%>" : map pretty es ++ [text ""] pretty (P.CorePragma _ s e) = myFsep $ map text ["{-# CORE", show s, "#-}"] ++ [pretty e] pretty (P.SCCPragma _ s e) = myFsep $ map text ["{-# SCC", show s, "#-}"] ++ [pretty e] pretty (P.GenPragma _ s (a,b) (c,d) e) = myFsep [text "{-# GENERATED", text $ show s, int a, char ':', int b, char '-', int c, char ':', int d, text "#-}", pretty e] pretty (P.Proc _ p e) = myFsep [text "proc", pretty p, text "->", pretty e] pretty (P.LeftArrApp _ l r) = myFsep [pretty l, text "-<", pretty r] pretty (P.RightArrApp _ l r) = myFsep [pretty l, text ">-", pretty r] pretty (P.LeftArrHighApp _ l r) = myFsep [pretty l, text "-<<", pretty r] pretty (P.RightArrHighApp _ l r) = myFsep [pretty l, text ">>-", pretty r] pretty (P.ArrOp _ e) = myFsep [text "(|", pretty e, text "|)"] pretty (P.AsPat _ name (P.IrrPat _ pat)) = myFsep [pretty name <> char '@', char '~' <> pretty pat] pretty (P.AsPat _ name pat) = hcat [pretty name, char '@', pretty pat] pretty (P.WildCard _) = char '_' pretty (P.IrrPat _ pat) = char '~' <> pretty pat pretty (P.PostOp _ e op) = pretty e <+> pretty op pretty (P.PreOp _ op e) = pretty op <+> pretty e pretty (P.ViewPat _ e p) = myFsep [pretty e, text "->", pretty p] pretty (P.SeqRP _ rs) = myFsep $ text "(|" : (punctuate comma . map pretty $ rs) ++ [text "|)"] pretty (P.GuardRP _ r gs) = myFsep $ text "(|" : pretty r : char '|' : (punctuate comma . map pretty $ gs) ++ [text "|)"] pretty (P.EitherRP _ r1 r2) = parens . myFsep $ [pretty r1, char '|', pretty r2] pretty (P.CAsRP _ n (P.IrrPat _ e)) = myFsep [pretty n <> text "@:", char '~' <> pretty e] pretty (P.CAsRP _ n r) = hcat [pretty n, text "@:", pretty r] pretty (P.XRPats _ ps) = myFsep $ text "<[" : map pretty ps ++ [text "%>"] pretty (P.BangPat _ e) = text "!" <> pretty e pretty (P.LCase _ altList) = text "\\case" $$$ ppBody caseIndent (map pretty altList) pretty (P.TypeApp _ ty) = char '@' <> pretty ty instance SrcInfo loc => Pretty (P.PFieldUpdate loc) where pretty (P.FieldUpdate _ name e) = myFsep [pretty name, equals, pretty e] pretty (P.FieldPun _ name) = pretty name pretty (P.FieldWildcard _) = text ".." instance SrcInfo loc => Pretty (P.ParseXAttr loc) where pretty (P.XAttr _ n v) = myFsep [pretty n, char '=', pretty v] instance SrcInfo loc => Pretty (P.PContext loc) where pretty (P.CxEmpty _) = mySep [text "()", text "=>"] pretty (P.CxSingle _ asst) = mySep [pretty asst, text "=>"] pretty (P.CxTuple _ assts) = myFsep [parenList (map pretty assts), text "=>"] instance SrcInfo loc => Pretty (P.PAsst loc) where pretty (P.TypeA _ t) = pretty t pretty (P.IParam _ i t) = myFsep [pretty i, text "::", pretty t] pretty (P.ParenA _ a) = parens (pretty a) instance SrcInfo loc => Pretty (P.PType loc) where prettyPrec p (P.TyForall _ mtvs ctxt htype) = parensIf (p > 0) $ myFsep [ppForall mtvs, maybePP pretty ctxt, pretty htype] prettyPrec _ (P.TyStar _) = text "*" prettyPrec p (P.TyFun _ a b) = parensIf (p > 0) $ myFsep [prettyPrec prec_btype a, text "->", pretty b] prettyPrec _ (P.TyTuple _ bxd l) = let ds = map pretty l in case bxd of Boxed -> parenList ds Unboxed -> hashParenList ds prettyPrec _ (P.TyUnboxedSum _ es) = unboxedSumType (map pretty es) prettyPrec _ (P.TyList _ t) = brackets $ pretty t prettyPrec _ (P.TyParArray _ t) = bracketColonList [pretty t] prettyPrec p (P.TyApp _ a b) = {- | a == list_tycon = brackets $ pretty b -- special case | otherwise = -} parensIf (p > prec_btype) $ myFsep [pretty a, prettyPrec prec_atype b] prettyPrec _ (P.TyVar _ name) = pretty name prettyPrec _ (P.TyCon _ name) = pretty name prettyPrec _ (P.TyParen _ t) = parens (pretty t) prettyPrec _ (P.TyPred _ asst) = pretty asst prettyPrec _ (P.TyInfix _ a op b) = myFsep [pretty a, pretty op, pretty b] prettyPrec _ (P.TyKind _ t k) = parens (myFsep [pretty t, text "::", pretty k]) prettyPrec _ (P.TyPromoted _ p) = pretty p prettyPrec _ (P.TyEquals _ a b) = myFsep [pretty a, text "~", pretty b] prettyPrec _ (P.TySplice _ s) = pretty s prettyPrec _ (P.TyBang _ b u t) = pretty u <+> pretty b <> prettyPrec prec_atype t prettyPrec _ (P.TyWildCard _ mn) = char '_' <> maybePP pretty mn prettyPrec _ (P.TyQuasiQuote _ n qt) = text ("[$" ++ n ++ "|" ++ qt ++ "|]") haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Extension.hs0000644000000000000000000006245713603723515022330 0ustar0000000000000000{-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Extension -- Copyright : (c) Niklas Broberg 2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, niklas.broberg@chalmers.se -- Stability : transient -- Portability : portable -- -- This module defines the list of recognized modular features -- of Haskell, most often (sloppily) referred to as "extensions". -- -- Closely mimicking the Language.Haskell.Extension module from -- the Cabal library, this package also includes functionality for -- "computing" languages as sets of features. Also, we make no -- promise not to add extensions not yet recognized by Cabal. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Extension ( -- * Language definitions Language(..), knownLanguages, classifyLanguage, prettyLanguage, -- * Extensions Extension(..), KnownExtension(..), classifyExtension, parseExtension, prettyExtension, -- * Extension groups ghcDefault, glasgowExts, knownExtensions, deprecatedExtensions, -- * Semantics of extensions applied to languages impliesExts, toExtensionList ) where #if __GLASGOW_HASKELL__ < 710 import Control.Applicative ((<$>), (<|>)) #else import Control.Applicative ((<|>)) #endif import Data.Array (Array, accumArray, bounds, Ix(inRange), (!)) import Data.List (nub) import Data.Maybe (fromMaybe) import Data.Data -- Copyright notice from Cabal's Language.Haskell.Extension, -- from which we borrow plenty of features: {- All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: * Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. * Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. * Neither the name of Isaac Jones nor the names of other contributors may be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. -} data Language = -- | The Haskell 98 language as defined by the Haskell 98 report. -- Haskell98 -- | The Haskell 2010 language as defined by the Haskell 2010 report. -- | Haskell2010 -- | The minimal language resulting from disabling all recognized -- extensions - including ones that are part of all known language -- definitions e.g. MonomorphismRestriction. | HaskellAllDisabled -- | An unknown language, identified by its name. | UnknownLanguage String deriving (Show, Read, Eq, Ord, Data, Typeable) knownLanguages :: [Language] knownLanguages = [Haskell98, Haskell2010] classifyLanguage :: String -> Language classifyLanguage str = fromMaybe (UnknownLanguage str) $ lookup str langTable where langTable = [ (show lang, lang) | lang <- knownLanguages ] prettyLanguage :: Language -> String prettyLanguage (UnknownLanguage name) = name prettyLanguage lang = show lang -- | This represents language extensions beyond a base 'Language' definition -- (such as 'Haskell98') that are supported by some implementations, usually -- in some special mode. data Extension = -- | Enable a known extension EnableExtension KnownExtension -- | Disable a known extension | DisableExtension KnownExtension -- | An unknown extension, identified by the name of its @LANGUAGE@ -- pragma. | UnknownExtension String deriving (Show, Read, Eq, Ord) data KnownExtension = -- | [GHC § 7.6.3.4] Allow overlapping class instances, -- provided there is a unique most specific instance for each use. OverlappingInstances -- | [GHC § 7.6.3.3] Ignore structural rules guaranteeing the -- termination of class instance resolution. Termination is -- guaranteed by a fixed-depth recursion stack, and compilation -- may fail if this depth is exceeded. | UndecidableInstances -- | [GHC § 7.6.3.4] Implies 'OverlappingInstances'. Allow the -- implementation to choose an instance even when it is possible -- that further instantiation of types will lead to a more specific -- instance being applicable. | IncoherentInstances -- | [GHC § 7.6.3.5] Allow type signatures in instances. | InstanceSigs -- | [GHC § 7.3.8] Deprecated in GHC. Allows recursive -- bindings in @do@ blocks, using the @rec@ keyword. | DoRec -- | [GHC § 7.3.8.2] Allows recursive bindings using @mdo@, a -- variant of @do@, and @rec@. | RecursiveDo -- | [GHC § 7.3.9] Provide syntax for writing list -- comprehensions which iterate over several lists together, like -- the 'zipWith' family of functions. | ParallelListComp -- | [GHC § 7.6.1.1] Allow multiple parameters in a type class. | MultiParamTypeClasses -- | [GHC § 7.17] Enable the dreaded monomorphism restriction. | MonomorphismRestriction -- | [GHC § 7.6.2] Allow a specification attached to a -- multi-parameter type class which indicates that some parameters -- are entirely determined by others. The implementation will check -- that this property holds for the declared instances, and will use -- this property to reduce ambiguity in instance resolution. | FunctionalDependencies -- | [GHC § 7.8.5] Like 'RankNTypes' but does not allow a -- higher-rank type to itself appear on the left of a function -- arrow. | Rank2Types -- | [GHC § 7.8.5] Allow a universally-quantified type to occur on -- the left of a function arrow. | RankNTypes -- | [GHC § 7.8.5] Allow data constructors to have polymorphic -- arguments. Unlike 'RankNTypes', does not allow this for ordinary -- functions. | PolymorphicComponents -- | [GHC § 7.4.4] Allow existentially-quantified data constructors. | ExistentialQuantification -- | [GHC § 7.8.7] Cause a type variable in a signature, which has an -- explicit @forall@ quantifier, to scope over the definition of the -- accompanying value declaration. | ScopedTypeVariables -- | Deprecated, use 'ScopedTypeVariables' instead. | PatternSignatures -- | [GHC § 7.8.3] Enable implicit function parameters with dynamic -- scope. | ImplicitParams -- | [GHC § 7.8.2] Relax some restrictions on the form of the context -- of a type signature. | FlexibleContexts -- | [GHC § 7.6.3.2] Relax some restrictions on the form of the -- context of an instance declaration. | FlexibleInstances -- | [GHC § 7.4.1] Allow data type declarations with no constructors. | EmptyDataDecls -- | [GHC § 4.10.3] Run the C preprocessor on Haskell source code. | CPP -- | [GHC § 7.8.4] Allow an explicit kind signature giving the kind of -- types over which a type variable ranges. | KindSignatures -- | [GHC § 7.11] Enable a form of pattern which forces evaluation -- before an attempted match, and a form of strict @let@/@where@ -- binding. | BangPatterns -- | [GHC § 7.6.3.1] Allow type synonyms in instance heads. | TypeSynonymInstances -- | [GHC § 7.9] Enable Template Haskell, a system for compile-time -- metaprogramming. | TemplateHaskell -- | [GHC § 8] Enable the Foreign Function Interface. In GHC, -- implements the standard Haskell 98 Foreign Function Interface -- Addendum, plus some GHC-specific extensions. | ForeignFunctionInterface -- | [GHC § 7.10] Enable arrow notation. | Arrows -- | [GHC § 7.16] Enable generic type classes, with default instances -- defined in terms of the algebraic structure of a type. | Generics -- | [GHC § 7.3.11] Enable the implicit importing of the module -- @Prelude@. When disabled, when desugaring certain built-in syntax -- into ordinary identifiers, use whatever is in scope rather than the -- @Prelude@ -- version. | ImplicitPrelude -- | [GHC § 7.3.15] Enable syntax for implicitly binding local names -- corresponding to the field names of a record. Puns bind specific -- names, unlike 'RecordWildCards'. | NamedFieldPuns -- | [GHC § 7.3.5] Enable a form of guard which matches a pattern and -- binds variables. | PatternGuards -- | [GHC § 7.5.4] Allow a type declared with @newtype@ to use -- @deriving@ for any class with an instance for the underlying type. | GeneralizedNewtypeDeriving -- | [GHC § 9.6.10] Allow use of any typeclass in deriving clauses. | DeriveAnyClass -- | [Hugs § 7.1] Enable the \"Trex\" extensible records system. | ExtensibleRecords -- | [Hugs § 7.2] Enable type synonyms which are transparent in -- some definitions and opaque elsewhere, as a way of implementing -- abstract datatypes. | RestrictedTypeSynonyms -- | [Hugs § 7.3] Enable an alternate syntax for string literals, -- with string templating. | HereDocuments -- | [GHC § 7.3.2] Allow the character @#@ as a postfix modifier on -- identifiers. Also enables literal syntax for unboxed values. | MagicHash -- | Binary integer literals | BinaryLiterals -- | [GHC § 7.7] Allow data types and type synonyms which are -- indexed by types, i.e. ad-hoc polymorphism for types. | TypeFamilies -- | [GHC § 7.5.2] Allow a standalone declaration which invokes the -- type class @deriving@ mechanism. | StandaloneDeriving -- | [GHC § 7.3.1] Allow certain Unicode characters to stand for -- certain ASCII character sequences, e.g. keywords and punctuation. | UnicodeSyntax -- | [GHC § 8.1.1] Allow the use of unboxed types as foreign types, -- e.g. in @foreign import@ and @foreign export@. | UnliftedFFITypes -- | [GHC § 7.4.3] Defer validity checking of types until after -- expanding type synonyms, relaxing the constraints on how synonyms -- may be used. | LiberalTypeSynonyms -- | [GHC § 7.4.2] Allow the name of a type constructor, type class, -- or type variable to be an infix operator. | TypeOperators -- | [GHC § 7.26.5] Parallel arrays for Data Parallel Haskell. | ParallelArrays -- | [GHC § 7.3.16] Enable syntax for implicitly binding local names -- corresponding to the field names of a record. A wildcard binds -- all unmentioned names, unlike 'NamedFieldPuns'. | RecordWildCards -- | Deprecated, use 'NamedFieldPuns' instead. | RecordPuns -- | [GHC § 7.3.14] Allow a record field name to be disambiguated -- by the type of the record it's in. | DisambiguateRecordFields -- | [GHC § 7.6.4] Enable overloading of string literals using a -- type class, much like integer literals. | OverloadedStrings -- | [GHC § 7.4.6] Enable generalized algebraic data types, in -- which type variables may be instantiated on a per-constructor -- basis. Implies GADTSyntax. | GADTs {- GADTSyntax (the extension name) not yet supported by HSE -- | Enable GADT syntax for declaring ordinary algebraic datatypes. | GADTSyntax -} -- | [GHC § 7.17.2] Make pattern bindings monomorphic. | MonoPatBinds -- | [GHC § 7.8.8] Relax the requirements on mutually-recursive -- polymorphic functions. | RelaxedPolyRec -- | [GHC § 2.4.5] Allow default instantiation of polymorphic -- types in more situations. | ExtendedDefaultRules -- | [GHC § 7.2.2] Enable unboxed tuples. | UnboxedTuples -- | [GHC § 7.5.3] Enable @deriving@ for classes -- @Data.Typeable.Typeable@ and @Data.Generics.Data@. | DeriveDataTypeable -- | [GHC § 7.6.1.3] Allow a class method's type to place -- additional constraints on a class type variable. | ConstrainedClassMethods -- | [GHC § 7.3.18] Allow imports to be qualified by the package -- name the module is intended to be imported from, e.g. -- -- > import "network" Network.Socket | PackageImports | LambdaCase -- | [GHC § 7.3.20] Allow case expressions with no alternatives. | EmptyCase -- | [GHC § 7.8.6] Deprecated in GHC 6.12 and will be removed in -- GHC 7. Allow a type variable to be instantiated at a -- polymorphic type. | ImpredicativeTypes -- | [GHC § 7.3.3] Change the syntax for qualified infix -- operators. | NewQualifiedOperators -- | [GHC § 7.3.12] Relax the interpretation of left operator -- sections to allow unary postfix operators. | PostfixOperators -- | [GHC § 7.9.5] Enable quasi-quotation, a mechanism for defining -- new concrete syntax for expressions and patterns. | QuasiQuotes -- | [GHC § 7.3.10] Enable generalized list comprehensions, -- supporting operations such as sorting and grouping. | TransformListComp -- | [GHC § 7.3.6] Enable view patterns, which match a value by -- applying a function and matching on the result. | ViewPatterns -- | Allow concrete XML syntax to be used in expressions and patterns, -- as per the Haskell Server Pages extension language: -- . The ideas behind it are -- discussed in the paper \"Haskell Server Pages through Dynamic Loading\" -- by Niklas Broberg, from Haskell Workshop '05. | XmlSyntax -- | Allow regular pattern matching over lists, as discussed in the -- paper \"Regular Expression Patterns\" by Niklas Broberg, Andreas Farre -- and Josef Svenningsson, from ICFP '04. | RegularPatterns -- | Enables the use of tuple sections, e.g. @(, True)@ desugars into -- @\x -> (x, True)@. | TupleSections -- | Allows GHC primops, written in C--, to be imported into a Haskell -- file. | GHCForeignImportPrim -- | Support for patterns of the form @n + k@, where @k@ is an -- integer literal. | NPlusKPatterns -- | Improve the layout rule when @if@ expressions are used in a @do@ -- block. | DoAndIfThenElse -- | Makes much of the Haskell sugar be desugared into calls to the -- function with a particular name that is in scope. | RebindableSyntax -- | Make @forall@ a keyword in types, which can be used to give the -- generalisation explicitly. | ExplicitForAll -- | Allow contexts to be put on datatypes, e.g. the @Eq a@ in -- @data Eq a => Set a = NilSet | ConsSet a (Set a)@. | DatatypeContexts -- | Local (@let@ and @where@) bindings are monomorphic. | MonoLocalBinds -- | Enable @deriving@ for the @Data.Functor.Functor@ class. | DeriveFunctor -- | [GHC § 7.5.3] Enable @deriving@ for the @Generic@ and @Generic1@ classes. | DeriveGeneric -- | Enable @deriving@ for the @Data.Traversable.Traversable@ class. | DeriveTraversable -- | Enable @deriving@ for the @Data.Foldable.Foldable@ class. | DeriveFoldable -- | Enable non-decreasing indentation for 'do' blocks. | NondecreasingIndentation -- | [GHC § 8.1.4] Enable interruptible FFI. | InterruptibleFFI -- | [GHC § 8.1.5] Enable the 'capi' calling convention in the -- foreign function interface. | CApiFFI -- | GHCJS FFI extension with convenient import patterns, -- asynchronous FFI and a JSVal FFI type | JavaScriptFFI -- | [GHC § 7.3.27] Enable explicit namespaces in import/export. | ExplicitNamespaces | DataKinds | PolyKinds -- | [GHC § 7.3.16] Enable the multi-way if-expressions -- extension to accept conditional expressions with multiple branches. | MultiWayIf -- | [GHC § 7.20.3] Allow imports to be qualified with a safe -- keyword that requires the imported module be trusted as according -- to the Safe Haskell definition of trust. -- -- > import safe Network.Socket | SafeImports -- | [GHC § 7.20] Compile a module in the Safe, Safe Haskell -- mode -- a restricted form of the Haskell language to ensure -- type safety. | Safe -- | [GHC § 7.20] Compile a module in the Trustworthy, Safe -- Haskell mode -- no restrictions apply but the module is marked -- as trusted as long as the package the module resides in is -- trusted. | Trustworthy -- | [GHC § 7.6.1.4] Allow default signatures in class -- definitions. They apply to default methods implemented in this -- class. | DefaultSignatures -- ConstraintKinds not generally supported by HSE. This flag makes RCategory2.hs -- pass testing though. -- | [GHC § 7.40] Allow type class/implicit parameter/equality -- constraints to be used as types with the special kind Constraint. -- Also generalise the (ctxt => ty) syntax so that any type of kind -- Constraint can occur before the arrow. | ConstraintKinds -- | [GHC § 7.25.3] Allow role annotations. | RoleAnnotations -- | [GHC § 7.3.8] Enable giving names to parametrized pattern -- schemes | PatternSynonyms -- | [GHC § 7.15] Allow partial specified type signatures. -- Note that this extension does not affect parsing. It only affects whether the -- program is able to be run with partial signatures. | PartialTypeSignatures -- | [GHC § 7.15.1.2] This extension treats type variables which -- start with an underscore as wildcards. For example, `foo :: _x` is -- equivalent to `foo :: _`. | NamedWildCards | TypeApplications | TypeFamilyDependencies | OverloadedLabels -- | Allow multiple @deriving@ clauses, each optionally qualified with a -- /strategy/. | DerivingStrategies | UnboxedSums | TypeInType | Strict | StrictData -- | Enable deriving instances via types of the same runtime representation. -- Implies 'DerivingStrategies'. | DerivingVia | QuantifiedConstraints | BlockArguments deriving (Show, Read, Eq, Ord, Enum, Bounded, Data, Typeable) -- | Certain extensions imply other extensions, and this function -- makes the implication explicit. This also handles deprecated -- extensions, which imply their replacements. -- The returned value is the transitive closure of implied -- extensions. {-impliesExts :: [Extension] -> [Extension] impliesExts exts = let posExts = [ ke | EnableExtension ke <- exts ] negExts = [ ke | DisableExtension ke <- exts ] implExts = impliesKnownExts posExts in -} impliesExts :: [KnownExtension] -> [KnownExtension] impliesExts = go where go [] = [] go es = let xs = concatMap implE es ys = filter (not . flip elem es) xs in es ++ go ys implE e = case e of TypeFamilies -> [KindSignatures] ScopedTypeVariables -> [TypeOperators, ExplicitForAll] XmlSyntax -> [RegularPatterns] RegularPatterns -> [PatternGuards] RankNTypes -> [Rank2Types, ExplicitForAll] Rank2Types -> [PolymorphicComponents, ExplicitForAll] PolymorphicComponents -> [ExplicitForAll] LiberalTypeSynonyms -> [ExplicitForAll] ExistentialQuantification -> [ExplicitForAll] ImpredicativeTypes -> [ExplicitForAll] PolyKinds -> [KindSignatures] TypeFamilyDependencies -> [TypeFamilies] TypeInType -> [PolyKinds, DataKinds, KindSignatures] TypeOperators -> [ExplicitNamespaces] -- Deprecations RecordPuns -> [NamedFieldPuns] PatternSignatures -> [ScopedTypeVariables] DerivingVia -> [DerivingStrategies] _ -> [] -- | The list of extensions enabled by -- GHC's portmanteau -fglasgow-exts flag. glasgowExts :: [Extension] glasgowExts = map EnableExtension [ ForeignFunctionInterface , UnliftedFFITypes , GADTs , ImplicitParams , ScopedTypeVariables , UnboxedTuples , TypeSynonymInstances , StandaloneDeriving , DeriveDataTypeable , FlexibleContexts , FlexibleInstances , ConstrainedClassMethods , MultiParamTypeClasses , FunctionalDependencies , MagicHash , PolymorphicComponents , ExistentialQuantification , UnicodeSyntax , PostfixOperators , PatternGuards , LiberalTypeSynonyms , RankNTypes , ImpredicativeTypes , TypeOperators , RecursiveDo , ParallelListComp , EmptyDataDecls , KindSignatures , GeneralizedNewtypeDeriving , TypeFamilies ] -- Not exported, just used locally in several places. allLangDefault :: [KnownExtension] allLangDefault = [MonomorphismRestriction, MonoPatBinds, ImplicitPrelude] ghcDefault :: [Extension] ghcDefault = map EnableExtension (NondecreasingIndentation:allLangDefault) -- | List of all known extensions, both \"yes\" and \"no\" versions. knownExtensions :: [Extension] knownExtensions = concat [ [EnableExtension x, DisableExtension x] | x <- [minBound..maxBound] ] -- | Extensions that have been deprecated, possibly paired with another -- extension that replaces it. -- deprecatedExtensions :: [(Extension, Maybe Extension)] deprecatedExtensions = [ (EnableExtension RecordPuns, Just (EnableExtension NamedFieldPuns)) , (EnableExtension PatternSignatures, Just (EnableExtension ScopedTypeVariables)) ] -- | A clever version of read that returns an 'UnknownExtension' -- if the string is not recognised. classifyExtension :: String -> Extension classifyExtension string = case classifyKnownExtension string of Just ext -> EnableExtension ext Nothing -> case string of 'N':'o':string' -> case classifyKnownExtension string' of Just ext -> DisableExtension ext Nothing -> UnknownExtension string _ -> UnknownExtension string classifyKnownExtension :: String -> Maybe KnownExtension classifyKnownExtension "" = Nothing classifyKnownExtension string@(c : _) | inRange (bounds knownExtensionTable) c = lookup string (knownExtensionTable ! c) | otherwise = Nothing knownExtensionTable :: Array Char [(String, KnownExtension)] knownExtensionTable = accumArray (flip (:)) [] ('A', 'Z') [ (head str, (str, extension)) | extension <- [toEnum 0 ..] , let str = show extension ] -- | Parse an enabled or disabled extension; returns -- 'UnknownExtension' if the parse fails. parseExtension :: String -> Extension parseExtension str = fromMaybe (UnknownExtension str) $ EnableExtension <$> readMay str <|> DisableExtension <$> (readMay =<< dropNo str) where dropNo ('N':'o':rest) = Just rest dropNo _ = Nothing -- | Pretty print an extension. Disabled extensions are prefixed with -- \'No\'. prettyExtension :: Extension -> String prettyExtension (EnableExtension ext) = show ext prettyExtension (DisableExtension ext) = "No" ++ show ext prettyExtension (UnknownExtension str) = str readMay :: Read a => String -> Maybe a readMay s = case [x | (x,t) <- reads s, ("","") <- lex t] of [x] -> Just x _ -> Nothing {------------------------------------------- -- Transform a 'Language', and possibly a modifying set of'Extension's, into a list -- of 'KnownExtension's, to be interpreted as modifying the language you get -- when all known extensions are disabled. -- Extensions are interpreted in a right-biased fashion, so the last instance -- of an occurence of 'EnableExtension' or 'DisableExtension' for a given -- 'KnownExtension' takes precedence. -------------------------------------------} toExtensionList :: Language -> [Extension] -> [KnownExtension] toExtensionList lang exts' = let langKes = case lang of Haskell98 -> NPlusKPatterns:allLangDefault Haskell2010 -> [DoAndIfThenElse , PatternGuards , ForeignFunctionInterface , EmptyDataDecls ] ++ allLangDefault HaskellAllDisabled -> [] UnknownLanguage s -> error $ "toExtensionList: Unknown language " ++ s {- addExts = [ ke | EnableExtension ke <- exts ] remExts = [ ke | DisableExtension ke <- exts ] in impliesExts $ nub $ (langKes ++ addExts) \\ remExts -} in impliesExts $ nub $ go langKes exts' where go :: [KnownExtension] -> [Extension] -> [KnownExtension] go acc [] = acc go acc (DisableExtension x : exts) = go (filter (/= x) acc) exts go acc (EnableExtension x : exts) = go (x : acc) exts -- We just throw away UnknownExtensions go acc (_ : exts) = go acc exts haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Build.hs0000644000000000000000000002211513534314632021375 0ustar0000000000000000----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Build -- Copyright : (c) The GHC Team, 1997-2000, -- (c) Niklas Broberg 2004 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : experimental -- Portability : portable -- -- This module contains combinators to use when building -- Haskell source trees programmatically, as opposed to -- parsing them from a string. The contents here are quite -- experimental and will likely receive a lot of attention -- when the rest has stabilised. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Build ( -- * Syntax building functions name, -- :: String -> Name () sym, -- :: String -> Name () var, -- :: Name () -> Exp () op, -- :: Name () -> QOp qvar, -- :: Module -> Name () -> Exp () pvar, -- :: Name () -> Pat () app, -- :: Exp () -> Exp () -> Exp () infixApp, -- :: Exp () -> QOp -> Exp () -> Exp () appFun, -- :: Exp () -> [Exp] -> Exp () pApp, -- :: Name () -> [Pat] -> Pat () tuple, -- :: [Exp] -> Exp () pTuple, -- :: [Pat] -> Pat () varTuple, -- :: [Name] -> Exp () pvarTuple, -- :: [Name] -> Pat () function, -- :: String -> Exp () strE, -- :: String -> Exp () charE, -- :: Char -> Exp () intE, -- :: Integer -> Exp () strP, -- :: String -> Pat () charP, -- :: Char -> Pat () intP, -- :: Integer -> Pat () doE, -- :: [Stmt] -> Exp () lamE, -- :: SrcLoc -> [Pat] -> Exp () -> Exp () letE, -- :: [Decl] -> Exp () -> Exp () caseE, -- :: Exp () -> [Alt] -> Exp () alt, -- :: SrcLoc -> Pat () -> Exp () -> Alt altGW, -- :: SrcLoc -> Pat () -> [Stmt] -> Exp () -> Binds -> Alt listE, -- :: [Exp] -> Exp () eList, -- :: Exp () peList, -- :: Pat () paren, -- :: Exp () -> Exp () pParen, -- :: Pat () -> Pat () qualStmt, -- :: Exp () -> Stmt genStmt, -- :: SrcLoc -> Pat () -> Exp () -> Stmt letStmt, -- :: [Decl] -> Stmt binds, -- :: [Decl] -> Binds noBinds, -- :: Binds wildcard, -- :: Pat () genNames, -- :: String -> Int -> [Name] -- * More advanced building sfun, -- :: SrcLoc -> Name () -> [Name] -> Rhs -> Binds -> Decl () simpleFun, -- :: SrcLoc -> Name () -> Name () -> Exp () -> Decl () patBind, -- :: SrcLoc -> Pat () -> Exp () -> Decl () patBindWhere, -- :: SrcLoc -> Pat () -> Exp () -> [Decl] -> Decl () nameBind, -- :: SrcLoc -> Name () -> Exp () -> Decl () metaFunction, -- :: String -> [Exp] -> Exp () metaConPat -- :: String -> [Pat] -> Pat () ) where import Language.Haskell.Exts.Syntax ----------------------------------------------------------------------------- -- Help functions for Abstract syntax -- | An identifier with the given string as its name. -- The string should be a valid Haskell identifier. name :: String -> Name () name = Ident () -- | A symbol identifier. The string should be a valid -- Haskell symbol identifier. sym :: String -> Name () sym = Symbol () -- | A local variable as expression. var :: Name () -> Exp () var = Var () . UnQual () -- | Use the given identifier as an operator. op :: Name () -> QOp () op = QVarOp () . UnQual () -- | A qualified variable as expression. qvar :: ModuleName () -> Name () -> Exp () qvar m n = Var () $ Qual () m n -- | A pattern variable. pvar :: Name () -> Pat () pvar = PVar () -- | Application of expressions by juxtaposition. app :: Exp () -> Exp () -> Exp () app = App () -- | Apply an operator infix. infixApp :: Exp () -> QOp () -> Exp () -> Exp () infixApp = InfixApp () -- | Apply a function to a list of arguments. appFun :: Exp () -> [Exp ()] -> Exp () appFun f [] = f appFun f (a:as) = appFun (app f a) as -- | A constructor pattern, with argument patterns. pApp :: Name () -> [Pat ()] -> Pat () pApp n ps = PApp () (UnQual () n) ps -- | A tuple expression. tuple :: [Exp ()] -> Exp () tuple = Tuple () Boxed -- | A tuple pattern. pTuple :: [Pat ()] -> Pat () pTuple = PTuple () Boxed -- | A tuple expression consisting of variables only. varTuple :: [Name ()] -> Exp () varTuple ns = tuple $ map var ns -- | A tuple pattern consisting of variables only. pvarTuple :: [Name ()] -> Pat () pvarTuple ns = pTuple $ map pvar ns -- | A function with a given name. function :: String -> Exp () function = var . Ident () -- | A literal string expression. strE :: String -> Exp () strE s = Lit () (String () s s) -- | A literal character expression. charE :: Char -> Exp () charE c = Lit () (Char () c [c]) -- | A literal integer expression. intE :: Integer -> Exp () intE n = Lit () (Int () n (show n)) -- | A literal string pattern. strP :: String -> Pat () strP s = PLit () (Signless ()) (String () s s) -- | A literal character pattern. charP :: Char -> Pat () charP x = PLit () (Signless ()) (Char () x [x]) -- | A literal integer pattern. intP :: Integer -> Pat () intP x = PLit () (if x >= 0 then Signless () else Negative ()) (Int () (abs x) (show x)) -- | A do block formed by the given statements. -- The last statement in the list should be -- a 'Qualifier' expression. doE :: [Stmt ()] -> Exp () doE = Do () -- | Lambda abstraction, given a list of argument -- patterns and an expression body. lamE :: [Pat ()] -> Exp () -> Exp () lamE = Lambda () -- | A @let@ ... @in@ block. letE :: [Decl ()] -> Exp () -> Exp () letE ds e = Let () (binds ds) e -- | A @case@ expression. caseE :: Exp () -> [Alt ()] -> Exp () caseE = Case () -- | An unguarded alternative in a @case@ expression. alt :: Pat () -> Exp () -> Alt () alt p e = Alt () p (unGAlt e) noBinds -- | An alternative with a single guard in a @case@ expression. altGW :: Pat () -> [Stmt ()] -> Exp () -> Binds () -> Alt () altGW p gs e w = Alt () p (gAlt gs e) (Just w) -- | An unguarded righthand side of a @case@ alternative. unGAlt :: Exp () -> Rhs () unGAlt = UnGuardedRhs () -- | An list of guarded righthand sides for a @case@ alternative. gAlts :: [([Stmt ()],Exp ())] -> Rhs () gAlts as = GuardedRhss () $ map (\(gs,e) -> GuardedRhs () gs e) as -- | A single guarded righthand side for a @case@ alternative. gAlt :: [Stmt ()] -> Exp () -> Rhs () gAlt gs e = gAlts [(gs,e)] -- | A list expression. listE :: [Exp ()] -> Exp () listE = List () -- | The empty list expression. eList :: Exp () eList = List () [] -- | The empty list pattern. peList :: Pat () peList = PList () [] -- | Put parentheses around an expression. paren :: Exp () -> Exp () paren = Paren () -- | Put parentheses around a pattern. pParen :: Pat () -> Pat () pParen = PParen () -- | A qualifier expression statement. qualStmt :: Exp () -> Stmt () qualStmt = Qualifier () -- | A generator statement: /pat/ @<-@ /exp/ genStmt :: Pat () -> Exp () -> Stmt () genStmt = Generator () -- | A @let@ binding group as a statement. letStmt :: [Decl ()] -> Stmt () letStmt ds = LetStmt () $ binds ds -- | Hoist a set of declarations to a binding group. binds :: [Decl ()] -> Binds () binds = BDecls () -- | An empty binding group. noBinds :: Maybe (Binds ()) noBinds = Nothing -- | The wildcard pattern: @_@ wildcard :: Pat () wildcard = PWildCard () -- | Generate k names by appending numbers 1 through k to a given string. genNames :: String -> Int -> [Name ()] genNames s k = [ Ident () $ s ++ show i | i <- [1..k] ] ------------------------------------------------------------------------------- -- Some more specialised help functions -- | A function with a single clause sfun :: Name () -> [Name ()] -> (Rhs ()) -> Maybe (Binds ()) -> Decl () sfun f pvs rhs bs = FunBind () [Match () f (map pvar pvs) rhs bs] -- | A function with a single clause, a single argument, no guards -- and no where declarations simpleFun :: Name () -> Name () -> Exp () -> Decl () simpleFun f a e = let rhs = UnGuardedRhs () e in sfun f [a] rhs noBinds -- | A pattern bind where the pattern is a variable, and where -- there are no guards and no 'where' clause. patBind :: Pat () -> Exp () -> Decl () patBind p e = let rhs = UnGuardedRhs () e in PatBind () p rhs noBinds -- | A pattern bind where the pattern is a variable, and where -- there are no guards, but with a 'where' clause. patBindWhere :: Pat () -> Exp () -> [Decl ()] -> Decl () patBindWhere p e ds = let rhs = UnGuardedRhs () e in PatBind () p rhs (if null ds then Nothing else Just (binds ds)) -- | Bind an identifier to an expression. nameBind :: Name () -> Exp () -> Decl () nameBind n e = patBind (pvar n) e -- | Apply function of a given name to a list of arguments. metaFunction :: String -> [Exp ()] -> Exp () metaFunction s' es' = mf s' (reverse es') where mf s [] = var $ name s mf s (e:es) = app (mf s es) e -- | Apply a constructor of a given name to a list of pattern -- arguments, forming a constructor pattern. metaConPat :: String -> [Pat ()] -> Pat () metaConPat s ps = pApp (name s) ps haskell-src-exts-1.23.1/src/Language/Haskell/Exts/SrcLoc.hs0000644000000000000000000001522313665335376021542 0ustar0000000000000000{-# LANGUAGE DeriveDataTypeable, DeriveGeneric #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.SrcLoc -- Copyright : (c) Niklas Broberg 2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- This module defines various data types representing source location -- information, of varying degree of preciseness. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.SrcLoc where import Data.Data import GHC.Generics (Generic) showInt :: Int -> String showInt i | i < 0 = "(" ++ show i ++ ")" showInt i = show i -- | A single position in the source. data SrcLoc = SrcLoc { srcFilename :: String , srcLine :: Int , srcColumn :: Int } deriving (Eq,Ord,Typeable,Data,Generic) instance Show SrcLoc where showsPrec n (SrcLoc fn sl sc) = showParen (n >= 11) $ showString $ "SrcLoc " ++ show fn ++ " " ++ unwords (map showInt [sl,sc]) noLoc :: SrcLoc noLoc = SrcLoc "" (-1) (-1) -- | A portion of the source, spanning one or more lines and zero or more columns. data SrcSpan = SrcSpan { srcSpanFilename :: String , srcSpanStartLine :: Int , srcSpanStartColumn :: Int , srcSpanEndLine :: Int , srcSpanEndColumn :: Int } deriving (Eq,Ord,Typeable,Data,Generic) instance Show SrcSpan where showsPrec n (SrcSpan fn sl sc el ec) = showParen (n >= 11) $ showString $ "SrcSpan " ++ show fn ++ " " ++ unwords (map showInt [sl,sc,el,ec]) -- | Returns 'srcSpanStartLine' and 'srcSpanStartColumn' in a pair. srcSpanStart :: SrcSpan -> (Int,Int) srcSpanStart x = (srcSpanStartLine x, srcSpanStartColumn x) -- | Returns 'srcSpanEndLine' and 'srcSpanEndColumn' in a pair. srcSpanEnd :: SrcSpan -> (Int,Int) srcSpanEnd x = (srcSpanEndLine x, srcSpanEndColumn x) -- | Combine two locations in the source to denote a span. mkSrcSpan :: SrcLoc -> SrcLoc -> SrcSpan mkSrcSpan (SrcLoc fn sl sc) (SrcLoc _ el ec) = SrcSpan fn sl sc el ec -- | Merge two source spans into a single span from the start of the first -- to the end of the second. Assumes that the two spans relate to the -- same source file. mergeSrcSpan :: SrcSpan -> SrcSpan -> SrcSpan mergeSrcSpan (SrcSpan fn sl1 sc1 el1 ec1) (SrcSpan _ sl2 sc2 el2 ec2) = let (sl,sc) = min (sl1,sc1) (sl2,sc2) (el,ec) = max (el1,ec1) (el2,ec2) in SrcSpan fn sl sc el ec -- | Test if a given span starts and ends at the same location. isNullSpan :: SrcSpan -> Bool isNullSpan ss = spanSize ss == (0,0) {- isNullSpan ss = srcSpanStartLine ss == srcSpanEndLine ss && srcSpanStartColumn ss >= srcSpanEndColumn ss -} spanSize :: SrcSpan -> (Int, Int) spanSize ss = (srcSpanEndLine ss - srcSpanStartLine ss, max 0 (srcSpanEndColumn ss - srcSpanStartColumn ss)) -- | An entity located in the source. data Loc a = Loc { loc :: SrcSpan , unLoc :: a } deriving (Eq,Ord,Show,Generic) -- | A portion of the source, extended with information on the position of entities within the span. data SrcSpanInfo = SrcSpanInfo { srcInfoSpan :: SrcSpan -- , explLayout :: Bool , srcInfoPoints :: [SrcSpan] -- Marks the location of specific entities inside the span } deriving (Eq,Ord,Typeable,Data,Generic) -- Identical output to the derived show instance for GHC 7.10 and earlier. instance Show SrcSpanInfo where showsPrec n (SrcSpanInfo s pts) = showParen (n >= 11) . showString $ "SrcSpanInfo {srcInfoSpan = " ++ show s ++ ", srcInfoPoints = " ++ show pts ++ "}" -- | Generate a 'SrcSpanInfo' with no positional information for entities. noInfoSpan :: SrcSpan -> SrcSpanInfo noInfoSpan ss = SrcSpanInfo ss [] -- | A bogus `SrcSpanInfo`, the location is @noLoc@. -- `noSrcSpan = noInfoSpan (mkSrcSpan noLoc noLoc)` noSrcSpan :: SrcSpanInfo noSrcSpan = noInfoSpan (mkSrcSpan noLoc noLoc) -- | Generate a 'SrcSpanInfo' with the supplied positional information for entities. infoSpan :: SrcSpan -> [SrcSpan] -> SrcSpanInfo infoSpan = SrcSpanInfo -- | Combine two 'SrcSpanInfo's into one that spans the combined source area of -- the two arguments, leaving positional information blank. combSpanInfo :: SrcSpanInfo -> SrcSpanInfo -> SrcSpanInfo combSpanInfo s1 s2 = SrcSpanInfo (mergeSrcSpan (srcInfoSpan s1) (srcInfoSpan s2)) [] -- | Like '(<+?>)', but it also concatenates the 'srcInfoPoints'. combSpanMaybe :: SrcSpanInfo -> Maybe SrcSpanInfo -> SrcSpanInfo combSpanMaybe s1 Nothing = s1 combSpanMaybe s1 (Just s2) = SrcSpanInfo (mergeSrcSpan (srcInfoSpan s1) (srcInfoSpan s2)) (srcInfoPoints s1 ++ srcInfoPoints s2) -- | Short name for 'combSpanInfo' (<++>) :: SrcSpanInfo -> SrcSpanInfo -> SrcSpanInfo (<++>) = combSpanInfo -- | Optionally combine the first argument with the second, -- or return it unchanged if the second argument is 'Nothing'. (<+?>) :: SrcSpanInfo -> Maybe SrcSpanInfo -> SrcSpanInfo a <+?> b = case b of {Nothing -> a; Just b' -> a <++> b'} -- | Optionally combine the second argument with the first, -- or return it unchanged if the first argument is 'Nothing'. () :: Maybe SrcSpanInfo -> SrcSpanInfo -> SrcSpanInfo a b = case a of {Nothing -> b; Just a' -> a' <++> b} -- | Add more positional information for entities of a span. (<**) :: SrcSpanInfo -> [SrcSpan] -> SrcSpanInfo ss@(SrcSpanInfo {srcInfoPoints = ps}) <** xs = ss {srcInfoPoints = ps ++ xs} -- | Merge two 'SrcSpan's and lift them to a 'SrcInfoSpan' with -- no positional information for entities. (<^^>) :: SrcSpan -> SrcSpan -> SrcSpanInfo a <^^> b = noInfoSpan (mergeSrcSpan a b) infixl 6 <^^> infixl 5 <++> infixl 4 <**, <+?>, -- | A class to work over all kinds of source location information. class SrcInfo si where toSrcInfo :: SrcLoc -> [SrcSpan] -> SrcLoc -> si fromSrcInfo :: SrcSpanInfo -> si getPointLoc :: si -> SrcLoc fileName :: si -> String startLine :: si -> Int startColumn :: si -> Int getPointLoc si = SrcLoc (fileName si) (startLine si) (startColumn si) instance SrcInfo SrcLoc where toSrcInfo s _ _ = s fromSrcInfo si = SrcLoc (fileName si) (startLine si) (startColumn si) fileName = srcFilename startLine = srcLine startColumn = srcColumn instance SrcInfo SrcSpan where toSrcInfo st _ end = mkSrcSpan st end fromSrcInfo = srcInfoSpan fileName = srcSpanFilename startLine = srcSpanStartLine startColumn = srcSpanStartColumn instance SrcInfo SrcSpanInfo where toSrcInfo st pts end = SrcSpanInfo (mkSrcSpan st end) pts fromSrcInfo = id fileName = fileName . srcInfoSpan startLine = startLine . srcInfoSpan startColumn = startColumn . srcInfoSpan haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Syntax.hs0000644000000000000000000023734713603723515021644 0ustar0000000000000000{-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveFoldable #-} {-# LANGUAGE DeriveTraversable #-} {-# LANGUAGE DeriveFunctor #-} {-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Syntax -- Copyright : (c) Niklas Broberg 2004-2009, -- (c) The GHC Team, 1997-2000 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- A suite of datatypes describing the (semi-concrete) abstract syntax of Haskell 98 -- plus registered extensions, including: -- -- * multi-parameter type classes with functional dependencies (MultiParamTypeClasses, FunctionalDependencies) -- -- * parameters of type class assertions are unrestricted (FlexibleContexts) -- -- * 'forall' types as universal and existential quantification (RankNTypes, ExistentialQuantification, etc) -- -- * pattern guards (PatternGuards) -- -- * implicit parameters (ImplicitParameters) -- -- * generalised algebraic data types (GADTs) -- -- * template haskell (TemplateHaskell) -- -- * empty data type declarations (EmptyDataDecls) -- -- * unboxed tuples (UnboxedTuples) -- -- * regular patterns (RegularPatterns) -- -- * HSP-style XML expressions and patterns (XmlSyntax) -- -- All nodes in the syntax tree are annotated with something of a user-definable data type. -- When parsing, this annotation will contain information about the source location that the -- particular node comes from. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Syntax ( -- * Modules Module(..), ModuleHead(..), WarningText(..), ExportSpecList(..), ExportSpec(..), EWildcard(..), ImportDecl(..), ImportSpecList(..), ImportSpec(..), Assoc(..), Namespace(..), -- * Declarations Decl(..), DeclHead(..), InstRule(..), InstHead(..), Binds(..), IPBind(..), PatternSynDirection(..), InjectivityInfo(..), ResultSig(..), -- ** Type classes and instances ClassDecl(..), InstDecl(..), Deriving(..), DerivStrategy(..), -- ** Data type declarations DataOrNew(..), ConDecl(..), FieldDecl(..), QualConDecl(..), GadtDecl(..), BangType(..), Unpackedness(..), -- ** Function bindings Match(..), Rhs(..), GuardedRhs(..), -- * Class Assertions and Contexts Context(..), FunDep(..), Asst(..), -- * Types Type(..), Boxed(..), Kind, TyVarBind(..), Promoted(..), TypeEqn (..), -- * Expressions Exp(..), Stmt(..), QualStmt(..), FieldUpdate(..), Alt(..), XAttr(..), -- * Patterns Pat(..), PatField(..), PXAttr(..), RPat(..), RPatOp(..), -- * Literals Literal(..), Sign(..), -- * Variables, Constructors and Operators ModuleName(..), QName(..), Name(..), QOp(..), Op(..), SpecialCon(..), CName(..), IPName(..), XName(..), Role(..), MaybePromotedName(..), -- * Template Haskell Bracket(..), Splice(..), -- * FFI Safety(..), CallConv(..), -- * Pragmas ModulePragma(..), Tool(..), Overlap(..), Rule(..), RuleVar(..), Activation(..), Annotation(..), BooleanFormula(..), -- * Builtin names -- ** Modules prelude_mod, main_mod, -- ** Main function of a program main_name, -- ** Constructors unit_con_name, tuple_con_name, list_con_name, list_cons_name, unboxed_singleton_con_name, unit_con, tuple_con, unboxed_singleton_con, -- ** Special identifiers as_name, qualified_name, hiding_name, minus_name, bang_name, dot_name, star_name, export_name, safe_name, unsafe_name, interruptible_name, threadsafe_name, stdcall_name, ccall_name, cplusplus_name, dotnet_name, jvm_name, js_name, javascript_name, capi_name, forall_name, family_name, role_name, hole_name, stock_name, anyclass_name, via_name, -- ** Type constructors unit_tycon_name, fun_tycon_name, list_tycon_name, tuple_tycon_name, unboxed_singleton_tycon_name, unit_tycon, fun_tycon, list_tycon, tuple_tycon, unboxed_singleton_tycon, -- * Source coordinates -- SrcLoc(..), -- * Annotated trees Annotated(..), (=~=), ) where import Prelude hiding (id) import Data.Data import GHC.Generics (Generic) #if __GLASGOW_HASKELL__ < 710 import Data.Foldable (Foldable) import Data.Traversable (Traversable) #endif -- | The name of a Haskell module. data ModuleName l = ModuleName l String deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Constructors with special syntax. -- These names are never qualified, and always refer to builtin type or -- data constructors. data SpecialCon l = UnitCon l -- ^ unit type and data constructor @()@ | ListCon l -- ^ list type and data constructor @[]@ | FunCon l -- ^ function type constructor @->@ | TupleCon l Boxed Int -- ^ /n/-ary tuple type and data -- constructors @(,)@ etc, possibly boxed @(\#,\#)@ | Cons l -- ^ list data constructor @(:)@ | UnboxedSingleCon l -- ^ unboxed singleton tuple constructor @(\# \#)@ | ExprHole l -- ^ An expression hole _ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | This type is used to represent qualified variables, and also -- qualified constructors. data QName l = Qual l (ModuleName l) (Name l) -- ^ name qualified with a module name | UnQual l (Name l) -- ^ unqualified local name | Special l (SpecialCon l) -- ^ built-in constructor with special syntax deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | This type is used to represent variables, and also constructors. data Name l = Ident l String -- ^ /varid/ or /conid/. | Symbol l String -- ^ /varsym/ or /consym/ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An implicit parameter name. data IPName l = IPDup l String -- ^ ?/ident/, non-linear implicit parameter | IPLin l String -- ^ %/ident/, linear implicit parameter deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Possibly qualified infix operators (/qop/), appearing in expressions. data QOp l = QVarOp l (QName l) -- ^ variable operator (/qvarop/) | QConOp l (QName l) -- ^ constructor operator (/qconop/) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Operators appearing in @infix@ declarations are never qualified. data Op l = VarOp l (Name l) -- ^ variable operator (/varop/) | ConOp l (Name l) -- ^ constructor operator (/conop/) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A name (/cname/) of a component of a class or data type in an @import@ -- or export specification. data CName l = VarName l (Name l) -- ^ name of a method or field | ConName l (Name l) -- ^ name of a data constructor deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A complete Haskell source module. data Module l = Module l (Maybe (ModuleHead l)) [ModulePragma l] [ImportDecl l] [Decl l] -- ^ an ordinary Haskell module | XmlPage l (ModuleName l) [ModulePragma l] (XName l) [XAttr l] (Maybe (Exp l)) [Exp l] -- ^ a module consisting of a single XML document. The ModuleName never appears in the source -- but is needed for semantic purposes, it will be the same as the file name. | XmlHybrid l (Maybe (ModuleHead l)) [ModulePragma l] [ImportDecl l] [Decl l] (XName l) [XAttr l] (Maybe (Exp l)) [Exp l] -- ^ a hybrid module combining an XML document with an ordinary module deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | The head of a module, including the name and export specification. data ModuleHead l = ModuleHead l (ModuleName l) (Maybe (WarningText l)) (Maybe (ExportSpecList l)) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An explicit export specification. data ExportSpecList l = ExportSpecList l [ExportSpec l] deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An item in a module's export specification. data ExportSpec l = EVar l (QName l) -- ^ variable. | EAbs l (Namespace l) (QName l) -- ^ @T@: -- a class or datatype exported abstractly, -- or a type synonym. | EThingWith l (EWildcard l) (QName l) [CName l] -- ^ @T(C_1,...,C_n)@: -- a class exported with some of its methods, or -- a datatype exported with some of its constructors. | EModuleContents l (ModuleName l) -- ^ @module M@: -- re-export a module. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Indicates the position of the wildcard in an export list data EWildcard l = NoWildcard l | EWildcard l Int deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Namespaces for imports/exports. data Namespace l = NoNamespace l | TypeNamespace l | PatternNamespace l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An import declaration. data ImportDecl l = ImportDecl { importAnn :: l -- ^ annotation, used by parser for position of the @import@ keyword. , importModule :: ModuleName l -- ^ name of the module imported. , importQualified :: Bool -- ^ imported @qualified@? , importSrc :: Bool -- ^ imported with @{-\# SOURCE \#-}@? , importSafe :: Bool -- ^ Import @safe@? , importPkg :: Maybe String -- ^ imported with explicit package name , importAs :: Maybe (ModuleName l) -- ^ optional alias name in an @as@ clause. , importSpecs :: Maybe (ImportSpecList l) -- ^ optional list of import specifications. } deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An explicit import specification list. data ImportSpecList l = ImportSpecList l Bool [ImportSpec l] -- ^ A list of import specifications. -- The 'Bool' is 'True' if the names are excluded -- by @hiding@. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An import specification, representing a single explicit item imported -- (or hidden) from a module. data ImportSpec l = IVar l (Name l) -- ^ variable | IAbs l (Namespace l) (Name l) -- ^ @T@: -- the name of a class, datatype or type synonym. | IThingAll l (Name l) -- ^ @T(..)@: -- a class imported with all of its methods, or -- a datatype imported with all of its constructors. | IThingWith l (Name l) [CName l] -- ^ @T(C_1,...,C_n)@: -- a class imported with some of its methods, or -- a datatype imported with some of its constructors. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Associativity of an operator. data Assoc l = AssocNone l -- ^ non-associative operator (declared with @infix@) | AssocLeft l -- ^ left-associative operator (declared with @infixl@). | AssocRight l -- ^ right-associative operator (declared with @infixr@) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A top-level declaration. data Decl l = TypeDecl l (DeclHead l) (Type l) -- ^ A type declaration | TypeFamDecl l (DeclHead l) (Maybe (ResultSig l)) (Maybe (InjectivityInfo l)) -- ^ A type family declaration | ClosedTypeFamDecl l (DeclHead l) (Maybe (ResultSig l)) (Maybe (InjectivityInfo l)) [TypeEqn l] -- ^ A closed type family declaration | DataDecl l (DataOrNew l) (Maybe (Context l)) (DeclHead l) [QualConDecl l] [Deriving l] -- ^ A data OR newtype declaration | GDataDecl l (DataOrNew l) (Maybe (Context l)) (DeclHead l) (Maybe (Kind l)) [GadtDecl l] [Deriving l] -- ^ A data OR newtype declaration, GADT style | DataFamDecl l {-data-} (Maybe (Context l)) (DeclHead l) (Maybe (ResultSig l)) -- ^ A data family declaration | TypeInsDecl l (Type l) (Type l) -- ^ A type family instance declaration | DataInsDecl l (DataOrNew l) (Type l) [QualConDecl l] [Deriving l] -- ^ A data family instance declaration | GDataInsDecl l (DataOrNew l) (Type l) (Maybe (Kind l)) [GadtDecl l] [Deriving l] -- ^ A data family instance declaration, GADT style | ClassDecl l (Maybe (Context l)) (DeclHead l) [FunDep l] (Maybe [ClassDecl l]) -- ^ A declaration of a type class | InstDecl l (Maybe (Overlap l)) (InstRule l) (Maybe [InstDecl l]) -- ^ An declaration of a type class instance | DerivDecl l (Maybe (DerivStrategy l)) (Maybe (Overlap l)) (InstRule l) -- ^ A standalone deriving declaration | InfixDecl l (Assoc l) (Maybe Int) [Op l] -- ^ A declaration of operator fixity | DefaultDecl l [Type l] -- ^ A declaration of default types | SpliceDecl l (Exp l) -- ^ A Template Haskell splicing declaration | TSpliceDecl l (Exp l) -- ^ A typed Template Haskell splicing declaration | TypeSig l [Name l] (Type l) -- ^ A type signature declaration | PatSynSig l [Name l] (Maybe [TyVarBind l]) (Maybe (Context l)) (Maybe [TyVarBind l]) (Maybe (Context l)) (Type l) -- ^ A pattern synonym signature declation | FunBind l [Match l] -- ^ A set of function binding clauses | PatBind l (Pat l) (Rhs l) {-where-} (Maybe (Binds l)) -- ^ A pattern binding | PatSyn l (Pat l) (Pat l) (PatternSynDirection l) -- ^ A pattern synonym binding | ForImp l (CallConv l) (Maybe (Safety l)) (Maybe String) (Name l) (Type l) -- ^ A foreign import declaration | ForExp l (CallConv l) (Maybe String) (Name l) (Type l) -- ^ A foreign export declaration | RulePragmaDecl l [Rule l] -- ^ A RULES pragma | DeprPragmaDecl l [([Name l], String)] -- ^ A DEPRECATED pragma | WarnPragmaDecl l [([Name l], String)] -- ^ A WARNING pragma | InlineSig l Bool (Maybe (Activation l)) (QName l) -- ^ An INLINE pragma | InlineConlikeSig l (Maybe (Activation l)) (QName l) -- ^ An INLINE CONLIKE pragma | SpecSig l (Maybe (Activation l)) (QName l) [Type l] -- ^ A SPECIALISE pragma | SpecInlineSig l Bool (Maybe (Activation l)) (QName l) [Type l] -- ^ A SPECIALISE INLINE pragma | InstSig l (InstRule l) -- ^ A SPECIALISE instance pragma | AnnPragma l (Annotation l) -- ^ An ANN pragma | MinimalPragma l (Maybe (BooleanFormula l)) -- ^ A MINIMAL pragma | RoleAnnotDecl l (QName l) [Role l] -- ^ A role annotation | CompletePragma l [Name l] (Maybe (QName l)) -- ^ A COMPLETE pragma deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) data PatternSynDirection l = Unidirectional -- ^ A unidirectional pattern synonym with "<-" | ImplicitBidirectional -- ^ A bidirectional pattern synonym with "=" | ExplicitBidirectional l [Decl l] -- ^ A birectional pattern synonym with the construction specified. deriving (Eq, Ord, Show, Data, Typeable, Foldable, Traversable, Functor, Generic) -- | A type equation as found in closed type families. data TypeEqn l = TypeEqn l (Type l) (Type l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An annotation through an ANN pragma. data Annotation l = Ann l (Name l) (Exp l) -- ^ An annotation for a declared name. | TypeAnn l (Name l) (Exp l) -- ^ An annotation for a declared type. | ModuleAnn l (Exp l) -- ^ An annotation for the defining module. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A boolean formula for MINIMAL pragmas. data BooleanFormula l = VarFormula l (Name l) -- ^ A variable. | AndFormula l [BooleanFormula l] -- ^ And boolean formulas. | OrFormula l [BooleanFormula l] -- ^ Or boolean formulas. | ParenFormula l (BooleanFormula l) -- ^ Parenthesized boolean formulas. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) data Role l = Nominal l | Representational l | Phantom l | RoleWildcard l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A flag stating whether a declaration is a data or newtype declaration. data DataOrNew l = DataType l | NewType l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Injectivity info for injective type families data InjectivityInfo l = InjectivityInfo l (Name l) [Name l] deriving (Eq, Ord, Show, Typeable, Data, Foldable, Traversable, Functor, Generic) data ResultSig l = KindSig l (Kind l) | TyVarSig l (TyVarBind l) deriving (Eq, Ord, Show, Typeable, Data, Foldable, Traversable, Functor, Generic) -- | The head of a type or class declaration, which consists of the type -- or class name applied to some type variables -- -- @class C a b@ is represented as -- -- >DHApp -- > () -- > (DHApp -- > () (DHead () (Ident () "C")) (UnkindedVar () (Ident () "a"))) -- > (UnkindedVar () (Ident () "b")) -- -- (where the annotation type @l@ is instantiated with @()@) -- -- @class (a :< b) c@ is represented as -- -- >DHApp -- > () -- > (DHParen -- > () -- > (DHApp -- > () -- > (DHInfix () (UnkindedVar () (Ident () "a")) (Symbol () ":<")) -- > (UnkindedVar () (Ident () "b")))) -- > (UnkindedVar () (Ident () "c")) data DeclHead l = DHead l (Name l) -- ^ type or class name | DHInfix l (TyVarBind l) (Name l) -- ^ infix application of the type/class name to the left operand | DHParen l (DeclHead l) -- ^ parenthesized declaration head | DHApp l (DeclHead l) (TyVarBind l) -- ^ application to one more type variable deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | The instance declaration rule, which is, roughly, the part of the instance declaration before the @where@ keyword. -- -- Example: @instance Ord a => Ord (Maybe a)@ is represented as -- -- >IRule -- > () -- > Nothing -- > (Just -- > (CxSingle -- > () -- > (ClassA -- > () (UnQual () (Ident () "Ord")) [ TyVar () (Ident () "a") ]))) -- > (IHApp -- > () -- > (IHCon () (UnQual () (Ident () "Ord"))) -- > (TyParen -- > () -- > (TyApp -- > () -- > (TyCon () (UnQual () (Ident () "Maybe"))) -- > (TyVar () (Ident () "a"))))) -- -- An optional explicit forall after @instance@ is supported: -- @instance forall a . Ord a => Ord (Maybe a) where@ becomes -- -- >IRule -- > () -- > (Just [ UnkindedVar () (Ident () "a") ]) -- > ... data InstRule l = IRule l (Maybe [TyVarBind l]) (Maybe (Context l)) (InstHead l) | IParen l (InstRule l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- See bugs #7 and #31 for more details and use cases for the rationale -- of the split. DeclOrInstHead should be used by DeclHead as the name implies. -- | The instance head. The split between rule/head allow us to represent -- @instance (Bounded a => Bounded [a]) where@ faithfully. -- -- The structure of 'InstHead' follows one of 'DeclHead'. -- -- For example, @instance C (Maybe a) Int where@ is represented as -- -- >IHApp -- > () -- > (IHApp -- > () -- > (IHCon () (UnQual () (Ident () "C"))) -- > (TyParen -- > () -- > (TyApp -- > () -- > (TyCon () (UnQual () (Ident () "Maybe"))) -- > (TyVar () (Ident () "a"))))) -- > (TyCon () (UnQual () (Ident () "Int"))))) data InstHead l = IHCon l (QName l) -- ^ type or class name | IHInfix l (Type l) (QName l) -- ^ infix application of the type/class name to the left operand | IHParen l (InstHead l) -- ^ parenthesized instance head | IHApp l (InstHead l) (Type l) -- ^ application to one more type deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A deriving clause following a data type declaration. data Deriving l = Deriving l (Maybe (DerivStrategy l)) [InstRule l] deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Which technique the user explicitly requested when deriving an instance. data DerivStrategy l = DerivStock l -- ^ GHC's \"standard\" strategy, which is to implement a -- custom instance for the data type. This only works for -- certain types that GHC knows about (e.g., 'Eq', 'Show', -- 'Functor' when @-XDeriveFunctor@ is enabled, etc.) | DerivAnyclass l -- ^ @-XDeriveAnyClass@ | DerivNewtype l -- ^ @-XGeneralizedNewtypeDeriving@ | DerivVia l (Type l) -- ^ @-XDerivingVia@ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A binding group inside a @let@ or @where@ clause. data Binds l = BDecls l [Decl l] -- ^ An ordinary binding group | IPBinds l [IPBind l] -- ^ A binding group for implicit parameters deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A binding of an implicit parameter. data IPBind l = IPBind l (IPName l) (Exp l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Clauses of a function binding. data Match l = Match l (Name l) [Pat l] (Rhs l) {-where-} (Maybe (Binds l)) -- ^ A clause defined with prefix notation, i.e. the function name -- followed by its argument patterns, the right-hand side and an -- optional where clause. | InfixMatch l (Pat l) (Name l) [Pat l] (Rhs l) {-where-} (Maybe (Binds l)) -- ^ A clause defined with infix notation, i.e. first its first argument -- pattern, then the function name, then its following argument(s), -- the right-hand side and an optional where clause. -- Note that there can be more than two arguments to a function declared -- infix, hence the list of pattern arguments. deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A single constructor declaration within a data type declaration, -- which may have an existential quantification binding. data QualConDecl l = QualConDecl l {-forall-} (Maybe [TyVarBind l]) {- . -} (Maybe (Context l)) {- => -} (ConDecl l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Declaration of an ordinary data constructor. data ConDecl l = ConDecl l (Name l) [Type l] -- ^ ordinary data constructor | InfixConDecl l (Type l) (Name l) (Type l) -- ^ infix data constructor | RecDecl l (Name l) [FieldDecl l] -- ^ record constructor deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Declaration of a (list of) named field(s). data FieldDecl l = FieldDecl l [Name l] (Type l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A single constructor declaration in a GADT data type declaration. -- -- If the GADT is declared using the record syntax, e.g. -- -- >data Ty where -- > TCon :: { field1 :: Int, field2 :: Bool } -> Ty -- -- then the fields are stored as a list of 'FieldDecl's, and the final type -- (@Ty@ in the above example) is stored in the last 'Type' field. -- -- If the GADT is declared using the ordinary syntax, e.g. -- -- >data Ty where -- > TCon :: Int -> Bool -> Ty -- -- then @'Maybe' ['FieldDecl' l]@ is 'Nothing', and the whole constructor's -- type (such as @Int -> Bool -> Ty@) is stored in the last 'Type' field. data GadtDecl l = GadtDecl l (Name l) {-forall-} (Maybe [TyVarBind l]) {- . -} (Maybe (Context l)) {- => -} (Maybe [FieldDecl l]) (Type l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Declarations inside a class declaration. data ClassDecl l = ClsDecl l (Decl l) -- ^ ordinary declaration | ClsDataFam l (Maybe (Context l)) (DeclHead l) (Maybe (ResultSig l)) -- ^ declaration of an associated data type | ClsTyFam l (DeclHead l) (Maybe (ResultSig l)) (Maybe (InjectivityInfo l)) -- ^ declaration of an associated type synonym | ClsTyDef l (TypeEqn l) -- ^ default choice for an associated type synonym | ClsDefSig l (Name l) (Type l) -- ^ default signature deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Declarations inside an instance declaration. data InstDecl l = InsDecl l (Decl l) -- ^ ordinary declaration | InsType l (Type l) (Type l) -- ^ an associated type definition | InsData l (DataOrNew l) (Type l) [QualConDecl l] [Deriving l] -- ^ an associated data type implementation | InsGData l (DataOrNew l) (Type l) (Maybe (Kind l)) [GadtDecl l] [Deriving l] -- ^ an associated data type implemented using GADT style deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | The type of a constructor argument or field, optionally including -- a strictness annotation. data BangType l = BangedTy l -- ^ strict component, marked with \"@!@\" | LazyTy l -- ^ lazy component, marked with \"@~@\" | NoStrictAnnot l -- ^ No strictness information deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) data Unpackedness l = Unpack l -- ^ \"@{-\# UNPACK \#-}@\" | NoUnpack l -- ^ \"@{-\# NOUNPACK \#-}@\" | NoUnpackPragma l -- ^ No unpack pragma deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | The right hand side of a function binding, pattern binding, or a case -- alternative. data Rhs l = UnGuardedRhs l (Exp l) -- ^ unguarded right hand side (/exp/) | GuardedRhss l [GuardedRhs l] -- ^ guarded right hand side (/gdrhs/) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A guarded right hand side @|@ /stmts/ @=@ /exp/, or @|@ /stmts/ @->@ /exp/ -- for case alternatives. -- The guard is a series of statements when using pattern guards, -- otherwise it will be a single qualifier expression. data GuardedRhs l = GuardedRhs l [Stmt l] (Exp l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A type qualified with a context. -- An unqualified type has an empty context. data Type l = TyForall l (Maybe [TyVarBind l]) (Maybe (Context l)) (Type l) -- ^ qualified type | TyStar l -- ^ @*@, the type of types | TyFun l (Type l) (Type l) -- ^ function type | TyTuple l Boxed [Type l] -- ^ tuple type, possibly boxed | TyUnboxedSum l [Type l] -- ^ unboxed tuple type | TyList l (Type l) -- ^ list syntax, e.g. [a], as opposed to [] a | TyParArray l (Type l) -- ^ parallel array syntax, e.g. [:a:] | TyApp l (Type l) (Type l) -- ^ application of a type constructor | TyVar l (Name l) -- ^ type variable | TyCon l (QName l) -- ^ named type or type constructor | TyParen l (Type l) -- ^ type surrounded by parentheses | TyInfix l (Type l) (MaybePromotedName l) (Type l) -- ^ infix type constructor | TyKind l (Type l) (Kind l) -- ^ type with explicit kind signature | TyPromoted l (Promoted l) -- ^ @'K@, a promoted data type (-XDataKinds). | TyEquals l (Type l) (Type l) -- ^ type equality predicate enabled by ConstraintKinds | TySplice l (Splice l) -- ^ template haskell splice type | TyBang l (BangType l) (Unpackedness l) (Type l) -- ^ Strict type marked with \"@!@\" or type marked with UNPACK pragma. | TyWildCard l (Maybe (Name l)) -- ^ Either an anonymous of named type wildcard | TyQuasiQuote l String String -- ^ @[$/name/| /string/ |]@ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) data MaybePromotedName l = PromotedName l (QName l) | UnpromotedName l (QName l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Bools here are True if there was a leading quote which may be -- left out. For example @'[k1,k2]@ means the same thing as @[k1,k2]@. data Promoted l = PromotedInteger l Integer String -- ^ parsed value and raw string | PromotedString l String String -- ^ parsed value and raw string | PromotedCon l Bool (QName l) | PromotedList l Bool [Type l] | PromotedTuple l [Type l] | PromotedUnit l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Flag denoting whether a tuple is boxed or unboxed. data Boxed = Boxed | Unboxed deriving (Eq,Ord,Show,Typeable,Data,Generic) -- | A type variable declaration, optionally with an explicit kind annotation. data TyVarBind l = KindedVar l (Name l) (Kind l) -- ^ variable binding with kind annotation | UnkindedVar l (Name l) -- ^ ordinary variable binding deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An explicit kind annotation. type Kind = Type -- | A functional dependency, given on the form -- l1 l2 ... ln -> r2 r3 .. rn data FunDep l = FunDep l [Name l] [Name l] deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A context is a set of assertions data Context l = CxSingle l (Asst l) | CxTuple l [Asst l] | CxEmpty l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Class assertions. data Asst l = TypeA l (Type l) -- ^ type assertion | IParam l (IPName l) (Type l) -- ^ implicit parameter assertion | ParenA l (Asst l) -- ^ parenthesised class assertion deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | /literal/ -- Values of this type hold the abstract value of the literal, along with the -- precise string representation used. For example, @10@, @0o12@ and @0xa@ -- have the same value representation, but each carry a different string representation. data Literal l = Char l Char String -- ^ character literal | String l String String -- ^ string literal | Int l Integer String -- ^ integer literal | Frac l Rational String -- ^ floating point literal | PrimInt l Integer String -- ^ unboxed integer literal | PrimWord l Integer String -- ^ unboxed word literal | PrimFloat l Rational String -- ^ unboxed float literal | PrimDouble l Rational String -- ^ unboxed double literal | PrimChar l Char String -- ^ unboxed character literal | PrimString l String String -- ^ unboxed string literal deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An indication whether a literal pattern has been negated or not. data Sign l = Signless l | Negative l deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | Haskell expressions. data Exp l = Var l (QName l) -- ^ variable | OverloadedLabel l String -- ^ Overloaded label #foo | IPVar l (IPName l) -- ^ implicit parameter variable | Con l (QName l) -- ^ data constructor | Lit l (Literal l) -- ^ literal constant | InfixApp l (Exp l) (QOp l) (Exp l) -- ^ infix application | App l (Exp l) (Exp l) -- ^ ordinary application | NegApp l (Exp l) -- ^ negation expression @-/exp/@ (unary minus) | Lambda l [Pat l] (Exp l) -- ^ lambda expression | Let l (Binds l) (Exp l) -- ^ local declarations with @let@ ... @in@ ... | If l (Exp l) (Exp l) (Exp l) -- ^ @if@ /exp/ @then@ /exp/ @else@ /exp/ | MultiIf l [GuardedRhs l] -- ^ @if@ @|@ /stmts/ @->@ /exp/ ... | Case l (Exp l) [Alt l] -- ^ @case@ /exp/ @of@ /alts/ | Do l [Stmt l] -- ^ @do@-expression: -- the last statement in the list -- should be an expression. | MDo l [Stmt l] -- ^ @mdo@-expression | Tuple l Boxed [Exp l] -- ^ tuple expression | UnboxedSum l Int Int (Exp l) -- ^ unboxed sum | TupleSection l Boxed [Maybe (Exp l)] -- ^ tuple section expression, e.g. @(,,3)@ | List l [Exp l] -- ^ list expression | ParArray l [Exp l] -- ^ parallel array expression | Paren l (Exp l) -- ^ parenthesised expression | LeftSection l (Exp l) (QOp l) -- ^ left section @(@/exp/ /qop/@)@ | RightSection l (QOp l) (Exp l) -- ^ right section @(@/qop/ /exp/@)@ | RecConstr l (QName l) [FieldUpdate l] -- ^ record construction expression | RecUpdate l (Exp l) [FieldUpdate l] -- ^ record update expression | EnumFrom l (Exp l) -- ^ unbounded arithmetic sequence, -- incrementing by 1: @[from ..]@ | EnumFromTo l (Exp l) (Exp l) -- ^ bounded arithmetic sequence, -- incrementing by 1 @[from .. to]@ | EnumFromThen l (Exp l) (Exp l) -- ^ unbounded arithmetic sequence, -- with first two elements given @[from, then ..]@ | EnumFromThenTo l (Exp l) (Exp l) (Exp l) -- ^ bounded arithmetic sequence, -- with first two elements given @[from, then .. to]@ | ParArrayFromTo l (Exp l) (Exp l) -- ^ Parallel array bounded arithmetic sequence, -- incrementing by 1 @[:from .. to:]@ | ParArrayFromThenTo l (Exp l) (Exp l) (Exp l) -- ^ bounded arithmetic sequence, -- with first two elements given @[:from, then .. to:]@ | ListComp l (Exp l) [QualStmt l] -- ^ ordinary list comprehension | ParComp l (Exp l) [[QualStmt l]] -- ^ parallel list comprehension | ParArrayComp l (Exp l) [[QualStmt l]] -- ^ parallel array comprehension | ExpTypeSig l (Exp l) (Type l) -- ^ expression with explicit type signature | VarQuote l (QName l) -- ^ @'x@ for template haskell reifying of expressions | TypQuote l (QName l) -- ^ @''T@ for template haskell reifying of types | BracketExp l (Bracket l) -- ^ template haskell bracket expression | SpliceExp l (Splice l) -- ^ template haskell splice expression | QuasiQuote l String String -- ^ quasi-quotaion: @[$/name/| /string/ |]@ | TypeApp l (Type l) -- ^ Visible type application -- Hsx | XTag l (XName l) [XAttr l] (Maybe (Exp l)) [Exp l] -- ^ xml element, with attributes and children | XETag l (XName l) [XAttr l] (Maybe (Exp l)) -- ^ empty xml element, with attributes | XPcdata l String -- ^ PCDATA child element | XExpTag l (Exp l) -- ^ escaped haskell expression inside xml | XChildTag l [Exp l] -- ^ children of an xml element -- Pragmas | CorePragma l String (Exp l) -- ^ CORE pragma | SCCPragma l String (Exp l) -- ^ SCC pragma | GenPragma l String (Int, Int) (Int, Int) (Exp l) -- ^ GENERATED pragma -- Arrows | Proc l (Pat l) (Exp l) -- ^ arrows proc: @proc@ /pat/ @->@ /exp/ | LeftArrApp l (Exp l) (Exp l) -- ^ arrow application (from left): /exp/ @-<@ /exp/ | RightArrApp l (Exp l) (Exp l) -- ^ arrow application (from right): /exp/ @>-@ /exp/ | LeftArrHighApp l (Exp l) (Exp l) -- ^ higher-order arrow application (from left): /exp/ @-<<@ /exp/ | RightArrHighApp l (Exp l) (Exp l) -- ^ higher-order arrow application (from right): /exp/ @>>-@ /exp/ | ArrOp l (Exp l) -- ^ arrow control operators: @(| /exp/ |)@ -- LambdaCase | LCase l [Alt l] -- ^ @\case@ /alts/ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | The name of an xml element or attribute, -- possibly qualified with a namespace. data XName l = XName l String -- /pat/)@ | PRPat l [RPat l] -- ^ regular list pattern | PXTag l (XName l) [PXAttr l] (Maybe (Pat l)) [Pat l] -- ^ XML element pattern | PXETag l (XName l) [PXAttr l] (Maybe (Pat l)) -- ^ XML singleton element pattern | PXPcdata l String -- ^ XML PCDATA pattern | PXPatTag l (Pat l) -- ^ XML embedded pattern | PXRPats l [RPat l] -- ^ XML regular list pattern | PSplice l (Splice l) -- ^ template haskell splice pattern | PQuasiQuote l String String -- ^ quasi quote pattern: @[$/name/| /string/ |]@ | PBangPat l (Pat l) -- ^ strict (bang) pattern: @f !x = ...@ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An XML attribute in a pattern. data PXAttr l = PXAttr l (XName l) (Pat l) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A regular pattern operator. data RPatOp l = RPStar l -- ^ @*@ = 0 or more | RPStarG l -- ^ @*!@ = 0 or more, greedy | RPPlus l -- ^ @+@ = 1 or more | RPPlusG l -- ^ @+!@ = 1 or more, greedy | RPOpt l -- ^ @?@ = 0 or 1 | RPOptG l -- ^ @?!@ = 0 or 1, greedy deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An entity in a regular pattern. data RPat l = RPOp l (RPat l) (RPatOp l) -- ^ operator pattern, e.g. pat* | RPEither l (RPat l) (RPat l) -- ^ choice pattern, e.g. (1 | 2) | RPSeq l [RPat l] -- ^ sequence pattern, e.g. (| 1, 2, 3 |) | RPGuard l (Pat l) [Stmt l] -- ^ guarded pattern, e.g. (| p | p < 3 |) | RPCAs l (Name l) (RPat l) -- ^ non-linear variable binding, e.g. (foo\@:(1 | 2))* | RPAs l (Name l) (RPat l) -- ^ linear variable binding, e.g. foo\@(1 | 2) | RPParen l (RPat l) -- ^ parenthesised pattern, e.g. (2*) | RPPat l (Pat l) -- ^ an ordinary pattern deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An /fpat/ in a labeled record pattern. data PatField l = PFieldPat l (QName l) (Pat l) -- ^ ordinary label-pattern pair | PFieldPun l (QName l) -- ^ record field pun | PFieldWildcard l -- ^ record field wildcard deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A statement, representing both a /stmt/ in a @do@-expression, -- an ordinary /qual/ in a list comprehension, as well as a /stmt/ -- in a pattern guard. data Stmt l = Generator l (Pat l) (Exp l) -- ^ a generator: /pat/ @<-@ /exp/ | Qualifier l (Exp l) -- ^ an /exp/ by itself: in a @do@-expression, -- an action whose result is discarded; -- in a list comprehension and pattern guard, -- a guard expression | LetStmt l (Binds l) -- ^ local bindings | RecStmt l [Stmt l] -- ^ a recursive binding group for arrows deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | A general /transqual/ in a list comprehension, -- which could potentially be a transform of the kind -- enabled by TransformListComp. data QualStmt l = QualStmt l (Stmt l) -- ^ an ordinary statement | ThenTrans l (Exp l) -- ^ @then@ /exp/ | ThenBy l (Exp l) (Exp l) -- ^ @then@ /exp/ @by@ /exp/ | GroupBy l (Exp l) -- ^ @then@ @group@ @by@ /exp/ | GroupUsing l (Exp l) -- ^ @then@ @group@ @using@ /exp/ | GroupByUsing l (Exp l) (Exp l) -- ^ @then@ @group@ @by@ /exp/ @using@ /exp/ deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An /fbind/ in a labeled construction or update expression. data FieldUpdate l = FieldUpdate l (QName l) (Exp l) -- ^ ordinary label-expresion pair | FieldPun l (QName l) -- ^ record field pun | FieldWildcard l -- ^ record field wildcard deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) -- | An /alt/ alternative in a @case@ expression. data Alt l = Alt l (Pat l) (Rhs l) (Maybe (Binds l)) deriving (Eq,Ord,Show,Typeable,Data,Foldable,Traversable,Functor,Generic) ----------------------------------------------------------------------------- -- Builtin names. prelude_mod, main_mod :: l -> ModuleName l prelude_mod l = ModuleName l "Prelude" main_mod l = ModuleName l "Main" main_name :: l -> Name l main_name l = Ident l "main" unit_con_name :: l -> QName l unit_con_name l = Special l (UnitCon l) tuple_con_name :: l -> Boxed -> Int -> QName l tuple_con_name l b i = Special l (TupleCon l b (i+1)) list_con_name :: l -> QName l list_con_name l = Special l (ListCon l) list_cons_name :: l -> QName l list_cons_name l = Special l (Cons l) unboxed_singleton_con_name :: l -> QName l unboxed_singleton_con_name l = Special l (UnboxedSingleCon l) unit_con :: l -> Exp l unit_con l = Con l $ unit_con_name l tuple_con :: l -> Boxed -> Int -> Exp l tuple_con l b i = Con l (tuple_con_name l b i) unboxed_singleton_con :: l -> Exp l unboxed_singleton_con l = Con l (unboxed_singleton_con_name l) as_name, qualified_name, hiding_name, minus_name, bang_name, dot_name, star_name :: l -> Name l as_name l = Ident l "as" qualified_name l = Ident l "qualified" hiding_name l = Ident l "hiding" minus_name l = Symbol l "-" bang_name l = Symbol l "!" dot_name l = Symbol l "." star_name l = Symbol l "*" hole_name :: l -> QName l hole_name l = Special l (ExprHole l) export_name, safe_name, unsafe_name, interruptible_name, threadsafe_name, stdcall_name, ccall_name, cplusplus_name, dotnet_name, jvm_name, js_name, javascript_name, capi_name, forall_name, family_name, role_name, stock_name, anyclass_name, via_name :: l -> Name l export_name l = Ident l "export" safe_name l = Ident l "safe" unsafe_name l = Ident l "unsafe" interruptible_name l = Ident l "interruptible" threadsafe_name l = Ident l "threadsafe" stdcall_name l = Ident l "stdcall" ccall_name l = Ident l "ccall" cplusplus_name l = Ident l "cplusplus" dotnet_name l = Ident l "dotnet" jvm_name l = Ident l "jvm" js_name l = Ident l "js" javascript_name l = Ident l "javascript" capi_name l = Ident l "capi" forall_name l = Ident l "forall" family_name l = Ident l "family" role_name l = Ident l "role" stock_name l = Ident l "stock" anyclass_name l = Ident l "anyclass" via_name l = Ident l "via" unit_tycon_name, fun_tycon_name, list_tycon_name, unboxed_singleton_tycon_name :: l -> QName l unit_tycon_name l = unit_con_name l fun_tycon_name l = Special l (FunCon l) list_tycon_name l = Special l (ListCon l) unboxed_singleton_tycon_name l = Special l (UnboxedSingleCon l) tuple_tycon_name :: l -> Boxed -> Int -> QName l tuple_tycon_name l b i = tuple_con_name l b i unit_tycon, fun_tycon, list_tycon, unboxed_singleton_tycon :: l -> Type l unit_tycon l = TyCon l $ unit_tycon_name l fun_tycon l = TyCon l $ fun_tycon_name l list_tycon l = TyCon l $ list_tycon_name l unboxed_singleton_tycon l = TyCon l $ unboxed_singleton_tycon_name l tuple_tycon :: l -> Boxed -> Int -> Type l tuple_tycon l b i = TyCon l (tuple_tycon_name l b i) ----------------------------------------------------------------------------- -- AST traversal, boiler-plate style -- | Test if two AST elements are equal modulo annotations. (=~=) :: (Annotated a, Eq (a ())) => a l1 -> a l2 -> Bool a =~= b = fmap (const ()) a == fmap (const ()) b ----------------------------------------------------------------------------- -- Reading annotations -- | AST nodes are annotated, and this class allows manipulation of the annotations. class Functor ast => Annotated ast where -- | Retrieve the annotation of an AST node. ann :: ast l -> l -- | Change the annotation of an AST node. Note that only the annotation of -- the node itself is affected, and not the annotations of any child nodes. -- if all nodes in the AST tree are to be affected, use 'fmap'. amap :: (l -> l) -> ast l -> ast l instance Annotated ModuleName where ann (ModuleName l _) = l amap f (ModuleName l n) = ModuleName (f l) n instance Annotated SpecialCon where ann sc = case sc of UnitCon l -> l ListCon l -> l FunCon l -> l TupleCon l _ _ -> l Cons l -> l UnboxedSingleCon l -> l ExprHole l -> l amap = fmap instance Annotated QName where ann qn = case qn of Qual l _ _ -> l UnQual l _ -> l Special l _ -> l amap f qn = case qn of Qual l mn n -> Qual (f l) mn n UnQual l n -> UnQual (f l) n Special l sc -> Special (f l) sc instance Annotated Name where ann (Ident l _) = l ann (Symbol l _) = l amap = fmap instance Annotated IPName where ann (IPDup l _) = l ann (IPLin l _) = l amap = fmap instance Annotated QOp where ann (QVarOp l _) = l ann (QConOp l _) = l amap f (QVarOp l qn) = QVarOp (f l) qn amap f (QConOp l qn) = QConOp (f l) qn instance Annotated Op where ann (VarOp l _) = l ann (ConOp l _) = l amap f (VarOp l n) = VarOp (f l) n amap f (ConOp l n) = ConOp (f l) n instance Annotated CName where ann (VarName l _) = l ann (ConName l _) = l amap f (VarName l n) = VarName (f l) n amap f (ConName l n) = ConName (f l) n instance Annotated Module where ann (Module l _ _ _ _) = l ann (XmlPage l _ _ _ _ _ _) = l ann (XmlHybrid l _ _ _ _ _ _ _ _) = l amap f (Module l mmh ops iss dcls) = Module (f l) mmh ops iss dcls amap f (XmlPage l mn os xn xas me es) = XmlPage (f l) mn os xn xas me es amap f (XmlHybrid l mmh ops iss dcls xn xas me es) = XmlHybrid (f l) mmh ops iss dcls xn xas me es instance Annotated ModuleHead where ann (ModuleHead l _ _ _) = l amap f (ModuleHead l n mwt mesl) = ModuleHead (f l) n mwt mesl instance Annotated ExportSpecList where ann (ExportSpecList l _) = l amap f (ExportSpecList l ess) = ExportSpecList (f l) ess instance Annotated ExportSpec where ann es = case es of EVar l _ -> l EAbs l _ _ -> l EThingWith l _ _ _ -> l EModuleContents l _ -> l amap f es = case es of EVar l qn -> EVar (f l) qn EAbs l n qn -> EAbs (f l) n qn EThingWith l wc qn cns -> EThingWith (f l) wc qn cns EModuleContents l mn -> EModuleContents (f l) mn instance Annotated EWildcard where ann ewc = case ewc of NoWildcard l -> l EWildcard l _ -> l amap f ewc = case ewc of NoWildcard l -> NoWildcard (f l) EWildcard l n -> EWildcard (f l) n instance Annotated Namespace where ann es = case es of NoNamespace l -> l TypeNamespace l -> l PatternNamespace l -> l amap f es = case es of NoNamespace l -> NoNamespace (f l) TypeNamespace l -> TypeNamespace (f l) PatternNamespace l -> PatternNamespace (f l) instance Annotated ImportDecl where ann (ImportDecl l _ _ _ _ _ _ _) = l amap f (ImportDecl l mn qual src safe pkg mmn mis) = ImportDecl (f l) mn qual src safe pkg mmn mis instance Annotated ImportSpecList where ann (ImportSpecList l _ _) = l amap f (ImportSpecList l b iss) = ImportSpecList (f l) b iss instance Annotated ImportSpec where ann is = case is of IVar l _ -> l IAbs l _ _ -> l IThingAll l _ -> l IThingWith l _ _ -> l amap f is = case is of IVar l n -> IVar (f l) n IAbs l ns n -> IAbs (f l) ns n IThingAll l n -> IThingAll (f l) n IThingWith l n cns -> IThingWith (f l) n cns instance Annotated Assoc where ann (AssocNone l) = l ann (AssocLeft l) = l ann (AssocRight l) = l amap = fmap instance Annotated Deriving where ann (Deriving l _ _) = l amap f (Deriving l mds ihs) = Deriving (f l) mds ihs instance Annotated DerivStrategy where ann (DerivStock l) = l ann (DerivAnyclass l) = l ann (DerivNewtype l) = l ann (DerivVia l _) = l amap f (DerivStock l) = DerivStock (f l) amap f (DerivAnyclass l) = DerivAnyclass (f l) amap f (DerivNewtype l) = DerivNewtype (f l) amap f (DerivVia l t) = DerivVia (f l) t instance Annotated TypeEqn where ann (TypeEqn l _ _) = l amap f (TypeEqn l a b) = TypeEqn (f l) a b instance Annotated InjectivityInfo where ann (InjectivityInfo l _ _) = l amap f (InjectivityInfo l to from) = InjectivityInfo (f l) to from instance Annotated ResultSig where ann (KindSig l _) = l ann (TyVarSig l _) = l amap f (KindSig l k) = KindSig (f l) k amap f (TyVarSig l tv) = TyVarSig (f l) tv instance Annotated Decl where ann decl = case decl of TypeDecl l _ _ -> l TypeFamDecl l _ _ _ -> l ClosedTypeFamDecl l _ _ _ _ -> l DataDecl l _ _ _ _ _ -> l GDataDecl l _ _ _ _ _ _ -> l DataFamDecl l _ _ _ -> l TypeInsDecl l _ _ -> l DataInsDecl l _ _ _ _ -> l GDataInsDecl l _ _ _ _ _ -> l ClassDecl l _ _ _ _ -> l InstDecl l _ _ _ -> l DerivDecl l _ _ _ -> l InfixDecl l _ _ _ -> l DefaultDecl l _ -> l SpliceDecl l _ -> l TSpliceDecl l _ -> l TypeSig l _ _ -> l PatSynSig l _ _ _ _ _ _ -> l FunBind l _ -> l PatBind l _ _ _ -> l ForImp l _ _ _ _ _ -> l ForExp l _ _ _ _ -> l RulePragmaDecl l _ -> l DeprPragmaDecl l _ -> l WarnPragmaDecl l _ -> l InlineSig l _ _ _ -> l InlineConlikeSig l _ _ -> l SpecSig l _ _ _ -> l SpecInlineSig l _ _ _ _ -> l InstSig l _ -> l AnnPragma l _ -> l MinimalPragma l _ -> l RoleAnnotDecl l _ _ -> l PatSyn l _ _ _ -> l CompletePragma l _ _ -> l amap f decl = case decl of TypeDecl l dh t -> TypeDecl (f l) dh t TypeFamDecl l dh mk mi -> TypeFamDecl (f l) dh mk mi ClosedTypeFamDecl l dh mk mi eqns -> ClosedTypeFamDecl (f l) dh mk mi eqns DataDecl l dn mcx dh cds ders -> DataDecl (f l) dn mcx dh cds ders GDataDecl l dn mcx dh mk gds ders -> GDataDecl (f l) dn mcx dh mk gds ders DataFamDecl l mcx dh mk -> DataFamDecl (f l) mcx dh mk TypeInsDecl l t1 t2 -> TypeInsDecl (f l) t1 t2 DataInsDecl l dn t cds ders -> DataInsDecl (f l) dn t cds ders GDataInsDecl l dn t mk gds ders -> GDataInsDecl (f l) dn t mk gds ders ClassDecl l mcx dh fds cds -> ClassDecl (f l) mcx dh fds cds InstDecl l mo ih ids -> InstDecl (f l) mo ih ids DerivDecl l mds mo ih -> DerivDecl (f l) mds mo ih InfixDecl l a k ops -> InfixDecl (f l) a k ops DefaultDecl l ts -> DefaultDecl (f l) ts SpliceDecl l sp -> SpliceDecl (f l) sp TSpliceDecl l sp -> TSpliceDecl (f l) sp TypeSig l ns t -> TypeSig (f l) ns t PatSynSig l n dh c1 dh2 c2 t -> PatSynSig (f l) n dh c1 dh2 c2 t FunBind l ms -> FunBind (f l) ms PatBind l p rhs bs -> PatBind (f l) p rhs bs ForImp l cc msf s n t -> ForImp (f l) cc msf s n t ForExp l cc s n t -> ForExp (f l) cc s n t RulePragmaDecl l rs -> RulePragmaDecl (f l) rs DeprPragmaDecl l nss -> DeprPragmaDecl (f l) nss WarnPragmaDecl l nss -> WarnPragmaDecl (f l) nss InlineSig l b act qn -> InlineSig (f l) b act qn InlineConlikeSig l act qn -> InlineConlikeSig (f l) act qn SpecSig l act qn ts -> SpecSig (f l) act qn ts SpecInlineSig l b act qn ts -> SpecInlineSig (f l) b act qn ts InstSig l ih -> InstSig (f l) ih AnnPragma l ann' -> AnnPragma (f l) ann' MinimalPragma l b -> MinimalPragma (f l) b RoleAnnotDecl l t rs -> RoleAnnotDecl (f l) t rs PatSyn l p r d -> PatSyn (f l) p r d CompletePragma l cs ty -> CompletePragma (f l) cs ty instance Annotated Role where ann r = case r of RoleWildcard l -> l Representational l -> l Phantom l -> l Nominal l -> l amap f r = case r of RoleWildcard l -> RoleWildcard (f l) Representational l -> Representational (f l) Phantom l -> Phantom (f l) Nominal l -> Nominal (f l) instance Annotated Annotation where ann (Ann l _ _) = l ann (TypeAnn l _ _) = l ann (ModuleAnn l _) = l amap f (Ann l n e) = Ann (f l) n e amap f (TypeAnn l n e) = TypeAnn (f l) n e amap f (ModuleAnn l e) = ModuleAnn (f l) e instance Annotated BooleanFormula where ann (VarFormula l _) = l ann (AndFormula l _) = l ann (OrFormula l _) = l ann (ParenFormula l _) = l amap f (VarFormula l n) = VarFormula (f l) n amap f (AndFormula l bs) = AndFormula (f l) bs amap f (OrFormula l bs) = OrFormula (f l) bs amap f (ParenFormula l b) = ParenFormula (f l) b instance Annotated DataOrNew where ann (DataType l) = l ann (NewType l) = l amap = fmap instance Annotated DeclHead where ann (DHead l _) = l ann (DHInfix l _ _) = l ann (DHParen l _) = l ann (DHApp l _ _) = l amap f (DHead l n) = DHead (f l) n amap f (DHInfix l tva n) = DHInfix (f l) tva n amap f (DHParen l dh) = DHParen (f l) dh amap f (DHApp l dh t) = DHApp (f l) dh t instance Annotated InstRule where ann (IRule l _ _ _) = l ann (IParen l _) = l amap f (IRule l mtv cxt qn) = IRule (f l) mtv cxt qn amap f (IParen l ih) = IParen (f l) ih instance Annotated InstHead where ann (IHCon l _) = l ann (IHInfix l _ _) = l ann (IHParen l _) = l ann (IHApp l _ _) = l amap f (IHCon l n) = IHCon (f l) n amap f (IHInfix l tva n) = IHInfix (f l) tva n amap f (IHParen l dh) = IHParen (f l) dh amap f (IHApp l dh t) = IHApp (f l) dh t instance Annotated Binds where ann (BDecls l _) = l ann (IPBinds l _) = l amap f (BDecls l decls) = BDecls (f l) decls amap f (IPBinds l ibs) = IPBinds (f l) ibs instance Annotated IPBind where ann (IPBind l _ _) = l amap f (IPBind l ipn e) = IPBind (f l) ipn e instance Annotated Match where ann (Match l _ _ _ _) = l ann (InfixMatch l _ _ _ _ _) = l amap f (Match l n ps rhs bs) = Match (f l) n ps rhs bs amap f (InfixMatch l a n b rhs bs) = InfixMatch (f l) a n b rhs bs instance Annotated QualConDecl where ann (QualConDecl l _ _ _) = l amap f (QualConDecl l tvs cx cd) = QualConDecl (f l) tvs cx cd instance Annotated ConDecl where ann (ConDecl l _ _) = l ann (InfixConDecl l _ _ _) = l ann (RecDecl l _ _) = l amap f (ConDecl l n bts) = ConDecl (f l) n bts amap f (InfixConDecl l ta n tb) = InfixConDecl (f l) ta n tb amap f (RecDecl l n fds) = RecDecl (f l) n fds instance Annotated FieldDecl where ann (FieldDecl l _ _) = l amap f (FieldDecl l ns t) = FieldDecl (f l) ns t instance Annotated GadtDecl where ann (GadtDecl l _ _ _ _ _) = l amap f (GadtDecl l n t1 t2 t3 t4) = GadtDecl (f l) n t1 t2 t3 t4 instance Annotated ClassDecl where ann (ClsDecl l _) = l ann (ClsDataFam l _ _ _) = l ann (ClsTyFam l _ _ _) = l ann (ClsTyDef l _) = l ann (ClsDefSig l _ _) = l amap f (ClsDecl l d) = ClsDecl (f l) d amap f (ClsDataFam l mcx dh mk) = ClsDataFam (f l) mcx dh mk amap f (ClsTyFam l dh mk mi) = ClsTyFam (f l) dh mk mi amap f (ClsTyDef l t ) = ClsTyDef (f l) t amap f (ClsDefSig l n t) = ClsDefSig (f l) n t instance Annotated InstDecl where ann id = case id of InsDecl l _ -> l InsType l _ _ -> l InsData l _ _ _ _ -> l InsGData l _ _ _ _ _ -> l -- InsInline l _ _ _ -> l amap f id = case id of InsDecl l d -> InsDecl (f l) d InsType l t1 t2 -> InsType (f l) t1 t2 InsData l dn t cds ders -> InsData (f l) dn t cds ders InsGData l dn t mk gds ders -> InsGData (f l) dn t mk gds ders -- InsInline l b act qn -> InsInline (f l) b act qn instance Annotated BangType where ann (BangedTy l) = l ann (LazyTy l) = l ann (NoStrictAnnot l) = l amap f (BangedTy l) = BangedTy (f l) amap f (LazyTy l) = LazyTy (f l) amap f (NoStrictAnnot l) = NoStrictAnnot (f l) instance Annotated Unpackedness where ann (Unpack l) = l ann (NoUnpack l) = l ann (NoUnpackPragma l) = l amap f (Unpack l) = Unpack (f l) amap f (NoUnpack l) = Unpack (f l) amap f (NoUnpackPragma l) = Unpack (f l) instance Annotated Rhs where ann (UnGuardedRhs l _) = l ann (GuardedRhss l _) = l amap f (UnGuardedRhs l e) = UnGuardedRhs (f l) e amap f (GuardedRhss l grhss) = GuardedRhss (f l) grhss instance Annotated GuardedRhs where ann (GuardedRhs l _ _) = l amap f (GuardedRhs l ss e) = GuardedRhs (f l) ss e instance Annotated Type where ann t = case t of TyForall l _ _ _ -> l TyStar l -> l TyFun l _ _ -> l TyTuple l _ _ -> l TyUnboxedSum l _ -> l TyList l _ -> l TyParArray l _ -> l TyApp l _ _ -> l TyVar l _ -> l TyCon l _ -> l TyParen l _ -> l TyInfix l _ _ _ -> l TyKind l _ _ -> l TyPromoted l _ -> l TyEquals l _ _ -> l TySplice l _ -> l TyBang l _ _ _ -> l TyWildCard l _ -> l TyQuasiQuote l _ _ -> l amap f t1 = case t1 of TyForall l mtvs mcx t -> TyForall (f l) mtvs mcx t TyStar l -> TyStar (f l) TyFun l t1' t2 -> TyFun (f l) t1' t2 TyTuple l b ts -> TyTuple (f l) b ts TyUnboxedSum l s -> TyUnboxedSum (f l) s TyList l t -> TyList (f l) t TyParArray l t -> TyParArray (f l) t TyApp l t1' t2 -> TyApp (f l) t1' t2 TyVar l n -> TyVar (f l) n TyCon l qn -> TyCon (f l) qn TyParen l t -> TyParen (f l) t TyInfix l ta qn tb -> TyInfix (f l) ta qn tb TyKind l t k -> TyKind (f l) t k TyPromoted l p -> TyPromoted (f l) p TyEquals l a b -> TyEquals (f l) a b TySplice l s -> TySplice (f l) s TyBang l b u t -> TyBang (f l) b u t TyWildCard l n -> TyWildCard (f l) n TyQuasiQuote l n s -> TyQuasiQuote (f l) n s instance Annotated MaybePromotedName where ann t = case t of PromotedName l _ -> l UnpromotedName l _ -> l amap f tl = case tl of PromotedName l q -> PromotedName (f l) q UnpromotedName l q -> UnpromotedName (f l) q instance Annotated TyVarBind where ann (KindedVar l _ _) = l ann (UnkindedVar l _) = l amap f (KindedVar l n k) = KindedVar (f l) n k amap f (UnkindedVar l n) = UnkindedVar (f l) n instance Annotated FunDep where ann (FunDep l _ _) = l amap f (FunDep l ns1 ns2) = FunDep (f l) ns1 ns2 instance Annotated Context where ann (CxSingle l _) = l ann (CxTuple l _) = l ann (CxEmpty l) = l amap f (CxSingle l asst ) = CxSingle (f l) asst amap f (CxTuple l assts) = CxTuple (f l) assts amap f (CxEmpty l) = CxEmpty (f l) instance Annotated Asst where ann asst = case asst of TypeA l _ -> l IParam l _ _ -> l ParenA l _ -> l amap f asst = case asst of TypeA l t -> TypeA (f l) t IParam l ipn t -> IParam (f l) ipn t ParenA l a -> ParenA (f l) a instance Annotated Literal where ann lit = case lit of Char l _ _ -> l String l _ _ -> l Int l _ _ -> l Frac l _ _ -> l PrimInt l _ _ -> l PrimWord l _ _ -> l PrimFloat l _ _ -> l PrimDouble l _ _ -> l PrimChar l _ _ -> l PrimString l _ _ -> l amap = fmap instance Annotated Sign where ann sg = case sg of Signless l -> l Negative l -> l amap = fmap instance Annotated Exp where ann e = case e of Var l _ -> l OverloadedLabel l _ -> l IPVar l _ -> l Con l _ -> l Lit l _ -> l InfixApp l _ _ _ -> l App l _ _ -> l NegApp l _ -> l Lambda l _ _ -> l Let l _ _ -> l If l _ _ _ -> l MultiIf l _ -> l Case l _ _ -> l Do l _ -> l MDo l _ -> l Tuple l _ _ -> l UnboxedSum l _ _ _ -> l TupleSection l _ _ -> l List l _ -> l ParArray l _ -> l Paren l _ -> l LeftSection l _ _ -> l RightSection l _ _ -> l RecConstr l _ _ -> l RecUpdate l _ _ -> l EnumFrom l _ -> l EnumFromTo l _ _ -> l EnumFromThen l _ _ -> l EnumFromThenTo l _ _ _ -> l ParArrayFromTo l _ _ -> l ParArrayFromThenTo l _ _ _ -> l ListComp l _ _ -> l ParComp l _ _ -> l ParArrayComp l _ _ -> l ExpTypeSig l _ _ -> l VarQuote l _ -> l TypQuote l _ -> l BracketExp l _ -> l SpliceExp l _ -> l QuasiQuote l _ _ -> l TypeApp l _ -> l XTag l _ _ _ _ -> l XETag l _ _ _ -> l XPcdata l _ -> l XExpTag l _ -> l XChildTag l _ -> l CorePragma l _ _ -> l SCCPragma l _ _ -> l GenPragma l _ _ _ _ -> l Proc l _ _ -> l LeftArrApp l _ _ -> l RightArrApp l _ _ -> l LeftArrHighApp l _ _ -> l RightArrHighApp l _ _ -> l ArrOp l _ -> l LCase l _ -> l amap f e1 = case e1 of Var l qn -> Var (f l) qn OverloadedLabel l qn -> OverloadedLabel (f l) qn IPVar l ipn -> IPVar (f l) ipn Con l qn -> Con (f l) qn Lit l lit -> Lit (f l) lit InfixApp l e1' qop e2 -> InfixApp (f l) e1' qop e2 App l e1' e2 -> App (f l) e1' e2 NegApp l e -> NegApp (f l) e Lambda l ps e -> Lambda (f l) ps e Let l bs e -> Let (f l) bs e If l ec et ee -> If (f l) ec et ee Case l e alts -> Case (f l) e alts Do l ss -> Do (f l) ss MDo l ss -> MDo (f l) ss Tuple l bx es -> Tuple (f l) bx es UnboxedSum l b a es -> UnboxedSum (f l) b a es TupleSection l bx mes -> TupleSection (f l) bx mes List l es -> List (f l) es ParArray l es -> ParArray (f l) es Paren l e -> Paren (f l) e LeftSection l e qop -> LeftSection (f l) e qop RightSection l qop e -> RightSection (f l) qop e RecConstr l qn fups -> RecConstr (f l) qn fups RecUpdate l e fups -> RecUpdate (f l) e fups EnumFrom l e -> EnumFrom (f l) e EnumFromTo l ef et -> EnumFromTo (f l) ef et EnumFromThen l ef et -> EnumFromThen (f l) ef et EnumFromThenTo l ef eth eto -> EnumFromThenTo (f l) ef eth eto ParArrayFromTo l ef et -> ParArrayFromTo (f l) ef et ParArrayFromThenTo l ef eth eto -> ParArrayFromThenTo (f l) ef eth eto ListComp l e qss -> ListComp (f l) e qss ParComp l e qsss -> ParComp (f l) e qsss ParArrayComp l e qsss -> ParArrayComp (f l) e qsss ExpTypeSig l e t -> ExpTypeSig (f l) e t VarQuote l qn -> VarQuote (f l) qn TypQuote l qn -> TypQuote (f l) qn BracketExp l br -> BracketExp (f l) br SpliceExp l sp -> SpliceExp (f l) sp QuasiQuote l sn se -> QuasiQuote (f l) sn se TypeApp l t -> TypeApp (f l) t XTag l xn xas me es -> XTag (f l) xn xas me es XETag l xn xas me -> XETag (f l) xn xas me XPcdata l s -> XPcdata (f l) s XExpTag l e -> XExpTag (f l) e XChildTag l es -> XChildTag (f l) es CorePragma l s e -> CorePragma (f l) s e SCCPragma l s e -> SCCPragma (f l) s e GenPragma l s n12 n34 e -> GenPragma (f l) s n12 n34 e Proc l p e -> Proc (f l) p e LeftArrApp l e1' e2 -> LeftArrApp (f l) e1' e2 RightArrApp l e1' e2 -> RightArrApp (f l) e1' e2 LeftArrHighApp l e1' e2 -> LeftArrHighApp (f l) e1' e2 RightArrHighApp l e1' e2 -> RightArrHighApp (f l) e1' e2 ArrOp l e -> ArrOp (f l) e LCase l alts -> LCase (f l) alts MultiIf l alts -> MultiIf (f l) alts instance Annotated XName where ann (XName l _) = l ann (XDomName l _ _) = l amap = fmap instance Annotated XAttr where ann (XAttr l _ _) = l amap f (XAttr l xn e) = XAttr (f l) xn e instance Annotated Bracket where ann (ExpBracket l _) = l ann (TExpBracket l _) = l ann (PatBracket l _) = l ann (TypeBracket l _) = l ann (DeclBracket l _) = l amap f (ExpBracket l e) = ExpBracket (f l) e amap f (TExpBracket l e) = TExpBracket (f l) e amap f (PatBracket l p) = PatBracket (f l) p amap f (TypeBracket l t) = TypeBracket (f l) t amap f (DeclBracket l ds) = DeclBracket (f l) ds instance Annotated Splice where ann (IdSplice l _) = l ann (TIdSplice l _) = l ann (ParenSplice l _) = l ann (TParenSplice l _) = l amap f (IdSplice l s) = IdSplice (f l) s amap f (TIdSplice l s) = TIdSplice (f l) s amap f (ParenSplice l e) = ParenSplice (f l) e amap f (TParenSplice l e) = TParenSplice (f l) e instance Annotated Safety where ann (PlayRisky l) = l ann (PlaySafe l _) = l ann (PlayInterruptible l) = l amap = fmap instance Annotated CallConv where ann (StdCall l) = l ann (CCall l) = l ann (CPlusPlus l) = l ann (DotNet l) = l ann (Jvm l) = l ann (Js l) = l ann (JavaScript l) = l ann (CApi l) = l amap = fmap instance Annotated ModulePragma where ann (LanguagePragma l _) = l ann (OptionsPragma l _ _) = l ann (AnnModulePragma l _) = l amap f (LanguagePragma l ns) = LanguagePragma (f l) ns amap f (AnnModulePragma l a) = AnnModulePragma (f l) a amap f p = fmap f p instance Annotated Overlap where ann (NoOverlap l) = l ann (Overlap l) = l ann (Overlaps l) = l ann (Overlappable l) = l ann (Overlapping l) = l ann (Incoherent l) = l amap = fmap instance Annotated Activation where ann (ActiveFrom l _) = l ann (ActiveUntil l _) = l amap = fmap instance Annotated Rule where ann (Rule l _ _ _ _ _) = l amap f (Rule l s act mrvs e1 e2) = Rule (f l) s act mrvs e1 e2 instance Annotated RuleVar where ann (RuleVar l _) = l ann (TypedRuleVar l _ _) = l amap f (RuleVar l n) = RuleVar (f l) n amap f (TypedRuleVar l n t) = TypedRuleVar (f l) n t instance Annotated WarningText where ann (DeprText l _) = l ann (WarnText l _) = l amap = fmap instance Annotated Pat where ann p = case p of PVar l _ -> l PLit l _ _ -> l PNPlusK l _ _ -> l PInfixApp l _ _ _ -> l PApp l _ _ -> l PTuple l _ _ -> l PUnboxedSum l _ _ _ -> l PList l _ -> l PParen l _ -> l PRec l _ _ -> l PAsPat l _ _ -> l PWildCard l -> l PIrrPat l _ -> l PatTypeSig l _ _ -> l PViewPat l _ _ -> l PRPat l _ -> l PXTag l _ _ _ _ -> l PXETag l _ _ _ -> l PXPcdata l _ -> l PXPatTag l _ -> l PXRPats l _ -> l PSplice l _ -> l PQuasiQuote l _ _ -> l PBangPat l _ -> l amap f p1 = case p1 of PVar l n -> PVar (f l) n PLit l sg lit -> PLit (f l) sg lit PNPlusK l n k -> PNPlusK (f l) n k PInfixApp l pa qn pb -> PInfixApp (f l) pa qn pb PApp l qn ps -> PApp (f l) qn ps PTuple l bx ps -> PTuple (f l) bx ps PUnboxedSum l b a ps -> PUnboxedSum (f l) b a ps PList l ps -> PList (f l) ps PParen l p -> PParen (f l) p PRec l qn pfs -> PRec (f l) qn pfs PAsPat l n p -> PAsPat (f l) n p PWildCard l -> PWildCard (f l) PIrrPat l p -> PIrrPat (f l) p PatTypeSig l p t -> PatTypeSig (f l) p t PViewPat l e p -> PViewPat (f l) e p PRPat l rps -> PRPat (f l) rps PXTag l xn pxas mp ps -> PXTag (f l) xn pxas mp ps PXETag l xn pxas mp -> PXETag (f l) xn pxas mp PXPcdata l s -> PXPcdata (f l) s PXPatTag l p -> PXPatTag (f l) p PXRPats l rps -> PXRPats (f l) rps PSplice l sp -> PSplice (f l) sp PQuasiQuote l sn st -> PQuasiQuote (f l) sn st PBangPat l p -> PBangPat (f l) p instance Annotated PXAttr where ann (PXAttr l _ _) = l amap f (PXAttr l xn p) = PXAttr (f l) xn p instance Annotated RPatOp where ann (RPStar l) = l ann (RPStarG l) = l ann (RPPlus l) = l ann (RPPlusG l) = l ann (RPOpt l) = l ann (RPOptG l) = l amap = fmap instance Annotated RPat where ann rp = case rp of RPOp l _ _ -> l RPEither l _ _ -> l RPSeq l _ -> l RPGuard l _ _ -> l RPCAs l _ _ -> l RPAs l _ _ -> l RPParen l _ -> l RPPat l _ -> l amap f rp1 = case rp1 of RPOp l rp rop -> RPOp (f l) rp rop RPEither l rp1' rp2 -> RPEither (f l) rp1' rp2 RPSeq l rps -> RPSeq (f l) rps RPGuard l p ss -> RPGuard (f l) p ss RPCAs l n rp -> RPCAs (f l) n rp RPAs l n rp -> RPAs (f l) n rp RPParen l rp -> RPParen (f l) rp RPPat l p -> RPPat (f l) p instance Annotated PatField where ann (PFieldPat l _ _) = l ann (PFieldPun l _) = l ann (PFieldWildcard l) = l amap f (PFieldPat l qn p) = PFieldPat (f l) qn p amap f (PFieldPun l n) = PFieldPun (f l) n amap f (PFieldWildcard l) = PFieldWildcard (f l) instance Annotated Stmt where ann (Generator l _ _) = l ann (Qualifier l _) = l ann (LetStmt l _) = l ann (RecStmt l _) = l amap f (Generator l p e) = Generator (f l) p e amap f (Qualifier l e) = Qualifier (f l) e amap f (LetStmt l bs) = LetStmt (f l) bs amap f (RecStmt l ss) = RecStmt (f l) ss instance Annotated QualStmt where ann (QualStmt l _) = l ann (ThenTrans l _) = l ann (ThenBy l _ _) = l ann (GroupBy l _) = l ann (GroupUsing l _) = l ann (GroupByUsing l _ _) = l amap f (QualStmt l s) = QualStmt (f l) s amap f (ThenTrans l e) = ThenTrans (f l) e amap f (ThenBy l e1 e2) = ThenBy (f l) e1 e2 amap f (GroupBy l e) = GroupBy (f l) e amap f (GroupUsing l e) = GroupUsing (f l) e amap f (GroupByUsing l e1 e2) = GroupByUsing (f l) e1 e2 instance Annotated FieldUpdate where ann (FieldUpdate l _ _) = l ann (FieldPun l _) = l ann (FieldWildcard l) = l amap f (FieldUpdate l qn e) = FieldUpdate (f l) qn e amap f (FieldPun l n) = FieldPun (f l) n amap f (FieldWildcard l) = FieldWildcard (f l) instance Annotated Alt where ann (Alt l _ _ _) = l amap f (Alt l p gs bs) = Alt (f l) p gs bs instance Annotated Promoted where ann (PromotedInteger l _ _) = l ann (PromotedString l _ _) = l ann (PromotedCon l _ _) = l ann (PromotedList l _ _) = l ann (PromotedTuple l _) = l ann (PromotedUnit l) = l amap f (PromotedInteger l int raw) = PromotedInteger (f l) int raw amap f (PromotedString l str raw) = PromotedString (f l) str raw amap f (PromotedCon l b qn) = PromotedCon (f l) b qn amap f (PromotedList l b ps) = PromotedList (f l) b ps amap f (PromotedTuple l ps) = PromotedTuple (f l) ps amap f (PromotedUnit l) = PromotedUnit (f l) haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Fixity.hs0000644000000000000000000004665313534314632021627 0ustar0000000000000000{-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Fixity -- Copyright : (c) Niklas Broberg 2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Fixity information to give the parser so that infix operators can -- be parsed properly. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Fixity ( -- * Fixity representation Fixity(..) -- | The following three functions all create lists of -- fixities from textual representations of operators. -- The intended usage is e.g. -- -- > fixs = infixr_ 0 ["$","$!","`seq`"] -- -- Note that the operators are expected as you would -- write them infix, i.e. with ` characters surrounding -- /varid/ operators, and /varsym/ operators written as is. , infix_, infixl_, infixr_ -- ** Collections of fixities , preludeFixities, baseFixities -- * Applying fixities to an AST , AppFixity(..) ) where import Language.Haskell.Exts.Syntax import Language.Haskell.Exts.SrcLoc import Control.Monad (when, (<=<), liftM, liftM2, liftM3, liftM4) import qualified Control.Monad.Fail as Fail import Data.Traversable (mapM) import Data.Maybe (fromMaybe) import Data.Typeable import Data.Data hiding (Fixity) #if __GLASGOW_HASKELL__ < 710 import Control.Applicative ((<$)) #endif import Prelude hiding (mapM) -- | Operator fixities are represented by their associativity -- (left, right or none) and their precedence (0-9). data Fixity = Fixity (Assoc ()) Int (QName ()) deriving (Eq,Ord,Show,Typeable,Data) -- | All AST elements that may include expressions which in turn may -- need fixity tweaking will be instances of this class. class AppFixity ast where -- | Tweak any expressions in the element to account for the -- fixities given. Assumes that all operator expressions are -- fully left associative chains to begin with. applyFixities :: Fail.MonadFail m => [Fixity] -- ^ The fixities to account for. -> ast SrcSpanInfo -- ^ The element to tweak. -> m (ast SrcSpanInfo) -- ^ The same element, but with operator expressions updated, or a failure. assocNone, assocLeft, assocRight :: Assoc () assocNone = AssocNone () assocLeft = AssocLeft () assocRight = AssocRight () instance AppFixity Exp where applyFixities fixs' = infFix fixs' <=< leafFix fixs' where -- This is the real meat case. We can assume a left-associative list to begin with. infFix fixs (InfixApp l2 a op2 z) = do e <- infFix fixs a let fixup (a1,p1) (a2,p2) y pre = do when (p1 == p2 && (a1 /= a2 || a1 == assocNone)) -- Ambiguous infix expression! $ fail "Ambiguous infix expression" if p1 > p2 || p1 == p2 && (a1 == assocLeft || a2 == assocNone) -- Already right order then return $ InfixApp l2 e op2 z else liftM pre (infFix fixs $ InfixApp (ann y <++> ann z) y op2 z) case e of InfixApp _ x op1 y -> fixup (askFixity fixs op1) (askFixity fixs op2) y (InfixApp l2 x op1) NegApp _ y -> fixup prefixMinusFixity (askFixity fixs op2) y (NegApp l2) _ -> return $ InfixApp l2 e op2 z infFix _ e = return e --ambOps l = ParseFailed (getPointLoc l) $ "Ambiguous infix expression" instance AppFixity Pat where applyFixities fixs' = infFix fixs' <=< leafFixP fixs' where -- This is the real meat case. We can assume a left-associative list to begin with. infFix fixs (PInfixApp l2 a op2 z) = do p <- infFix fixs a let fixup (a1,p1) (a2,p2) y pre = do when (p1 == p2 && (a1 /= a2 || a1 == assocNone )) -- Ambiguous infix expression! $ fail "Ambiguous infix expression" if p1 > p2 || p1 == p2 && (a1 == assocLeft || a2 == assocNone) -- Already right order then return $ PInfixApp l2 p op2 z else liftM pre (infFix fixs $ PInfixApp (ann y <++> ann z) y op2 z) case p of PInfixApp _ x op1 y -> fixup (askFixityP fixs op1) (askFixityP fixs op2) y (PInfixApp l2 x op1) _ -> return $ PInfixApp l2 p op2 z infFix _ p = return p -- Internal: lookup associativity and precedence of an operator askFixity :: [Fixity] -> QOp l -> (Assoc (), Int) askFixity xs k = askFix xs (f (() <$ k)) where f (QVarOp _ x) = g x f (QConOp _ x) = g x g (Special _ (Cons _)) = UnQual () (Symbol () ":") g x = x -- Same using patterns askFixityP :: [Fixity] -> QName l -> (Assoc (), Int) askFixityP xs qn = askFix xs (g (() <$ qn)) where g (Special _ (Cons _)) = UnQual () (Symbol () ":") g x = x askFix :: [Fixity] -> QName l -> (Assoc (), Int) askFix xs = \k -> lookupWithDefault (assocLeft, 9) (() <$ k) mp where lookupWithDefault def k mp' = fromMaybe def $ lookup k mp' mp = [(x,(a,p)) | Fixity a p x <- xs] -- | Built-in fixity for prefix minus prefixMinusFixity :: (Assoc (), Int) prefixMinusFixity = (AssocLeft (), 6) -- | All fixities defined in the Prelude. preludeFixities :: [Fixity] preludeFixities = concat [infixr_ 9 ["."] ,infixl_ 9 ["!!"] ,infixr_ 8 ["^","^^","**"] ,infixl_ 7 ["*","/","`quot`","`rem`","`div`","`mod`"] ,infixl_ 6 ["+","-"] ,infixr_ 5 [":","++"] ,infix_ 4 ["==","/=","<","<=",">=",">","`elem`","`notElem`"] ,infixl_ 4 ["<$>","<$","<*>","<*","*>"] ,infixr_ 3 ["&&"] ,infixr_ 2 ["||"] ,infixl_ 1 [">>",">>="] ,infixr_ 1 ["=<<"] ,infixr_ 0 ["$","$!","`seq`"] ] -- | All fixities defined in the base package. -- -- Note that the @+++@ operator appears in both Control.Arrows and -- Text.ParserCombinators.ReadP. The listed precedence for @+++@ in -- this list is that of Control.Arrows. baseFixities :: [Fixity] baseFixities = preludeFixities ++ concat [infixl_ 9 ["!","//","!:"] ,infixr_ 9 ["`Compose`"] ,infixl_ 8 ["`shift`","`rotate`","`shiftL`","`shiftR`","`rotateL`","`rotateR`"] ,infixl_ 7 [".&.","%"] ,infixr_ 6 ["<>"] ,infixl_ 6 ["`xor`"] ,infix_ 6 [":+"] ,infixl_ 5 [".|."] ,infixr_ 5 ["+:+","<++","<+>","<|"] -- fixity conflict for +++ between ReadP and Arrow ,infix_ 5 ["\\\\"] ,infixl_ 4 ["<**>","$>","<$","<$!>"] ,infix_ 4 ["`elemP`","`notElemP`",":~:",":~~:"] ,infixl_ 3 ["<|>"] ,infixr_ 3 ["&&&","***"] ,infixr_ 2 ["+++","|||"] ,infixr_ 1 ["<=<",">=>",">>>","<<<","^<<","<<^","^>>",">>^"] ,infixl_ 1 ["&"] ,infixl_ 0 ["`on`"] ,infixr_ 0 ["`par`","`pseq`"] ] infixr_, infixl_, infix_ :: Int -> [String] -> [Fixity] infixr_ = fixity assocRight infixl_ = fixity assocLeft infix_ = fixity assocNone -- Internal: help function for the above definitions. fixity :: Assoc () -> Int -> [String] -> [Fixity] fixity a p = map (Fixity a p . op) where op ('`':xs) = UnQual () $ Ident () $ init xs op xs = UnQual () $ Symbol () xs ------------------------------------------------------------------- -- Boilerplate - yuck!! Everything below here is internal stuff instance AppFixity Module where applyFixities fixs (Module l mmh prs imp decls) = liftM (Module l mmh prs imp) $ appFixDecls mmn fixs decls where mmn = getMmn mmh getMmn (Just (ModuleHead _ n _ _)) = Just n getMmn _ = Nothing applyFixities fixs (XmlPage l mn os xn xas mexp cs) = liftM3 (XmlPage l mn os xn) (fix xas) (fix mexp) (fix cs) where fix xs = mapM (applyFixities fixs) xs applyFixities fixs (XmlHybrid l mmh prs imp decls xn xas mexp cs) = liftM4 (flip (XmlHybrid l mmh prs imp) xn) (appFixDecls mmn fixs decls) (fixe xas) (fixe mexp) (fixe cs) where mmn = getMmn mmh getMmn (Just (ModuleHead _ n _ _)) = Just n getMmn _ = Nothing fixe xs = let extraFixs = getFixities mmn decls in mapM (applyFixities (fixs++extraFixs)) xs instance AppFixity Decl where applyFixities fixs decl = case decl of ClassDecl l ctxt dh deps cdecls -> liftM (ClassDecl l ctxt dh deps) $ mapM (mapM fix) cdecls InstDecl l olp ih idecls -> liftM (InstDecl l olp ih) $ mapM (mapM fix) idecls SpliceDecl l spl -> liftM (SpliceDecl l) $ fix spl FunBind l matches -> liftM (FunBind l) $ mapM fix matches PatBind l p rhs bs -> let extraFix x = applyFixities (fixs ++ maybe [] getBindFixities bs) x in liftM3 (PatBind l) (extraFix p) (extraFix rhs) (mapM extraFix bs) AnnPragma l ann' -> liftM (AnnPragma l) $ fix ann' PatSyn l p1 p2 dir -> liftM (PatSyn l p1 p2) (fix dir) _ -> return decl where fix x = applyFixities fixs x instance AppFixity PatternSynDirection where applyFixities fixs dir = case dir of ExplicitBidirectional l ds -> liftM (ExplicitBidirectional l) (mapM fix ds) _ -> return dir where fix x = applyFixities fixs x appFixDecls :: Fail.MonadFail m => Maybe (ModuleName SrcSpanInfo) -> [Fixity] -> [Decl SrcSpanInfo] -> m [Decl SrcSpanInfo] appFixDecls mmdl fixs decls = let extraFixs = getFixities mmdl decls in mapM (applyFixities (fixs++extraFixs)) decls getFixities :: Maybe (ModuleName l) -> [Decl l] -> [Fixity] getFixities mmdl = concatMap (getFixity mmdl) getFixity :: Maybe (ModuleName l) -> Decl l -> [Fixity] getFixity mmdl d = case d of InfixDecl _ a mp ops -> let p = fromMaybe 9 mp in map (Fixity (scrub a) p) (concatMap g (map scrub ops)) ClassDecl _ _ _ _ cds -> maybe [] (concatMap getClassFixity) cds _ -> [] where g (VarOp _ x) = f x g (ConOp _ x) = f x f x = case mmdl of Nothing -> [UnQual () x] Just m -> [Qual () (scrub m) x, UnQual () x] getClassFixity (ClsDecl _ cd) = getFixity mmdl cd getClassFixity _ = [] scrub :: Functor f => f a -> f () scrub f = () <$ f getBindFixities :: Binds l -> [Fixity] getBindFixities bs = case bs of BDecls _ ds -> getFixities Nothing ds _ -> [] instance AppFixity Annotation where applyFixities fixs ann' = case ann' of Ann l n e -> liftM (Ann l n) $ fix e TypeAnn l n e -> liftM (TypeAnn l n) $ fix e ModuleAnn l e -> liftM (ModuleAnn l) $ fix e where fix x = applyFixities fixs x instance AppFixity ClassDecl where applyFixities fixs (ClsDecl l decl) = liftM (ClsDecl l) $ applyFixities fixs decl applyFixities _ cdecl = return cdecl instance AppFixity InstDecl where applyFixities fixs (InsDecl l decl) = liftM (InsDecl l) $ applyFixities fixs decl applyFixities _ idecl = return idecl instance AppFixity Match where applyFixities fixs match = case match of Match l n ps rhs bs -> liftM3 (Match l n) (mapM (fix bs) ps) (fix bs rhs) (mapM (fix bs) bs) InfixMatch l a n ps rhs bs -> liftM4 (flip (InfixMatch l) n) (fix bs a) (mapM (fix bs) ps) (fix bs rhs) (mapM (fix bs) bs) where fix bs x = applyFixities fixs' x where fixs' = fixs ++ maybe [] getBindFixities bs instance AppFixity Rhs where applyFixities fixs rhs = case rhs of UnGuardedRhs l e -> liftM (UnGuardedRhs l) $ fix e GuardedRhss l grhss -> liftM (GuardedRhss l) $ mapM fix grhss where fix x = applyFixities fixs x instance AppFixity GuardedRhs where applyFixities fixs (GuardedRhs l stmts e) = liftM2 (GuardedRhs l) (mapM fix stmts) $ fix e where fix x = applyFixities fixs x instance AppFixity PatField where applyFixities fixs (PFieldPat l n p) = liftM (PFieldPat l n) $ applyFixities fixs p applyFixities _ pf = return pf instance AppFixity RPat where applyFixities fixs rp' = case rp' of RPOp l rp op -> liftM (flip (RPOp l) op) $ fix rp RPEither l a b -> liftM2 (RPEither l) (fix a) (fix b) RPSeq l rps -> liftM (RPSeq l) $ mapM fix rps RPGuard l p stmts -> liftM2 (RPGuard l) (fix p) $ mapM fix stmts RPCAs l n rp -> liftM (RPCAs l n) $ fix rp RPAs l n rp -> liftM (RPAs l n) $ fix rp RPParen l rp -> liftM (RPParen l) $ fix rp RPPat l p -> liftM (RPPat l) $ fix p where fix x = applyFixities fixs x instance AppFixity PXAttr where applyFixities fixs (PXAttr l n p) = liftM (PXAttr l n) $ applyFixities fixs p instance AppFixity Stmt where applyFixities fixs stmt = case stmt of Generator l p e -> liftM2 (Generator l) (fix p) (fix e) Qualifier l e -> liftM (Qualifier l) $ fix e LetStmt l bs -> liftM (LetStmt l) $ fix bs -- special behavior RecStmt l stmts -> liftM (RecStmt l) $ mapM fix stmts where fix x = applyFixities fixs x instance AppFixity Binds where applyFixities fixs bs = case bs of BDecls l decls -> liftM (BDecls l) $ appFixDecls Nothing fixs decls -- special behavior IPBinds l ips -> liftM (IPBinds l) $ mapM fix ips where fix x = applyFixities fixs x instance AppFixity IPBind where applyFixities fixs (IPBind l n e) = liftM (IPBind l n) $ applyFixities fixs e instance AppFixity FieldUpdate where applyFixities fixs (FieldUpdate l n e) = liftM (FieldUpdate l n) $ applyFixities fixs e applyFixities _ fup = return fup instance AppFixity Alt where applyFixities fixs (Alt l p galts bs) = liftM3 (Alt l) (fix p) (fix galts) (mapM fix bs) where fix x = applyFixities fixs x instance AppFixity QualStmt where applyFixities fixs qstmt = case qstmt of QualStmt l s -> liftM (QualStmt l) $ fix s ThenTrans l e -> liftM (ThenTrans l) $ fix e ThenBy l e1 e2 -> liftM2 (ThenBy l) (fix e1) (fix e2) GroupBy l e -> liftM (GroupBy l) (fix e) GroupUsing l e -> liftM (GroupUsing l) (fix e) GroupByUsing l e1 e2 -> liftM2 (GroupByUsing l) (fix e1) (fix e2) where fix x = applyFixities fixs x instance AppFixity Bracket where applyFixities fixs br = case br of ExpBracket l e -> liftM (ExpBracket l) $ fix e PatBracket l p -> liftM (PatBracket l) $ fix p DeclBracket l ds -> liftM (DeclBracket l) $ mapM fix ds _ -> return br where fix x = applyFixities fixs x instance AppFixity Splice where applyFixities fixs (ParenSplice l e) = liftM (ParenSplice l) $ applyFixities fixs e applyFixities _ s = return s instance AppFixity XAttr where applyFixities fixs (XAttr l n e) = liftM (XAttr l n) $ applyFixities fixs e -- the boring boilerplate stuff for expressions too -- Recursively fixes the "leaves" of the infix chains, -- without yet touching the chain itself. We assume all chains are -- left-associate to begin with. leafFix :: Fail.MonadFail m => [Fixity] -> Exp SrcSpanInfo -> m (Exp SrcSpanInfo) leafFix fixs e' = case e' of InfixApp l e1 op e2 -> liftM2 (flip (InfixApp l) op) (leafFix fixs e1) (fix e2) App l e1 e2 -> liftM2 (App l) (fix e1) (fix e2) NegApp l e -> liftM (NegApp l) $ fix e Lambda l pats e -> liftM2 (Lambda l) (mapM fix pats) $ fix e Let l bs e -> let extraFix x = applyFixities (fixs ++ getBindFixities bs) x in liftM2 (Let l) (extraFix bs) $ extraFix e If l e a b -> liftM3 (If l) (fix e) (fix a) (fix b) MultiIf l alts -> liftM (MultiIf l) (mapM fix alts) Case l e alts -> liftM2 (Case l) (fix e) $ mapM fix alts Do l stmts -> liftM (Do l) $ mapM fix stmts MDo l stmts -> liftM (MDo l) $ mapM fix stmts Tuple l bx exps -> liftM (Tuple l bx) $ mapM fix exps List l exps -> liftM (List l) $ mapM fix exps Paren l e -> liftM (Paren l) $ fix e LeftSection l e op -> liftM (flip (LeftSection l) op) (fix e) RightSection l op e -> liftM (RightSection l op) $ fix e RecConstr l n fups -> liftM (RecConstr l n) $ mapM fix fups RecUpdate l e fups -> liftM2 (RecUpdate l) (fix e) $ mapM fix fups EnumFrom l e -> liftM (EnumFrom l) $ fix e EnumFromTo l e1 e2 -> liftM2 (EnumFromTo l) (fix e1) (fix e2) EnumFromThen l e1 e2 -> liftM2 (EnumFromThen l) (fix e1) (fix e2) EnumFromThenTo l e1 e2 e3 -> liftM3 (EnumFromThenTo l) (fix e1) (fix e2) (fix e3) ListComp l e quals -> liftM2 (ListComp l) (fix e) $ mapM fix quals ParComp l e qualss -> liftM2 (ParComp l) (fix e) $ mapM (mapM fix) qualss ExpTypeSig l e t -> liftM (flip (ExpTypeSig l) t) (fix e) BracketExp l b -> liftM (BracketExp l) $ fix b SpliceExp l s -> liftM (SpliceExp l) $ fix s XTag l n ats mexp cs -> liftM3 (XTag l n) (mapM fix ats) (mapM fix mexp) (mapM fix cs) XETag l n ats mexp -> liftM2 (XETag l n) (mapM fix ats) (mapM fix mexp) XExpTag l e -> liftM (XExpTag l) $ fix e XChildTag l cs -> liftM (XChildTag l) $ mapM fix cs Proc l p e -> liftM2 (Proc l) (fix p) (fix e) LeftArrApp l e1 e2 -> liftM2 (LeftArrApp l) (fix e1) (fix e2) RightArrApp l e1 e2 -> liftM2 (RightArrApp l) (fix e1) (fix e2) LeftArrHighApp l e1 e2 -> liftM2 (LeftArrHighApp l) (fix e1) (fix e2) RightArrHighApp l e1 e2 -> liftM2 (RightArrHighApp l) (fix e1) (fix e2) CorePragma l s e -> liftM (CorePragma l s) (fix e) SCCPragma l s e -> liftM (SCCPragma l s) (fix e) GenPragma l s ab cd e -> liftM (GenPragma l s ab cd) (fix e) LCase l alts -> liftM (LCase l) $ mapM fix alts _ -> return e' where fix x = applyFixities fixs x leafFixP :: Fail.MonadFail m => [Fixity] -> Pat SrcSpanInfo -> m (Pat SrcSpanInfo) leafFixP fixs p' = case p' of PInfixApp l p1 op p2 -> liftM2 (flip (PInfixApp l) op) (leafFixP fixs p1) (fix p2) PApp l n ps -> liftM (PApp l n) $ mapM fix ps PTuple l bx ps -> liftM (PTuple l bx) $ mapM fix ps PList l ps -> liftM (PList l) $ mapM fix ps PParen l p -> liftM (PParen l) $ fix p PRec l n pfs -> liftM (PRec l n) $ mapM fix pfs PAsPat l n p -> liftM (PAsPat l n) $ fix p PIrrPat l p -> liftM (PIrrPat l) $ fix p PatTypeSig l p t -> liftM (flip (PatTypeSig l) t) (fix p) PViewPat l e p -> liftM2 (PViewPat l) (fix e) (fix p) PRPat l rps -> liftM (PRPat l) $ mapM fix rps PXTag l n ats mp ps -> liftM3 (PXTag l n) (mapM fix ats) (mapM fix mp) (mapM fix ps) PXETag l n ats mp -> liftM2 (PXETag l n) (mapM fix ats) (mapM fix mp) PXPatTag l p -> liftM (PXPatTag l) $ fix p PXRPats l rps -> liftM (PXRPats l) $ mapM fix rps PBangPat l p -> liftM (PBangPat l) $ fix p _ -> return p' where fix x = applyFixities fixs x haskell-src-exts-1.23.1/src/Language/Haskell/Exts/ExactPrint.hs0000644000000000000000000023701413603723515022426 0ustar0000000000000000{-# LANGUAGE DeriveFunctor #-} {-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Annotated.ExactPrint -- Copyright : (c) Niklas Broberg 2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Exact-printer for Haskell abstract syntax. The input is a (semi-concrete) -- abstract syntax tree, annotated with exact source information to enable -- printing the tree exactly as it was parsed. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.ExactPrint ( exactPrint , ExactP ) where import Language.Haskell.Exts.Syntax import Language.Haskell.Exts.SrcLoc import Language.Haskell.Exts.Comments import Control.Monad (when, liftM, ap, unless) import qualified Control.Monad.Fail as Fail #if __GLASGOW_HASKELL__ < 710 import Control.Applicative (Applicative(..)) #endif import Control.Arrow ((***), (&&&)) import Prelude hiding (exp) import Data.List (intersperse) ------------------------------------------------------ -- The EP monad and basic combinators type Pos = (Int,Int) pos :: (SrcInfo loc) => loc -> Pos pos ss = (startLine ss, startColumn ss) newtype EP x = EP (Pos -> [Comment] -> (x, Pos, [Comment], ShowS)) instance Functor EP where fmap = liftM instance Applicative EP where pure = return (<*>) = ap instance Monad EP where return x = EP $ \l cs -> (x, l, cs, id) EP m >>= k = EP $ \l0 c0 -> let (a, l1, c1, s1) = m l0 c0 EP f = k a (b, l2, c2, s2) = f l1 c1 in (b, l2, c2, s1 . s2) instance Fail.MonadFail EP where fail = error runEP :: EP () -> [Comment] -> String runEP (EP f) cs = let (_,_,_,s) = f (1,1) cs in s "" getPos :: EP Pos getPos = EP (\l cs -> (l,l,cs,id)) setPos :: Pos -> EP () setPos l = EP (\_ cs -> ((),l,cs,id)) printString :: String -> EP () printString str = EP (\(l,c) cs -> let (l', c') = foldl go (l, c) str go (cl, _) '\n' = (cl + 1, 1) go (cl, cc) _ = (cl, cc + 1) in ((), (l', c'), cs, showString str)) getComment :: EP (Maybe Comment) getComment = EP $ \l cs -> let x = case cs of c:_ -> Just c _ -> Nothing in (x, l, cs, id) dropComment :: EP () dropComment = EP $ \l cs -> let cs' = case cs of (_:cs1) -> cs1 _ -> cs in ((), l, cs', id) newLine :: EP () newLine = do (l,_) <- getPos printString "\n" setPos (l+1,1) padUntil :: Pos -> EP () padUntil (l,c) = do (l1,c1) <- getPos case {- trace (show ((l,c), (l1,c1))) -} () of _ {-()-} | l1 >= l && c1 <= c -> printString $ replicate (c - c1) ' ' | l1 < l -> newLine >> padUntil (l,c) | otherwise -> return () mPrintComments :: Pos -> EP () mPrintComments p = do mc <- getComment case mc of Nothing -> return () Just (Comment multi s str) -> when (pos s < p) $ do dropComment padUntil (pos s) printComment multi str setPos (srcSpanEndLine s, srcSpanEndColumn s) mPrintComments p printComment :: Bool -> String -> EP () printComment b str | b = printString $ "{-" ++ str ++ "-}" | otherwise = printString $ "--" ++ str printWhitespace :: Pos -> EP () printWhitespace p = mPrintComments p >> padUntil p printStringAt :: Pos -> String -> EP () printStringAt p str = printWhitespace p >> printString str errorEP :: String -> EP a errorEP = fail ------------------------------------------------------------------------------ -- Printing of source elements -- | Print an AST exactly as specified by the annotations on the nodes in the tree. exactPrint :: (ExactP ast) => ast SrcSpanInfo -> [Comment] -> String exactPrint ast = runEP (exactPC ast) exactPC :: (ExactP ast) => ast SrcSpanInfo -> EP () exactPC ast = let p = pos (ann ast) in mPrintComments p >> padUntil p >> exactP ast printSeq :: [(Pos, EP ())] -> EP () printSeq [] = return () printSeq ((p,pr):xs) = printWhitespace p >> pr >> printSeq xs printStrs :: SrcInfo loc => [(loc, String)] -> EP () printStrs = printSeq . map (pos *** printString) printPoints :: SrcSpanInfo -> [String] -> EP () printPoints l = printStrs . zip (srcInfoPoints l) printInterleaved, printInterleaved' :: (ExactP ast, SrcInfo loc) => [(loc, String)] -> [ast SrcSpanInfo] -> EP () printInterleaved sistrs asts = printSeq $ interleave (map (pos *** printString ) sistrs) (map (pos . ann &&& exactP) asts) printInterleaved' sistrs (a:asts) = exactPC a >> printInterleaved sistrs asts printInterleaved' _ _ = internalError "printInterleaved'" printStreams :: [(Pos, EP ())] -> [(Pos, EP ())] -> EP () printStreams [] ys = printSeq ys printStreams xs [] = printSeq xs printStreams (x@(p1,ep1):xs) (y@(p2,ep2):ys) | p1 <= p2 = printWhitespace p1 >> ep1 >> printStreams xs (y:ys) | otherwise = printWhitespace p2 >> ep2 >> printStreams (x:xs) ys interleave :: [a] -> [a] -> [a] interleave [] ys = ys interleave xs [] = xs interleave (x:xs) (y:ys) = x:y: interleave xs ys maybeEP :: (a -> EP ()) -> Maybe a -> EP () maybeEP = maybe (return ()) bracketList :: (ExactP ast) => (String, String, String) -> [SrcSpan] -> [ast SrcSpanInfo] -> EP () bracketList (a,b,c) poss asts = printInterleaved (pList poss (a,b,c)) asts pList :: [a] -> (b, b, b) -> [(a, b)] pList (p:ps) (a,b,c) = (p,a) : pList' ps (b,c) pList _ _ = internalError "pList" pList' :: [a] -> (b, b) -> [(a, b)] pList' [] _ = [] pList' [p] (_,c) = [(p,c)] pList' (p:ps) (b,c) = (p, b) : pList' ps (b,c) parenList, squareList, squareColonList, curlyList, parenHashList, unboxedSumTypeList :: (ExactP ast) => [SrcSpan] -> [ast SrcSpanInfo] -> EP () parenList = bracketList ("(",",",")") squareList = bracketList ("[",",","]") squareColonList = bracketList ("[:",",",":]") curlyList = bracketList ("{",",","}") parenHashList = bracketList ("(#",",","#)") unboxedSumTypeList = bracketList ("(#", "|", "#)") layoutList :: (ExactP ast) => [SrcSpan] -> [ast SrcSpanInfo] -> EP () layoutList poss asts = printStreams (map (pos *** printString) $ lList poss) (map (pos . ann &&& exactP) asts) lList :: [SrcSpan] -> [(SrcSpan, String)] lList (p:ps) = (if isNullSpan p then (p,"") else (p,"{")) : lList' ps lList _ = internalError "lList" lList' :: [SrcSpan] -> [(SrcSpan, String)] lList' [] = [] lList' [p] = [if isNullSpan p then (p,"") else (p,"}")] lList' (p:ps) = (if isNullSpan p then (p,"") else (p,";")) : lList' ps printSemi :: SrcSpan -> EP () printSemi p = do printWhitespace (pos p) unless (isNullSpan p) $ printString ";" -------------------------------------------------- -- Exact printing class Annotated ast => ExactP ast where exactP :: ast SrcSpanInfo -> EP () instance ExactP Literal where exactP lit = case lit of Char _ _ rw -> printString ('\'':rw ++ "\'") String _ _ rw -> printString ('\"':rw ++ "\"") Int _ _ rw -> printString rw Frac _ _ rw -> printString rw PrimInt _ _ rw -> printString (rw ++ "#" ) PrimWord _ _ rw -> printString (rw ++ "##") PrimFloat _ _ rw -> printString (rw ++ "#" ) PrimDouble _ _ rw -> printString (rw ++ "##") PrimChar _ _ rw -> printString ('\'':rw ++ "\'#" ) PrimString _ _ rw -> printString ('\"':rw ++ "\"#" ) instance ExactP Sign where exactP sg = case sg of Signless _ -> return () Negative l -> printStringAt (pos l) "-" instance ExactP ModuleName where exactP (ModuleName _ str) = printString str instance ExactP SpecialCon where exactP sc = case sc of UnitCon l -> printPoints l ["(",")"] ListCon l -> printPoints l ["[","]"] FunCon l -> case srcInfoPoints l of [_,b,_] -> printStringAt (pos b) "->" _ -> errorEP "ExactP: SpecialCon is given wrong number of srcInfoPoints" TupleCon l b n -> printPoints l $ case b of Unboxed -> "(#": replicate (n-1) "," ++ ["#)"] _ -> "(" : replicate (n-1) "," ++ [")"] Cons _ -> printString ":" UnboxedSingleCon l -> printPoints l ["(#","#)"] ExprHole l -> printStringAt (pos l) "_" isSymbolName :: Name l -> Bool isSymbolName (Symbol _ _) = True isSymbolName _ = False isSymbolQName :: QName l -> Bool isSymbolQName (UnQual _ n) = isSymbolName n isSymbolQName (Qual _ _ n) = isSymbolName n isSymbolQName (Special _ Cons{}) = True isSymbolQName (Special _ FunCon{}) = True isSymbolQName _ = False instance ExactP QName where exactP qn | isSymbolQName qn = case srcInfoPoints (ann qn) of [_,b,c] -> do printString "(" printWhitespace (pos b) epQName qn printStringAt (pos c) ")" _ -> errorEP "ExactP: QName is given wrong number of srcInfoPoints" | otherwise = epQName qn epQName :: QName SrcSpanInfo -> EP () epQName qn = case qn of Qual _ mn n -> exactP mn >> printString "." >> exactP n UnQual _ n -> exactP n Special _ sc -> exactP sc epInfixQName :: QName SrcSpanInfo -> EP () epInfixQName qn | isSymbolQName qn = printWhitespace (pos (ann qn)) >> epQName qn | otherwise = case srcInfoPoints (ann qn) of [a,b,c] -> do printStringAt (pos a) "`" printWhitespace (pos b) epQName qn printStringAt (pos c) "`" _ -> errorEP "ExactP: QName (epInfixName) is given wrong number of srcInfoPoints" instance ExactP Name where exactP n = case n of Ident _ str -> printString str Symbol l str -> case srcInfoPoints l of [_,b,c] -> do printString "(" printWhitespace (pos b) printString str printStringAt (pos c) ")" [] -> printString str _ -> errorEP "ExactP: Name is given wrong number of srcInfoPoints" epInfixName :: Name SrcSpanInfo -> EP () epInfixName n | isSymbolName n = printWhitespace (pos (ann n)) >> exactP n | otherwise = case srcInfoPoints (ann n) of [a,b,c] -> do printStringAt (pos a) "`" printWhitespace (pos b) exactP n printStringAt (pos c) "`" _ -> errorEP "ExactP: Name (epInfixName) is given wrong number of srcInfoPoints" instance ExactP IPName where exactP ipn = case ipn of IPDup _ str -> printString $ '?':str IPLin _ str -> printString $ '%':str instance ExactP QOp where exactP qop = case qop of QVarOp _ qn -> epInfixQName qn QConOp _ qn -> epInfixQName qn instance ExactP Op where exactP op = case op of VarOp _ n -> epInfixName n ConOp _ n -> epInfixName n instance ExactP CName where exactP cn = case cn of VarName _ n -> exactP n ConName _ n -> exactP n instance ExactP Namespace where exactP ns = case ns of NoNamespace _ -> return () TypeNamespace l -> printStringAt (pos l) "type" PatternNamespace l -> printStringAt (pos l) "pattern" instance ExactP ExportSpec where exactP espec = case espec of EVar _ qn -> exactPC qn EAbs _ ns qn -> exactP ns >> exactPC qn EThingWith l wc qn cns -> let names = case wc of NoWildcard {} -> cns EWildcard wcl n -> let (before,after) = splitAt n cns wildcardName = VarName wcl (Ident wcl "..") in before ++ [wildcardName] ++ after k = length (srcInfoPoints l) in exactP qn >> printInterleaved (zip (srcInfoPoints l) $ "(":replicate (k-2) "," ++ [")"]) names EModuleContents _ mn -> printString "module" >> exactPC mn instance ExactP ExportSpecList where exactP (ExportSpecList l ess) = let k = length (srcInfoPoints l) in printInterleaved (zip (srcInfoPoints l) $ "(": replicate (k-2) "," ++ [")"]) ess instance ExactP ImportSpecList where exactP (ImportSpecList l hid ispecs) = do let pts = srcInfoPoints l pts1 <- if hid then do let (x:pts') = pts printStringAt (pos x) "hiding" return pts' else return pts let k = length pts1 printInterleaved (zip pts1 $ "(": replicate (k-2) "," ++ [")"]) ispecs instance ExactP ImportSpec where exactP ispec = case ispec of IVar _ qn -> exactPC qn IAbs _ ns n -> exactP ns >> exactPC n IThingAll l n -> exactP n >> printPoints l ["(","..",")"] IThingWith l n cns -> let k = length (srcInfoPoints l) in exactP n >> printInterleaved (zip (srcInfoPoints l) $ "(":replicate (k-2) "," ++ [")"]) cns instance ExactP ImportDecl where exactP (ImportDecl l mn qf src safe mpkg mas mispecs) = do printString "import" case srcInfoPoints l of (_:pts) -> do pts1 <- if src then case pts of x:y:pts' -> do printStringAt (pos x) "{-# SOURCE" printStringAt (pos y) "#-}" return pts' _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" else return pts pts2 <- if safe then case pts1 of x:pts' -> do printStringAt (pos x) "safe" return pts' _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" else return pts1 pts3 <- if qf then case pts2 of x:pts' -> do printStringAt (pos x) "qualified" return pts' _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" else return pts2 pts4 <- case mpkg of Just pkg -> case pts3 of x:pts' -> do printStringAt (pos x) $ show pkg return pts' _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" _ -> return pts3 exactPC mn _ <- case mas of Just as -> case pts4 of x:pts' -> do printStringAt (pos x) "as" exactPC as return pts' _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" _ -> return pts4 case mispecs of Nothing -> return () Just ispecs -> exactPC ispecs _ -> errorEP "ExactP: ImportDecl is given too few srcInfoPoints" instance ExactP Module where exactP mdl = case mdl of Module l mmh oss ids decls -> do let (oPts, pts) = splitAt (max (length oss + 1) 2) (srcInfoPoints l) layoutList oPts oss maybeEP exactPC mmh printStreams (map (pos *** printString) $ lList pts) (map (pos . ann &&& exactPC) ids ++ map (pos . ann &&& exactPC) (sepFunBinds decls)) XmlPage l _mn oss xn attrs mat es -> do let (oPts, pPts) = splitAt (max (length oss + 1) 2) $ srcInfoPoints l case pPts of [a,b,c,d,e] -> do layoutList oPts oss printStringAt (pos a) "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC es printStringAt (pos c) "" _ -> errorEP "ExactP: Module: XmlPage is given wrong number of srcInfoPoints" XmlHybrid l mmh oss ids decls xn attrs mat es -> do let (oPts, pts) = splitAt (max (length oss + 1) 2) (srcInfoPoints l) layoutList oPts oss maybeEP exactPC mmh let (dPts, pPts) = splitAt (length pts - 5) pts case pPts of [a,b,c,d,e] -> do printStreams (map (\(p,s) -> (pos p, printString s)) $ lList dPts) (map (\i -> (pos $ ann i, exactPC i)) ids ++ map (\d' -> (pos $ ann d', exactPC d')) (sepFunBinds decls)) printStringAt (pos a) "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC es printStringAt (pos c) "" _ -> errorEP "ExactP: Module: XmlHybrid is given wrong number of srcInfoPoints" instance ExactP ModuleHead where exactP (ModuleHead l mn mwt mess) = case srcInfoPoints l of [a,b] -> do printStringAt (pos a) "module" exactPC mn maybeEP exactPC mwt maybeEP exactPC mess printStringAt (pos b) "where" _ -> errorEP "ExactP: ModuleHead is given wrong number of srcInfoPoints" instance ExactP ModulePragma where exactP op = case op of LanguagePragma l ns -> let pts = srcInfoPoints l k = length ns - 1 -- number of commas m = length pts - k - 2 -- number of virtual semis, likely 0 in printInterleaved (zip pts ("{-# LANGUAGE":replicate k "," ++ replicate m "" ++ ["#-}"])) ns OptionsPragma l mt str -> let k = length (srcInfoPoints l) -- We strip out a leading space in the lexer unless the pragma -- starts with a newline. addSpace xs@('\n':_) = xs addSpace xs = ' ':xs opstr = "{-# OPTIONS" ++ case mt of { Just t -> "_" ++ show t ; _ -> "" } ++ addSpace str in printPoints l $ opstr : replicate (k-2) "" ++ ["#-}"] AnnModulePragma l ann' -> case srcInfoPoints l of [_,b] -> do printString "{-# ANN" exactPC ann' printStringAt (pos b) "#-}" _ -> errorEP "ExactP: ModulePragma: AnnPragma is given wrong number of srcInfoPoints" instance ExactP WarningText where exactP (DeprText l str) = printPoints l ["{-# DEPRECATED", str, "#-}"] exactP (WarnText l str) = printPoints l ["{-# WARNING", str, "#-}"] instance ExactP Assoc where exactP a = case a of AssocNone _ -> printString "infix" AssocLeft _ -> printString "infixl" AssocRight _ -> printString "infixr" instance ExactP DataOrNew where exactP (DataType _) = printString "data" exactP (NewType _) = printString "newtype" instance ExactP TypeEqn where exactP (TypeEqn l t1 t2) = case srcInfoPoints l of [a] -> do exactPC t1 printStringAt (pos a) "=" exactPC t2 _ -> errorEP "ExactP: TypeEqn is given wrong number of srcInfoPoints" instance ExactP InjectivityInfo where exactP (InjectivityInfo l to from) = case srcInfoPoints l of a:b:_ -> do printStringAt (pos a) "|" exactPC to printStringAt (pos b) "->" mapM_ exactPC from _ -> errorEP "ExactP: InjectivityInfo given wrong number of srcInfoPoints" instance ExactP ResultSig where exactP (KindSig l k) = case srcInfoPoints l of a:_ -> do printStringAt (pos a) "::" exactPC k _ -> errorEP "ExactP: ResultSig given wrong number of srcInfoPoints" exactP (TyVarSig l tv) = case srcInfoPoints l of a:_ -> do printStringAt (pos a) "=" exactPC tv _ -> errorEP "ExactP: ResultSig given wrong number of srcInfoPoints" instance ExactP Decl where exactP decl = case decl of TypeDecl l dh t -> case srcInfoPoints l of [a,b] -> do printStringAt (pos a) "type" exactPC dh printStringAt (pos b) "=" exactPC t _ -> errorEP "ExactP: Decl: TypeDecl is given wrong number of srcInfoPoints" TypeFamDecl l dh mk mi -> case srcInfoPoints l of a:b:_ -> do printStringAt (pos a) "type" printStringAt (pos b) "family" exactPC dh maybeEP exactPC mk maybeEP exactPC mi _ -> errorEP "ExactP: Decl: TypeFamDecl is given wrong number of srcInfoPoints" ClosedTypeFamDecl l dh mk mi eqns -> case srcInfoPoints l of a:b:c:_ -> do printStringAt (pos a) "type" printStringAt (pos b) "family" exactPC dh maybeEP exactPC mk maybeEP exactPC mi printStringAt (pos c) "where" mapM_ exactP eqns _ -> errorEP "ExactP: Decl: ClosedTypeFamDecl is given wrong number of srcInfoPoints" DataDecl l dn mctxt dh constrs mder -> do exactP dn maybeEP exactPC mctxt exactPC dh -- the next line works for empty data types since the srcInfoPoints will be empty then printInterleaved (zip (srcInfoPoints l) ("=": repeat "|")) constrs mapM_ exactPC mder GDataDecl l dn mctxt dh mk gds mder -> do let pts = srcInfoPoints l exactP dn maybeEP exactPC mctxt exactPC dh pts1 <- case mk of Nothing -> return pts Just kd -> case pts of p:pts' -> do printStringAt (pos p) "::" exactPC kd return pts' _ -> errorEP "ExactP: Decl: GDataDecl is given too few srcInfoPoints" case pts1 of x:pts' -> do printStringAt (pos x) "where" layoutList pts' gds mapM_ exactPC mder _ -> errorEP "ExactP: Decl: GDataDecl is given too few srcInfoPoints" DataFamDecl l mctxt dh mk -> do printString "data" maybeEP exactPC mctxt exactPC dh maybeEP (\kd -> printStringAt (pos (head (srcInfoPoints l))) "::" >> exactPC kd) mk TypeInsDecl l t1 t2 -> case srcInfoPoints l of [_,b,c] -> do printString "type" printStringAt (pos b) "instance" exactPC t1 printStringAt (pos c) "=" exactPC t2 _ -> errorEP "ExactP: Decl: TypeInsDecl is given wrong number of srcInfoPoints" DataInsDecl l dn t constrs mder -> case srcInfoPoints l of p:pts -> do exactP dn printStringAt (pos p) "instance" exactPC t printInterleaved (zip pts ("=": repeat "|")) constrs mapM_ exactPC mder _ -> errorEP "ExactP: Decl: DataInsDecl is given too few srcInfoPoints" GDataInsDecl l dn t mk gds mder -> case srcInfoPoints l of p:pts -> do exactP dn printStringAt (pos p) "instance" exactPC t pts1 <- case mk of Nothing -> return pts Just kd -> case pts of p':pts' -> do printStringAt (pos p') "::" exactPC kd return pts' _ -> errorEP "ExactP: Decl: GDataInsDecl is given too few srcInfoPoints" case pts1 of x:pts' -> do printStringAt (pos x) "where" layoutList pts' gds mapM_ exactPC mder _ -> errorEP "ExactP: Decl: GDataInsDecl is given too few srcInfoPoints" _ -> errorEP "ExactP: Decl: GDataInsDecl is given too few srcInfoPoints" ClassDecl l mctxt dh fds mcds -> case srcInfoPoints l of _:pts -> do printString "class" maybeEP exactPC mctxt exactPC dh _ <- case fds of [] -> return pts _ -> do let (pts1, pts2) = splitAt (length fds) pts printInterleaved (zip pts1 ("|":repeat ",")) fds return pts2 maybeEP (\cds -> case pts of p:pts' -> do printStringAt (pos p) "where" layoutList pts' $ sepClassFunBinds cds _ -> errorEP "ExactP: Decl: ClassDecl is given too few srcInfoPoints" ) mcds _ -> errorEP "ExactP: Decl: ClassDecl is given too few srcInfoPoints" InstDecl l movlp ih mids -> case srcInfoPoints l of _:pts -> do printString "instance" maybeEP exactPC movlp exactPC ih maybeEP (\ids -> do let (p:pts') = pts printStringAt (pos p) "where" layoutList pts' $ sepInstFunBinds ids ) mids _ -> errorEP "ExactP: Decl: InstDecl is given too few srcInfoPoints" DerivDecl l mds movlp ih -> case srcInfoPoints l of [_,b] -> do printString "deriving" maybeEP exactPC mds printStringAt (pos b) "instance" maybeEP exactPC movlp exactPC ih _ -> errorEP "ExactP: Decl: DerivDecl is given wrong number of srcInfoPoints" InfixDecl l assoc mprec ops -> do let pts = srcInfoPoints l exactP assoc pts1 <- case mprec of Nothing -> return pts Just prec -> case pts of p:pts' -> do printStringAt (pos p) (show prec) return pts' _ -> errorEP "ExactP: Decl: InfixDecl is given too few srcInfoPoints" printInterleaved' (zip pts1 (repeat ",")) ops DefaultDecl l ts -> case srcInfoPoints l of _:pts -> do printString "default" printInterleaved (zip (init pts) ("(":repeat ",")) ts printStringAt (pos (last pts)) ")" _ -> errorEP "ExactP: Decl: DefaultDecl is given too few srcInfoPoints" SpliceDecl _ spl -> exactP spl TSpliceDecl _ spl -> exactP spl TypeSig l ns t -> do let pts = srcInfoPoints l printInterleaved' (zip pts (replicate (length pts - 1) "," ++ ["::"])) ns exactPC t PatSynSig l ns dh c1 _ c2 t -> do let (pat:pts) = srcInfoPoints l printStringAt (pos pat) "pattern" printInterleaved' (zip pts (replicate (length ns - 1) "," ++ ["::"])) ns case dh of Nothing -> return () Just tvs -> -- (length ns - 1) commas + 1 for "::" case drop (length ns) pts of (a:b:_) -> do printStringAt (pos a) "forall" mapM_ exactPC tvs printStringAt (pos b) "." _ -> errorEP ("ExactP: Decl: PatSynSig: Forall: is given too few srcInfoPoints" ++ show pts ++ show (drop (length ns + 1) pts)) maybeEP exactPC c1 maybeEP exactPC c2 exactPC t FunBind _ ms -> mapM_ exactPC ms PatBind l p rhs mbs -> do let pts = srcInfoPoints l exactP p exactPC rhs maybeEP (\bs -> printStringAt (pos (head pts)) "where" >> exactPC bs) mbs PatSyn l lhs rhs dir -> case srcInfoPoints l of [pat,sepPos] -> do let sep = case dir of ImplicitBidirectional -> "=" ExplicitBidirectional _ _ -> "<-" Unidirectional -> "<-" printStringAt (pos pat) "pattern" exactPC lhs printStringAt (pos sepPos) sep exactPC rhs case dir of ExplicitBidirectional bl ds -> do case srcInfoPoints bl of (w:pts) -> do printStringAt (pos w) "where" layoutList pts ds _ -> errorEP "ExactP: Decl: PaySyn: ExplicitBidirectional is given too few srcInfoPoints" _ -> return () _ -> errorEP "ExactP: Decl: PatSyn is given too few srcInfoPoints" ForImp l cc msf mstr n t -> case srcInfoPoints l of _:b:pts -> do printString "foreign" printStringAt (pos b) "import" exactPC cc maybeEP exactPC msf pts1 <- case mstr of Nothing -> return pts Just str -> case pts of x:pts' -> do printStringAt (pos x) (show str) return pts' _ -> errorEP "ExactP: Decl: ForImp is given too few srcInfoPoints" case pts1 of y:_ -> do exactPC n printStringAt (pos y) "::" exactPC t _ -> errorEP "ExactP: Decl: ForImp is given too few srcInfoPoints" _ -> errorEP "ExactP: Decl: ForImp is given too few srcInfoPoints" ForExp l cc mstr n t -> case srcInfoPoints l of _:b:pts -> do printString "foreign" printStringAt (pos b) "export" exactPC cc pts1 <- case mstr of Nothing -> return pts Just str -> case pts of x:pts' -> do printStringAt (pos x) (show str) return pts' _ -> errorEP "ExactP: Decl: ForExp is given too few srcInfoPoints" case pts1 of y:_ -> do exactPC n printStringAt (pos y) "::" exactPC t _ -> errorEP "ExactP: Decl: ForExp is given too few srcInfoPoints" _ -> errorEP "ExactP: Decl: ForExp is given too few srcInfoPoints" RulePragmaDecl l rs -> case srcInfoPoints l of [_,b] -> do printString "{-# RULES" mapM_ exactPC rs printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Decl: RulePragmaDecl is given too few srcInfoPoints" DeprPragmaDecl l nstrs -> case srcInfoPoints l of _:pts -> do printString "{-# DEPRECATED" printWarndeprs (map pos (init pts)) nstrs printStringAt (pos (last pts)) "#-}" _ -> errorEP "ExactP: Decl: DeprPragmaDecl is given too few srcInfoPoints" WarnPragmaDecl l nstrs -> case srcInfoPoints l of _:pts -> do printString "{-# WARNING" printWarndeprs (map pos (init pts)) nstrs printStringAt (pos (last pts)) "#-}" _ -> errorEP "ExactP: Decl: WarnPragmaDecl is given too few srcInfoPoints" InlineSig l inl mact qn -> case srcInfoPoints l of [_,b] -> do printString $ if inl then "{-# INLINE" else "{-# NOINLINE" maybeEP exactPC mact exactPC qn printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Decl: InlineSig is given wrong number of srcInfoPoints" InlineConlikeSig l mact qn -> case srcInfoPoints l of [_,b] -> do printString "{-# INLINE CONLIKE" maybeEP exactPC mact exactPC qn printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Decl: InlineConlikeSig is given wrong number of srcInfoPoints" SpecSig l mact qn ts -> case srcInfoPoints l of _:pts -> do printString "{-# SPECIALISE" maybeEP exactPC mact exactPC qn printInterleaved (zip pts ("::" : replicate (length pts - 2) "," ++ ["#-}"])) ts _ -> errorEP "ExactP: Decl: SpecSig is given too few srcInfoPoints" SpecInlineSig l b mact qn ts -> case srcInfoPoints l of _:pts -> do printString $ "{-# SPECIALISE " ++ if b then "INLINE" else "NOINLINE" maybeEP exactPC mact exactPC qn printInterleaved (zip pts ("::" : replicate (length pts - 2) "," ++ ["#-}"])) ts _ -> errorEP "ExactP: Decl: SpecInlineSig is given too few srcInfoPoints" InstSig l ih -> case srcInfoPoints l of [_,b,c] -> do printString "{-# SPECIALISE" printStringAt (pos b) "instance" exactPC ih printStringAt (pos c) "#-}" _ -> errorEP "ExactP: Decl: InstSig is given wrong number of srcInfoPoints" AnnPragma l ann' -> case srcInfoPoints l of [_,b] -> do printString "{-# ANN" exactPC ann' printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Decl: AnnPragma is given wrong number of srcInfoPoints" MinimalPragma l b -> case srcInfoPoints l of [_,b'] -> do printString "{-# MINIMAL" maybeEP exactPC b printStringAt (pos b') "#-}" _ -> errorEP "ExactP: Decl: MinimalPragma is given wrong number of srcInfoPoints" RoleAnnotDecl l ty roles -> case srcInfoPoints l of (t:r:_) -> do printStringAt (pos t) "type" printStringAt (pos r) "role" exactPC ty mapM_ exactPC roles _ -> errorEP "ExactP: Decl: RoleAnnotDecl is given wrong number of srcInfoPoints" CompletePragma l cls opt_ts -> case srcInfoPoints l of (t:rs) -> do let (cls_s, rs') = splitAt (length cls - 1) rs printStringAt (pos t)"{-# COMPLETE" printInterleaved' (zip cls_s (repeat ",")) cls case (rs', opt_ts) of ((opt_dcolon: end:_), Just tc) -> do printStringAt (pos opt_dcolon) "::" exactPC tc printStringAt (pos end) "#-}" ([end], Nothing) -> printStringAt (pos end) "#-}" _ -> errorEP "ExactP: Decl: CompletePragma is given wrong number of srcInfoPoints" _ -> errorEP "ExactP: Decl: CompletePragma is given wrong number of srcInfoPoints" instance ExactP Role where exactP r = case r of RoleWildcard l -> printStringAt (pos l) "_" Representational l -> printStringAt (pos l) "representational" Phantom l -> printStringAt (pos l) "phantom" Nominal l -> printStringAt (pos l) "nominal" instance ExactP Annotation where exactP ann' = case ann' of Ann _ n e -> do exactP n exactPC e TypeAnn _ n e -> do printString "type" exactPC n exactPC e ModuleAnn _ e -> do printString "module" exactPC e instance ExactP BooleanFormula where exactP b' = case b' of VarFormula _ n -> exactPC n AndFormula l bs -> let pts = srcInfoPoints l in printStreams (zip (map pos pts) (repeat $ printString ",")) (map (pos . ann &&& exactPC) bs) OrFormula l bs -> let pts = srcInfoPoints l in printStreams (zip (map pos pts) (repeat $ printString "|")) (map (pos . ann &&& exactPC) bs) ParenFormula l b -> case srcInfoPoints l of [a'',b''] -> printStringAt (pos a'') "(" >> exactPC b >> printStringAt (pos b'') ")" _ -> errorEP "ExactP: BooleanFormula: ParenFormula is given wrong number of srcInfoPoints" printWarndeprs :: [Pos] -> [([Name SrcSpanInfo], String)] -> EP () printWarndeprs _ [] = return () printWarndeprs ps' ((ns',str'):nsts') = printWd ps' ns' str' nsts' where printWd :: [Pos] -> [Name SrcSpanInfo] -> String -> [([Name SrcSpanInfo], String)] -> EP () printWd (p:ps) [] str nsts = printStringAt p (show str) >> printWarndeprs ps nsts printWd ps [n] str nsts = exactPC n >> printWd ps [] str nsts printWd (p:ps) (n:ns) str nsts = exactPC n >> printStringAt p "," >> printWd ps ns str nsts printWd _ _ _ _ = internalError "printWd" sepFunBinds :: [Decl SrcSpanInfo] -> [Decl SrcSpanInfo] sepFunBinds [] = [] sepFunBinds (FunBind _ ms:ds) = map (\m -> FunBind (ann m) [m]) ms ++ sepFunBinds ds sepFunBinds (d:ds) = d : sepFunBinds ds sepClassFunBinds :: [ClassDecl SrcSpanInfo] -> [ClassDecl SrcSpanInfo] sepClassFunBinds [] = [] sepClassFunBinds (ClsDecl _ (FunBind _ ms):ds) = map (\m -> ClsDecl (ann m) $ FunBind (ann m) [m]) ms ++ sepClassFunBinds ds sepClassFunBinds (d:ds) = d : sepClassFunBinds ds sepInstFunBinds :: [InstDecl SrcSpanInfo] -> [InstDecl SrcSpanInfo] sepInstFunBinds [] = [] sepInstFunBinds (InsDecl _ (FunBind _ ms):ds) = map (\m -> InsDecl (ann m) $ FunBind (ann m) [m]) ms ++ sepInstFunBinds ds sepInstFunBinds (d:ds) = d : sepInstFunBinds ds instance ExactP DeclHead where exactP dh' = case dh' of DHead _ n -> exactP n DHInfix _ tva n -> exactP tva >> epInfixName n DHParen l dh -> case srcInfoPoints l of [_,b] -> printString "(" >> exactPC dh >> printStringAt (pos b) ")" _ -> errorEP "ExactP: DeclHead: DeclParen is given wrong number of srcInfoPoints" DHApp _ dh t -> exactP dh >> exactPC t instance ExactP InstRule where exactP ih' = case ih' of IRule l mtvs mctxt qn -> do let pts = srcInfoPoints l _ <- case mtvs of Nothing -> return pts Just tvs -> case pts of [a,b] -> do printStringAt (pos a) "forall" mapM_ exactPC tvs printStringAt (pos b) "." return pts _ -> errorEP "ExactP: InstRule: IRule is given too few srcInfoPoints" maybeEP exactPC mctxt exactPC qn IParen l ih -> case srcInfoPoints l of [a,b] -> printStringAt (pos a) "(" >> exactPC ih >> printStringAt (pos b) ")" _ -> errorEP "ExactP: InstRule: IParen is given wrong number of srcInfoPoints" instance ExactP InstHead where exactP doih' = case doih' of IHCon _ qn -> exactPC qn IHInfix _ ta qn -> exactPC ta >> epInfixQName qn IHParen l doih -> case srcInfoPoints l of [a,b] -> printStringAt (pos a) "(" >> exactPC doih >> printStringAt (pos b) ")" _ -> errorEP "ExactP: OrInstHead: IHParen is given wrong number of srcInfoPoints" IHApp _ doih t -> exactPC doih >> exactPC t instance ExactP TyVarBind where exactP (KindedVar l n k) = case srcInfoPoints l of [_,b,c] -> do printString "(" exactPC n printStringAt (pos b) "::" exactPC k printStringAt (pos c) ")" _ -> errorEP "ExactP: TyVarBind: KindedVar is given wrong number of srcInfoPoints" exactP (UnkindedVar l n) = case srcInfoPoints l of [a,_,c] -> do printStringAt (pos a) "(" exactPC n printStringAt (pos c) ")" [] -> exactPC n _ -> errorEP "ExactP: TyVarBind: UnkindedVar is given wrong number of srcInfoPoints" instance ExactP Type where exactP t' = case t' of TyForall l mtvs mctxt t -> do let pts = srcInfoPoints l _ <- case mtvs of Nothing -> return pts Just tvs -> case pts of _:b:pts' -> do printString "forall" mapM_ exactPC tvs printStringAt (pos b) "." return pts' _ -> errorEP "ExactP: Type: TyForall is given too few srcInfoPoints" maybeEP exactPC mctxt exactPC t TyStar _ -> printString "*" TyFun l t1 t2 -> case srcInfoPoints l of [a] -> do exactP t1 printStringAt (pos a) "->" exactPC t2 _ -> errorEP "ExactP: Type: TyFun is given wrong number of srcInfoPoints" TyTuple l bx ts -> case bx of Boxed -> parenList (srcInfoPoints l) ts Unboxed -> parenHashList (srcInfoPoints l) ts TyUnboxedSum l es -> unboxedSumTypeList (srcInfoPoints l) es TyList l t -> case srcInfoPoints l of [_,b] -> do printString "[" exactPC t printStringAt (pos b) "]" _ -> errorEP "ExactP: Type: TyList is given wrong number of srcInfoPoints" TyParArray l t -> case srcInfoPoints l of [_,b] -> do printString "[:" exactPC t printStringAt (pos b) ":]" _ -> errorEP "ExactP: Type: TyParArray is given wrong number of srcInfoPoints" TyApp _ t1 t2 -> exactP t1 >> exactPC t2 TyVar _ n -> exactP n TyCon _ qn -> exactP qn TyParen l t -> case srcInfoPoints l of [_,b] -> do printString "(" exactPC t printStringAt (pos b) ")" _ -> errorEP "ExactP: Type: TyParen is given wrong number of srcInfoPoints" TyInfix _ t1 qn t2 -> exactP t1 >> exactP qn >> exactPC t2 TyKind l t kd -> case srcInfoPoints l of [_,b,c] -> do printString "(" exactPC t printStringAt (pos b) "::" exactPC kd printStringAt (pos c) ")" _ -> errorEP "ExactP: Type: TyKind is given wrong number of srcInfoPoints" TyPromoted _ p -> exactPC p TyEquals l t0 t1 -> case srcInfoPoints l of a:_ -> exactPC t0 >> printStringAt (pos a) "~" >> exactPC t1 _ -> errorEP "ExactP: Type: TyEquals is given wrong number of srcInfoPoints" TySplice _ sp -> exactP sp TyBang _ b u t -> exactPC u >> exactPC b >> exactPC t TyWildCard _ mn -> printString "_" >> maybeEP exactPC mn TyQuasiQuote _ name qt -> do let qtLines = lines qt printString $ "[" ++ name ++ "|" sequence_ (intersperse newLine $ map printString qtLines) printString "|]" instance ExactP MaybePromotedName where exactP (PromotedName l qn) = case srcInfoPoints l of [a] -> printStringAt (pos a) "'" >> epInfixQName qn _ -> errorEP "ExactP: MaybePromotedName: PromotedName given wrong number of args" exactP (UnpromotedName _ qn) = epInfixQName qn instance ExactP Promoted where exactP (PromotedInteger _ _ rw) = printString rw exactP (PromotedString _ _ rw) = printString ('\"':rw ++ "\"") exactP (PromotedCon l True qn) = case srcInfoPoints l of [a] -> printStringAt (pos a) "'" >> epQName qn _ -> errorEP "ExactP: Promoted: PromotedCon is given wrong number of srcInfoPoints" exactP (PromotedCon _ False qn) = epQName qn exactP (PromotedList l b pl) = let o | b = "'[" | otherwise = "[" e = "]" pts = srcInfoPoints l in printInterleaved (zip pts (o: replicate (length pts - 2) "," ++ [e])) pl exactP (PromotedTuple l pl) = let o = "'(" e = ")" pts = srcInfoPoints l in printInterleaved (zip pts (o: replicate (length pts - 2) "," ++ [e])) pl exactP (PromotedUnit l) = case srcInfoPoints l of [_,b] -> do printString "(" printStringAt (pos b) ")" _ -> errorEP "ExactP: Promoted: PromotedUnit is given wrong number of srcInfoPoints" instance ExactP Context where exactP ctxt = do printContext ctxt printStringAt (pos . last . srcInfoPoints . ann $ ctxt) "=>" printContext :: Context SrcSpanInfo -> EP () printContext ctxt = do let l = ann ctxt pts = init $ srcInfoPoints l case ctxt of CxSingle _ asst -> exactP asst CxEmpty _ -> case pts of [a,b] -> do printStringAt (pos a) "(" printStringAt (pos b) ")" _ -> errorEP "ExactP: Context: CxEmpty is given wrong number of srcInfoPoints" CxTuple _ assts -> parenList pts assts instance ExactP Asst where exactP asst = case asst of TypeA _ t -> exactP t IParam l ipn t -> case srcInfoPoints l of [a] -> do exactP ipn printStringAt (pos a) "::" exactPC t _ -> errorEP "ExactP: Asst: IParam is given wrong number of srcInfoPoints" ParenA l asst' -> case take 2 $ srcInfoPoints l of [a,b] -> do printStringAt (pos a) "(" exactPC asst' printStringAt (pos b) ")" _ -> errorEP "ExactP: Asst: ParenA is given wrong number of srcInfoPoints" instance ExactP Deriving where exactP (Deriving l mds ihs) = case srcInfoPoints l of _:pts -> do printString "deriving" maybeEP exactPC mds case pts of [] -> exactPC $ head ihs _ -> parenList pts ihs _ -> errorEP "ExactP: Deriving is given too few srcInfoPoints" instance ExactP DerivStrategy where exactP (DerivStock _) = printString "stock" exactP (DerivAnyclass _) = printString "anyclass" exactP (DerivNewtype _) = printString "newtype" exactP (DerivVia _ ty) = do printString "via" exactP ty instance ExactP ClassDecl where exactP cdecl = case cdecl of ClsDecl _ d -> exactP d ClsDataFam l mctxt dh mk -> case srcInfoPoints l of _:pts -> do printString "data" maybeEP exactPC mctxt exactPC dh maybeEP (\kd -> printStringAt (pos (head pts)) "::" >> exactPC kd) mk _ -> errorEP "ExactP: ClassDecl: ClsDataFam is given too few srcInfoPoints" ClsTyFam l dh mk mi -> case srcInfoPoints l of _:_ -> do printString "type" exactPC dh maybeEP exactPC mk maybeEP exactPC mi _ -> errorEP "ExactP: ClassDecl: ClsTyFam is given too few srcInfoPoints" ClsTyDef l t1 -> case srcInfoPoints l of _:b:_ -> do -- 3 sourceInfoPoints implies parsed as "type instance" printString "type" printStringAt (pos b) "instance" exactPC t1 _:_ -> do printString "type" exactPC t1 _ -> errorEP "ExactP: ClassDecl: ClsTyDef is given too few srcInfoPoints" ClsDefSig l n t -> case srcInfoPoints l of _:b:_ -> do printString "default" exactPC n printStringAt (pos b) "::" exactPC t _ -> errorEP "ExactP: ClassDecl: ClsDefSig is given too few srcInfoPoints" instance ExactP InstDecl where exactP idecl = case idecl of InsDecl _ d -> exactP d InsType l t1 t2 -> case srcInfoPoints l of [_,b] -> do printString "type" exactPC t1 printStringAt (pos b) "=" exactPC t2 _ -> internalError "InstDecl -> InsType" InsData l dn t constrs mder -> do exactP dn exactPC t printInterleaved (zip (srcInfoPoints l) ("=": repeat "|")) constrs mapM_ exactPC mder InsGData l dn t mk gds mder -> do let pts = srcInfoPoints l exactP dn exactPC t pts1 <- case mk of Nothing -> return pts Just kd -> case pts of p:pts' -> do printStringAt (pos p) "::" exactPC kd return pts' _ -> errorEP "ExactP: InstDecl: InsGData is given too few srcInfoPoints" case pts1 of x:_ -> do printStringAt (pos x) "where" mapM_ exactPC gds mapM_ exactPC mder _ -> errorEP "ExactP: InstDecl: InsGData is given too few srcInfoPoints" -- InsInline l inl mact qn -> do -- case srcInfoPoints l of -- [a,b] -> do -- printString $ if inl then "{-# INLINE" else "{-# NOINLINE" -- maybeEP exactPC mact -- exactPC qn -- printStringAt (pos b) "#-}" -- _ -> errorEP "ExactP: InstDecl: InsInline is given wrong number of srcInfoPoints" instance ExactP FunDep where exactP (FunDep l nxs nys) = case srcInfoPoints l of [a] -> do mapM_ exactPC nxs printStringAt (pos a) "->" mapM_ exactPC nys _ -> errorEP "ExactP: FunDep is given wrong number of srcInfoPoints" instance ExactP QualConDecl where exactP (QualConDecl l mtvs mctxt cd) = do let pts = srcInfoPoints l _ <- case mtvs of Nothing -> return pts Just tvs -> case pts of _:b:pts' -> do printString "forall" mapM_ exactPC tvs printStringAt (pos b) "." return pts' _ -> errorEP "ExactP: QualConDecl is given wrong number of srcInfoPoints" maybeEP exactPC mctxt exactPC cd instance ExactP ConDecl where exactP cd = case cd of ConDecl _ n bts -> exactP n >> mapM_ exactPC bts InfixConDecl _ bta n btb -> exactP bta >> epInfixName n >> exactP btb RecDecl l n fds -> exactP n >> curlyList (srcInfoPoints l) fds instance ExactP GadtDecl where exactP (GadtDecl l n _mtvs mctxt ns' t) = case ns' of Nothing -> case srcInfoPoints l of [a] -> do exactP n printStringAt (pos a) "::" exactPC t _ -> errorEP "ExactP: GadtDecl is given wrong number of srcInfoPoints" Just ts -> case srcInfoPoints l of (a:b:c:d:rest) -> do exactPC n printStringAt (pos a) "::" maybeEP exactPC mctxt printStringAt (pos b) "{" printInterleaved' (zip rest (repeat ",")) ts printStringAt (pos c) "}" printStringAt (pos d) "->" exactPC t _ -> errorEP "ExactP: GadtDecl is given wrong number of srcInfoPoints" instance ExactP BangType where exactP bt = case bt of BangedTy l -> printStringAt (pos l) "!" LazyTy l -> printStringAt (pos l) "~" _ -> return () instance ExactP Unpackedness where exactP bt = case bt of Unpack l -> case srcInfoPoints l of [a,b] -> do printStringAt (pos a) "{-# UNPACK" printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Unpackedness: Unpack is given wrong number of srcInfoPoints" NoUnpack l -> case srcInfoPoints l of [a,b] -> do printStringAt (pos a) "{-# NOUNPACK" printStringAt (pos b) "#-}" _ -> errorEP "ExactP: Unpackedness: NoUnpack is given wrong number of srcInfoPoints" NoUnpackPragma {} -> return () instance ExactP Splice where exactP (IdSplice _ str) = printString $ '$':str exactP (TIdSplice _ str) = printString $ "$$" ++ str exactP (ParenSplice l e) = printParen "ParenSplice" "$(" l e exactP (TParenSplice l e) = printParen "TParenSplice" "$$(" l e printParen :: ExactP ast => String -> String -> SrcSpanInfo -> ast SrcSpanInfo -> EP () printParen con paren l e = case srcInfoPoints l of [_,b] -> do printString paren exactPC e printStringAt (pos b) ")" _ -> errorEP $ "ExactP: Splice: " ++ con ++ " is given wrong number of srcInfoPoints" instance ExactP Exp where exactP exp = case exp of Var _ qn -> exactP qn OverloadedLabel _ qn -> printString ('#':qn) IPVar _ ipn -> exactP ipn Con _ qn -> exactP qn Lit _ lit -> exactP lit InfixApp _ e1 op e2 -> exactP e1 >> exactPC op >> exactPC e2 App _ e1 e2 -> exactP e1 >> exactPC e2 NegApp _ e -> printString "-" >> exactPC e Lambda l ps e -> case srcInfoPoints l of [_,b] -> do printString "\\" mapM_ exactPC ps printStringAt (pos b) "->" exactPC e _ -> errorEP "ExactP: Exp: Lambda is given wrong number of srcInfoPoints" Let l bs e -> case srcInfoPoints l of [_,b] -> do printString "let" exactPC bs printStringAt (pos b) "in" exactPC e _ -> errorEP "ExactP: Exp: Let is given wrong number of srcInfoPoints" If l ec et ee -> -- traceShow (srcInfoPoints l) $ do -- First we need to sort out if there are any optional -- semicolons hiding among the srcInfoPoints. case srcInfoPoints l of (_:b:c:rest) -> do let (mpSemi1,pThen,rest2) = if snd (spanSize b) == 4 -- this is "then", not a semi then (Nothing, b, c:rest) else (Just b, c, rest) case rest2 of (c':rest3) -> do let (mpSemi2,rest4) = if snd (spanSize c') == 4 -- this is "else", not a semi then (Nothing, rest2) else (Just c', rest3) case rest4 of [pElse] -> do -- real work starts here: printString "if" exactPC ec maybeEP printSemi mpSemi1 printStringAt (pos pThen) "then" exactPC et maybeEP printSemi mpSemi2 printStringAt (pos pElse) "else" exactPC ee [] -> errorEP "ExactP: Exp: If is given too few srcInfoPoints" _ -> errorEP "ExactP: Exp: If is given too many srcInfoPoints" _ -> errorEP "ExactP: Exp: If is given too few srcInfoPoints" _ -> errorEP "ExactP: Exp: If is given too few srcInfoPoints" MultiIf l alts -> case srcInfoPoints l of _:pts -> do printString "if" layoutList pts (map GuardedAlt alts) _ -> internalError "Exp -> MultiIf" Case l e alts -> case srcInfoPoints l of _:b:pts -> do printString "case" exactPC e printStringAt (pos b) "of" layoutList pts alts _ -> errorEP "ExactP: Exp: Case is given too few srcInfoPoints" Do l stmts -> case srcInfoPoints l of _:pts -> do printString "do" layoutList pts stmts _ -> errorEP "ExactP: Exp: Do is given too few srcInfoPoints" MDo l stmts -> case srcInfoPoints l of _:pts -> do printString "mdo" layoutList pts stmts _ -> errorEP "ExactP: Exp: Mdo is given wrong number of srcInfoPoints" Tuple l bx es -> case bx of Boxed -> parenList (srcInfoPoints l) es Unboxed -> parenHashList (srcInfoPoints l) es UnboxedSum l b a es -> do unboxedSumEP l b a es TupleSection l bx mexps -> do let pts = srcInfoPoints l (o, e) = case bx of Boxed -> ("(", ")"); Unboxed -> ("(#", "#)") printSeq $ interleave (zip (map pos $ init pts) (map printString (o: repeat ",")) ++ [(pos $ last pts, printString e)]) (map (maybe (0,0) (pos . ann) &&& maybeEP exactPC) mexps) List l es -> squareList (srcInfoPoints l) es ParArray l es -> squareColonList (srcInfoPoints l) es Paren l p -> parenList (srcInfoPoints l) [p] LeftSection l e qop -> case srcInfoPoints l of [_,b] -> do printString "(" exactPC e exactPC qop printStringAt (pos b) ")" _ -> errorEP "ExactP: Exp: LeftSection is given wrong number of srcInfoPoints" RightSection l qop e -> case srcInfoPoints l of [_,b] -> do printString "(" exactPC qop exactPC e printStringAt (pos b) ")" _ -> errorEP "ExactP: Exp: RightSection is given wrong number of srcInfoPoints" RecConstr l qn fups -> do let pts = srcInfoPoints l exactP qn curlyList pts fups RecUpdate l e fups -> do let pts = srcInfoPoints l exactP e curlyList pts fups EnumFrom l e -> case srcInfoPoints l of [_,b,c] -> do printString "[" exactPC e printStringAt (pos b) ".." printStringAt (pos c) "]" _ -> errorEP "ExactP: Exp: EnumFrom is given wrong number of srcInfoPoints" EnumFromTo l e1 e2 -> case srcInfoPoints l of [_,b,c] -> do printString "[" exactPC e1 printStringAt (pos b) ".." exactPC e2 printStringAt (pos c) "]" _ -> errorEP "ExactP: Exp: EnumFromTo is given wrong number of srcInfoPoints" EnumFromThen l e1 e2 -> case srcInfoPoints l of [_,b,c,d] -> do printString "[" exactPC e1 printStringAt (pos b) "," exactPC e2 printStringAt (pos c) ".." printStringAt (pos d) "]" _ -> errorEP "ExactP: Exp: EnumFromThen is given wrong number of srcInfoPoints" EnumFromThenTo l e1 e2 e3 -> case srcInfoPoints l of [_,b,c,d] -> do printString "[" exactPC e1 printStringAt (pos b) "," exactPC e2 printStringAt (pos c) ".." exactPC e3 printStringAt (pos d) "]" _ -> errorEP "ExactP: Exp: EnumFromToThen is given wrong number of srcInfoPoints" ParArrayFromTo l e1 e2 -> case srcInfoPoints l of [_,b,c] -> do printString "[:" exactPC e1 printStringAt (pos b) ".." exactPC e2 printStringAt (pos c) ":]" _ -> errorEP "ExactP: Exp: ParArrayFromTo is given wrong number of srcInfoPoints" ParArrayFromThenTo l e1 e2 e3 -> case srcInfoPoints l of [_,b,c,d] -> do printString "[:" exactPC e1 printStringAt (pos b) "," exactPC e2 printStringAt (pos c) ".." exactPC e3 printStringAt (pos d) ":]" _ -> errorEP "ExactP: Exp: ParArrayFromToThen is given wrong number of srcInfoPoints" ListComp l e qss -> case srcInfoPoints l of _:pts -> do printString "[" exactPC e bracketList ("|",",","]") pts qss _ -> errorEP "ExactP: Exp: ListComp is given too few srcInfoPoints" ParComp l e qsss -> case srcInfoPoints l of _:pts -> do let (strs, qss) = unzip $ pairUp qsss printString "[" exactPC e printInterleaved (zip pts (strs ++ ["]"])) qss _ -> errorEP "ExactP: Exp: ParComp is given wrong number of srcInfoPoints" where pairUp [] = [] pairUp ((a:as):xs) = ("|", a) : zip (repeat ",") as ++ pairUp xs pairUp _ = internalError "Exp -> ParComp -> pairUp" ParArrayComp l e qsss -> case srcInfoPoints l of _:pts -> do let (strs, qss) = unzip $ pairUp qsss printString "[:" exactPC e printInterleaved (zip pts (strs ++ [":]"])) qss _ -> errorEP "ExactP: Exp: ParArrayComp is given wrong number of srcInfoPoints" where pairUp [] = [] pairUp ((a:as):xs) = ("|", a) : zip (repeat "|") as ++ pairUp xs pairUp _ = internalError "Exp -> ParArrayComp -> pairUp" ExpTypeSig l e t -> case srcInfoPoints l of [a] -> do exactP e printStringAt (pos a) "::" exactPC t _ -> errorEP "ExactP: Exp: ExpTypeSig is given wrong number of srcInfoPoints" VarQuote _ qn -> do printString "'" exactPC qn TypQuote _ qn -> do printString "''" exactPC qn BracketExp _ br -> exactP br SpliceExp _ sp -> exactP sp QuasiQuote _ name qt -> do let qtLines = lines qt printString $ "[" ++ name ++ "|" sequence_ (intersperse newLine $ map printString qtLines) printString "|]" XTag l xn attrs mat es -> case srcInfoPoints l of [_,b,c,d,e] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC es printStringAt (pos c) "" -- TODO: Fugly hack/duplication, should be refactored -- For the case when there's an optional semicolon [_,b,semi,c,d,e] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC es printSemi semi printStringAt (pos c) "" _ -> errorEP "ExactP: Exp: XTag is given wrong number of srcInfoPoints" XETag l xn attrs mat -> case srcInfoPoints l of [_,b] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) "/>" _ -> errorEP "ExactP: Exp: XETag is given wrong number of srcInfoPoints" XPcdata _ str -> do let strLines = lines str sequence_ (intersperse newLine $ map printString strLines) XExpTag l e -> case srcInfoPoints l of [_,b] -> do printString "<%" exactPC e printStringAt (pos b) "%>" _ -> errorEP "ExactP: Exp: XExpTag is given wrong number of srcInfoPoints" XChildTag l es -> case srcInfoPoints l of [_,b,c] -> do printString "<%>" mapM_ exactPC es printStringAt (pos b) "" -- Ugly duplication for when there's an optional semi [_,semi,b,c] -> do printString "<%>" mapM_ exactPC es printSemi semi printStringAt (pos b) "" _ -> errorEP "ExactP: Exp: XChildTag is given wrong number of srcInfoPoints" CorePragma l str e -> case srcInfoPoints l of [_,b] -> do printString $ "{-# CORE " ++ show str printStringAt (pos b) "#-}" exactPC e _ -> errorEP "ExactP: Exp: CorePragma is given wrong number of srcInfoPoints" SCCPragma l str e -> case srcInfoPoints l of [_,b] -> do printString $ "{-# SCC " ++ show str printStringAt (pos b) "#-}" exactPC e _ -> errorEP "ExactP: Exp: SCCPragma is given wrong number of srcInfoPoints" GenPragma l str (i1,i2) (i3,i4) e -> do printStrs $ zip (srcInfoPoints l) ["{-# GENERATED", show str, show i1, ":", show i2, "-", show i3, ":", show i4, "#-}"] exactPC e Proc l p e -> case srcInfoPoints l of [_,b] -> do printString "proc" exactPC p printStringAt (pos b) "->" exactPC e _ -> errorEP "ExactP: Exp: Proc is given wrong number of srcInfoPoints" LeftArrApp l e1 e2 -> case srcInfoPoints l of [a] -> do exactP e1 printStringAt (pos a) "-<" exactPC e2 _ -> errorEP "ExactP: Exp: LeftArrApp is given wrong number of srcInfoPoints" RightArrApp l e1 e2 -> case srcInfoPoints l of [a] -> do exactP e1 printStringAt (pos a) ">-" exactPC e2 _ -> errorEP "ExactP: Exp: RightArrApp is given wrong number of srcInfoPoints" LeftArrHighApp l e1 e2 -> case srcInfoPoints l of [a] -> do exactP e1 printStringAt (pos a) "-<<" exactPC e2 _ -> errorEP "ExactP: Exp: LeftArrHighApp is given wrong number of srcInfoPoints" RightArrHighApp l e1 e2 -> case srcInfoPoints l of [a] -> do exactP e1 printStringAt (pos a) ">>-" exactPC e2 _ -> errorEP "ExactP: Exp: RightArrHighApp is given wrong number of srcInfoPoints" ArrOp l e -> case srcInfoPoints l of [a, b] -> do printStringAt (pos a) "(|" exactPC e printStringAt (pos b) "|)" _ -> errorEP "ExactP: Exp: ArrOp is given wrong number of srcInfoPoints" LCase l alts -> case srcInfoPoints l of _:b:pts -> do printString "\\" printStringAt (pos b) "case" layoutList pts alts _ -> errorEP "ExactP: Exp: LCase is given wrong number of srcInfoPoints" TypeApp _ ty -> printString "@" >> exactP ty unboxedSumEP :: ExactP e => SrcSpanInfo -> Int -> Int -> e SrcSpanInfo -> EP () unboxedSumEP l b _a es = do let (opt:pts) = srcInfoPoints l (o, e) = ("(#", "#)") bars = zip (map pos (init pts)) (map printString (repeat "|")) open = (pos opt, printString o) close = (pos (last pts), printString e) fs = take b bars as = drop b bars printSeq $ open : fs ++ [((0, 0), exactPC es)] ++ as ++ [close] instance ExactP FieldUpdate where exactP fup = case fup of FieldUpdate l qn e -> case srcInfoPoints l of [a] -> do exactP qn printStringAt (pos a) "=" exactPC e _ -> errorEP "ExactP: FieldUpdate is given wrong number of srcInfoPoints" FieldPun _ n -> exactP n FieldWildcard _ -> printString ".." instance ExactP Stmt where exactP stmt = case stmt of Generator l p e -> case srcInfoPoints l of [a] -> do exactP p printStringAt (pos a) "<-" exactPC e _ -> errorEP "ExactP: Stmt: Generator is given wrong number of srcInfoPoints" Qualifier _ e -> exactP e LetStmt _ bds -> do printString "let" exactPC bds RecStmt l ss -> case srcInfoPoints l of _:pts -> do printString "rec" layoutList pts ss _ -> errorEP "ExactP: Stmt: RecStmt is given too few srcInfoPoints" instance ExactP QualStmt where exactP qstmt = case qstmt of QualStmt _ stmt -> exactP stmt ThenTrans _ e -> printString "then" >> exactPC e ThenBy l e1 e2 -> case srcInfoPoints l of [_,b] -> do printString "then" exactPC e1 printStringAt (pos b) "by" exactPC e2 _ -> errorEP "ExactP: QualStmt: ThenBy is given wrong number of srcInfoPoints" GroupBy l e -> do printStrs $ zip (srcInfoPoints l) ["then","group","by"] exactPC e GroupUsing l e -> do printStrs $ zip (srcInfoPoints l) ["then","group","using"] exactPC e GroupByUsing l e1 e2 -> do let pts = srcInfoPoints l printStrs $ zip (init pts) ["then","group","by"] exactPC e1 printStringAt (pos (last pts)) "using" exactPC e2 instance ExactP Bracket where exactP br = case br of ExpBracket l e -> printBracket "ExpBracket" "[|" "|]" l e TExpBracket l e -> printBracket "TExpBracket" "[||" "||]" l e PatBracket l p -> printBracket "PatBracket" "[p|" "|]" l p TypeBracket l t -> printBracket "TypeBracket" "[t|" "|]" l t DeclBracket l ds -> case srcInfoPoints l of pts@(_:_) -> do printString "[d|" layoutList (init pts) (sepFunBinds ds) printStringAt (pos (last pts)) "|]" _ -> errorEP "ExactP: Bracket: DeclBracket is given too few srcInfoPoints" printBracket :: ExactP ast => String -> String -> String -> SrcSpanInfo -> ast SrcSpanInfo -> EP () printBracket con oBracket cBracket l c = case srcInfoPoints l of [_,b] -> do printString oBracket exactPC c printStringAt (pos b) cBracket _ -> errorEP $ "ExactP: Bracket: " ++ con ++ " is given wrong number of srcInfoPoints" instance ExactP XAttr where exactP (XAttr l xn e) = case srcInfoPoints l of [a] -> do exactP xn printStringAt (pos a) "=" exactPC e _ -> errorEP "ExactP: XAttr is given wrong number of srcInfoPoints" instance ExactP Alt where exactP (Alt l p galts mbs) = do exactP p exactPC (GuardedAlts galts) maybeEP (\bs -> printStringAt (pos (head (srcInfoPoints l))) "where" >> exactPC bs) mbs instance ExactP Match where exactP (Match l n ps rhs mbinds) = do let pts = srcInfoPoints l len = length pts pars = len `div` 2 (oPars,cParsWh) = splitAt pars pts (cPars,_) = splitAt pars cParsWh -- _§ is either singleton or empty printStrs (zip oPars (repeat "(")) exactPC n printStreams (zip (map pos cPars) (repeat $ printString ")")) (map (pos . ann &&& exactPC) ps) exactPC rhs maybeEP (\bds -> printStringAt (pos (head pts)) "where" >> exactPC bds) mbinds exactP (InfixMatch l a n bs rhs mbinds) = do let pts = srcInfoPoints l len = length pts pars = len `div` 2 (oPars,cParsWh) = splitAt pars pts (cPars,whPt) = splitAt pars cParsWh -- whPt is either singleton or empty printStrs (zip oPars (repeat "(")) exactPC a epInfixName n printInterleaved' (zip cPars (repeat ")")) bs exactPC rhs maybeEP (\bds -> printStringAt (pos (head whPt)) "where" >> exactPC bds) mbinds instance ExactP Rhs where exactP (UnGuardedRhs _ e) = printString "=" >> exactPC e exactP (GuardedRhss _ grhss) = mapM_ exactPC grhss instance ExactP GuardedRhs where exactP (GuardedRhs l ss e) = case srcInfoPoints l of _:pts -> do printString "|" printInterleaved' (zip (init pts) (repeat ",") ++ [(last pts, "=")]) ss exactPC e _ -> errorEP "ExactP: GuardedRhs is given wrong number of srcInfoPoints" newtype GuardedAlts l = GuardedAlts (Rhs l) deriving (Functor, Show) instance Annotated GuardedAlts where amap f (GuardedAlts v) = GuardedAlts (amap f v) ann (GuardedAlts v) = ann v newtype GuardedAlt l = GuardedAlt (GuardedRhs l) deriving (Functor, Show) instance Annotated GuardedAlt where amap f (GuardedAlt v) = GuardedAlt (amap f v) ann (GuardedAlt v) = ann v instance ExactP GuardedAlts where exactP (GuardedAlts (UnGuardedRhs _ e)) = printString "->" >> exactPC e exactP (GuardedAlts (GuardedRhss _ grhss)) = mapM_ (exactPC . GuardedAlt) grhss instance ExactP GuardedAlt where exactP (GuardedAlt (GuardedRhs l ss e)) = case srcInfoPoints l of _:pts -> do printString "|" printInterleaved' (zip (init pts) (repeat ",") ++ [(last pts, "->")]) ss exactPC e _ -> errorEP "ExactP: GuardedAlt is given wrong number of srcInfoPoints" instance ExactP Pat where exactP pat = case pat of PVar l n -> exactPC (fmap (const l) n) PLit _ sg lit -> exactPC sg >> exactPC lit PNPlusK l n k -> case srcInfoPoints l of [a,b] -> do exactP n printStringAt (pos a) "+" printStringAt (pos b) (show k) _ -> errorEP "ExactP: Pat: PNPlusK is given wrong number of srcInfoPoints" PInfixApp _ pa qn pb -> exactP pa >> epInfixQName qn >> exactPC pb PApp _ qn ps -> exactP qn >> mapM_ exactPC ps PTuple l bx ps -> case bx of Boxed -> parenList (srcInfoPoints l) ps Unboxed -> parenHashList (srcInfoPoints l) ps PUnboxedSum l before after e -> unboxedSumEP l before after e PList l ps -> squareList (srcInfoPoints l) ps PParen l p -> parenList (srcInfoPoints l) [p] PRec l qn pfs -> exactP qn >> curlyList (srcInfoPoints l) pfs PAsPat l n p -> case srcInfoPoints l of [a] -> do exactP n printStringAt (pos a) "@" exactPC p _ -> errorEP "ExactP: Pat: PAsPat is given wrong number of srcInfoPoints" PWildCard _ -> printString "_" PIrrPat _ p -> printString "~" >> exactPC p PatTypeSig l p t -> case srcInfoPoints l of [a] -> do exactP p printStringAt (pos a) "::" exactPC t _ -> errorEP "ExactP: Pat: PatTypeSig is given wrong number of srcInfoPoints" PViewPat l e p -> case srcInfoPoints l of [a] -> do exactP e printStringAt (pos a) "->" exactPC p _ -> errorEP "ExactP: Pat: PViewPat is given wrong number of srcInfoPoints" PRPat l rps -> squareList (srcInfoPoints l) rps PXTag l xn attrs mat ps -> case srcInfoPoints l of [_,b,c,d,e] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC ps printStringAt (pos c) "" -- Optional semi [_,b,semi,c,d,e] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) ">" mapM_ exactPC ps printSemi semi printStringAt (pos c) "" _ -> errorEP "ExactP: Pat: PXTag is given wrong number of srcInfoPoints" PXETag l xn attrs mat -> case srcInfoPoints l of [_,b] -> do printString "<" exactPC xn mapM_ exactPC attrs maybeEP exactPC mat printStringAt (pos b) "/>" _ -> errorEP "ExactP: Pat: PXETag is given wrong number of srcInfoPoints" PXPcdata _ str -> printString str PXPatTag l p -> case srcInfoPoints l of [_,_] -> do printString "<%" exactPC p printString "%>" _ -> errorEP "ExactP: Pat: PXPatTag is given wrong number of srcInfoPoints" PXRPats l rps -> bracketList ("<[",",","]>") (srcInfoPoints l) rps PSplice _ sp -> exactP sp PQuasiQuote _ name qt -> printString $ "[$" ++ name ++ "|" ++ qt ++ "]" PBangPat _ p -> printString "!" >> exactPC p instance ExactP PatField where exactP pf = case pf of PFieldPat l qn p -> case srcInfoPoints l of [a] -> do exactP qn printStringAt (pos a) "=" exactPC p _ -> errorEP "ExactP: PatField: PFieldPat is given wrong number of srcInfoPoints" PFieldPun _ n -> exactP n PFieldWildcard _ -> printString ".." instance ExactP RPat where exactP rpat = case rpat of RPOp _ rp op -> exactP rp >> exactPC op RPEither l r1 r2 -> case srcInfoPoints l of [a] -> do exactP r1 printStringAt (pos a) "|" exactPC r2 _ -> errorEP "ExactP: RPat: RPEither is given wrong number of srcInfoPoints" RPSeq l rps -> bracketList ("(|",",","|)") (srcInfoPoints l) rps RPGuard l p stmts -> case srcInfoPoints l of _:pts -> do printString "(|" exactPC p bracketList ("|",",","|)") pts stmts _ -> errorEP "ExactP: RPat: RPGuard is given wrong number of srcInfoPoints" RPCAs l n rp -> case srcInfoPoints l of [a] -> do exactP n printStringAt (pos a) "@:" exactPC rp _ -> errorEP "ExactP: RPat: RPCAs is given wrong number of srcInfoPoints" RPAs l n rp -> case srcInfoPoints l of [a] -> do exactP n printStringAt (pos a) "@" exactPC rp _ -> errorEP "ExactP: RPat: RPAs is given wrong number of srcInfoPoints" RPParen l rp -> parenList (srcInfoPoints l) [rp] RPPat _ p -> exactP p instance ExactP RPatOp where exactP rop = printString $ case rop of RPStar _ -> "*" RPStarG _ -> "*!" RPPlus _ -> "+" RPPlusG _ -> "+!" RPOpt _ -> "?" RPOptG _ -> "?!" instance ExactP PXAttr where exactP (PXAttr l xn p) = case srcInfoPoints l of [a] -> do exactP xn printStringAt (pos a) "=" exactPC p _ -> errorEP "ExactP: PXAttr is given wrong number of srcInfoPoints" instance ExactP XName where exactP xn = case xn of XName _ name -> printString name XDomName l dom name -> case srcInfoPoints l of [_,b,c] -> do printString dom printStringAt (pos b) ":" printStringAt (pos c) name _ -> errorEP "ExactP: XName: XDomName is given wrong number of srcInfoPoints" instance ExactP Binds where exactP (BDecls l ds) = layoutList (srcInfoPoints l) (sepFunBinds ds) exactP (IPBinds l ips) = layoutList (srcInfoPoints l) ips instance ExactP CallConv where exactP (StdCall _) = printString "stdcall" exactP (CCall _) = printString "ccall" exactP (CPlusPlus _) = printString "cplusplus" exactP (DotNet _) = printString "dotnet" exactP (Jvm _) = printString "jvm" exactP (Js _) = printString "js" exactP (JavaScript _) = printString "javascript" exactP (CApi _) = printString "capi" instance ExactP Safety where exactP (PlayRisky _) = printString "unsafe" exactP (PlaySafe _ b) = printString $ if b then "threadsafe" else "safe" exactP (PlayInterruptible _) = printString "interruptible" instance ExactP Rule where exactP (Rule l str mact mrvs e1 e2) = case srcInfoPoints l of _:pts -> do printString (show str) maybeEP exactP mact pts1 <- case mrvs of Nothing -> return pts Just rvs -> case pts of a':b:pts' -> do printStringAt (pos a') "forall" mapM_ exactPC rvs printStringAt (pos b) "." return pts' _ -> errorEP "ExactP: Rule is given too few srcInfoPoints" case pts1 of [x] -> do exactPC e1 printStringAt (pos x) "=" exactPC e2 _ -> errorEP "ExactP: Rule is given wrong number of srcInfoPoints" _ -> errorEP "ExactP: Rule is given too few srcInfoPoints" instance ExactP RuleVar where exactP (TypedRuleVar l n t) = case srcInfoPoints l of [_,b,c] -> do printString "(" exactPC n printStringAt (pos b) "::" exactPC t printStringAt (pos c) ")" _ -> errorEP "ExactP: RuleVar: TypedRuleVar is given wrong number of srcInfoPoints" exactP (RuleVar _ n) = exactP n instance ExactP Overlap where exactP (NoOverlap _) = printString "{-# NO_OVERLAP #-}" exactP (Overlap _) = printString "{-# OVERLAP #-}" exactP (Overlaps _) = printString "{-# OVERLAPS #-}" exactP (Overlapping _) = printString "{-# OVERLAPPING #-}" exactP (Overlappable _) = printString "{-# OVERLAPPABLE #-}" exactP (Incoherent _) = printString "{-# INCOHERENT #-}" instance ExactP Activation where exactP (ActiveFrom l i) = printPoints l ["[", show i, "]"] exactP (ActiveUntil l i) = printPoints l ["[", "~", show i, "]"] instance ExactP FieldDecl where exactP (FieldDecl l ns bt) = do let pts = srcInfoPoints l printInterleaved' (zip (init pts) (repeat ",") ++ [(last pts, "::")]) ns exactPC bt instance ExactP IPBind where exactP (IPBind l ipn e) = case srcInfoPoints l of [a] -> do exactP ipn printStringAt (pos a) "=" exactPC e _ -> errorEP "ExactP: IPBind is given wrong number of srcInfoPoints" -- Hopefully, this will never fire. -- If it does, hopefully by that time https://github.com/sol/rewrite-with-location -- will be implemented. -- If not, then removing all calls to internalError should give a better -- idea where the error comes from. -- So far, it's necessary to eliminate non-exhaustive patterns warnings. -- We don't want to turn them off, as we want unhandled AST nodes to be -- reported. internalError :: String -> a internalError loc' = error $ unlines [ "haskell-src-exts: ExactPrint: internal error (non-exhaustive pattern)" , "Location: " ++ loc' , "This is either caused by supplying incorrect location information or by" , "a bug in haskell-src-exts. If this happens on an unmodified AST obtained" , "by the haskell-src-exts Parser it is a bug, please it report it at" , "https://github.com/haskell-suite/haskell-src-exts"] haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Parser.hs0000644000000000000000000002734313534314632021602 0ustar0000000000000000{-# LANGUAGE CPP, DeriveDataTypeable, FlexibleInstances, DeriveFunctor #-} {-# OPTIONS_GHC -fno-warn-orphans #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Annotated.Parser -- Copyright : (c) Niklas Broberg 2004-2009 -- (c) Michael Sloan 2013 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Annotated parser for Haskell with extensions. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Parser ( -- * General parsing Parseable(parse, parseWithMode, parseWithComments) , ParseMode(..), defaultParseMode, ParseResult(..), fromParseResult -- * Parsing of specific AST elements -- ** Modules , parseModule, parseModuleWithMode, parseModuleWithComments -- ** Expressions , parseExp, parseExpWithMode, parseExpWithComments -- ** Statements , parseStmt, parseStmtWithMode, parseStmtWithComments -- ** Patterns , parsePat, parsePatWithMode, parsePatWithComments -- ** Declarations , parseDecl, parseDeclWithMode, parseDeclWithComments -- ** Types , parseType, parseTypeWithMode, parseTypeWithComments -- ** Imports , parseImportDecl, parseImportDeclWithMode, parseImportDeclWithComments -- * Non-greedy parsers , NonGreedy(..) , ListOf(..), unListOf -- ** Module head parsers , getTopPragmas , PragmasAndModuleName(..) , PragmasAndModuleHead(..) , ModuleHeadAndImports(..) ) where import Data.Data hiding (Fixity) import Language.Haskell.Exts.Fixity import Language.Haskell.Exts.Syntax import Language.Haskell.Exts.Comments import Language.Haskell.Exts.InternalParser import Language.Haskell.Exts.ParseMonad import Language.Haskell.Exts.SrcLoc instance Parseable (Decl SrcSpanInfo) where parser = normalParser mparseDecl instance Parseable (Exp SrcSpanInfo) where parser = normalParser mparseExp instance Parseable (Module SrcSpanInfo) where parser = normalParser mparseModule instance Parseable (Pat SrcSpanInfo) where parser = normalParser mparsePat instance Parseable (Stmt SrcSpanInfo) where parser = normalParser mparseStmt instance Parseable (Type SrcSpanInfo) where parser = normalParserNoFixity mparseType instance Parseable (ImportDecl SrcSpanInfo) where parser = normalParserNoFixity mparseImportDecl normalParser :: AppFixity a => P (a SrcSpanInfo) -> Maybe [Fixity] -> P (a SrcSpanInfo) normalParser p Nothing = p normalParser p (Just fixs) = p >>= \ast -> applyFixities fixs ast `atSrcLoc` noLoc normalParserNoFixity :: P (a SrcSpanInfo) -> Maybe [Fixity] -> P (a SrcSpanInfo) normalParserNoFixity p _ = p -- Type-specific functions -- | Parse of a string, which should contain a complete Haskell module, using 'defaultParseMode'. parseModule :: String -> ParseResult (Module SrcSpanInfo) parseModule = parse -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode'. parseModuleWithMode :: ParseMode -> String -> ParseResult (Module SrcSpanInfo) parseModuleWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseModuleWithComments :: ParseMode -> String -> ParseResult (Module SrcSpanInfo, [Comment]) parseModuleWithComments = parseWithComments -- | Parse of a string containing a Haskell expression, using 'defaultParseMode'. parseExp :: String -> ParseResult (Exp SrcSpanInfo) parseExp = parse -- | Parse of a string containing a Haskell expression, using an explicit 'ParseMode'. parseExpWithMode :: ParseMode -> String -> ParseResult (Exp SrcSpanInfo) parseExpWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseExpWithComments :: ParseMode -> String -> ParseResult (Exp SrcSpanInfo, [Comment]) parseExpWithComments = parseWithComments -- | Parse of a string containing a Haskell pattern, using 'defaultParseMode'. parsePat :: String -> ParseResult (Pat SrcSpanInfo) parsePat = parse -- | Parse of a string containing a Haskell pattern, using an explicit 'ParseMode'. parsePatWithMode :: ParseMode -> String -> ParseResult (Pat SrcSpanInfo) parsePatWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parsePatWithComments :: ParseMode -> String -> ParseResult (Pat SrcSpanInfo, [Comment]) parsePatWithComments = parseWithComments -- | Parse of a string containing a Haskell top-level declaration, using 'defaultParseMode'. parseDecl :: String -> ParseResult (Decl SrcSpanInfo) parseDecl = parse -- | Parse of a string containing a Haskell top-level declaration, using an explicit 'ParseMode'. parseDeclWithMode :: ParseMode -> String -> ParseResult (Decl SrcSpanInfo) parseDeclWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseDeclWithComments :: ParseMode -> String -> ParseResult (Decl SrcSpanInfo, [Comment]) parseDeclWithComments = parseWithComments -- | Parse of a string containing a Haskell type, using 'defaultParseMode'. parseType :: String -> ParseResult (Type SrcSpanInfo) parseType = parse -- | Parse of a string containing a Haskell type, using an explicit 'ParseMode'. parseTypeWithMode :: ParseMode -> String -> ParseResult (Type SrcSpanInfo) parseTypeWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseTypeWithComments :: ParseMode -> String -> ParseResult (Type SrcSpanInfo, [Comment]) parseTypeWithComments = parseWithComments -- | Parse of a string containing a Haskell statement, using 'defaultParseMode'. parseStmt :: String -> ParseResult (Stmt SrcSpanInfo) parseStmt = parse -- | Parse of a string containing a Haskell type, using an explicit 'ParseMode'. parseStmtWithMode :: ParseMode -> String -> ParseResult (Stmt SrcSpanInfo) parseStmtWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseStmtWithComments :: ParseMode -> String -> ParseResult (Stmt SrcSpanInfo, [Comment]) parseStmtWithComments = parseWithComments -- | Parse of a string containing a Haskell statement, using 'defaultParseMode'. parseImportDecl :: String -> ParseResult (ImportDecl SrcSpanInfo) parseImportDecl = parse -- | Parse of a string containing a Haskell type, using an explicit 'ParseMode'. parseImportDeclWithMode :: ParseMode -> String -> ParseResult (ImportDecl SrcSpanInfo) parseImportDeclWithMode = parseWithMode -- | Parse of a string containing a complete Haskell module, using an explicit 'ParseMode', retaining comments. parseImportDeclWithComments :: ParseMode -> String -> ParseResult (ImportDecl SrcSpanInfo, [Comment]) parseImportDeclWithComments = parseWithComments -- Non-greedy parsers (should use ng- prefixed parses exported by InternalParser) -- | Non-greedy parse of a string starting with a series of top-level option pragmas. getTopPragmas :: String -> ParseResult [ModulePragma SrcSpanInfo] getTopPragmas = fmap (unListOf . unNonGreedy) . parse instance Parseable (NonGreedy (ListOf (ModulePragma SrcSpanInfo))) where parser = nglistParserNoFixity ngparseModulePragmas nglistParserNoFixity :: P ([a SrcSpanInfo], [SrcSpan], SrcSpanInfo) -> Maybe [Fixity] -> P (NonGreedy (ListOf (a SrcSpanInfo))) nglistParserNoFixity f = fmap (NonGreedy . toListOf) . normalParserNoFixity f -- | Type intended to be used with 'Parseable', with instances that implement a -- non-greedy parse of the module name, including top-level pragmas. This -- means that a parse error that comes after the module header won't be -- returned. If the 'Maybe' value is 'Nothing', then this means that there was -- no module header. data PragmasAndModuleName l = PragmasAndModuleName l [ModulePragma l] (Maybe (ModuleName l)) deriving (Eq,Ord,Show,Typeable,Data) instance Parseable (NonGreedy (PragmasAndModuleName SrcSpanInfo)) where parser _ = do ((pragmas, pss, pl), mn) <- ngparsePragmasAndModuleName let l = combSpanMaybe (pl <** pss) (fmap ann mn) return $ NonGreedy $ PragmasAndModuleName l pragmas mn -- Type intended to be used with 'Parseable', with instances that -- implement a non-greedy parse of the module name, including -- top-level pragmas. This means that a parse error that comes -- after the module header won't be returned. If the 'Maybe' value -- is 'Nothing', this means that there was no module head. -- -- Note that the 'ParseMode' matters for this due to the 'MagicHash' -- changing the lexing of identifiers to include \"#\". data PragmasAndModuleHead l = PragmasAndModuleHead l [ModulePragma l] (Maybe (ModuleHead l)) deriving (Eq,Ord,Show,Typeable,Data) instance Parseable (NonGreedy (PragmasAndModuleHead SrcSpanInfo)) where parser _ = do ((pragmas, pss, pl), mh) <- ngparsePragmasAndModuleHead let l = combSpanMaybe (pl <** pss) (fmap ann mh) return $ NonGreedy $ PragmasAndModuleHead l pragmas mh -- Type intended to be used with 'Parseable', with instances that -- implement a non-greedy parse of the module head, including -- top-level pragmas, module name, export list, and import -- list. This means that if a parse error that comes after the -- imports won't be returned. If the 'Maybe' value is 'Nothing', -- this means that there was no module head. -- -- Note that the 'ParseMode' matters for this due to the 'MagicHash' -- changing the lexing of identifiers to include \"#\". data ModuleHeadAndImports l = ModuleHeadAndImports l [ModulePragma l] (Maybe (ModuleHead l)) [ImportDecl l] deriving (Eq,Ord,Show,Typeable,Data) instance Parseable (NonGreedy (ModuleHeadAndImports SrcSpanInfo)) where parser _ = do ((pragmas, pss, pl), mh, mimps) <- ngparseModuleHeadAndImports let l = (pl <** pss) `combSpanMaybe` (fmap ann mh) `combSpanMaybe` (fmap (\(_, iss, il) -> il <** iss) mimps) imps = maybe [] (\(x, _, _) -> x) mimps return $ NonGreedy $ ModuleHeadAndImports l pragmas mh imps -- | Instances of 'Parseable' for @NonGreedy a@ will only consume the input -- until @a@ is fully parsed. This means that parse errors that come later -- in the input will be ignored. It's also more efficient, as it's fully lazy -- in the remainder of the input: -- -- >>> parse (unlines ("module A where" : "main =" : repeat "blah")) :: ParseResult PragmasAndModuleHead -- ParseOk (NonGreedy {unNonGreedy = PragmasAndModuleHead [] (ModuleName "A",Nothing,Nothing)}) -- -- (this example uses the simplified AST) newtype NonGreedy a = NonGreedy { unNonGreedy :: a } deriving (Eq,Ord,Show,Typeable,Data) instance Functor NonGreedy where fmap f (NonGreedy x) = NonGreedy (f x) -- | @ListOf a@ stores lists of the AST type @a@, along with a 'SrcSpanInfo', -- in order to provide 'Parseable' instances for lists. These instances are -- provided when the type is used as a list in the syntax, and the same -- delimiters are used in all of its usages. Some exceptions are made: data ListOf a = ListOf SrcSpanInfo [a] deriving (Eq,Ord,Show,Typeable,Data,Functor) unListOf :: ListOf a -> [a] unListOf (ListOf _ xs) = xs -- It's safe to forget about the previous SrcSpanInfo 'srcInfoPoints', -- as long as they are created with (presently) are all created with -- 'noInfoSpan' ('nIS'), '(<^^>)', or '(<++>)', all of which have -- empty 'srcInfoPoints'. Ideally, the parsers would return better -- types, but this works. toListOf :: ([a], [SrcSpan], SrcSpanInfo) -> ListOf a toListOf (xs, ss, l) = ListOf (infoSpan (srcInfoSpan l) ss) xs haskell-src-exts-1.23.1/src/Language/Haskell/Exts/Comments.hs0000644000000000000000000001402513534314632022124 0ustar0000000000000000{-# LANGUAGE DeriveDataTypeable #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Comments -- Copyright : (c) JP Moresmau 2015 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : experimental -- Portability : portable -- -- This module processes comments along with an annotated AST, -- to be able to associate Haddock comments with the actual item -- they refer to. -- -- Example: -- -- @ -- let -- parse1Result :: ParseResult (Module SrcSpanInfo,[Comment]) -- parse1Result = -- parseFileContentsWithComments -- (defaultParseMode { parseFilename = file }) -- contents -- withC :: ParseResult (Module (SrcSpanInfo,[Comment])) -- withC = case parse1Result of -- ParseOk res -> ParseOk $ associateHaddock res -- ParseFailed sloc msg -> ParseFailed sloc msg -- @ -- -- In this code sample, parse1Result is what you get when you parse a file: -- a 'Module' annotated wth 'SrcSpanInfo', and a list of comments -- After passing the result to 'associateHaddock', you get a 'Module' -- annotated with both a 'SrcSpanInfo' and the list of 'Comment' related to the -- specific AST node. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.Comments ( associateHaddock , Comment(..), UnknownPragma(..) ) where import Language.Haskell.Exts.Syntax import Language.Haskell.Exts.SrcLoc import Data.Char (isSpace) import Data.Traversable import Data.Data -- | A Haskell comment. The 'Bool' is 'True' if the comment is multi-line, i.e. @{- -}@. data Comment = Comment Bool SrcSpan String deriving (Eq,Show,Typeable,Data) -- | An unknown pragma. data UnknownPragma = UnknownPragma SrcSpan String deriving (Eq,Show,Typeable,Data) -- | Associates an AST with Source Span Information -- with relevant Haddock comments associateHaddock ::(Annotated ast,Traversable ast) => (ast SrcSpanInfo,[Comment]) -> ast (SrcSpanInfo,[Comment]) associateHaddock (ast,[]) = fmap (\src->(src,[])) ast associateHaddock (ast,comments) = let (ca,assocs1) = mapAccumL associate1 (newAccumulator comments) ast in snd $ mapAccumL merge (lastPost ca) assocs1 -- | Merge existing association with post comment associations merge :: [(SrcSpanInfo,[Comment])] -> (SrcSpanInfo,[Comment]) -> ([(SrcSpanInfo,[Comment])], (SrcSpanInfo,[Comment])) merge [] ret = ([],ret) merge (x:xs) (src,cmts) = if fst x == src then (xs,(src,cmts ++ snd x)) else (x:xs,(src,cmts)) -- | Ensure that if file ends with comment we process it lastPost :: CommentAccumulator -> [(SrcSpanInfo, [Comment])] lastPost (CommentAccumulator (Post cmt : rest) past assocs) = let (toMerge, _) = span isNone rest psrc = matchPreviousSrc past in (assocs ++ [(psrc, cmt : map hcComment toMerge)]) lastPost (CommentAccumulator _ _ assocs) = assocs -- | Accumulate comments mappings, either directly with the source -- or in another association list for later processing associate1 :: CommentAccumulator -> SrcSpanInfo -> (CommentAccumulator,(SrcSpanInfo,[Comment])) associate1 ca@(CommentAccumulator [] _ _) src = (ca,(src,[])) associate1 (CommentAccumulator (hc@(Pre cmt):rest) _ assocs) src = if isBefore hc src then let (toMerge,next) = getToMerge src rest newAssoc = (src,cmt : map hcComment toMerge) in (CommentAccumulator next [] assocs,newAssoc) else (CommentAccumulator (hc:rest) [] assocs,(src,[])) associate1 (CommentAccumulator (hc@(Post cmt):rest) past assocs) src = if isBefore hc src then let (toMerge,next) = getToMerge src rest newAssocs = if null past then assocs else assocs++[(matchPreviousSrc past,cmt : map hcComment toMerge)] in associate1 (CommentAccumulator next [] newAssocs) src else (CommentAccumulator (hc:rest) (src:past) assocs,(src,[])) associate1 (CommentAccumulator (_:rest) past assocs) src = (CommentAccumulator rest (src:past) assocs,(src,[])) -- | The comment accumulator data CommentAccumulator = CommentAccumulator [HaddockComment] -- The Haddock comments to process [SrcSpanInfo] -- The past src infos to resolve post comments [(SrcSpanInfo,[Comment])] -- The additional associations between src and comments -- | Create a new accumulator newAccumulator :: [Comment] -> CommentAccumulator newAccumulator comments = CommentAccumulator (commentsToHaddock comments) [] [] -- | Get comments to merge getToMerge :: SrcSpanInfo -- ^ Stop before src -> [HaddockComment] -- ^ All remaining comments -> ([HaddockComment],[HaddockComment]) -- ^ Comments to merge, left overs getToMerge src = span (\hc-> isNone hc && isBefore hc src) -- | Get the biggest src that ends where the first one does matchPreviousSrc :: [SrcSpanInfo] -> SrcSpanInfo matchPreviousSrc [] = error "Language.Haskell.Exts.Annotated.Comments.matchPreviousSrc: empty list" matchPreviousSrc srcs = let end = srcSpanEnd $ srcInfoSpan $ head srcs in last $ filter ((end ==) . srcSpanEnd . srcInfoSpan) srcs -- | Is a Haddock comment before a given location isBefore :: HaddockComment -> SrcSpanInfo -> Bool isBefore hc src= let (Comment _ csrc _) = hcComment hc in csrc < srcInfoSpan src -- | Represents a Haddock Comment data HaddockComment = -- | Comment before declaration Pre { hcComment::Comment } -- | Comment after declaration | Post { hcComment::Comment } -- | Non Haddock comment | None { hcComment::Comment } -- | Is a comment not haddock? isNone :: HaddockComment -> Bool isNone (None _) = True isNone _ = False -- | Comments to Haddock Comments commentsToHaddock :: [Comment] -> [HaddockComment] commentsToHaddock = map commentToHaddock -- | Comment to Haddock Comment commentToHaddock :: Comment -> HaddockComment commentToHaddock c@(Comment _ _ txt) = case dropWhile isSpace txt of ('|':_) -> Pre c ('^':_) -> Post c _ -> None c haskell-src-exts-1.23.1/src/Language/Haskell/Exts/ExtScheme.hs0000644000000000000000000000214113534314632022220 0ustar0000000000000000{-# OPTIONS_HADDOCK hide #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.ExtScheme -- Copyright : (c) Niklas Broberg 2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Internal scheme for handling extensions in a -- convenient fashion. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.ExtScheme where import Language.Haskell.Exts.Extension data ExtScheme = Any [KnownExtension] | All [KnownExtension] deriving (Eq,Show) type MExtScheme = Maybe ExtScheme class Enabled a where isEnabled :: a -> [KnownExtension] -> Bool instance Enabled KnownExtension where isEnabled = elem instance Enabled ExtScheme where isEnabled (Any exts) enabled = any (`elem` enabled) exts isEnabled (All exts) enabled = all (`elem` enabled) exts instance Enabled a => Enabled (Maybe a) where isEnabled Nothing = const True isEnabled (Just a) = isEnabled a haskell-src-exts-1.23.1/src/Language/Haskell/Exts/ParseMonad.hs0000644000000000000000000004715213665335376022414 0ustar0000000000000000{-# LANGUAGE CPP #-} {-# OPTIONS_HADDOCK hide #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.ParseMonad -- Copyright : Niklas Broberg (c) 2004-2009, -- Original (c) The GHC Team, 1997-2000 -- License : BSD-style (see the file libraries/base/LICENSE) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Monads for the Haskell parser and lexer. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.ParseMonad( -- * Generic Parsing Parseable(..), -- * Parsing P, ParseResult(..), atSrcLoc, LexContext(..), ParseMode(..), defaultParseMode, fromParseResult, runParserWithMode, runParserWithModeComments, runParser, getSrcLoc, pushCurrentContext, popContext, getExtensions, getIgnoreFunctionArity, -- * Lexing Lex(runL), getInput, discard, getLastChar, lexNewline, lexTab, lexWhile, lexWhile_, alternative, checkBOL, setBOL, startToken, getOffside, pushContextL, popContextL, getExtensionsL, addExtensionL, saveExtensionsL, restoreExtensionsL, pushComment, getSrcLocL, setSrcLineL, ignoreLinePragmasL, setLineFilenameL, -- * Harp/Hsx ExtContext(..), pushExtContextL, popExtContextL, getExtContext, pullCtxtFlag, flagDo, getModuleName ) where import Language.Haskell.Exts.SrcLoc (SrcLoc(..), noLoc) import Language.Haskell.Exts.Fixity (Fixity, preludeFixities) import Language.Haskell.Exts.Comments import Language.Haskell.Exts.Extension -- (Extension, impliesExts, haskell2010) import Data.List (intercalate) import Control.Applicative import Control.Monad (when, liftM, ap) import qualified Control.Monad.Fail as Fail import Data.Monoid hiding ((<>)) #if !MIN_VERSION_base(4,13,0) import Data.Semigroup (Semigroup(..)) #endif -- To avoid import warnings for Control.Applicative, Data.Monoid, and Data.Semigroup import Prelude -- | Class providing function for parsing at many different types. -- -- Note that for convenience of implementation, the default methods have -- definitions equivalent to 'undefined'. The minimal definition is all of -- the visible methods. class Parseable ast where -- | Parse a string with default mode. parse :: String -> ParseResult ast parse = parseWithMode defaultParseMode -- | Parse a string with an explicit 'ParseMode'. parseWithMode :: ParseMode -> String -> ParseResult ast parseWithMode mode = runParserWithMode mode . parser $ fixities mode -- | Parse a string with an explicit 'ParseMode', returning all comments along -- with the AST. parseWithComments :: ParseMode -> String -> ParseResult (ast, [Comment]) parseWithComments mode = runParserWithModeComments mode . parser $ fixities mode -- | Internal parser, used to provide default definitions for the others. parser :: Maybe [Fixity] -> P ast -- | The result of a parse. data ParseResult a = ParseOk a -- ^ The parse succeeded, yielding a value. | ParseFailed SrcLoc String -- ^ The parse failed at the specified -- source location, with an error message. deriving (Show, Ord, Eq) -- | Retrieve the result of a successful parse, throwing an -- error if the parse is actually not successful. fromParseResult :: ParseResult a -> a fromParseResult (ParseOk a) = a fromParseResult (ParseFailed loc str) = error $ "fromParseResult: Parse failed at [" ++ srcFilename loc ++ "] (" ++ show (srcLine loc) ++ ":" ++ show (srcColumn loc) ++ "): " ++ str instance Functor ParseResult where fmap f (ParseOk x) = ParseOk $ f x fmap _ (ParseFailed loc msg) = ParseFailed loc msg instance Applicative ParseResult where pure = ParseOk ParseOk f <*> x = f <$> x ParseFailed loc msg <*> _ = ParseFailed loc msg instance Monad ParseResult where return = ParseOk #if !MIN_VERSION_base(4,13,0) fail = Fail.fail #endif ParseOk x >>= f = f x ParseFailed loc msg >>= _ = ParseFailed loc msg instance Fail.MonadFail ParseResult where fail = ParseFailed noLoc instance Semigroup m => Semigroup (ParseResult m) where ParseOk x <> ParseOk y = ParseOk $ x <> y ParseOk _ <> err = err err <> _ = err -- left-biased instance ( Monoid m , Semigroup m) => Monoid (ParseResult m) where mempty = ParseOk mempty mappend = (<>) -- internal version data ParseStatus a = Ok ParseState a | Failed SrcLoc String deriving Show data LexContext = NoLayout | Layout Int deriving (Eq,Ord,Show) data ExtContext = CodeCtxt | HarpCtxt | TagCtxt | ChildCtxt | CloseTagCtxt | CodeTagCtxt deriving (Eq,Ord,Show) type CtxtFlag = (Bool,Bool) -- (True,_) = We're in a do context. -- (_, True)= Next token must be a virtual closing brace. type ParseState = ([LexContext],[[KnownExtension]],[ExtContext],CtxtFlag,[Comment]) indentOfParseState :: ParseState -> Int indentOfParseState (Layout n:_,_,_,_,_) = n indentOfParseState _ = 0 -- | Static parameters governing a parse. -- Note that the various parse functions in "Language.Haskell.Exts.Parser" -- never look at LANGUAGE pragmas, regardless of -- what the @ignoreLanguagePragmas@ flag is set to. -- Only the various @parseFile@ functions in "Language.Haskell.Exts" will -- act on it, when set to 'False'. data ParseMode = ParseMode { -- | original name of the file being parsed parseFilename :: String, -- | base language (e.g. Haskell98, Haskell2010) baseLanguage :: Language, -- | list of extensions enabled for parsing extensions :: [Extension], -- | if 'True', the parser won't care about further extensions -- in LANGUAGE pragmas in source files ignoreLanguagePragmas :: Bool, -- | if 'True', the parser won't read line position information -- from LINE pragmas in source files ignoreLinePragmas :: Bool, -- | list of fixities to be aware of fixities :: Maybe [Fixity], -- | Checks whether functions have a consistent arity ignoreFunctionArity :: Bool } -- | Default parameters for a parse. -- The default is an unknown filename, -- no extensions (i.e. Haskell 98), -- don't ignore LANGUAGE pragmas, do ignore LINE pragmas, -- and be aware of fixities from the 'Prelude'. defaultParseMode :: ParseMode defaultParseMode = ParseMode { parseFilename = ".hs", baseLanguage = Haskell2010, extensions = [], ignoreLanguagePragmas = False, ignoreLinePragmas = True, fixities = Just preludeFixities, ignoreFunctionArity = False } -- Version of ParseMode used internally, -- where the language and extensions have -- been expanded data InternalParseMode = IParseMode { iParseFilename :: String, iExtensions :: [KnownExtension], -- iIgnoreLanguagePragmas :: Bool, iIgnoreLinePragmas :: Bool, iIgnoreFunctionArity :: Bool -- iFixities :: Maybe [Fixity] } toInternalParseMode :: ParseMode -> InternalParseMode toInternalParseMode (ParseMode pf bLang exts _ilang iline _fx farity) = IParseMode pf (toExtensionList bLang exts) {-_ilang -} iline {- _fx -} farity -- | Monad for parsing newtype P a = P { runP :: String -- input string -> Int -- current column -> Int -- current line -> SrcLoc -- location of last token read -> Char -- Last token read used for lexing TypeApplication UGH -> ParseState -- layout info. -> InternalParseMode -- parse parameters -> ParseStatus a } runParserWithMode :: ParseMode -> P a -> String -> ParseResult a {-runParserWithMode mode (P m) s = case m s 0 1 start ([],[],(False,False),[]) mode of Ok _ a -> ParseOk a Failed loc msg -> ParseFailed loc msg where start = SrcLoc { srcFilename = parseFilename mode, srcLine = 1, srcColumn = 1 } -} runParserWithMode mode pm = fmap fst . runParserWithModeComments mode pm runParser :: P a -> String -> ParseResult a runParser = runParserWithMode defaultParseMode runParserWithModeComments :: ParseMode -> P a -> String -> ParseResult (a, [Comment]) runParserWithModeComments mode = let mode2 = toInternalParseMode mode in \(P m) s -> case m s 0 1 start '\n' ([],[],[],(False,False),[]) mode2 of Ok (_,_,_,_,cs) a -> ParseOk (a, reverse cs) Failed loc msg -> ParseFailed loc msg where start = SrcLoc { srcFilename = parseFilename mode, srcLine = 1, srcColumn = 1 } -- allExts mode@(ParseMode {extensions = es}) = mode { extensions = impliesExts es } -- allExts mode = let imode = to instance Functor P where fmap = liftM instance Applicative P where pure = return (<*>) = ap instance Monad P where return a = P $ \_i _x _y _l _ch s _m -> Ok s a P m >>= k = P $ \i x y l ch s mode -> case m i x y l ch s mode of Failed loc msg -> Failed loc msg Ok s' a -> runP (k a) i x y l ch s' mode #if !MIN_VERSION_base(4,13,0) fail = Fail.fail #endif instance Fail.MonadFail P where fail s = P $ \_r _col _line loc _ _stk _m -> Failed loc s atSrcLoc :: P a -> SrcLoc -> P a P m `atSrcLoc` loc = P $ \i x y _l ch -> m i x y loc ch getSrcLoc :: P SrcLoc getSrcLoc = P $ \_i _x _y l _ s _m -> Ok s l getModuleName :: P String getModuleName = P $ \_i _x _y _l _ch s m -> let fn = iParseFilename m mn = intercalate "." $ splitPath fn splitPath :: String -> [String] splitPath "" = [] splitPath str = let (l,str') = break ('\\'==) str in case str' of [] -> [removeSuffix l] (_:str'') -> l : splitPath str'' removeSuffix l = reverse $ tail $ dropWhile ('.'/=) $ reverse l in Ok s mn -- Enter a new layout context. If we are already in a layout context, -- ensure that the new indent is greater than the indent of that context. -- (So if the source loc is not to the right of the current indent, an -- empty list {} will be inserted.) pushCurrentContext :: P () pushCurrentContext = do lc <- getSrcLoc indent <- currentIndent dob <- pullDoStatus let loc = srcColumn lc when (dob && loc < indent || not dob && loc <= indent) pushCtxtFlag pushContext (Layout loc) currentIndent :: P Int currentIndent = P $ \_r _x _y _ _ stk _mode -> Ok stk (indentOfParseState stk) pushContext :: LexContext -> P () pushContext ctxt = --trace ("pushing lexical scope: " ++ show ctxt ++"\n") $ P $ \_i _x _y _l _ (s, exts, e, p, c) _m -> Ok (ctxt:s, exts, e, p, c) () popContext :: P () popContext = P $ \_i _x _y loc _ stk _m -> case stk of (_:s, exts, e, p, c) -> --trace ("popping lexical scope, context now "++show s ++ "\n") $ Ok (s, exts, e, p, c) () ([],_,_,_,_) -> Failed loc "Unexpected }" -- error "Internal error: empty context in popContext" {- -- HaRP/Hsx pushExtContext :: ExtContext -> P () pushExtContext ctxt = P $ \_i _x _y _l (s, e, p, c) _m -> Ok (s, ctxt:e, p, c) () popExtContext :: P () popExtContext = P $ \_i _x _y _l (s, e, p, c) _m -> case e of (_:e') -> Ok (s, e', p, c) () [] -> error "Internal error: empty context in popExtContext" -} -- Extension-aware lexing/parsing getExtensions :: P [KnownExtension] getExtensions = P $ \_i _x _y _l _ s m -> Ok s $ iExtensions m pushCtxtFlag :: P () pushCtxtFlag = P $ \_i _x _y _l _ (s, exts, e, (d,c), cs) _m -> case c of False -> Ok (s, exts, e, (d,True), cs) () _ -> error "Internal error: context flag already pushed" pullDoStatus :: P Bool pullDoStatus = P $ \_i _x _y _l _ (s, exts, e, (d,c), cs) _m -> Ok (s,exts,e,(False,c),cs) d getIgnoreFunctionArity :: P Bool getIgnoreFunctionArity = P $ \_i _x _y _l _ s m -> Ok s $ iIgnoreFunctionArity m ---------------------------------------------------------------------------- -- Monad for lexical analysis: -- a continuation-passing version of the parsing monad newtype Lex r a = Lex { runL :: (a -> P r) -> P r } instance Functor (Lex r) where fmap = liftM instance Applicative (Lex r) where pure = return (<*>) = ap instance Monad (Lex r) where return a = Lex $ \k -> k a Lex v >>= f = Lex $ \k -> v (\a -> runL (f a) k) Lex v >> Lex w = Lex $ \k -> v (\_ -> w k) #if !MIN_VERSION_base(4,13,0) fail = Fail.fail #endif instance Fail.MonadFail (Lex r) where fail s = Lex $ \_ -> fail s -- Operations on this monad getInput :: Lex r String getInput = Lex $ \cont -> P $ \r -> runP (cont r) r -- | Discard some input characters (these must not include tabs or newlines). discard :: Int -> Lex r () discard n = Lex $ \cont -> P $ \r x y loc ch -> let (newCh:rest)= if n > 0 then drop (n-1) r else (ch:r) in runP (cont ()) rest (x+n) y loc newCh -- | Get the last discarded character. -- This is only used for type application. getLastChar :: Lex r Char getLastChar = Lex $ \cont -> P $ \r x y loc ch -> runP (cont ch) r x y loc ch -- | Discard the next character, which must be a newline. lexNewline :: Lex a () lexNewline = Lex $ \cont -> P $ \rs _x y loc -> case rs of (_:r) -> runP (cont ()) r 1 (y+1) loc [] -> \_ _ _ -> Failed loc "Lexer: expected newline." -- | Discard the next character, which must be a tab. lexTab :: Lex a () lexTab = Lex $ \cont -> P $ \(_:r) x -> runP (cont ()) r (nextTab x) nextTab :: Int -> Int nextTab x = x + (tAB_LENGTH - (x-1) `mod` tAB_LENGTH) tAB_LENGTH :: Int tAB_LENGTH = 8 -- Consume and return the largest string of characters satisfying p lexWhile :: (Char -> Bool) -> Lex a String lexWhile p = Lex $ \cont -> P $ \rss c l loc char -> case rss of [] -> runP (cont []) [] c l loc char (r:rs) -> let l' = case r of '\n' -> l + 1 _ -> l c' = case r of '\n' -> 1 _ -> c + 1 in if p r then runP (runL ((r:) <$> lexWhile p) cont) rs c' l' loc r else runP (cont []) (r:rs) c l loc char -- | lexWhile without the return value. lexWhile_ :: (Char -> Bool) -> Lex a () lexWhile_ p = do _ <- lexWhile p return () -- An alternative scan, to which we can return if subsequent scanning -- is unsuccessful. alternative :: Lex a v -> Lex a (Lex a v) alternative (Lex v) = Lex $ \cont -> P $ \r x y -> runP (cont (Lex $ \cont' -> P $ \_r _x _y -> runP (v cont') r x y)) r x y -- The source location is the coordinates of the previous token, -- or, while scanning a token, the start of the current token. -- col is the current column in the source file. -- We also need to remember between scanning tokens whether we are -- somewhere at the beginning of the line before the first token. -- This could be done with an extra Bool argument to the P monad, -- but as a hack we use a col value of 0 to indicate this situation. -- Setting col to 0 is used in two places: just after emitting a virtual -- close brace due to layout, so that next time through we check whether -- we also need to emit a semi-colon, and at the beginning of the file, -- by runParser, to kick off the lexer. -- Thus when col is zero, the true column can be taken from the loc. checkBOL :: Lex a Bool checkBOL = Lex $ \cont -> P $ \r x y loc -> if x == 0 then runP (cont True) r (srcColumn loc) y loc else runP (cont False) r x y loc setBOL :: Lex a () setBOL = Lex $ \cont -> P $ \r _ -> runP (cont ()) r 0 -- Set the loc to the current position startToken :: Lex a () startToken = Lex $ \cont -> P $ \s x y _ c stk mode -> let loc = SrcLoc { srcFilename = iParseFilename mode, srcLine = y, srcColumn = x } in runP (cont ()) s x y loc c stk mode -- Current status with respect to the offside (layout) rule: -- LT: we are to the left of the current indent (if any) -- EQ: we are at the current indent (if any) -- GT: we are to the right of the current indent, or not subject to layout getOffside :: Lex a Ordering getOffside = Lex $ \cont -> P $ \r x y loc ch stk -> runP (cont (compare x (indentOfParseState stk))) r x y loc ch stk getSrcLocL :: Lex a SrcLoc getSrcLocL = Lex $ \cont -> P $ \i x y l -> runP (cont (l { srcLine = y, srcColumn = x })) i x y l setSrcLineL :: Int -> Lex a () setSrcLineL y = Lex $ \cont -> P $ \i x _ -> runP (cont ()) i x y pushContextL :: LexContext -> Lex a () pushContextL ctxt = Lex $ \cont -> P $ \r x y loc ch (stk, exts, e, pst, cs) -> runP (cont ()) r x y loc ch (ctxt:stk, exts, e, pst, cs) popContextL :: String -> Lex a () popContextL _ = Lex $ \cont -> P $ \r x y loc ch stk m -> case stk of (_:ctxt, exts, e, pst, cs) -> runP (cont ()) r x y loc ch (ctxt, exts, e, pst, cs) m ([], _, _, _, _) -> Failed loc "Unexpected }" pullCtxtFlag :: Lex a Bool pullCtxtFlag = Lex $ \cont -> P $ \r x y loc ch (ct, exts, e, (d,c), cs) -> runP (cont c) r x y loc ch (ct, exts, e, (d,False), cs) flagDo :: Lex a () flagDo = Lex $ \cont -> P $ \r x y loc ch (ct, exts, e, (_,c), cs) -> runP (cont ()) r x y loc ch (ct, exts, e, (True,c), cs) -- Harp/Hsx getExtContext :: Lex a (Maybe ExtContext) getExtContext = Lex $ \cont -> P $ \r x y loc ch stk@(_, _, e, _, _) -> let me = case e of [] -> Nothing (c:_) -> Just c in runP (cont me) r x y loc ch stk pushExtContextL :: ExtContext -> Lex a () pushExtContextL ec = Lex $ \cont -> P $ \r x y loc ch (s, exts, e, p, c) -> runP (cont ()) r x y loc ch (s, exts, ec:e, p, c) popExtContextL :: String -> Lex a () popExtContextL fn = Lex $ \cont -> P $ \r x y loc ch (s,exts,e,p,c) m -> case e of (_:ec) -> runP (cont ()) r x y loc ch (s,exts,ec,p,c) m [] -> Failed loc ("Internal error: empty tag context in " ++ fn) -- Extension-aware lexing getExtensionsL :: Lex a [KnownExtension] getExtensionsL = Lex $ \cont -> P $ \r x y loc ch s m -> runP (cont $ iExtensions m) r x y loc ch s m -- | Add an extension to the current configuration. addExtensionL :: KnownExtension -> Lex a () addExtensionL ext = Lex $ \cont -> P $ \r x y loc ch (s, oldExts, e, p, c) m -> let newExts = impliesExts [ext] ++ iExtensions m in runP (cont ()) r x y loc ch (s, oldExts, e, p, c) (m {iExtensions = newExts}) -- | Save the current configuration of extensions. saveExtensionsL :: Lex a () saveExtensionsL = Lex $ \cont -> P $ \r x y loc ch (s, oldExts, e, p, c) m -> runP (cont ()) r x y loc ch (s, iExtensions m:oldExts, e, p, c) m -- | Return to the previous saved extensions configuration. restoreExtensionsL :: Lex a () restoreExtensionsL = Lex $ \cont -> P $ \r x y loc ch (s,exts,e,p,c) m -> case exts of (_:prev) -> runP (cont ()) r x y loc ch (s,prev,e,p,c) m _ -> Failed loc "Internal error: empty extension stack" -- LINE-aware lexing ignoreLinePragmasL :: Lex a Bool ignoreLinePragmasL = Lex $ \cont -> P $ \r x y loc c s m -> runP (cont $ iIgnoreLinePragmas m) r x y loc c s m -- If we read a file name in a LINE pragma, we should update the state. setLineFilenameL :: String -> Lex a () setLineFilenameL name = Lex $ \cont -> P $ \r x y loc ch s m -> runP (cont ()) r x y loc ch s (m {iParseFilename = name}) -- Comments pushComment :: Comment -> Lex a () pushComment c = Lex $ \cont -> P $ \r x y loc ch (s, exts, e, p, cs) -> runP (cont ()) r x y loc ch (s, exts, e, p, c:cs) haskell-src-exts-1.23.1/src/Language/Haskell/Exts/ParseSyntax.hs0000644000000000000000000004166313603723515022631 0ustar0000000000000000{-# LANGUAGE DeriveFunctor #-} {-# OPTIONS_HADDOCK hide #-} module Language.Haskell.Exts.ParseSyntax where import Language.Haskell.Exts.Syntax hiding ( Type(..), Asst(..), Exp(..), FieldUpdate(..), XAttr(..), Context(..) ) import qualified Language.Haskell.Exts.Syntax as S ( Type(..), Promoted(..) ) --------------------------------------- -- Expressions as we parse them (and patterns, and regular patterns) data PExp l = Var l (QName l) -- ^ variable | OverloadedLabel l String -- ^ overloaded label #foo | IPVar l (IPName l) -- ^ implicit parameter variable | Con l (QName l) -- ^ data constructor | Lit l (Literal l) -- ^ literal constant | InfixApp l (PExp l) (QOp l) (PExp l) -- ^ infix application | App l (PExp l) (PExp l) -- ^ ordinary application | NegApp l (PExp l) -- ^ negation expression @-@ /exp/ | Lambda l [Pat l] (PExp l) -- ^ lambda expression | Let l (Binds l) (PExp l) -- ^ local declarations with @let@ | If l (PExp l) (PExp l) (PExp l) -- ^ @if@ /exp/ @then@ /exp/ @else@ /exp/ | MultiIf l [GuardedRhs l] -- ^ @if@ @|@ /stmts/ @->@ /exp/ ... | Case l (PExp l) [Alt l] -- ^ @case@ /exp/ @of@ /alts/ | Do l [Stmt l] -- ^ @do@-expression: -- the last statement in the list -- should be an expression. | MDo l [Stmt l] -- ^ @mdo@-expression | TupleSection l Boxed [Maybe (PExp l)] -- ^ tuple section expression, e.g. @(,,3)@ | UnboxedSum l Int Int (PExp l) -- ^ Unboxed sum | List l [PExp l] -- ^ list expression | ParArray l [PExp l] -- ^ parallel array expression | Paren l (PExp l) -- ^ parenthesized expression | RecConstr l (QName l) [PFieldUpdate l] -- ^ record construction expression | RecUpdate l (PExp l) [PFieldUpdate l] -- ^ record update expression | EnumFrom l (PExp l) -- ^ unbounded arithmetic sequence, -- incrementing by 1 | EnumFromTo l (PExp l) (PExp l) -- ^ bounded arithmetic sequence, -- incrementing by 1 | EnumFromThen l (PExp l) (PExp l) -- ^ unbounded arithmetic sequence, -- with first two elements given | EnumFromThenTo l (PExp l) (PExp l) (PExp l) -- ^ bounded arithmetic sequence, -- with first two elements given | ParArrayFromTo l (PExp l) (PExp l) -- ^ bounded arithmetic sequence, -- incrementing by 1 | ParArrayFromThenTo l (PExp l) (PExp l) (PExp l) -- ^ bounded arithmetic sequence, -- with first two elements given | ParComp l (PExp l) [[QualStmt l]] -- ^ parallel list comprehension | ParArrayComp l (PExp l) [[QualStmt l]] -- ^ parallel array comprehension | ExpTypeSig l (PExp l) (S.Type l) -- ^ expression type signature | AsPat l (Name l) (PExp l) -- ^ patterns only | WildCard l -- ^ patterns only | IrrPat l (PExp l) -- ^ patterns only -- Post-ops for parsing left sections and regular patterns. Not to be left in the final tree. | PostOp l (PExp l) (QOp l) -- ^ post-ops | PreOp l (QOp l) (PExp l) -- ^ pre-ops -- View patterns | ViewPat l (PExp l) (Pat l) -- ^ patterns only -- HaRP | SeqRP l [PExp l] -- ^ regular patterns only | GuardRP l (PExp l) [Stmt l] -- ^ regular patterns only | EitherRP l (PExp l) (PExp l) -- ^ regular patterns only | CAsRP l (Name l) (PExp l) -- ^ regular patterns only -- Template Haskell | VarQuote l (QName l) -- ^ 'x | TypQuote l (QName l) -- ^ ''T | BracketExp l (Bracket l) | SpliceExp l (Splice l) | QuasiQuote l String String -- ^ [$...|...] -- Hsx | XTag l (XName l) [ParseXAttr l] (Maybe (PExp l)) [PExp l] -- ^ ... | XETag l (XName l) [ParseXAttr l] (Maybe (PExp l)) -- ^ | XPcdata l String -- ^ PCDATA | XExpTag l (PExp l) -- ^ <% ... %> | XChildTag l [PExp l] -- ^ <%> ... | XRPats l [PExp l] -- ^ <[ ... ]> -- Pragmas | CorePragma l String (PExp l) -- ^ {-# CORE #-} pragma | SCCPragma l String (PExp l) -- ^ {-# SCC #-} pragma | GenPragma l String (Int, Int) (Int, Int) (PExp l) -- ^ {-# GENERATED ... #-} pragma -- Bang Patterns | BangPat l (PExp l) -- ^ f !a = ... -- Arrows | Proc l (Pat l) (PExp l) -- ^ proc p -> do | LeftArrApp l (PExp l) (PExp l) -- ^ e -< e | RightArrApp l (PExp l) (PExp l) -- ^ e >- e | LeftArrHighApp l (PExp l) (PExp l) -- ^ e -<< e | RightArrHighApp l (PExp l) (PExp l) -- ^ e >>- e | ArrOp l (PExp l) -- ^ (| e |) -- LambdaCase | LCase l [Alt l] -- ^ @\case@ /alts/ | TypeApp l (S.Type l) deriving (Eq,Show,Functor) data PFieldUpdate l = FieldUpdate l (QName l) (PExp l) | FieldPun l (QName l) | FieldWildcard l deriving (Eq,Show,Functor) data ParseXAttr l = XAttr l (XName l) (PExp l) deriving (Eq,Show,Functor) instance Annotated PExp where ann e = case e of Var l _ -> l OverloadedLabel l _ -> l IPVar l _ -> l Con l _ -> l Lit l _ -> l InfixApp l _ _ _ -> l App l _ _ -> l NegApp l _ -> l Lambda l _ _ -> l Let l _ _ -> l If l _ _ _ -> l Case l _ _ -> l Do l _ -> l MDo l _ -> l TupleSection l _ _ -> l UnboxedSum l _ _ _ -> l List l _ -> l ParArray l _ -> l Paren l _ -> l RecConstr l _ _ -> l RecUpdate l _ _ -> l EnumFrom l _ -> l EnumFromTo l _ _ -> l EnumFromThen l _ _ -> l EnumFromThenTo l _ _ _ -> l ParArrayFromTo l _ _ -> l ParArrayFromThenTo l _ _ _ -> l ParComp l _ _ -> l ParArrayComp l _ _ -> l ExpTypeSig l _ _ -> l AsPat l _ _ -> l WildCard l -> l IrrPat l _ -> l PostOp l _ _ -> l PreOp l _ _ -> l ViewPat l _ _ -> l SeqRP l _ -> l GuardRP l _ _ -> l EitherRP l _ _ -> l CAsRP l _ _ -> l VarQuote l _ -> l TypQuote l _ -> l BracketExp l _ -> l SpliceExp l _ -> l QuasiQuote l _ _ -> l XTag l _ _ _ _ -> l XETag l _ _ _ -> l XPcdata l _ -> l XExpTag l _ -> l XChildTag l _ -> l XRPats l _ -> l CorePragma l _ _ -> l SCCPragma l _ _ -> l GenPragma l _ _ _ _ -> l BangPat l _ -> l Proc l _ _ -> l LeftArrApp l _ _ -> l RightArrApp l _ _ -> l LeftArrHighApp l _ _ -> l RightArrHighApp l _ _ -> l ArrOp l _ -> l LCase l _ -> l MultiIf l _ -> l TypeApp l _ -> l amap f e' = case e' of Var l qn -> Var (f l) qn OverloadedLabel l qn -> OverloadedLabel (f l) qn IPVar l ipn -> IPVar (f l) ipn Con l qn -> Con (f l) qn Lit l lit -> Lit (f l) lit InfixApp l e1 qop e2 -> InfixApp (f l) e1 qop e2 App l e1 e2 -> App (f l) e1 e2 NegApp l e -> NegApp (f l) e Lambda l ps e -> Lambda (f l) ps e Let l bs e -> Let (f l) bs e If l ec et ee -> If (f l) ec et ee Case l e alts -> Case (f l) e alts Do l ss -> Do (f l) ss MDo l ss -> MDo (f l) ss TupleSection l bx mes -> TupleSection (f l) bx mes UnboxedSum l b a e -> UnboxedSum (f l) b a e List l es -> List (f l) es ParArray l es -> ParArray (f l) es Paren l e -> Paren (f l) e RecConstr l qn fups -> RecConstr (f l) qn fups RecUpdate l e fups -> RecUpdate (f l) e fups EnumFrom l e -> EnumFrom (f l) e EnumFromTo l ef et -> EnumFromTo (f l) ef et EnumFromThen l ef et -> EnumFromThen (f l) ef et EnumFromThenTo l ef eth eto -> EnumFromThenTo (f l) ef eth eto ParArrayFromTo l ef et -> ParArrayFromTo (f l) ef et ParArrayFromThenTo l ef eth eto -> ParArrayFromThenTo (f l) ef eth eto ParComp l e qsss -> ParComp (f l) e qsss ParArrayComp l e qsss -> ParArrayComp (f l) e qsss ExpTypeSig l e t -> ExpTypeSig (f l) e t AsPat l n e -> AsPat (f l) n e WildCard l -> WildCard (f l) IrrPat l e -> IrrPat (f l) e PostOp l e op -> PostOp (f l) e op PreOp l op e -> PreOp (f l) op e ViewPat l e1 e2 -> ViewPat (f l) e1 e2 SeqRP l es -> SeqRP (f l) es GuardRP l e ss -> GuardRP (f l) e ss EitherRP l e1 e2 -> EitherRP (f l) e1 e2 CAsRP l n e -> CAsRP (f l) n e BangPat l e -> BangPat (f l) e VarQuote l qn -> VarQuote (f l) qn TypQuote l qn -> TypQuote (f l) qn BracketExp l br -> BracketExp (f l) br SpliceExp l sp -> SpliceExp (f l) sp QuasiQuote l sn se -> QuasiQuote (f l) sn se XTag l xn xas me es -> XTag (f l) xn xas me es XETag l xn xas me -> XETag (f l) xn xas me XPcdata l s -> XPcdata (f l) s XExpTag l e -> XExpTag (f l) e XChildTag l es -> XChildTag (f l) es XRPats l es -> XRPats (f l) es CorePragma l s e -> CorePragma (f l) s e SCCPragma l s e -> SCCPragma (f l) s e GenPragma l s n12 n34 e -> GenPragma (f l) s n12 n34 e Proc l p e -> Proc (f l) p e LeftArrApp l e1 e2 -> LeftArrApp (f l) e1 e2 RightArrApp l e1 e2 -> RightArrApp (f l) e1 e2 LeftArrHighApp l e1 e2 -> LeftArrHighApp (f l) e1 e2 RightArrHighApp l e1 e2 -> RightArrHighApp (f l) e1 e2 ArrOp l e -> ArrOp (f l) e LCase l alts -> LCase (f l) alts MultiIf l alts -> MultiIf (f l) alts TypeApp l ty -> TypeApp (f l) ty instance Annotated PFieldUpdate where ann (FieldUpdate l _ _) = l ann (FieldPun l _) = l ann (FieldWildcard l) = l amap f (FieldUpdate l qn e) = FieldUpdate (f l) qn e amap f (FieldPun l n) = FieldPun (f l) n amap f (FieldWildcard l) = FieldWildcard (f l) instance Annotated ParseXAttr where ann (XAttr l _ _) = l amap f (XAttr l xn e) = XAttr (f l) xn e p_unit_con :: l -> PExp l p_unit_con l = Con l (unit_con_name l) p_tuple_con :: l -> Boxed -> Int -> PExp l p_tuple_con l b i = Con l (tuple_con_name l b i) p_unboxed_singleton_con :: l -> PExp l p_unboxed_singleton_con l = Con l (unboxed_singleton_con_name l) data PContext l = CxSingle l (PAsst l) | CxTuple l [PAsst l] | CxEmpty l deriving (Eq, Show, Functor) instance Annotated PContext where ann (CxSingle l _ ) = l ann (CxTuple l _) = l ann (CxEmpty l) = l amap f (CxSingle l asst ) = CxSingle (f l) asst amap f (CxTuple l assts) = CxTuple (f l) assts amap f (CxEmpty l) = CxEmpty (f l) data PType l = TyForall l (Maybe [TyVarBind l]) (Maybe (PContext l)) (PType l) | TyStar l -- ^ @*@, the type of types | TyFun l (PType l) (PType l) -- ^ function type | TyTuple l Boxed [PType l] -- ^ tuple type, possibly boxed | TyUnboxedSum l [PType l] -- ^ unboxed sum | TyList l (PType l) -- ^ list syntax, e.g. [a], as opposed to [] a | TyParArray l (PType l) -- ^ parallel array syntax, e.g. [:a:] | TyApp l (PType l) (PType l) -- ^ application of a type constructor | TyVar l (Name l) -- ^ type variable | TyCon l (QName l) -- ^ named type or type constructor | TyParen l (PType l) -- ^ type surrounded by parentheses | TyPred l (PAsst l) -- ^ assertion of an implicit parameter | TyInfix l (PType l) (MaybePromotedName l) (PType l) -- ^ infix type constructor | TyKind l (PType l) (Kind l) -- ^ type with explicit kind signature | TyPromoted l (S.Promoted l) -- ^ promoted data type | TyEquals l (PType l) (PType l) -- ^ type equality constraint | TySplice l (Splice l) -- ^ template haskell splice type | TyBang l (BangType l) (Unpackedness l) (PType l) -- ^ Strict type marked with \"@!@\" or type marked with UNPACK pragma. | TyWildCard l (Maybe (Name l)) -- ^ Type wildcard | TyQuasiQuote l String String -- ^ @[qq| |]@ deriving (Eq, Show, Functor) instance Annotated PType where ann t = case t of TyForall l _ _ _ -> l TyStar l -> l TyFun l _ _ -> l TyTuple l _ _ -> l TyUnboxedSum l _ -> l TyList l _ -> l TyParArray l _ -> l TyApp l _ _ -> l TyVar l _ -> l TyCon l _ -> l TyParen l _ -> l TyInfix l _ _ _ -> l TyKind l _ _ -> l TyPromoted l _ -> l TyEquals l _ _ -> l TyPred l _ -> l TySplice l _ -> l TyBang l _ _ _ -> l TyWildCard l _ -> l TyQuasiQuote l _ _ -> l amap f t' = case t' of TyForall l mtvs mcx t -> TyForall (f l) mtvs mcx t TyStar l -> TyStar (f l) TyFun l t1 t2 -> TyFun (f l) t1 t2 TyTuple l b ts -> TyTuple (f l) b ts TyUnboxedSum l ts -> TyUnboxedSum (f l) ts TyList l t -> TyList (f l) t TyParArray l t -> TyParArray (f l) t TyApp l t1 t2 -> TyApp (f l) t1 t2 TyVar l n -> TyVar (f l) n TyCon l qn -> TyCon (f l) qn TyParen l t -> TyParen (f l) t TyInfix l ta qn tb -> TyInfix (f l) ta qn tb TyKind l t k -> TyKind (f l) t k TyPromoted l p -> TyPromoted (f l) p TyEquals l t1 t2 -> TyEquals (f l) t1 t2 TyPred l asst -> TyPred (f l) asst TySplice l s -> TySplice (f l) s TyBang l b u t -> TyBang (f l) b u t TyWildCard l mn -> TyWildCard (f l) mn TyQuasiQuote l n s -> TyQuasiQuote (f l) n s data PAsst l = TypeA l (PType l) | IParam l (IPName l) (PType l) | ParenA l (PAsst l) deriving (Eq, Show, Functor) instance Annotated PAsst where ann asst = case asst of TypeA l _ -> l IParam l _ _ -> l ParenA l _ -> l amap f asst = case asst of TypeA l t -> TypeA (f l) t IParam l ipn t -> IParam (f l) ipn t ParenA l a -> ParenA (f l) a haskell-src-exts-1.23.1/src/Language/Haskell/Exts/InternalLexer.hs0000644000000000000000000015560113603723515023122 0ustar0000000000000000{-# OPTIONS_HADDOCK hide #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.Annotated.InternalLexer -- Copyright : (c) The GHC Team, 1997-2000 -- (c) Niklas Broberg, 2004-2009 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Lexer for Haskell, with some extensions. -- ----------------------------------------------------------------------------- -- ToDo: Introduce different tokens for decimal, octal and hexadecimal (?) -- ToDo: FloatTok should have three parts (integer part, fraction, exponent) (?) -- ToDo: Use a lexical analyser generator (lx?) module Language.Haskell.Exts.InternalLexer (Token(..), showToken, lexer, topLexer) where import Language.Haskell.Exts.ParseMonad import Language.Haskell.Exts.SrcLoc hiding (loc) import Language.Haskell.Exts.Comments import Language.Haskell.Exts.Extension import Language.Haskell.Exts.ExtScheme import Prelude hiding (id, exponent) import Data.Char import Data.Ratio import Data.List (intercalate, isPrefixOf) import Control.Monad (when) -- import Debug.Trace (trace) data Token = VarId String | LabelVarId String | QVarId (String,String) | IDupVarId (String) -- duplicable implicit parameter | ILinVarId (String) -- linear implicit parameter | ConId String | QConId (String,String) | DVarId [String] -- to enable varid's with '-' in them | VarSym String | ConSym String | QVarSym (String,String) | QConSym (String,String) | IntTok (Integer, String) | FloatTok (Rational, String) | Character (Char, String) | StringTok (String, String) | IntTokHash (Integer, String) -- 1# | WordTokHash (Integer, String) -- 1## | FloatTokHash (Rational, String) -- 1.0# | DoubleTokHash (Rational, String) -- 1.0## | CharacterHash (Char, String) -- c# | StringHash (String, String) -- "Hello world!"# -- Symbols | LeftParen | RightParen | LeftHashParen | RightHashParen | SemiColon | LeftCurly | RightCurly | VRightCurly -- a virtual close brace | LeftSquare | RightSquare | ParArrayLeftSquare -- [: | ParArrayRightSquare -- :] | Comma | Underscore | BackQuote -- Reserved operators | Dot -- reserved for use with 'forall x . x' | DotDot | Colon | QuoteColon | DoubleColon | Equals | Backslash | Bar | LeftArrow | RightArrow | At | TApp -- '@' but have to check for preceeding whitespace | Tilde | DoubleArrow | Minus | Exclamation | Star | LeftArrowTail -- -< | RightArrowTail -- >- | LeftDblArrowTail -- -<< | RightDblArrowTail -- >>- | OpenArrowBracket -- (| | CloseArrowBracket -- |) -- Template Haskell | THExpQuote -- [| or [e| | THTExpQuote -- [|| or [e|| | THPatQuote -- [p| | THDecQuote -- [d| | THTypQuote -- [t| | THCloseQuote -- |] | THTCloseQuote -- ||] | THIdEscape (String) -- dollar x | THParenEscape -- dollar ( | THTIdEscape String -- dollar dollar x | THTParenEscape -- double dollar ( | THVarQuote -- 'x (but without the x) | THTyQuote -- ''T (but without the T) | THQuasiQuote (String,String) -- [$...|...] -- HaRP | RPGuardOpen -- (| | RPGuardClose -- |) | RPCAt -- @: -- Hsx | XCodeTagOpen -- <% | XCodeTagClose -- %> | XStdTagOpen -- < | XStdTagClose -- > | XCloseTagOpen -- | XChildTagOpen -- <%> (note that close doesn't exist, it's XCloseTagOpen followed by XCodeTagClose) | XPCDATA String | XRPatOpen -- <[ | XRPatClose -- ]> -- Pragmas | PragmaEnd -- #-} | RULES | INLINE Bool | INLINE_CONLIKE | SPECIALISE | SPECIALISE_INLINE Bool | SOURCE | DEPRECATED | WARNING | SCC | GENERATED | CORE | UNPACK | NOUNPACK | OPTIONS (Maybe String,String) -- | CFILES String -- | INCLUDE String | LANGUAGE | ANN | MINIMAL | NO_OVERLAP | OVERLAP | OVERLAPPING | OVERLAPPABLE | OVERLAPS | INCOHERENT | COMPLETE -- Reserved Ids | KW_As | KW_By -- transform list comprehensions | KW_Case | KW_Class | KW_Data | KW_Default | KW_Deriving | KW_Do | KW_MDo | KW_Else | KW_Family -- indexed type families | KW_Forall -- universal/existential types | KW_Group -- transform list comprehensions | KW_Hiding | KW_If | KW_Import | KW_In | KW_Infix | KW_InfixL | KW_InfixR | KW_Instance | KW_Let | KW_Module | KW_NewType | KW_Of | KW_Proc -- arrows | KW_Rec -- arrows | KW_Role | KW_Then | KW_Type | KW_Using -- transform list comprehensions | KW_Where | KW_Qualified | KW_Pattern | KW_Stock | KW_Anyclass | KW_Via -- FFI | KW_Foreign | KW_Export | KW_Safe | KW_Unsafe | KW_Threadsafe | KW_Interruptible | KW_StdCall | KW_CCall | KW_CPlusPlus | KW_DotNet | KW_Jvm | KW_Js | KW_JavaScript | KW_CApi | EOF deriving (Eq,Show) reserved_ops :: [(String,(Token, Maybe ExtScheme))] reserved_ops = [ ( "..", (DotDot, Nothing) ), ( ":", (Colon, Nothing) ), ( "::", (DoubleColon, Nothing) ), ( "=", (Equals, Nothing) ), ( "\\", (Backslash, Nothing) ), ( "|", (Bar, Nothing) ), ( "<-", (LeftArrow, Nothing) ), ( "->", (RightArrow, Nothing) ), ( "@", (At, Nothing) ), ( "@:", (RPCAt, Just (Any [RegularPatterns])) ), ( "~", (Tilde, Nothing) ), ( "=>", (DoubleArrow, Nothing) ), ( "*", (Star, Just (Any [KindSignatures])) ), -- Parallel arrays ( "[:", (ParArrayLeftSquare, Just (Any [ParallelArrays])) ), ( ":]", (ParArrayRightSquare, Just (Any [ParallelArrays])) ), -- Arrows notation ( "-<", (LeftArrowTail, Just (Any [Arrows])) ), ( ">-", (RightArrowTail, Just (Any [Arrows])) ), ( "-<<", (LeftDblArrowTail, Just (Any [Arrows])) ), ( ">>-", (RightDblArrowTail, Just (Any [Arrows])) ), -- Unicode notation ( "\x2190", (LeftArrow, Just (Any [UnicodeSyntax])) ), ( "\x2192", (RightArrow, Just (Any [UnicodeSyntax])) ), ( "\x21d2", (DoubleArrow, Just (Any [UnicodeSyntax])) ), ( "\x2237", (DoubleColon, Just (Any [UnicodeSyntax])) ), ( "\x2919", (LeftArrowTail, Just (All [UnicodeSyntax, Arrows])) ), ( "\x291a", (RightArrowTail, Just (All [UnicodeSyntax, Arrows])) ), ( "\x291b", (LeftDblArrowTail, Just (All [UnicodeSyntax, Arrows])) ), ( "\x291c", (RightDblArrowTail, Just (All [UnicodeSyntax, Arrows])) ), ( "\x2605", (Star, Just (All [UnicodeSyntax, KindSignatures])) ), ( "\x2200", (KW_Forall, Just (All [UnicodeSyntax, ExplicitForAll])) ) ] special_varops :: [(String,(Token, Maybe ExtScheme))] special_varops = [ -- the dot is only a special symbol together with forall, but can still be used as function composition ( ".", (Dot, Just (Any [ExplicitForAll, ExistentialQuantification])) ), ( "-", (Minus, Nothing) ), ( "!", (Exclamation, Nothing) ) ] reserved_ids :: [(String,(Token, Maybe ExtScheme))] reserved_ids = [ ( "_", (Underscore, Nothing) ), ( "by", (KW_By, Just (Any [TransformListComp])) ), ( "case", (KW_Case, Nothing) ), ( "class", (KW_Class, Nothing) ), ( "data", (KW_Data, Nothing) ), ( "default", (KW_Default, Nothing) ), ( "deriving", (KW_Deriving, Nothing) ), ( "do", (KW_Do, Nothing) ), ( "else", (KW_Else, Nothing) ), ( "family", (KW_Family, Just (Any [TypeFamilies])) ), -- indexed type families ( "forall", (KW_Forall, Just (Any [ExplicitForAll, ExistentialQuantification])) ), -- universal/existential quantification ( "group", (KW_Group, Just (Any [TransformListComp])) ), ( "if", (KW_If, Nothing) ), ( "import", (KW_Import, Nothing) ), ( "in", (KW_In, Nothing) ), ( "infix", (KW_Infix, Nothing) ), ( "infixl", (KW_InfixL, Nothing) ), ( "infixr", (KW_InfixR, Nothing) ), ( "instance", (KW_Instance, Nothing) ), ( "let", (KW_Let, Nothing) ), ( "mdo", (KW_MDo, Just (Any [RecursiveDo])) ), ( "module", (KW_Module, Nothing) ), ( "newtype", (KW_NewType, Nothing) ), ( "of", (KW_Of, Nothing) ), ( "proc", (KW_Proc, Just (Any [Arrows])) ), ( "rec", (KW_Rec, Just (Any [Arrows, RecursiveDo, DoRec])) ), ( "then", (KW_Then, Nothing) ), ( "type", (KW_Type, Nothing) ), ( "using", (KW_Using, Just (Any [TransformListComp])) ), ( "where", (KW_Where, Nothing) ), ( "role", (KW_Role, Just (Any [RoleAnnotations]))), ( "pattern", (KW_Pattern, Just (Any [PatternSynonyms]))), ( "stock", (KW_Stock, Just (Any [DerivingStrategies]))), ( "anyclass", (KW_Anyclass, Just (Any [DerivingStrategies]))), ( "via", (KW_Via, Just (Any [DerivingVia]))), -- FFI ( "foreign", (KW_Foreign, Just (Any [ForeignFunctionInterface])) ) ] special_varids :: [(String,(Token, Maybe ExtScheme))] special_varids = [ ( "as", (KW_As, Nothing) ), ( "qualified", (KW_Qualified, Nothing) ), ( "hiding", (KW_Hiding, Nothing) ), -- FFI ( "export", (KW_Export, Just (Any [ForeignFunctionInterface])) ), ( "safe", (KW_Safe, Just (Any [ForeignFunctionInterface, SafeImports, Safe, Trustworthy])) ), ( "unsafe", (KW_Unsafe, Just (Any [ForeignFunctionInterface])) ), ( "threadsafe", (KW_Threadsafe, Just (Any [ForeignFunctionInterface])) ), ( "interruptible", (KW_Interruptible, Just (Any [InterruptibleFFI])) ), ( "stdcall", (KW_StdCall, Just (Any [ForeignFunctionInterface])) ), ( "ccall", (KW_CCall, Just (Any [ForeignFunctionInterface])) ), ( "cplusplus", (KW_CPlusPlus, Just (Any [ForeignFunctionInterface])) ), ( "dotnet", (KW_DotNet, Just (Any [ForeignFunctionInterface])) ), ( "jvm", (KW_Jvm, Just (Any [ForeignFunctionInterface])) ), ( "js", (KW_Js, Just (Any [ForeignFunctionInterface])) ), ( "javascript", (KW_JavaScript, Just (Any [ForeignFunctionInterface])) ), ( "capi", (KW_CApi, Just (Any [CApiFFI])) ) ] pragmas :: [(String,Token)] pragmas = [ ( "rules", RULES ), ( "inline", INLINE True ), ( "noinline", INLINE False ), ( "notinline", INLINE False ), ( "specialise", SPECIALISE ), ( "specialize", SPECIALISE ), ( "source", SOURCE ), ( "deprecated", DEPRECATED ), ( "warning", WARNING ), ( "ann", ANN ), ( "scc", SCC ), ( "generated", GENERATED ), ( "core", CORE ), ( "unpack", UNPACK ), ( "nounpack", NOUNPACK ), ( "language", LANGUAGE ), ( "minimal", MINIMAL ), ( "no_overlap", NO_OVERLAP ), ( "overlap", OVERLAP ), ( "overlaps", OVERLAPS ), ( "overlapping", OVERLAPPING ), ( "overlappable", OVERLAPPABLE ), ( "incoherent", INCOHERENT ), ( "complete", COMPLETE ), ( "options", OPTIONS undefined ) -- we'll tweak it before use - promise! -- ( "cfiles", CFILES undefined ), -- same here... -- ( "include", INCLUDE undefined ) -- ...and here! ] isIdent, isHSymbol, isPragmaChar :: Char -> Bool isIdent c = isAlphaNum c || c == '\'' || c == '_' isHSymbol c = c `elem` ":!#%&*./?@\\-" || ((isSymbol c || isPunctuation c) && not (c `elem` "(),;[]`{}_\"'")) isPragmaChar c = isAlphaNum c || c == '_' isIdentStart :: Char -> Bool isIdentStart c = isAlpha c && not (isUpper c) || c == '_' -- Used in the lexing of type applications -- Why is it like this? I don't know exactly but this is how it is in -- GHC's parser. isOpSymbol :: Char -> Bool isOpSymbol c = c `elem` "!#$%&*+./<=>?@\\^|-~" -- | Checks whether the character would be legal in some position of a qvar. -- Means that '..' and "AAA" will pass the test. isPossiblyQvar :: Char -> Bool isPossiblyQvar c = isIdent (toLower c) || c == '.' matchChar :: Char -> String -> Lex a () matchChar c msg = do s <- getInput if null s || head s /= c then fail msg else discard 1 -- The top-level lexer. -- We need to know whether we are at the beginning of the line to decide -- whether to insert layout tokens. lexer :: (Loc Token -> P a) -> P a lexer = runL topLexer topLexer :: Lex a (Loc Token) topLexer = do b <- pullCtxtFlag if b then -- trace (show cf ++ ": " ++ show VRightCurly) $ -- the lex context state flags that we must do an empty {} - UGLY setBOL >> getSrcLocL >>= \l -> return (Loc (mkSrcSpan l l) VRightCurly) else do bol <- checkBOL (bol', ws) <- lexWhiteSpace bol -- take care of whitespace in PCDATA ec <- getExtContext case ec of -- if there was no linebreak, and we are lexing PCDATA, -- then we want to care about the whitespace. -- We don't bother to test for XmlSyntax, since we -- couldn't end up in ChildCtxt otherwise. Just ChildCtxt | not bol' && ws -> getSrcLocL >>= \l -> return $ Loc (mkSrcSpan l l) $ XPCDATA " " _ -> do startToken sl <- getSrcLocL t <- if bol' then lexBOL -- >>= \t -> trace ("BOL: " ++ show t) (return t) else lexToken -- >>= \t -> trace (show t) (return t) el <- getSrcLocL return $ Loc (mkSrcSpan sl el) t lexWhiteSpace :: Bool -> Lex a (Bool, Bool) lexWhiteSpace bol = do s <- getInput ignL <- ignoreLinePragmasL case s of -- If we find a recognised pragma, we don't want to treat it as a comment. '{':'-':'#':rest | isRecognisedPragma rest -> return (bol, False) | isLinePragma rest && not ignL -> do (l, fn) <- lexLinePragma setSrcLineL l setLineFilenameL fn lexWhiteSpace True '{':'-':_ -> do loc <- getSrcLocL discard 2 (bol1, c) <- lexNestedComment bol "" loc2 <- getSrcLocL pushComment $ Comment True (mkSrcSpan loc loc2) (reverse c) (bol2, _) <- lexWhiteSpace bol1 return (bol2, True) '-':'-':s1 | all (== '-') (takeWhile isHSymbol s1) -> do loc <- getSrcLocL discard 2 dashes <- lexWhile (== '-') rest <- lexWhile (/= '\n') s' <- getInput loc2 <- getSrcLocL let com = Comment False (mkSrcSpan loc loc2) $ dashes ++ rest case s' of [] -> pushComment com >> return (False, True) _ -> do pushComment com lexNewline lexWhiteSpace_ True return (True, True) '\n':_ -> do lexNewline lexWhiteSpace_ True return (True, True) '\t':_ -> do lexTab (bol', _) <- lexWhiteSpace bol return (bol', True) c:_ | isSpace c -> do discard 1 (bol', _) <- lexWhiteSpace bol return (bol', True) _ -> return (bol, False) -- | lexWhiteSpace without the return value. lexWhiteSpace_ :: Bool -> Lex a () lexWhiteSpace_ bol = do _ <- lexWhiteSpace bol return () isRecognisedPragma, isLinePragma :: String -> Bool isRecognisedPragma str = let pragma = takeWhile isPragmaChar . dropWhile isSpace $ str in case lookupKnownPragma pragma of Nothing -> False _ -> True isLinePragma str = let pragma = map toLower . takeWhile isAlphaNum . dropWhile isSpace $ str in case pragma of "line" -> True _ -> False lexLinePragma :: Lex a (Int, String) lexLinePragma = do discard 3 -- {-# lexWhile_ isSpace discard 4 -- LINE lexWhile_ isSpace i <- lexWhile isDigit when (null i) $ fail "Improperly formatted LINE pragma" lexWhile_ isSpace matchChar '"' "Improperly formatted LINE pragma" fn <- lexWhile (/= '"') matchChar '"' "Impossible - lexLinePragma" lexWhile_ isSpace mapM_ (flip matchChar "Improperly formatted LINE pragma") "#-}" lexNewline return (read i, fn) lexNestedComment :: Bool -> String -> Lex a (Bool, String) lexNestedComment bol str = do s <- getInput case s of '-':'}':_ -> discard 2 >> return (bol, str) '{':'-':_ -> do discard 2 (bol', c) <- lexNestedComment bol ("-{" ++ str) -- rest of the subcomment lexNestedComment bol' ("}-" ++ c ) -- rest of this comment '\t':_ -> lexTab >> lexNestedComment bol ('\t':str) '\n':_ -> lexNewline >> lexNestedComment True ('\n':str) c:_ -> discard 1 >> lexNestedComment bol (c:str) [] -> fail "Unterminated nested comment" -- When we are lexing the first token of a line, check whether we need to -- insert virtual semicolons or close braces due to layout. lexBOL :: Lex a Token lexBOL = do pos <- getOffside -- trace ("Off: " ++ (show pos)) $ do case pos of LT -> do -- trace "layout: inserting '}'\n" $ -- Set col to 0, indicating that we're still at the -- beginning of the line, in case we need a semi-colon too. -- Also pop the context here, so that we don't insert -- another close brace before the parser can pop it. setBOL popContextL "lexBOL" return VRightCurly EQ -> -- trace "layout: inserting ';'\n" $ return SemiColon GT -> lexToken lexToken :: Lex a Token lexToken = do ec <- getExtContext -- we don't bother to check XmlSyntax since we couldn't -- have ended up in a non-Nothing context if it wasn't -- enabled. case ec of Just HarpCtxt -> lexHarpToken Just TagCtxt -> lexTagCtxt Just CloseTagCtxt -> lexCloseTagCtxt Just ChildCtxt -> lexChildCtxt Just CodeTagCtxt -> lexCodeTagCtxt _ -> lexStdToken lexChildCtxt :: Lex a Token lexChildCtxt = do -- if we ever end up here, then XmlSyntax must be on. s <- getInput case s of '<':'%':'>':_ -> do discard 3 pushExtContextL ChildCtxt return XChildTagOpen '<':'%':_ -> do discard 2 pushExtContextL CodeTagCtxt return XCodeTagOpen '<':'/':_ -> do discard 2 popExtContextL "lexChildCtxt" pushExtContextL CloseTagCtxt return XCloseTagOpen '<':'[':_ -> do discard 2 pushExtContextL HarpCtxt return XRPatOpen '<':_ -> do discard 1 pushExtContextL TagCtxt return XStdTagOpen _ -> lexPCDATA lexPCDATA :: Lex a Token lexPCDATA = do -- if we ever end up here, then XmlSyntax must be on. s <- getInput case s of [] -> return EOF _ -> case s of '\n':_ -> do x <- lexNewline >> lexPCDATA case x of XPCDATA p -> return $ XPCDATA $ '\n':p EOF -> return EOF _ -> fail $ "lexPCDATA: unexpected token: " ++ show x '<':_ -> return $ XPCDATA "" _ -> do let pcd = takeWhile (\c -> c `notElem` "<\n") s l = length pcd discard l x <- lexPCDATA case x of XPCDATA pcd' -> return $ XPCDATA $ pcd ++ pcd' EOF -> return EOF _ -> fail $ "lexPCDATA: unexpected token: " ++ show x lexCodeTagCtxt :: Lex a Token lexCodeTagCtxt = do -- if we ever end up here, then XmlSyntax must be on. s <- getInput case s of '%':'>':_ -> do discard 2 popExtContextL "lexCodeTagContext" return XCodeTagClose _ -> lexStdToken lexCloseTagCtxt :: Lex a Token lexCloseTagCtxt = do -- if we ever end up here, then XmlSyntax must be on. s <- getInput case s of '%':'>':_ -> do discard 2 popExtContextL "lexCloseTagCtxt" return XCodeTagClose '>':_ -> do discard 1 popExtContextL "lexCloseTagCtxt" return XStdTagClose _ -> lexStdToken lexTagCtxt :: Lex a Token lexTagCtxt = do -- if we ever end up here, then XmlSyntax must be on. s <- getInput case s of '/':'>':_ -> do discard 2 popExtContextL "lexTagCtxt: Empty tag" return XEmptyTagClose '>':_ -> do discard 1 popExtContextL "lexTagCtxt: Standard tag" pushExtContextL ChildCtxt return XStdTagClose _ -> lexStdToken lexHarpToken :: Lex a Token lexHarpToken = do -- if we ever end up here, then RegularPatterns must be on. s <- getInput case s of ']':'>':_ -> do discard 2 popExtContextL "lexHarpToken" return XRPatClose _ -> lexStdToken lexStdToken :: Lex a Token lexStdToken = do s <- getInput exts <- getExtensionsL let intHash = lexHash IntTok IntTokHash (Right WordTokHash) case s of [] -> return EOF '0':c:d:_ | toLower c == 'o' && isOctDigit d -> do discard 2 (n, str) <- lexOctal con <- intHash return (con (n, '0':c:str)) | toLower c == 'b' && isBinDigit d && BinaryLiterals `elem` exts -> do discard 2 (n, str) <- lexBinary con <- intHash return (con (n, '0':c:str)) | toLower c == 'x' && isHexDigit d -> do discard 2 (n, str) <- lexHexadecimal con <- intHash return (con (n, '0':c:str)) -- implicit parameters '?':c:_ | isIdentStart c && ImplicitParams `elem` exts -> do discard 1 id <- lexWhile isIdent return $ IDupVarId id '%':c:_ | isIdentStart c && ImplicitParams `elem` exts -> do discard 1 id <- lexWhile isIdent return $ ILinVarId id -- end implicit parameters -- harp '(':'|':c:_ | RegularPatterns `elem` exts && not (isHSymbol c) -> discard 2 >> return RPGuardOpen | Arrows `elem` exts && not (isHSymbol c) -> discard 2 >> return OpenArrowBracket '|':')':_ | RegularPatterns `elem` exts -> discard 2 >> return RPGuardClose | Arrows `elem` exts -> discard 2 >> return CloseArrowBracket {- This is handled by the reserved_ops above. '@':':':_ | RegularPatterns `elem` exts -> do discard 2 return RPCAt -} -- template haskell '[':'|':'|':_ | TemplateHaskell `elem` exts -> do discard 3 return THTExpQuote '[':'e':'|':'|':_ | TemplateHaskell `elem` exts -> do discard 4 return THTExpQuote '[':'|':_ | TemplateHaskell `elem` exts -> do discard 2 return THExpQuote '[':c:'|':_ | c == 'e' && TemplateHaskell `elem` exts -> do discard 3 return THExpQuote | c == 'p' && TemplateHaskell `elem` exts -> do discard 3 return THPatQuote | c == 'd' && TemplateHaskell `elem` exts -> do discard 3 return THDecQuote | c == 't' && TemplateHaskell `elem` exts -> do discard 3 return THTypQuote '[':'$':c:_ | isIdentStart c && QuasiQuotes `elem` exts -> discard 2 >> lexQuasiQuote c '[':c:s' | isIdentStart c && QuasiQuotes `elem` exts && case dropWhile isIdent s' of { '|':_ -> True;_->False} -> discard 1 >> lexQuasiQuote c | isUpper c && QuasiQuotes `elem` exts && case dropWhile isPossiblyQvar s' of { '|':_ -> True;_->False} -> discard 1 >> lexQuasiQuote c '|':'|':']':_ | TemplateHaskell `elem` exts -> do discard 3 return THTCloseQuote '|':']':_ | TemplateHaskell `elem` exts -> do discard 2 return THCloseQuote '$':c1:c2:_ | isIdentStart c1 && TemplateHaskell `elem` exts -> do discard 1 id <- lexWhile isIdent return $ THIdEscape id | c1 == '(' && TemplateHaskell `elem` exts -> do discard 2 return THParenEscape | c1 == '$' && isIdentStart c2 && TemplateHaskell `elem` exts -> do discard 2 id <- lexWhile isIdent return $ THTIdEscape id | c1 == '$' && c2 == '(' && TemplateHaskell `elem` exts -> do discard 3 return THTParenEscape -- end template haskell -- hsx '<':'%':c:_ | XmlSyntax `elem` exts -> case c of '>' -> do discard 3 pushExtContextL ChildCtxt return XChildTagOpen _ -> do discard 2 pushExtContextL CodeTagCtxt return XCodeTagOpen '<':c:_ | isAlpha c && XmlSyntax `elem` exts -> do discard 1 pushExtContextL TagCtxt return XStdTagOpen -- end hsx '(':'#':c:_ | unboxed exts && not (isHSymbol c) -> discard 2 >> return LeftHashParen '#':')':_ | unboxed exts -> discard 2 >> return RightHashParen -- pragmas '{':'-':'#':_ -> saveExtensionsL >> discard 3 >> lexPragmaStart '#':'-':'}':_ -> restoreExtensionsL >> discard 3 >> return PragmaEnd -- Parallel arrays '[':':':_ | ParallelArrays `elem` exts -> discard 2 >> return ParArrayLeftSquare ':':']':_ | ParallelArrays `elem` exts -> discard 2 >> return ParArrayRightSquare -- Lexed seperately to deal with visible type applciation '@':c:_ | TypeApplications `elem` exts -- Operator starting with an '@' && not (isOpSymbol c) -> do lc <- getLastChar if isIdent lc then discard 1 >> return At else discard 1 >> return TApp '#':c:_ | OverloadedLabels `elem` exts && isIdentStart c -> do discard 1 [ident] <- lexIdents return $ LabelVarId ident c:_ | isDigit c -> lexDecimalOrFloat | isUpper c -> lexConIdOrQual "" | isIdentStart c -> do idents <- lexIdents case idents of [ident] -> case lookup ident (reserved_ids ++ special_varids) of Just (keyword, scheme) -> -- check if an extension keyword is enabled if isEnabled scheme exts then flagKW keyword >> return keyword else return $ VarId ident Nothing -> return $ VarId ident _ -> return $ DVarId idents | isHSymbol c -> do sym <- lexWhile isHSymbol return $ case lookup sym (reserved_ops ++ special_varops) of Just (t , scheme) -> -- check if an extension op is enabled if isEnabled scheme exts then t else case c of ':' -> ConSym sym _ -> VarSym sym Nothing -> case c of ':' -> ConSym sym _ -> VarSym sym | otherwise -> do discard 1 case c of -- First the special symbols '(' -> return LeftParen ')' -> return RightParen ',' -> return Comma ';' -> return SemiColon '[' -> return LeftSquare ']' -> return RightSquare '`' -> return BackQuote '{' -> do pushContextL NoLayout return LeftCurly '}' -> do popContextL "lexStdToken" return RightCurly '\'' -> lexCharacter '"' -> lexString _ -> fail ("Illegal character \'" ++ show c ++ "\'\n") where lexIdents :: Lex a [String] lexIdents = do ident <- lexWhile isIdent s <- getInput exts <- getExtensionsL case s of -- This is the only way we can get more than one ident in the list -- and it requires XmlSyntax to be on. '-':c:_ | XmlSyntax `elem` exts && isAlpha c -> do discard 1 idents <- lexIdents return $ ident : idents '#':_ | MagicHash `elem` exts -> do hashes <- lexWhile (== '#') return [ident ++ hashes] _ -> return [ident] lexQuasiQuote :: Char -> Lex a Token lexQuasiQuote c = do -- We've seen and dropped [$ already ident <- lexQuoter matchChar '|' "Malformed quasi-quote quoter" body <- lexQQBody return $ THQuasiQuote (ident, body) where lexQuoter | isIdentStart c = lexWhile isIdent | otherwise = do qualThing <- lexConIdOrQual "" case qualThing of QVarId (s1,s2) -> return $ s1 ++ '.':s2 QVarSym (s1, s2) -> return $ s1 ++ '.':s2 _ -> fail "Malformed quasi-quote quoter" lexQQBody :: Lex a String lexQQBody = do s <- getInput case s of '\\':']':_ -> do discard 2 str <- lexQQBody return (']':str) '\\':'|':_ -> do discard 2 str <- lexQQBody return ('|':str) '|':']':_ -> discard 2 >> return "" '|':_ -> do discard 1 str <- lexQQBody return ('|':str) ']':_ -> do discard 1 str <- lexQQBody return (']':str) '\\':_ -> do discard 1 str <- lexQQBody return ('\\':str) '\n':_ -> do lexNewline str <- lexQQBody return ('\n':str) [] -> fail "Unexpected end of input while lexing quasi-quoter" _ -> do str <- lexWhile (not . (`elem` "\\|\n")) rest <- lexQQBody return (str++rest) unboxed :: [KnownExtension] -> Bool unboxed exts = UnboxedSums `elem` exts || UnboxedTuples `elem` exts -- Underscores are used in some pragmas. Options pragmas are a special case -- with our representation: the thing after the underscore is a parameter. -- Strip off the parameters to option pragmas by hand here, everything else -- sits in the pragmas map. lookupKnownPragma :: String -> Maybe Token lookupKnownPragma s = case map toLower s of x | "options_" `isPrefixOf` x -> Just $ OPTIONS (Just $ drop 8 s, undefined) | "options" == x -> Just $ OPTIONS (Nothing, undefined) | otherwise -> lookup x pragmas lexPragmaStart :: Lex a Token lexPragmaStart = do lexWhile_ isSpace pr <- lexWhile isPragmaChar case lookupKnownPragma pr of Just (INLINE True) -> do s <- getInput case map toLower s of ' ':'c':'o':'n':'l':'i':'k':'e':_ -> do discard 8 return INLINE_CONLIKE _ -> return $ INLINE True Just SPECIALISE -> do s <- getInput case dropWhile isSpace $ map toLower s of 'i':'n':'l':'i':'n':'e':_ -> do lexWhile_ isSpace discard 6 return $ SPECIALISE_INLINE True 'n':'o':'i':'n':'l':'i':'n':'e':_ -> do lexWhile_ isSpace discard 8 return $ SPECIALISE_INLINE False 'n':'o':'t':'i':'n':'l':'i':'n':'e':_ -> do lexWhile_ isSpace discard 9 return $ SPECIALISE_INLINE False _ -> return SPECIALISE Just (OPTIONS opt) -> -- see, I promised we'd mask out the 'undefined' -- We do not want to store necessary whitespace in the datatype -- but if the pragma starts with a newline then we must keep -- it to differentiate the two cases. let dropIfSpace (' ':xs) = xs dropIfSpace xs = xs in case fst opt of Just opt' -> do rest <- lexRawPragma return $ OPTIONS (Just opt', dropIfSpace rest) Nothing -> do s <- getInput case s of x:_ | isSpace x -> do rest <- lexRawPragma return $ OPTIONS (Nothing, dropIfSpace rest) _ -> fail "Malformed Options pragma" Just RULES -> do -- Rules enable ScopedTypeVariables locally. addExtensionL ScopedTypeVariables return RULES {- Just (CFILES _) -> do rest <- lexRawPragma return $ CFILES rest Just (INCLUDE _) -> do rest <- lexRawPragma return $ INCLUDE rest -} Just p -> return p _ -> fail "Internal error: Unrecognised recognised pragma" -- do rawStr <- lexRawPragma -- return $ PragmaUnknown (pr, rawStr) -- no support for unrecognized pragmas, treat as comment -- discard 3 -- #-} -- topLexer -- we just discard it as a comment for now and restart -} lexRawPragma :: Lex a String lexRawPragma = lexRawPragmaAux where lexRawPragmaAux = do rpr <- lexWhile (/='#') s <- getInput case s of '#':'-':'}':_ -> return rpr "" -> fail "End-of-file inside pragma" _ -> do discard 1 rpr' <- lexRawPragma return $ rpr ++ '#':rpr' lexDecimalOrFloat :: Lex a Token lexDecimalOrFloat = do ds <- lexWhile isDigit rest <- getInput exts <- getExtensionsL case rest of ('.':d:_) | isDigit d -> do discard 1 frac <- lexWhile isDigit let num = parseInteger 10 (ds ++ frac) decimals = toInteger (length frac) (exponent, estr) <- do rest2 <- getInput case rest2 of 'e':_ -> lexExponent 'E':_ -> lexExponent _ -> return (0,"") con <- lexHash FloatTok FloatTokHash (Right DoubleTokHash) return $ con ((num%1) * 10^^(exponent - decimals), ds ++ '.':frac ++ estr) e:_ | toLower e == 'e' -> do (exponent, estr) <- lexExponent con <- lexHash FloatTok FloatTokHash (Right DoubleTokHash) return $ con ((parseInteger 10 ds%1) * 10^^exponent, ds ++ estr) '#':'#':_ | MagicHash `elem` exts -> discard 2 >> return (WordTokHash (parseInteger 10 ds, ds)) '#':_ | MagicHash `elem` exts -> discard 1 >> return (IntTokHash (parseInteger 10 ds, ds)) _ -> return (IntTok (parseInteger 10 ds, ds)) where lexExponent :: Lex a (Integer, String) lexExponent = do (e:r) <- getInput discard 1 -- 'e' or 'E' case r of '+':d:_ | isDigit d -> do discard 1 (n, str) <- lexDecimal return (n, e:'+':str) '-':d:_ | isDigit d -> do discard 1 (n, str) <- lexDecimal return (negate n, e:'-':str) d:_ | isDigit d -> lexDecimal >>= \(n,str) -> return (n, e:str) _ -> fail "Float with missing exponent" lexHash :: (b -> Token) -> (b -> Token) -> Either String (b -> Token) -> Lex a (b -> Token) lexHash a b c = do exts <- getExtensionsL if MagicHash `elem` exts then do r <- getInput case r of '#':'#':_ -> case c of Right c' -> discard 2 >> return c' Left s -> fail s '#':_ -> discard 1 >> return b _ -> return a else return a lexConIdOrQual :: String -> Lex a Token lexConIdOrQual qual = do con <- lexWhile isIdent let conid | null qual = ConId con | otherwise = QConId (qual,con) qual' | null qual = con | otherwise = qual ++ '.':con just_a_conid <- alternative (return conid) rest <- getInput exts <- getExtensionsL case rest of '.':c:_ | isIdentStart c -> do -- qualified varid? discard 1 ident <- lexWhile isIdent s <- getInput exts' <- getExtensionsL ident' <- case s of '#':_ | MagicHash `elem` exts' -> discard 1 >> return (ident ++ "#") _ -> return ident case lookup ident' reserved_ids of -- cannot qualify a reserved word Just (_,scheme) | isEnabled scheme exts' -> just_a_conid _ -> return (QVarId (qual', ident')) | isUpper c -> do -- qualified conid? discard 1 lexConIdOrQual qual' | isHSymbol c -> do -- qualified symbol? discard 1 sym <- lexWhile isHSymbol exts' <- getExtensionsL case lookup sym reserved_ops of -- cannot qualify a reserved operator Just (_,scheme) | isEnabled scheme exts' -> just_a_conid _ -> return $ case c of ':' -> QConSym (qual', sym) _ -> QVarSym (qual', sym) '#':cs | null cs || not (isHSymbol $ head cs) && not (isIdent $ head cs) && MagicHash `elem` exts -> do discard 1 case conid of ConId con' -> return $ ConId $ con' ++ "#" QConId (q,con') -> return $ QConId (q,con' ++ "#") _ -> fail $ "lexConIdOrQual: unexpected token: " ++ show conid _ -> return conid -- not a qualified thing lexCharacter :: Lex a Token lexCharacter = do -- We need to keep track of not only character constants but also TH 'x and ''T -- We've seen ' so far s <- getInput exts <- getExtensionsL case s of '\'':_ | TemplateHaskell `elem` exts -> discard 1 >> return THTyQuote '\\':_ -> do (c,raw) <- lexEscape matchQuote con <- lexHash Character CharacterHash (Left "Double hash not available for character literals") return (con (c, '\\':raw)) c:'\'':_ -> do discard 2 con <- lexHash Character CharacterHash (Left "Double hash not available for character literals") return (con (c, [c])) _ | any (`elem` exts) [TemplateHaskell, DataKinds] -> return THVarQuote _ -> fail "Improper character constant or misplaced \'" where matchQuote = matchChar '\'' "Improperly terminated character constant" lexString :: Lex a Token lexString = loop ("","") where loop (s,raw) = do r <- getInput exts <- getExtensionsL case r of '\\':'&':_ -> do discard 2 loop (s, '&':'\\':raw) '\\':c:_ | isSpace c -> do discard 1 wcs <- lexWhiteChars matchChar '\\' "Illegal character in string gap" loop (s, '\\':reverse wcs ++ '\\':raw) | otherwise -> do (ce, str) <- lexEscape loop (ce:s, reverse str ++ '\\':raw) '"':'#':_ | MagicHash `elem` exts -> do discard 2 return (StringHash (reverse s, reverse raw)) '"':_ -> do discard 1 return (StringTok (reverse s, reverse raw)) c:_ | c /= '\n' -> do discard 1 loop (c:s, c:raw) _ -> fail "Improperly terminated string" lexWhiteChars :: Lex a String lexWhiteChars = do s <- getInput case s of '\n':_ -> do lexNewline wcs <- lexWhiteChars return $ '\n':wcs '\t':_ -> do lexTab wcs <- lexWhiteChars return $ '\t':wcs c:_ | isSpace c -> do discard 1 wcs <- lexWhiteChars return $ c:wcs _ -> return "" lexEscape :: Lex a (Char, String) lexEscape = do discard 1 r <- getInput case r of -- Production charesc from section B.2 (Note: \& is handled by caller) 'a':_ -> discard 1 >> return ('\a', "a") 'b':_ -> discard 1 >> return ('\b', "b") 'f':_ -> discard 1 >> return ('\f', "f") 'n':_ -> discard 1 >> return ('\n', "n") 'r':_ -> discard 1 >> return ('\r', "r") 't':_ -> discard 1 >> return ('\t', "t") 'v':_ -> discard 1 >> return ('\v', "v") '\\':_ -> discard 1 >> return ('\\', "\\") '"':_ -> discard 1 >> return ('\"', "\"") '\'':_ -> discard 1 >> return ('\'', "\'") -- Production ascii from section B.2 '^':c:_ -> discard 2 >> cntrl c 'N':'U':'L':_ -> discard 3 >> return ('\NUL', "NUL") 'S':'O':'H':_ -> discard 3 >> return ('\SOH', "SOH") 'S':'T':'X':_ -> discard 3 >> return ('\STX', "STX") 'E':'T':'X':_ -> discard 3 >> return ('\ETX', "ETX") 'E':'O':'T':_ -> discard 3 >> return ('\EOT', "EOT") 'E':'N':'Q':_ -> discard 3 >> return ('\ENQ', "ENQ") 'A':'C':'K':_ -> discard 3 >> return ('\ACK', "ACK") 'B':'E':'L':_ -> discard 3 >> return ('\BEL', "BEL") 'B':'S':_ -> discard 2 >> return ('\BS', "BS") 'H':'T':_ -> discard 2 >> return ('\HT', "HT") 'L':'F':_ -> discard 2 >> return ('\LF', "LF") 'V':'T':_ -> discard 2 >> return ('\VT', "VT") 'F':'F':_ -> discard 2 >> return ('\FF', "FF") 'C':'R':_ -> discard 2 >> return ('\CR', "CR") 'S':'O':_ -> discard 2 >> return ('\SO', "SO") 'S':'I':_ -> discard 2 >> return ('\SI', "SI") 'D':'L':'E':_ -> discard 3 >> return ('\DLE', "DLE") 'D':'C':'1':_ -> discard 3 >> return ('\DC1', "DC1") 'D':'C':'2':_ -> discard 3 >> return ('\DC2', "DC2") 'D':'C':'3':_ -> discard 3 >> return ('\DC3', "DC3") 'D':'C':'4':_ -> discard 3 >> return ('\DC4', "DC4") 'N':'A':'K':_ -> discard 3 >> return ('\NAK', "NAK") 'S':'Y':'N':_ -> discard 3 >> return ('\SYN', "SYN") 'E':'T':'B':_ -> discard 3 >> return ('\ETB', "ETB") 'C':'A':'N':_ -> discard 3 >> return ('\CAN', "CAN") 'E':'M':_ -> discard 2 >> return ('\EM', "EM") 'S':'U':'B':_ -> discard 3 >> return ('\SUB', "SUB") 'E':'S':'C':_ -> discard 3 >> return ('\ESC', "ESC") 'F':'S':_ -> discard 2 >> return ('\FS', "FS") 'G':'S':_ -> discard 2 >> return ('\GS', "GS") 'R':'S':_ -> discard 2 >> return ('\RS', "RS") 'U':'S':_ -> discard 2 >> return ('\US', "US") 'S':'P':_ -> discard 2 >> return ('\SP', "SP") 'D':'E':'L':_ -> discard 3 >> return ('\DEL', "DEL") -- Escaped numbers 'o':c:_ | isOctDigit c -> do discard 1 (n, raw) <- lexOctal n' <- checkChar n return (n', 'o':raw) 'x':c:_ | isHexDigit c -> do discard 1 (n, raw) <- lexHexadecimal n' <- checkChar n return (n', 'x':raw) c:_ | isDigit c -> do (n, raw) <- lexDecimal n' <- checkChar n return (n', raw) _ -> fail "Illegal escape sequence" where checkChar n | n <= 0x10FFFF = return (chr (fromInteger n)) checkChar _ = fail "Character constant out of range" -- Production cntrl from section B.2 cntrl :: Char -> Lex a (Char, String) cntrl c | c >= '@' && c <= '_' = return (chr (ord c - ord '@'), '^':c:[]) cntrl _ = fail "Illegal control character" -- assumes at least one octal digit lexOctal :: Lex a (Integer, String) lexOctal = do ds <- lexWhile isOctDigit return (parseInteger 8 ds, ds) -- assumes at least one binary digit lexBinary :: Lex a (Integer, String) lexBinary = do ds <- lexWhile isBinDigit return (parseInteger 2 ds, ds) -- assumes at least one hexadecimal digit lexHexadecimal :: Lex a (Integer, String) lexHexadecimal = do ds <- lexWhile isHexDigit return (parseInteger 16 ds, ds) -- assumes at least one decimal digit lexDecimal :: Lex a (Integer, String) lexDecimal = do ds <- lexWhile isDigit return (parseInteger 10 ds, ds) -- Stolen from Hugs's Prelude parseInteger :: Integer -> String -> Integer parseInteger radix ds = foldl1 (\n d -> n * radix + d) (map (toInteger . digitToInt) ds) flagKW :: Token -> Lex a () flagKW t = when (t `elem` [KW_Do, KW_MDo]) $ do exts <- getExtensionsL when (NondecreasingIndentation `elem` exts) flagDo -- | Selects ASCII binary digits, i.e. @\'0\'@..@\'1\'@. isBinDigit :: Char -> Bool isBinDigit c = c >= '0' && c <= '1' ------------------------------------------------------------------ -- "Pretty" printing for tokens showToken :: Token -> String showToken t = case t of VarId s -> s LabelVarId s -> '#':s QVarId (q,s) -> q ++ '.':s IDupVarId s -> '?':s ILinVarId s -> '%':s ConId s -> s QConId (q,s) -> q ++ '.':s DVarId ss -> intercalate "-" ss VarSym s -> s ConSym s -> s QVarSym (q,s) -> q ++ '.':s QConSym (q,s) -> q ++ '.':s IntTok (_, s) -> s FloatTok (_, s) -> s Character (_, s) -> '\'':s ++ "'" StringTok (_, s) -> '"':s ++ "\"" IntTokHash (_, s) -> s ++ "#" WordTokHash (_, s) -> s ++ "##" FloatTokHash (_, s) -> s ++ "#" DoubleTokHash (_, s) -> s ++ "##" CharacterHash (_, s) -> '\'':s ++ "'#" StringHash (_, s) -> '"':s ++ "\"#" LeftParen -> "(" RightParen -> ")" LeftHashParen -> "(#" RightHashParen -> "#)" SemiColon -> ";" LeftCurly -> "{" RightCurly -> "}" VRightCurly -> "virtual }" LeftSquare -> "[" RightSquare -> "]" ParArrayLeftSquare -> "[:" ParArrayRightSquare -> ":]" Comma -> "," Underscore -> "_" BackQuote -> "`" QuoteColon -> "':" Dot -> "." DotDot -> ".." Colon -> ":" DoubleColon -> "::" Equals -> "=" Backslash -> "\\" Bar -> "|" LeftArrow -> "<-" RightArrow -> "->" At -> "@" TApp -> "@" Tilde -> "~" DoubleArrow -> "=>" Minus -> "-" Exclamation -> "!" Star -> "*" LeftArrowTail -> "-<" RightArrowTail -> ">-" LeftDblArrowTail -> "-<<" RightDblArrowTail -> ">>-" OpenArrowBracket -> "(|" CloseArrowBracket -> "|)" THExpQuote -> "[|" THTExpQuote -> "[||" THPatQuote -> "[p|" THDecQuote -> "[d|" THTypQuote -> "[t|" THCloseQuote -> "|]" THTCloseQuote -> "||]" THIdEscape s -> '$':s THParenEscape -> "$(" THTIdEscape s -> "$$" ++ s THTParenEscape -> "$$(" THVarQuote -> "'" THTyQuote -> "''" THQuasiQuote (n,q) -> "[$" ++ n ++ "|" ++ q ++ "]" RPGuardOpen -> "(|" RPGuardClose -> "|)" RPCAt -> "@:" XCodeTagOpen -> "<%" XCodeTagClose -> "%>" XStdTagOpen -> "<" XStdTagClose -> ">" XCloseTagOpen -> " "/>" XPCDATA s -> "PCDATA " ++ s XRPatOpen -> "<[" XRPatClose -> "]>" PragmaEnd -> "#-}" RULES -> "{-# RULES" INLINE b -> "{-# " ++ if b then "INLINE" else "NOINLINE" INLINE_CONLIKE -> "{-# " ++ "INLINE CONLIKE" SPECIALISE -> "{-# SPECIALISE" SPECIALISE_INLINE b -> "{-# SPECIALISE " ++ if b then "INLINE" else "NOINLINE" SOURCE -> "{-# SOURCE" DEPRECATED -> "{-# DEPRECATED" WARNING -> "{-# WARNING" SCC -> "{-# SCC" GENERATED -> "{-# GENERATED" CORE -> "{-# CORE" UNPACK -> "{-# UNPACK" NOUNPACK -> "{-# NOUNPACK" OPTIONS (mt,_) -> "{-# OPTIONS" ++ maybe "" (':':) mt ++ " ..." -- CFILES s -> "{-# CFILES ..." -- INCLUDE s -> "{-# INCLUDE ..." LANGUAGE -> "{-# LANGUAGE" ANN -> "{-# ANN" MINIMAL -> "{-# MINIMAL" NO_OVERLAP -> "{-# NO_OVERLAP" OVERLAP -> "{-# OVERLAP" OVERLAPPING -> "{-# OVERLAPPING" OVERLAPPABLE -> "{-# OVERLAPPABLE" OVERLAPS -> "{-# OVERLAPS" INCOHERENT -> "{-# INCOHERENT" COMPLETE -> "{-# COMPLETE" KW_As -> "as" KW_By -> "by" KW_Case -> "case" KW_Class -> "class" KW_Data -> "data" KW_Default -> "default" KW_Deriving -> "deriving" KW_Do -> "do" KW_MDo -> "mdo" KW_Else -> "else" KW_Family -> "family" KW_Forall -> "forall" KW_Group -> "group" KW_Hiding -> "hiding" KW_If -> "if" KW_Import -> "import" KW_In -> "in" KW_Infix -> "infix" KW_InfixL -> "infixl" KW_InfixR -> "infixr" KW_Instance -> "instance" KW_Let -> "let" KW_Module -> "module" KW_NewType -> "newtype" KW_Of -> "of" KW_Proc -> "proc" KW_Rec -> "rec" KW_Then -> "then" KW_Type -> "type" KW_Using -> "using" KW_Where -> "where" KW_Qualified -> "qualified" KW_Foreign -> "foreign" KW_Export -> "export" KW_Safe -> "safe" KW_Unsafe -> "unsafe" KW_Threadsafe -> "threadsafe" KW_Interruptible -> "interruptible" KW_StdCall -> "stdcall" KW_CCall -> "ccall" XChildTagOpen -> "<%>" KW_CPlusPlus -> "cplusplus" KW_DotNet -> "dotnet" KW_Jvm -> "jvm" KW_Js -> "js" KW_JavaScript -> "javascript" KW_CApi -> "capi" KW_Role -> "role" KW_Pattern -> "pattern" KW_Stock -> "stock" KW_Anyclass -> "anyclass" KW_Via -> "via" EOF -> "EOF" haskell-src-exts-1.23.1/src/Language/Haskell/Exts/ParseUtils.hs0000644000000000000000000015112413603723515022435 0ustar0000000000000000{-# OPTIONS_HADDOCK hide #-} {-# LANGUAGE CPP #-} {-# LANGUAGE PatternGuards #-} ----------------------------------------------------------------------------- -- | -- Module : Language.Haskell.Exts.ParseUtils -- Copyright : (c) Niklas Broberg 2004-2009, -- (c) The GHC Team, 1997-2000 -- License : BSD-style (see the file LICENSE.txt) -- -- Maintainer : Niklas Broberg, d00nibro@chalmers.se -- Stability : stable -- Portability : portable -- -- Utilities for the Haskell-exts parser. -- ----------------------------------------------------------------------------- module Language.Haskell.Exts.ParseUtils ( splitTyConApp -- PType -> P (Name,[Type]) , checkEnabled -- (Show e, Enabled e) => e -> P () , checkEnabledOneOf , checkToplevel -- ?? , checkPatternGuards -- [Stmt] -> P () , mkRecConstrOrUpdate -- PExp -> [PFieldUpdate] -> P Exp , checkPrec -- Integer -> P Int , checkPContext -- PType -> P PContext , checkContext -- PContext -> P Context , checkAssertion -- PType -> P PAsst , checkDataHeader -- PType -> P (Context,Name,[TyVarBind]) , checkClassHeader -- PType -> P (Context,Name,[TyVarBind]) , checkInstHeader -- PType -> P (Context,QName,[Type]) , checkDeriving -- [PType] -> P [Deriving] , checkPattern -- PExp -> P Pat , checkExpr -- PExp -> P Exp , checkType -- PType -> P Type , checkTyVar -- Name -> P PType , bangType -- L -> BangType -> Type -> Type , checkKind -- Kind -> P () , checkValDef -- SrcLoc -> PExp -> Maybe Type -> Rhs -> Binds -> P Decl , checkExplicitPatSyn -- , checkClassBody -- [ClassDecl] -> P [ClassDecl] , checkInstBody -- [InstDecl] -> P [InstDecl] , checkUnQual -- QName -> P Name , checkQualOrUnQual -- QName -> P QName , checkSingleDecl -- [Decl] -> P Decl , checkRevDecls -- [Decl] -> P [Decl] , checkRevClsDecls -- [ClassDecl] -> P [ClassDecl] , checkRevInstDecls -- [InstDecl] -> P [InstDecl] , checkDataOrNew -- DataOrNew -> [QualConDecl] -> P () , checkDataOrNewG -- DataOrNew -> [GadtDecl] -> P () , checkSimpleType -- PType -> P (Name, [TyVarBind]) , checkSigVar -- PExp -> P Name , checkDefSigDef -- Decl -> P Decl , getGConName -- S.Exp -> P QName , mkTyForall -- Maybe [TyVarBind] -> PContext -> PType -> PType , mkRoleAnnotDecl -- , mkAssocType , mkEThingWith , splitTilde -- HaRP , checkRPattern -- PExp -> P RPat -- Hsx , checkEqNames -- XName -> XName -> P XName , checkPageModule , checkHybridModule , mkDVar -- [String] -> String -- Pragmas , checkRuleExpr -- PExp -> P Exp , readTool -- Maybe String -> Maybe Tool -- Helpers , updateQNameLoc -- l -> QName l -> QName l , SumOrTuple(..), mkSumOrTuple -- Parsed expressions and types , PExp(..), PFieldUpdate(..), ParseXAttr(..), PType(..), PContext, PAsst(..) , p_unit_con -- PExp , p_tuple_con -- Boxed -> Int -> PExp , p_unboxed_singleton_con -- PExp , pexprToQName ) where import Language.Haskell.Exts.Syntax hiding ( Type(..), Asst(..), Exp(..), FieldUpdate(..), XAttr(..), Context(..) ) import qualified Language.Haskell.Exts.Syntax as S ( Type(..), Asst(..), Exp(..), FieldUpdate(..), XAttr(..), Context(..), Role(..), PatternSynDirection(..)) import Language.Haskell.Exts.ParseSyntax import Language.Haskell.Exts.ParseMonad import Language.Haskell.Exts.Pretty import Language.Haskell.Exts.SrcLoc hiding (loc) import Language.Haskell.Exts.Extension import Language.Haskell.Exts.ExtScheme import Prelude hiding (mod) import Data.List (intercalate, intersperse) import Data.Maybe (fromJust, fromMaybe) import Data.Either import Control.Monad (when,unless) #if __GLASGOW_HASKELL__ < 710 import Control.Applicative ((<$>)) #endif type L = SrcSpanInfo type S = SrcSpan pexprToQName :: PExp l -> P (QName l) pexprToQName (Con _ qn) = return qn pexprToQName (List l []) = return $ Special l (ListCon l) pexprToQName _ = fail "pexprToQName" splitTyConApp :: PType L -> P (Name L, [S.Type L]) splitTyConApp t0 = do (n, pts) <- split t0 [] ts <- mapM checkType pts return (n,ts) where split :: PType L -> [PType L] -> P (Name L, [PType L]) split (TyApp _ t u) ts = split t (u:ts) split (TyCon _ (UnQual _ t)) ts = return (t,ts) split (TyInfix l a op b) ts = split (TyCon l (getMaybePromotedQName op)) (a:b:ts) split _ _ = fail "Illegal data/newtype declaration" ----------------------------------------------------------------------------- -- Checking for extensions checkEnabled :: (Show e, Enabled e) => e -> P () checkEnabled e = do exts <- getExtensions unless (isEnabled e exts) $ fail errorMsg where errorMsg = unwords [ show e , "language extension is not enabled." , "Please add {-# LANGUAGE " ++ show e ++ " #-}" , "pragma at the top of your module." ] checkEnabledOneOf :: (Show e, Enabled e) => [e] -> P () checkEnabledOneOf es = do exts <- getExtensions unless (any (`isEnabled` exts) es) $ fail errorMsg where errorMsg = unwords [ "At least one of" , joinOr id , "language extensions needs to be enabled." , "Please add:" , joinOr (\s -> "{-# LANGUAGE " ++ s ++ " #-}") , "language pragma at the top of your module." ] joinOr f = concat . intersperse " or " . map (f . show) $ es checkPatternGuards :: [Stmt L] -> P () checkPatternGuards [Qualifier _ _] = return () checkPatternGuards _ = checkEnabled PatternGuards checkToplevel :: PExp t -> P () checkToplevel e = do exts <- getExtensions let isQQ = case e of QuasiQuote {} -> isEnabled QuasiQuotes exts _ -> False unless isQQ (checkEnabled TemplateHaskell) ----------------------------------------------------------------------------- -- Checking contexts -- Check that a context is syntactically correct. Takes care of -- checking for MPTCs, TypeOperators, TypeFamilies (for eq constraints) -- and ImplicitParameters, but leaves checking of the class assertion -- parameters for later. checkPContext :: PType L -> P (PContext L) checkPContext (TyTuple l Boxed ts) = mapM checkAssertion ts >>= return . CxTuple l checkPContext (TyCon l (Special _ (UnitCon _))) = return $ CxEmpty l checkPContext (TyParen l t) = do c <- checkAssertion t return $ CxSingle l (ParenA l c) checkPContext t@(TyEquals tp _ _) = do checkEnabledOneOf [TypeFamilies, GADTs] return $ CxSingle tp $ TypeA tp t checkPContext t = do c <- checkAssertion t return $ CxSingle (ann c) c ------------------------------------------------------------------------------------------------------------------- WORKING HERE -- Check a single assertion according to the above, still leaving -- the class assertion parameters for later. checkAssertion :: PType L -> P (PAsst L) -- We cannot even get here unless ImplicitParameters is enabled. checkAssertion (TyParen l asst) = do asst' <- checkAssertion asst return $ ParenA l asst' checkAssertion (TyPred _ p) = checkAAssertion p -- We cannot even get here unless TypeFamilies or GADTs is enabled. -- N.B.: this is called only when the equality assertion is part of a -- tuple checkAssertion t' = do t'' <- checkAssertion' id [] t' return $ TypeA (ann t'') t'' where -- class assertions must have at least one argument checkAssertion' _ _ t@(TyEquals _ _ _) = return t checkAssertion' fl ts (TyCon l c) = do when (length ts < 1) $ checkEnabled FlexibleContexts checkAndWarnTypeOperators c return $ tyApps (fl l) (TyCon (fl l) c) ts checkAssertion' fl ts (TyApp l a t) = -- no check on t at this stage checkAssertion' (const (fl l)) (t:ts) a checkAssertion' fl _ (TyInfix l a op b) = do -- infix operators require TypeOperators checkAndWarnTypeOperators (getMaybePromotedQName op) return $ TyInfix (fl l) a op b checkAssertion' fl ts (TyParen l t) = checkAssertion' (const (fl l)) ts t checkAssertion' fl ts (TyVar l t) = do -- Dict :: cxt => Dict cxt checkEnabled ConstraintKinds return $ tyApps (fl l) (TyVar (fl l) t) ts checkAssertion' _ _ t@(TyWildCard _ _) = return t checkAssertion' _ _ t = do checkEnabled QuantifiedConstraints -- anything goes return t tyApps :: L -> PType L -> [PType L] -> PType L tyApps _ c [] = c tyApps l c (a:aa) = tyApps l (TyApp l c a) aa checkAAssertion :: PAsst L -> P (PAsst L) checkAAssertion (TypeA _ t) = checkAssertion t checkAAssertion (ParenA l a) = do a' <- checkAAssertion a return $ ParenA l a' checkAAssertion p = return p -- Check class/instance declaration for multiparams checkMultiParam :: PType L -> P () checkMultiParam = checkMultiParam' [] where checkMultiParam' ts (TyCon _ _) = when (length ts /= 1) $ checkEnabled MultiParamTypeClasses checkMultiParam' ts (TyApp _ a t) = checkMultiParam' (t:ts) a checkMultiParam' _ (TyInfix _ _ _ _) = checkEnabled MultiParamTypeClasses checkMultiParam' ts (TyParen _ t) = checkMultiParam' ts t checkMultiParam' _ _ = return () getSymbol :: QName L -> Maybe String getSymbol (UnQual _ (Symbol _ s)) = Just s getSymbol (Qual _ _ (Symbol _ s)) = Just s getSymbol _ = Nothing -- | Checks whether the parameter is a symbol, and gives a nice warning for -- "." if ExplicitForAll/TypeOperators are not enabled. checkAndWarnTypeOperators :: QName L -> P () checkAndWarnTypeOperators c = case getSymbol c of Just s | s == "." -> checkEnabledOneOf [ExplicitForAll, TypeOperators] | otherwise -> checkEnabled TypeOperators Nothing -> return () -- Checks simple contexts for class and instance -- headers. If FlexibleContexts is enabled then -- anything goes, otherwise only tyvars are allowed. checkSContext :: Maybe (PContext L) -> P (Maybe (S.Context L)) checkSContext (Just ctxt) = case ctxt of CxEmpty l -> return $ Just $ S.CxEmpty l CxSingle l a -> checkAsst a >>= return . Just . S.CxSingle l CxTuple l as -> mapM checkAsst as >>= return . Just . S.CxTuple l checkSContext _ = return Nothing -- Checks ordinary contexts for sigtypes and data type -- declarations. If FlexibleContexts is enabled then -- anything goes, otherwise only tyvars OR tyvars -- applied to types are allowed. checkContext :: Maybe (PContext L) -> P (Maybe (S.Context L)) checkContext (Just ctxt) = case ctxt of CxEmpty l -> return $ Just $ S.CxEmpty l CxSingle l a -> checkAsst a >>= return . Just . S.CxSingle l CxTuple l as -> mapM checkAsst as >>= return . Just . S.CxTuple l checkContext _ = return Nothing checkAsst :: PAsst L -> P (S.Asst L) checkAsst asst = case asst of TypeA l pt -> do t <- checkType pt return $ S.TypeA l t IParam l ipn pt -> do t <- checkType pt return $ S.IParam l ipn t ParenA l a -> do a' <- checkAsst a return $ S.ParenA l a' ----------------------------------------------------------------------------- -- Checking Headers checkDataHeader :: PType L -> P (Maybe (S.Context L), DeclHead L) checkDataHeader (TyForall _ Nothing cs t) = do dh <- checkSimple "data/newtype" t cs' <- checkContext cs return (cs',dh) checkDataHeader t = do dh <- checkSimple "data/newtype" t return (Nothing,dh) checkClassHeader :: PType L -> P (Maybe (S.Context L), DeclHead L) checkClassHeader (TyForall _ Nothing cs t) = do checkMultiParam t dh <- checkSimple "class" t cs' <- checkSContext cs return (cs',dh) checkClassHeader t = do checkMultiParam t dh <- checkSimple "class" t return (Nothing,dh) checkSimple :: String -> PType L -> P (DeclHead L) --checkSimple kw (TyApp _ l t) xs | isTyVarBind t = checkSimple kw l (toTyVarBind t : xs) checkSimple kw (TyApp l h t) = do tvb <- mkTyVarBind kw t h' <- checkSimple kw h return $ DHApp l h' tvb checkSimple kw (TyInfix l t1 mq t2) | c@(UnQual _ t) <- getMaybePromotedQName mq = do checkAndWarnTypeOperators c tv1 <- mkTyVarBind kw t1 tv2 <- mkTyVarBind kw t2 return $ DHApp l (DHInfix l tv1 t) tv2 checkSimple _kw (TyCon _ c@(UnQual l t)) = do checkAndWarnTypeOperators c return (DHead l t) checkSimple kw (TyParen l t) = do dh <- checkSimple kw t return (DHParen l dh) checkSimple kw _ = fail ("Illegal " ++ kw ++ " declaration") mkTyVarBind :: String -> PType L -> P (TyVarBind L) mkTyVarBind _ (TyVar l n) = return $ UnkindedVar l n mkTyVarBind _ (TyKind l (TyVar _ n) k) = return $ KindedVar l n k mkTyVarBind _ (TyCon l c@(UnQual _ n@(Symbol _ _))) = checkAndWarnTypeOperators c >> return (UnkindedVar l n) mkTyVarBind _ (TyKind l (TyCon _ c@(UnQual _ n@(Symbol _ _))) k) = checkAndWarnTypeOperators c >> return (KindedVar l n k) mkTyVarBind kw _ = fail ("Illegal " ++ kw ++ " declaration") {- isTyVarBind :: PType L -> Bool isTyVarBind (TyVar _ _) = True --isTyVarBind (TyCon _ (UnQual _ n@(Symbol _ _))) = True isTyVarBind (TyKind _ (TyVar _ _) _) = True isTyVarBind _ = False toTyVarBind :: PType L -> TyVarBind L toTyVarBind (TyVar l n) = UnkindedVar l n toTyVarBind (TyKind l (TyVar _ n) k) = KindedVar l n k -} checkInstHeader :: PType L -> P (InstRule L) checkInstHeader (TyParen l t) = checkInstHeader t >>= return . IParen l checkInstHeader (TyForall l mtvs cs t) = do cs' <- checkSContext cs checkMultiParam t checkInsts (Just l) mtvs cs' t checkInstHeader t = checkMultiParam t >> checkInsts Nothing Nothing Nothing t checkInsts :: Maybe L -> Maybe [TyVarBind L] -> Maybe (S.Context L) -> PType L -> P (InstRule L) checkInsts _ mtvs mctxt (TyParen l t) = checkInsts Nothing mtvs mctxt t >>= return . IParen l checkInsts l1 mtvs mctxt t = do t' <- checkInstsGuts t return $ IRule (fromMaybe (fmap ann mctxt ann t') l1) mtvs mctxt t' checkInstsGuts :: PType L -> P (InstHead L) checkInstsGuts (TyApp l h t) = do t' <- checkType t h' <- checkInstsGuts h return $ IHApp l h' t' checkInstsGuts (TyCon l c) = do checkAndWarnTypeOperators c return $ IHCon l c checkInstsGuts (TyInfix l a op b) = do checkAndWarnTypeOperators (getMaybePromotedQName op) [ta,tb] <- checkTypes [a,b] return $ IHApp l (IHInfix l ta (getMaybePromotedQName op)) tb checkInstsGuts (TyParen l t) = checkInstsGuts t >>= return . IHParen l checkInstsGuts _ = fail "Illegal instance declaration" checkDeriving :: [PType L] -> P [InstRule L] checkDeriving = mapM (checkInsts Nothing Nothing Nothing) ----------------------------------------------------------------------------- -- Checking Patterns. -- We parse patterns as expressions and check for valid patterns below, -- converting the expression into a pattern at the same time. checkPattern :: PExp L -> P (Pat L) checkPattern e = checkPat e [] checkPat :: PExp L -> [Pat L] -> P (Pat L) checkPat (Con l c) args = do let l' = foldl combSpanInfo l (map ann args) return (PApp l' c args) checkPat (App _ f x) args = do x' <- checkPat x [] checkPat f (x':args) checkPat (InfixApp _ l op r) args | op =~= QVarOp () (UnQual () (Symbol () "!")) = do -- We must have BangPatterns on checkEnabled BangPatterns let (e,es) = splitBang r [] ps <- mapM checkPattern (BangPat (ann op) e:es) checkPat l (ps++args) checkPat e' [] = case e' of Var _ (UnQual l x) -> return (PVar l x) Var _ (Special l (ExprHole _)) -> return (PWildCard l) Lit l lit -> return (PLit l (Signless l2) lit) where l2 = noInfoSpan . srcInfoSpan $ l InfixApp loc l op r -> case op of QConOp _ c -> do l' <- checkPat l [] r' <- checkPat r [] return (PInfixApp loc l' c r') QVarOp ppos (UnQual _ (Symbol _ "+")) -> do checkEnabled NPlusKPatterns case (l,r) of (Var _ (UnQual _ n@(Ident _ _)), Lit _ (Int kpos k _)) -> do let pp = srcInfoSpan ppos kp = srcInfoSpan kpos return (PNPlusK (loc <** [pp,kp]) n k) _ -> patFail "" _ -> patFail "" TupleSection l bx mes -> if Nothing `notElem` mes then do ps <- mapM (\e -> checkPat e []) (map fromJust mes) return (PTuple l bx ps) else fail "Illegal tuple section in pattern" UnboxedSum l b a e -> PUnboxedSum l b a <$> checkPattern e List l es -> do ps <- mapM checkRPattern es if all isStdPat ps then return . PList l $ map stripRP ps -- we don't allow truly regular patterns unless the extension is enabled else checkEnabled RegularPatterns >> return (PRPat l $ map fixRPOpPrec ps) where isStdPat :: RPat L -> Bool isStdPat (RPPat _ _) = True isStdPat (RPAs _ _ p) = isStdPat p isStdPat (RPParen _ p) = isStdPat p isStdPat _ = False stripRP :: RPat L -> Pat L stripRP (RPPat _ p) = p stripRP (RPAs l' n p) = PAsPat l' n (stripRP p) stripRP (RPParen l' p) = PParen l' (stripRP p) stripRP _ = error "cannot strip RP wrapper if not all patterns are base" Paren l e -> do p <- checkPat e [] return (PParen l p) AsPat l n e -> do p <- checkPat e [] return (PAsPat l n p) WildCard l -> return (PWildCard l) IrrPat l e -> do p <- checkPat e [] return (PIrrPat l p) ViewPat l e p -> do e1 <- checkExpr e return (PViewPat l e1 p) RecConstr l c fs -> do fs' <- mapM checkPatField fs return (PRec l c fs') NegApp l (Lit _ lit) -> let siSign = last . srcInfoPoints $ l lSign = infoSpan siSign [siSign] in do when (not . isNegatableLiteral $ lit) (patFail $ prettyPrint e') return (PLit l (Negative lSign) lit) ExpTypeSig l e t -> do -- patterns cannot have signatures unless ScopedTypeVariables is enabled. checkEnabled ScopedTypeVariables p <- checkPat e [] return (PatTypeSig l p t) -- Hsx XTag l n attrs mattr cs -> do pattrs <- mapM checkPAttr attrs pcs <- mapM (\c -> checkPat c []) cs mpattr <- maybe (return Nothing) (\e -> do p <- checkPat e [] return $ Just p) mattr let cps = mkChildrenPat pcs return $ PXTag l n pattrs mpattr cps XETag l n attrs mattr -> do pattrs <- mapM checkPAttr attrs mpattr <- maybe (return Nothing) (\e -> do p <- checkPat e [] return $ Just p) mattr return $ PXETag l n pattrs mpattr XPcdata l pcdata -> return $ PXPcdata l pcdata XExpTag l e -> do p <- checkPat e [] return $ PXPatTag l p XRPats l es -> do rps <- mapM checkRPattern es return (PXRPats l $ map fixRPOpPrec rps) -- Template Haskell SpliceExp l e -> return $ PSplice l e QuasiQuote l n q -> return $ PQuasiQuote l n q -- BangPatterns BangPat l e -> do p <- checkPat e [] return $ PBangPat l p PreOp l (QVarOp _ (UnQual _ (Symbol _ "!"))) e -> do checkEnabled BangPatterns p <- checkPat e [] return $ PBangPat l p e -> patFail $ prettyPrint e checkPat e _ = patFail $ prettyPrint e isNegatableLiteral :: Literal a -> Bool isNegatableLiteral (Int _ _ _) = True isNegatableLiteral (Frac _ _ _) = True isNegatableLiteral (PrimInt _ _ _) = True isNegatableLiteral (PrimFloat _ _ _) = True isNegatableLiteral (PrimDouble _ _ _) = True isNegatableLiteral _ = False splitBang :: PExp L -> [PExp L] -> (PExp L, [PExp L]) splitBang (App _ f x) es = splitBang f (x:es) splitBang e es = (e, es) checkPatField :: PFieldUpdate L -> P (PatField L) checkPatField (FieldUpdate l n e) = do p <- checkPat e [] return (PFieldPat l n p) checkPatField (FieldPun l n) = return (PFieldPun l n) checkPatField (FieldWildcard l) = return (PFieldWildcard l) checkPAttr :: ParseXAttr L -> P (PXAttr L) checkPAttr (XAttr l n v) = do p <- checkPat v [] return $ PXAttr l n p patFail :: String -> P a patFail s = fail $ "Parse error in pattern: " ++ s checkRPattern :: PExp L -> P (RPat L) checkRPattern e' = case e' of SeqRP l es -> do rps <- mapM checkRPattern es return $ RPSeq l rps PostOp l e op -> do rpop <- checkRPatOp op rp <- checkRPattern e return $ RPOp l rp rpop GuardRP l e gs -> do rp <- checkPattern e return $ RPGuard l rp gs EitherRP l e1 e2 -> do rp1 <- checkRPattern e1 rp2 <- checkRPattern e2 return $ RPEither l rp1 rp2 CAsRP l n e -> do rp <- checkRPattern e return $ RPCAs l n rp AsPat l n e -> do rp <- checkRPattern e return $ RPAs l n rp Paren l e -> do rp <- checkRPattern e return $ RPParen l rp _ -> do p <- checkPattern e' return $ RPPat (ann p) p checkRPatOp :: QOp L -> P (RPatOp L) checkRPatOp o@(QVarOp l (UnQual _ (Symbol _ sym))) = case sym of "*" -> return $ RPStar l "*!" -> return $ RPStarG l "+" -> return $ RPPlus l "+!" -> return $ RPPlusG l "?" -> return $ RPOpt l "?!" -> return $ RPOptG l _ -> rpOpFail o checkRPatOp o = rpOpFail o rpOpFail :: Pretty a => a -> P b rpOpFail sym = fail $ "Unrecognized regular pattern operator: " ++ prettyPrint sym fixRPOpPrec :: RPat L -> RPat L fixRPOpPrec rp' = case rp' of RPOp l rp rpop -> fPrecOp rp (flip (RPOp l) rpop) RPEither l rp1 rp2 -> RPEither l (fixRPOpPrec rp1) (fixRPOpPrec rp2) RPSeq l rps -> RPSeq l $ map fixRPOpPrec rps RPCAs l n rp -> RPCAs l n $ fixRPOpPrec rp RPAs l n rp -> RPAs l n $ fixRPOpPrec rp RPParen l rp -> RPParen l $ fixRPOpPrec rp _ -> rp' where fPrecOp :: RPat L -> (RPat L -> RPat L) -> RPat L fPrecOp (RPOp l rp rpop) f = fPrecOp rp (f . flip (RPOp l) rpop) fPrecOp (RPCAs l n rp) f = fPrecAs rp f (RPCAs l n) fPrecOp (RPAs l n rp) f = fPrecAs rp f (RPAs l n) fPrecOp rp f = f $ fixRPOpPrec rp fPrecAs :: RPat L -> (RPat L -> RPat L) -> (RPat L -> RPat L) -> RPat L fPrecAs (RPCAs l n rp) f g = fPrecAs rp f (g . RPCAs l n) fPrecAs (RPAs l n rp) f g = fPrecAs rp f (g . RPAs l n) fPrecAs rp f g = g . f $ fixRPOpPrec rp mkChildrenPat :: [Pat L] -> [Pat L] mkChildrenPat ps' = mkCPAux ps' [] where mkCPAux :: [Pat L] -> [Pat L] -> [Pat L] mkCPAux [] qs = reverse qs mkCPAux (p:ps) qs = case p of (PRPat l rps) -> [mkCRP l ps (reverse rps ++ map (\q -> RPPat (ann q) q) qs)] _ -> mkCPAux ps (p:qs) mkCRP :: L -> [Pat L] -> [RPat L] -> Pat L mkCRP l [] rps = PXRPats l $ reverse rps mkCRP _ (p:ps) rps = case p of (PXRPats l rqs) -> mkCRP l ps (reverse rqs ++ rps) _ -> mkCRP (ann p) ps (RPPat (ann p) p : rps) ----------------------------------------------------------------------------- -- Check Expression Syntax checkExpr :: PExp L -> P (S.Exp L) checkExpr e' = case e' of Var l v -> return $ S.Var l v OverloadedLabel l v -> return $ S.OverloadedLabel l v IPVar l v -> return $ S.IPVar l v Con l c -> return $ S.Con l c Lit l lit -> return $ S.Lit l lit InfixApp l e1 op e2 -> check2Exprs e1 e2 (flip (S.InfixApp l) op) App l e1 e2 -> check2Exprs e1 e2 (S.App l) NegApp _ (Lit _ (PrimWord _ _ _)) -> fail $ "Parse error: negative primitive word literal: " ++ prettyPrint e' NegApp l e -> check1Expr e (S.NegApp l) Lambda loc ps e -> check1Expr e (S.Lambda loc ps) Let l bs e -> check1Expr e (S.Let l bs) If l e1 e2 e3 -> check3Exprs e1 e2 e3 (S.If l) MultiIf l alts -> return (S.MultiIf l alts) Case l e alts -> do e1 <- checkExpr e return (S.Case l e1 alts) Do l stmts -> checkDo stmts >> return (S.Do l stmts) MDo l stmts -> checkDo stmts >> return (S.MDo l stmts) TupleSection l bx mes -> if Nothing `notElem` mes then checkManyExprs (map fromJust mes) (S.Tuple l bx) else do checkEnabled TupleSections mes' <- mapM mCheckExpr mes return $ S.TupleSection l bx mes' UnboxedSum l before after e -> S.UnboxedSum l before after <$> checkExpr e List l es -> checkManyExprs es (S.List l) ParArray l es -> checkManyExprs es (S.ParArray l) -- Since we don't parse things as left or right sections, we need to mangle them into that. Paren l e -> case e of PostOp _ e1 op -> check1Expr e1 (flip (S.LeftSection l) op) PreOp _ op e2 -> check1Expr e2 (S.RightSection l op) _ -> check1Expr e (S.Paren l) RecConstr l c fields -> do fields1 <- mapM checkField fields return (S.RecConstr l c fields1) RecUpdate l e fields -> do fields1 <- mapM checkField fields e1 <- checkExpr e return (S.RecUpdate l e1 fields1) EnumFrom l e -> check1Expr e (S.EnumFrom l) EnumFromTo l e1 e2 -> check2Exprs e1 e2 (S.EnumFromTo l) EnumFromThen l e1 e2 -> check2Exprs e1 e2 (S.EnumFromThen l) EnumFromThenTo l e1 e2 e3 -> check3Exprs e1 e2 e3 (S.EnumFromThenTo l) ParArrayFromTo l e1 e2 -> check2Exprs e1 e2 (S.ParArrayFromTo l) ParArrayFromThenTo l e1 e2 e3 -> check3Exprs e1 e2 e3 (S.ParArrayFromThenTo l) -- a parallel list comprehension, which could be just a simple one ParComp l e qualss -> do e1 <- checkExpr e case qualss of [quals] -> return (S.ListComp l e1 quals) _ -> return (S.ParComp l e1 qualss) ParArrayComp l e qualss -> do e1 <- checkExpr e return (S.ParArrayComp l e1 qualss) ExpTypeSig loc e ty -> do e1 <- checkExpr e return (S.ExpTypeSig loc e1 ty) --Template Haskell BracketExp l e -> return $ S.BracketExp l e SpliceExp l e -> return $ S.SpliceExp l e TypQuote l q -> return $ S.TypQuote l q VarQuote l q -> return $ S.VarQuote l q QuasiQuote l n q -> return $ S.QuasiQuote l n q -- Hsx XTag l n attrs mattr cs -> do attrs1 <- mapM checkAttr attrs cs1 <- mapM checkExpr cs mattr1 <- maybe (return Nothing) (\e -> checkExpr e >>= return . Just) mattr return $ S.XTag l n attrs1 mattr1 cs1 XETag l n attrs mattr -> do attrs1 <- mapM checkAttr attrs mattr1 <- maybe (return Nothing) (\e -> checkExpr e >>= return . Just) mattr return $ S.XETag l n attrs1 mattr1 XPcdata l p -> return $ S.XPcdata l p XExpTag l e -> do e1 <- checkExpr e return $ S.XExpTag l e1 XChildTag l es -> do es1 <- mapM checkExpr es return $ S.XChildTag l es1 -- Pragmas CorePragma l s e -> check1Expr e (S.CorePragma l s) SCCPragma l s e -> check1Expr e (S.SCCPragma l s) GenPragma l s xx yy e -> check1Expr e (S.GenPragma l s xx yy) -- UnknownExpPragma n s -> return $ S.UnknownExpPragma n s -- Arrows Proc l p e -> do e1 <- checkExpr e return $ S.Proc l p e1 LeftArrApp l e1 e2 -> check2Exprs e1 e2 (S.LeftArrApp l) RightArrApp l e1 e2 -> check2Exprs e1 e2 (S.RightArrApp l) LeftArrHighApp l e1 e2 -> check2Exprs e1 e2 (S.LeftArrHighApp l) RightArrHighApp l e1 e2 -> check2Exprs e1 e2 (S.RightArrHighApp l) ArrOp l e -> S.ArrOp l <$> checkExpr e -- LamdaCase LCase l alts -> return $ S.LCase l alts -- Hole TypeApp l ty -> return $ S.TypeApp l ty _ -> fail $ "Parse error in expression: " ++ prettyPrint e' checkAttr :: ParseXAttr L -> P (S.XAttr L) checkAttr (XAttr l n v) = do v' <- checkExpr v return $ S.XAttr l n v' checkDo :: [Stmt t] -> P () checkDo [] = fail "Parse error: Last statement in a do-block must be an expression" checkDo [Qualifier _ _] = return () checkDo (_:xs) = checkDo xs -- type signature for polymorphic recursion!! check1Expr :: PExp L -> (S.Exp L -> a) -> P a check1Expr e1 f = do e1' <- checkExpr e1 return (f e1') check2Exprs :: PExp L -> PExp L -> (S.Exp L -> S.Exp L -> a) -> P a check2Exprs e1 e2 f = do e1' <- checkExpr e1 e2' <- checkExpr e2 return (f e1' e2') check3Exprs :: PExp L -> PExp L -> PExp L -> (S.Exp L -> S.Exp L -> S.Exp L -> a) -> P a check3Exprs e1 e2 e3 f = do e1' <- checkExpr e1 e2' <- checkExpr e2 e3' <- checkExpr e3 return (f e1' e2' e3') checkManyExprs :: [PExp L] -> ([S.Exp L] -> a) -> P a checkManyExprs es f = do es' <- mapM checkExpr es return (f es') mCheckExpr :: Maybe (PExp L) -> P (Maybe (S.Exp L)) mCheckExpr Nothing = return Nothing mCheckExpr (Just e) = checkExpr e >>= return . Just checkRuleExpr :: PExp L -> P (S.Exp L) checkRuleExpr = checkExpr readTool :: Maybe String -> Maybe Tool readTool = fmap readC where readC str = case str of "GHC" -> GHC "HUGS" -> HUGS "NHC98" -> NHC98 "YHC" -> YHC "HADDOCK" -> HADDOCK _ -> UnknownTool str checkField :: PFieldUpdate L -> P (S.FieldUpdate L) checkField (FieldUpdate l n e) = check1Expr e (S.FieldUpdate l n) checkField (FieldPun l n) = return $ S.FieldPun l n checkField (FieldWildcard l) = return $ S.FieldWildcard l getGConName :: S.Exp L -> P (QName L) getGConName (S.Con _ n) = return n getGConName (S.List l []) = return (list_cons_name l) getGConName _ = fail "Expression in reification is not a name" ----------------------------------------------------------------------------- -- Check Equation Syntax checkValDef :: L -> PExp L -> Maybe (S.Type L, S) -> Rhs L -> Maybe (Binds L) -> P (Decl L) checkValDef l lhs optsig rhs whereBinds = do mlhs <- isFunLhs lhs [] let whpt = srcInfoPoints l case mlhs of Just (f,es,b,pts) -> do ps <- mapM checkPattern es let l' = l { srcInfoPoints = pts ++ whpt } case optsig of -- only pattern bindings can have signatures Nothing -> return (FunBind l $ if b then [Match l' f ps rhs whereBinds] else let (a:bs) = ps in [InfixMatch l' a f bs rhs whereBinds]) Just _ -> fail "Cannot give an explicit type signature to a function binding" Nothing -> do lhs1 <- checkPattern lhs let lhs' = case optsig of Nothing -> lhs1 Just (ty, pt) -> let lp = (ann lhs1 <++> ann ty) <** [pt] in PatTypeSig lp lhs1 ty return (PatBind l lhs' rhs whereBinds) -- A variable binding is parsed as a PatBind. isFunLhs :: PExp L -> [PExp L] -> P (Maybe (Name L, [PExp L], Bool, [S])) isFunLhs (InfixApp _ l (QVarOp loc (UnQual _ op)) r) es | op =~= Symbol () "!" = do exts <- getExtensions if BangPatterns `elem` exts then let (b,bs) = splitBang r [] loc' = combSpanInfo loc (ann b) in isFunLhs l (BangPat loc' b : bs ++ es) else return $ Just (op, l:r:es, False, []) -- It's actually a definition of the operator ! | otherwise = let infos = srcInfoPoints loc op' = amap (\s -> s { srcInfoPoints = infos }) op in (return $ Just (op', l:r:es, False, [])) isFunLhs (App _ (Var l (UnQual _ f)) e) es = return $ Just (f, e:es, True, srcInfoPoints l) isFunLhs (App _ f e) es = isFunLhs f (e:es) isFunLhs (Var _ (UnQual _ f)) es@(_:_) = return $ Just (f, es, True, []) isFunLhs (Paren l f) es@(_:_) = do mlhs <- isFunLhs f es case mlhs of Just (f',es',b,pts) -> let [x,y] = srcInfoPoints l in return $ Just (f',es',b,x:pts++[y]) _ -> return Nothing isFunLhs _ _ = return Nothing -- Separating between signature declarations and value definitions in -- a post-processing step checkSigVar :: PExp L -> P (Name L) checkSigVar (Var _ (UnQual l n)) = return $ fmap (const l) n checkSigVar e = fail $ "Left-hand side of type signature is not a variable: " ++ prettyPrint e checkExplicitPatSyn :: S -> S -> ([Decl L], [S]) -> S -> P (PatternSynDirection L) checkExplicitPatSyn whereLoc openLoc (decls, semis) closeLoc = let l = whereLoc <^^> closeLoc <** ([whereLoc, openLoc] ++ semis ++ [closeLoc]) in S.ExplicitBidirectional l <$> mapM checkDecls decls where checkDecls :: Decl L -> P (Decl L) checkDecls p@(PatBind _ pat _ _) = case pat of PApp _ _ _ -> return p PInfixApp _ _ _ _ -> return p _ -> fail "Illegal pattern binding in PatternSynonym" checkDecls _ = fail "pattern synonym 'where' clause must contain a PatBind" ----------------------------------------------------------------------------- -- In a class or instance body, a pattern binding must be of a variable. checkClassBody :: [ClassDecl L] -> P [ClassDecl L] checkClassBody decls = do mapM_ checkClassMethodDef decls return decls where checkClassMethodDef (ClsDecl _ decl) = checkMethodDef decl checkClassMethodDef _ = return () checkInstBody :: [InstDecl L] -> P [InstDecl L] checkInstBody decls = do mapM_ checkInstMethodDef decls return decls where checkInstMethodDef (InsDecl _ decl) = checkMethodDef decl checkInstMethodDef _ = return () checkMethodDef :: Decl L -> P () checkMethodDef (PatBind _ (PVar _ _) _ _) = return () checkMethodDef (PatBind loc _ _ _) = fail "illegal method definition" `atSrcLoc` fromSrcInfo loc checkMethodDef _ = return () checkDefSigDef :: Decl L -> P (Name L,S.Type L,S) checkDefSigDef (TypeSig loc [name] typ) = let (b:_) = srcInfoPoints loc in return (name,typ,b) checkDefSigDef (TypeSig _ _ _) = fail "default signature must be for a single name" checkDefSigDef _ = fail "default signature must be a type signature" ----------------------------------------------------------------------------- -- Check that an identifier or symbol is unqualified. -- For occasions when doing this in the grammar would cause conflicts. checkUnQual :: QName L -> P (Name L) checkUnQual (Qual _ _ _) = fail "Illegal qualified name" checkUnQual (UnQual l n) = return $ fmap (const l) n checkUnQual (Special _ _) = fail "Illegal special name" checkQualOrUnQual :: QName L -> P (QName L) checkQualOrUnQual n@(Qual _ _ _) = return n checkQualOrUnQual n@(UnQual _ _) = return n checkQualOrUnQual (Special _ _) = fail "Illegal special name" ----------------------------------------------------------------------------- -- Check that two xml tag names are equal checkEqNames :: XName L -> XName L -> P (XName L) checkEqNames n@(XName _ n1) (XName _ n2) | n1 == n2 = return n checkEqNames n@(XDomName _ d1 n1) (XDomName _ d2 n2) | n1 == n2 && d1 == d2 = return n checkEqNames n m = fail $ "opening tag '" ++ showTag n ++ "' does not match closing tag '" ++ showTag m ++ "'" where showTag (XName _ n') = n' showTag (XDomName _ d n') = d ++ ":" ++ n' ----------------------------------------------------------------------------- -- Miscellaneous utilities checkPrec :: Integer -> P Int checkPrec i | 0 <= i && i <= 9 = return (fromInteger i) | otherwise = fail ("Illegal precedence " ++ show i) mkRecConstrOrUpdate :: PExp L -> [PFieldUpdate L] -> P (PExp L) mkRecConstrOrUpdate (Con l c) fs = return (RecConstr l c fs) mkRecConstrOrUpdate e fs@(_:_) = return (RecUpdate (ann e) e fs) mkRecConstrOrUpdate _ _ = fail "Empty record update" updateQNameLoc :: l -> QName l -> QName l updateQNameLoc l (Qual _ mn n) = Qual l mn n updateQNameLoc l (UnQual _ n) = UnQual l n updateQNameLoc l (Special _ s) = Special l s ----------------------------------------------------------------------------- -- For standalone top level Decl parser, check that we actually only -- parsed one Decl. This is needed since we parse matches of the same -- FunBind as multiple separate declarations, and merge them after. -- This should be called *after* checkRevDecls. checkSingleDecl :: [Decl L] -> P (Decl L) checkSingleDecl [d] = return d checkSingleDecl ds = fail $ "Expected a single declaration, found " ++ show (length ds) -- Reverse a list of declarations, merging adjacent FunBinds of the -- same name and checking that their arities match. checkRevDecls :: [Decl L] -> P [Decl L] checkRevDecls = mergeFunBinds [] where mergeFunBinds revDs [] = return revDs mergeFunBinds revDs (FunBind l' ms1@(Match _ name ps _ _:_):ds1) = mergeMatches ms1 ds1 l' where arity = length ps mergeMatches ms' (FunBind _ ms@(Match loc name' ps' _ _:_):ds) l | name' =~= name = do ignoreArity <- getIgnoreFunctionArity if length ps' == arity || ignoreArity then mergeMatches (ms++ms') ds (loc <++> l) else fail ("arity mismatch for '" ++ prettyPrint name ++ "'") `atSrcLoc` fromSrcInfo loc mergeMatches ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds mergeFunBinds revDs (FunBind l' ims1@(InfixMatch _ _ name _ _ _:_):ds1) = mergeInfix ims1 ds1 l' where mergeInfix ims' (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_):ds) l | name' =~= name = mergeInfix (ims++ims') ds (loc <++> l) mergeInfix ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds mergeFunBinds revDs (d:ds) = mergeFunBinds (d:revDs) ds checkRevClsDecls :: [ClassDecl L] -> P [ClassDecl L] checkRevClsDecls = mergeClsFunBinds [] where mergeClsFunBinds revDs [] = return revDs mergeClsFunBinds revDs (ClsDecl l' (FunBind _ ms1@(Match _ name ps _ _:_)):ds1) = mergeMatches ms1 ds1 l' where arity = length ps mergeMatches ms' (ClsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l | name' =~= name = do ignoreArity <- getIgnoreFunctionArity if length ps' == arity || ignoreArity then mergeMatches (ms++ms') ds (loc <++> l) else fail ("arity mismatch for '" ++ prettyPrint name ++ "'") `atSrcLoc` fromSrcInfo loc mergeMatches ms' ds l = mergeClsFunBinds (ClsDecl l (FunBind l ms'):revDs) ds mergeClsFunBinds revDs (ClsDecl l' (FunBind _ ims1@(InfixMatch _ _ name _ _ _:_)):ds1) = mergeInfix ims1 ds1 l' where mergeInfix ims' (ClsDecl _ (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_)):ds) l | name' =~= name = mergeInfix (ims++ims') ds (loc <++> l) mergeInfix ms' ds l = mergeClsFunBinds (ClsDecl l (FunBind l ms'):revDs) ds mergeClsFunBinds revDs (d:ds) = mergeClsFunBinds (d:revDs) ds checkRevInstDecls :: [InstDecl L] -> P [InstDecl L] checkRevInstDecls = mergeInstFunBinds [] where mergeInstFunBinds :: [InstDecl L] -> [InstDecl L] -> P [InstDecl L] mergeInstFunBinds revDs [] = return revDs mergeInstFunBinds revDs (InsDecl l' (FunBind _ ms1@(Match _ name ps _ _:_)):ds1) = mergeMatches ms1 ds1 l' where arity = length ps mergeMatches ms' (InsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l | name' =~= name = do ignoreArity <- getIgnoreFunctionArity if length ps' == arity || ignoreArity then mergeMatches (ms++ms') ds (loc <++> l) else fail ("arity mismatch for '" ++ prettyPrint name ++ "'") `atSrcLoc` fromSrcInfo loc mergeMatches ms' ds l = mergeInstFunBinds (InsDecl l (FunBind l ms'):revDs) ds mergeInstFunBinds revDs (InsDecl l' (FunBind _ ims1@(InfixMatch _ _ name _ _ _:_)):ds1) = mergeInfix ims1 ds1 l' where mergeInfix ims' (InsDecl _ (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_)):ds) l | name' =~= name = mergeInfix (ims++ims') ds (loc <++> l) mergeInfix ms' ds l = mergeInstFunBinds (InsDecl l (FunBind l ms'):revDs) ds mergeInstFunBinds revDs (d:ds) = mergeInstFunBinds (d:revDs) ds ---------------------------------------------------------------- -- Check that newtype declarations have -- the right number (1) of constructors checkDataOrNew :: DataOrNew L -> [QualConDecl L] -> P () checkDataOrNew (DataType _) _ = return () checkDataOrNew (NewType _) [QualConDecl _ _ _ x] = cX x >> return () where cX (ConDecl _ _ [_]) = return () cX (RecDecl _ _ [_]) = return () cX _ = fail "newtype declaration constructor must have exactly one parameter." checkDataOrNew _ _ = fail "newtype declaration must have exactly one constructor." checkDataOrNewG :: DataOrNew L -> [GadtDecl L] -> P () checkDataOrNewG (DataType _) _ = return () checkDataOrNewG (NewType _) [_] = return () checkDataOrNewG _ _ = fail "newtype declaration must have exactly one constructor." checkSimpleType :: PType L -> P (DeclHead L) checkSimpleType = checkSimple "test" --------------------------------------- -- Check actual types -- | Add a strictness/unpack annotation on a type. bangType :: Maybe (L -> BangType L, S) -> Maybe (Unpackedness L) -> PType L -> PType L bangType mstrict munpack ty = case (mstrict,munpack) of (Nothing, Just upack) -> TyBang (ann upack <++> ann ty) (NoStrictAnnot noSrcSpan) upack ty (Just (strict, pos), _) -> TyBang (fmap ann munpack noInfoSpan pos <++> ann ty) (strict (noInfoSpan pos)) (fromMaybe (NoUnpackPragma noSrcSpan) munpack) ty (Nothing, Nothing) -> ty checkType :: PType L -> P (S.Type L) checkType t = checkT t False checkT :: PType L -> Bool -> P (S.Type L) checkT t simple = case t of TyForall l Nothing cs pt -> do when simple $ checkEnabled ExplicitForAll ctxt <- checkContext cs check1Type pt (S.TyForall l Nothing ctxt) TyForall l tvs cs pt -> do checkEnabled ExplicitForAll ctxt <- checkContext cs check1Type pt (S.TyForall l tvs ctxt) TyStar l -> return $ S.TyStar l TyFun l at rt -> check2Types at rt (S.TyFun l) TyTuple l b pts -> checkTypes pts >>= return . S.TyTuple l b TyUnboxedSum l es -> checkTypes es >>= return . S.TyUnboxedSum l TyList l pt -> check1Type pt (S.TyList l) TyParArray l pt -> check1Type pt (S.TyParArray l) TyApp l ft at -> check2Types ft at (S.TyApp l) TyVar l n -> return $ S.TyVar l n TyCon l n -> do checkAndWarnTypeOperators n return $ S.TyCon l n TyParen l pt -> check1Type pt (S.TyParen l) -- Here we know that t will be used as an actual type (and not a data constructor) -- so we can check that TypeOperators are enabled. TyInfix l at op bt -> checkAndWarnTypeOperators (getMaybePromotedQName op) >> check2Types at bt (flip (S.TyInfix l) op) TyKind l pt k -> check1Type pt (flip (S.TyKind l) k) TyPromoted l p -> return $ S.TyPromoted l p -- ?? TyEquals l at bt -> check2Types at bt (S.TyEquals l) TySplice l s -> do checkEnabled TemplateHaskell return $ S.TySplice l s TyBang l b u t' -> check1Type t' (S.TyBang l b u) TyWildCard l mn -> return $ S.TyWildCard l mn TyQuasiQuote l n s -> do checkEnabled QuasiQuotes return $ S.TyQuasiQuote l n s _ -> fail $ "Parse error in type: " ++ prettyPrint t getMaybePromotedQName :: MaybePromotedName l -> QName l getMaybePromotedQName (PromotedName _ q) = q getMaybePromotedQName (UnpromotedName _ q) = q check1Type :: PType L -> (S.Type L -> S.Type L) -> P (S.Type L) check1Type pt f = checkT pt True >>= return . f check2Types :: PType L -> PType L -> (S.Type L -> S.Type L -> S.Type L) -> P (S.Type L) check2Types at bt f = checkT at True >>= \a -> checkT bt True >>= \b -> return (f a b) checkTypes :: [PType L] -> P [S.Type L] checkTypes = mapM (flip checkT True) checkTyVar :: Name L -> P (PType L) checkTyVar n = do e <- getExtensions return $ case n of Ident il ('_':ident) | NamedWildCards `elem` e -> TyWildCard il (Just (Ident (reduceSrcSpanInfo il) ident)) _ -> TyVar (ann n) n where -- Reduces the length of the SrcSpanInfo by 1 so that it just covers the identifier. reduceSrcSpanInfo spaninfo = let ss = srcInfoSpan spaninfo ss' = ss { srcSpanStartColumn = srcSpanStartColumn ss + 1 } in spaninfo { srcInfoSpan = ss' } --------------------------------------- -- Check kinds -- ConstraintKinds allow the kind "Constraint", but not "Nat", etc. Specifically -- test for that. checkKind :: Kind l -> P () checkKind k = case k of S.TyVar _ q | constrKind q -> checkEnabledOneOf [ConstraintKinds, DataKinds] where constrKind name = case name of Ident _ n -> n == "Constraint" _ -> False _ -> checkEnabled DataKinds --------------------------------------- -- Converting a complete page checkPageModule :: PExp L -> ([ModulePragma L],[S],L) -> P (Module L) checkPageModule xml (os,ss,inf) = do mod <- getModuleName xml' <- checkExpr xml case xml' of S.XTag l xn ats mattr cs -> return $ XmlPage (inf<++>l<**(srcInfoPoints l ++ ss)) (ModuleName l mod) os xn ats mattr cs S.XETag l xn ats mattr -> return $ XmlPage (inf<++>l<**(srcInfoPoints l ++ ss)) (ModuleName l mod) os xn ats mattr [] _ -> fail "Unexpected expression; tag is expected" checkHybridModule :: PExp L -> Module L -> S -> S -> P (Module L) checkHybridModule xml (Module inf mh os is ds) s1 s2 = do xml' <- checkExpr xml case xml' of S.XTag l xn ats mattr cs -> return $ XmlHybrid (inf<++>l<**(s1 : srcInfoPoints inf ++ s2 : srcInfoPoints l)) mh os is ds xn ats mattr cs S.XETag l xn ats mattr -> return $ XmlHybrid (inf<++>l<**(s1 : srcInfoPoints inf ++ s2 : srcInfoPoints l)) mh os is ds xn ats mattr [] _ -> fail "Unexpected expression; tag is expected" checkHybridModule _ _ _ _ = fail "Hybrid module expected" --------------------------------------- -- Handle dash-identifiers mkDVar :: [String] -> String mkDVar = intercalate "-" --------------------------------------- -- Combine adjacent for-alls. -- -- A valid type must have one for-all at the top of the type, or of the fn arg types mkTyForall :: L -> Maybe [TyVarBind L] -> Maybe (PContext L) -> PType L -> PType L mkTyForall l mtvs ctxt ty = case (ctxt, ty) of (Nothing, TyForall _ Nothing ctxt2 ty2) -> TyForall l mtvs ctxt2 ty2 _ -> TyForall l mtvs ctxt ty -- Make a role annotation mkRoleAnnotDecl :: S -> S -> QName L -> [(Maybe String, L)] -> P (Decl L) mkRoleAnnotDecl l1 l2 tycon roles = do roles' <- mapM parse_role roles return (RoleAnnotDecl loc' tycon roles') where loc' = case roles of [] -> (l1 <^^> l2 <++> ann tycon) <** [l1, l2] _ -> (l1 <^^> l2 <++> ann tycon <++> foldl1 (<++>) (map snd roles)) <** [l1, l2] possible_roles = [ ("phantom", S.Phantom) , ("representational", S.Representational) , ("nominal", S.Nominal)] parse_role (Nothing, loc_role) = return $ S.RoleWildcard loc_role parse_role (Just role, loc_role) = case lookup role possible_roles of Just found_role -> return $ found_role loc_role Nothing -> fail ("Illegal role name " ++ role) mkAssocType :: S -> PType L -> (Maybe (ResultSig L), Maybe (S, S.Type L), Maybe (InjectivityInfo L)) -> P (ClassDecl L) mkAssocType tyloc ty (mres, mty, minj) = case (mres,mty, minj) of -- No additional information (Nothing, Nothing, Nothing) -> do dh <- checkSimpleType ty return $ ClsTyFam (noInfoSpan tyloc <++> ann ty) dh Nothing Nothing -- Type default (_, Just (eqloc, rhsty), Nothing) -> do ty' <- checkType ty let tyeq = TypeEqn (ann ty <++> ann rhsty <** [eqloc]) ty' rhsty return $ ClsTyDef (noInfoSpan tyloc <++> ann ty <** [tyloc]) tyeq -- Declaration with kind sig (Just ressig, _, _) -> do dh <- checkSimpleType ty return $ ClsTyFam (noInfoSpan tyloc <++> ann ressig <** [tyloc]) dh (Just ressig) Nothing -- Decl with inj info (Nothing, Just (eqloc, rhsty), Just injinfo) -> do ressig <- checkKTyVar eqloc rhsty dh <- checkSimpleType ty return $ ClsTyFam (noInfoSpan tyloc <++> ann injinfo <** [tyloc]) dh (Just ressig) minj _ -> error "mkAssocType" where checkKTyVar :: S -> S.Type L -> P (ResultSig L) checkKTyVar eqloc rhsty = case rhsty of S.TyVar l n -> return $ TyVarSig (noInfoSpan eqloc <++> l <** [eqloc]) (UnkindedVar l n) S.TyKind l (S.TyVar _ n) k -> return $ TyVarSig (noInfoSpan eqloc <++> l <** [eqloc]) (KindedVar l n k) _ -> fail ("Result of type family must be a type variable") -- | Transform btype with strict_mark's into HsEqTy's -- (((~a) ~b) c) ~d ==> ((~a) ~ (b c)) ~ d splitTilde :: PType L -> PType L splitTilde t = go t where go (TyApp loc t1 t2) | TyBang _ (LazyTy eqloc) (NoUnpackPragma _) t2' <- t2 = TyEquals (loc <** [srcInfoSpan eqloc]) (go t1) t2' | otherwise = case go t1 of TyEquals eqloc tl tr -> TyEquals (eqloc <++> ann t2 <** srcInfoPoints eqloc) tl (TyApp (ann tr <++> ann t2) tr t2) t' -> TyApp loc t' t2 go t' = t' -- Expects the arguments in the right order mkEThingWith :: L -> QName L -> [Either S (CName L)] -> P (ExportSpec L) mkEThingWith loc qn mcns = do when (isWc wc && not (null cnames)) (checkEnabled PatternSynonyms) return $ EThingWith loc wc qn cnames where isWc (NoWildcard {}) = False isWc _ = True wc :: EWildcard L wc = maybe (NoWildcard noSrcSpan) (\(n,Left s) -> EWildcard (noInfoSpan s) n) (findWithIndex 0 checkLeft mcns) checkLeft :: Either a b -> Bool checkLeft (Left _) = True checkLeft _ = False cnames = rights mcns findWithIndex :: Int -> (a -> Bool) -> [a] -> Maybe (Int, a) findWithIndex _ _ [] = Nothing findWithIndex n p (x:xs) | p x = Just (n, x) | otherwise = findWithIndex (n + 1) p xs data SumOrTuple l = SSum Int Int (PExp l) | STuple [Maybe (PExp l)] mkSumOrTuple :: Boxed -> L -> SumOrTuple L -> P (PExp L) mkSumOrTuple Unboxed s (SSum before after e) = return (UnboxedSum s before after e) mkSumOrTuple boxity s (STuple ms) = return $ TupleSection s boxity ms mkSumOrTuple Boxed _s (SSum {}) = fail "Boxed sums are not implemented" haskell-src-exts-1.23.1/src/Language/Haskell/Exts/InternalParser.ly0000644000000000000000000033640013665335376023323 0ustar0000000000000000> { > {-# LANGUAGE CPP #-} > {-# OPTIONS_HADDOCK hide #-} > ----------------------------------------------------------------------------- > -- | > -- Module : Language.Haskell.Exts.Annotated.Parser > -- Copyright : (c) Niklas Broberg 2004-2009, > -- Original (c) Simon Marlow, Sven Panne 1997-2000 > -- License : BSD-style (see the file LICENSE.txt) > -- > -- Maintainer : Niklas Broberg, d00nibro@chalmers.se > -- Stability : stable > -- Portability : portable > -- > -- > ----------------------------------------------------------------------------- > > module Language.Haskell.Exts.InternalParser ( > mparseModule, > mparseExp, > mparsePat, > mparseDecl, > mparseType, > mparseStmt, > mparseImportDecl, > ngparseModulePragmas, > ngparseModuleHeadAndImports, > ngparsePragmasAndModuleHead, > ngparsePragmasAndModuleName > ) where > > import Language.Haskell.Exts.Syntax hiding ( Type(..), Exp(..), Asst(..), XAttr(..), FieldUpdate(..) ) > import Language.Haskell.Exts.Syntax ( Type, Exp, Asst ) > import Language.Haskell.Exts.ParseMonad > import Language.Haskell.Exts.InternalLexer > import Language.Haskell.Exts.ParseUtils > import Language.Haskell.Exts.Fixity > import Language.Haskell.Exts.SrcLoc > import Language.Haskell.Exts.Extension > import Control.Monad ( liftM, (<=<), when ) > import Control.Applicative ( (<$>) ) > import Data.Maybe > #if MIN_VERSION_base(4,11,0) > import Prelude hiding ((<>)) > #endif import Debug.Trace (trace) > } ----------------------------------------------------------------------------- This module comprises a parser for Haskell 98 with the following extensions * Multi-parameter type classes with functional dependencies * Implicit parameters * Pattern guards * Mdo notation * FFI * HaRP * HSP Most of the code is blatantly stolen from the GHC module Language.Haskell.Parser. Some of the code for extensions is greatly influenced by GHC's internal parser library, ghc/compiler/parser/Parser.y. ----------------------------------------------------------------------------- Conflicts: 7 shift/reduce 2 for ambiguity in 'case x of y | let z = y in z :: Bool -> b' [State 99, 186] (don't know whether to reduce 'Bool' as a btype or shift the '->'. Similarly lambda and if. The default resolution in favour of the shift means that a guard can never end with a type signature. In mitigation: it's a rare case and no Haskell implementation allows these, because it would require unbounded lookahead.) There are 2 conflicts rather than one because contexts are parsed as btypes (cf ctype). 1 for ambiguity in 'let ?x ...' [State 604] the parser can't tell whether the ?x is the lhs of a normal binding or an implicit binding. Fortunately resolving as shift gives it the only sensible meaning, namely the lhs of an implicit binding. 1 for ambiguity using hybrid modules [State 159] For HSP pages that start with a <% %> block, the parser cannot tell whether to reduce a srcloc or shift the starting <%. Since any other body could not start with <%, shifting is the only sensible thing to do. 1 for ambiguity using toplevel xml modules [State 158] For HSP xml pages starting with a <, the parser cannot tell whether to shift that < or reduce an implicit 'open'. Since no other body could possibly start with <, shifting is the only sensible thing to do. 1 for ambiguity in '{-# RULES "name" [ ... #-}' [State 177] we don't know whether the '[' starts the activation or not: it might be the start of the declaration with the activation being empty. Resolving with shift means the declaration cannot start with '['. 1 for ambiguity in '{-# RULES "name" forall = ... #-}' [State 544] since 'forall' is a valid variable name, we don't know whether to treat a forall on the input as the beginning of a quantifier or the beginning of the rule itself. Resolving to shift means it's always treated as a quantifier, hence the above is disallowed. This saves explicitly defining a grammar for the rule lhs that doesn't include 'forall'. ----------------------------------------------------------------------------- > %token > VARID { Loc _ (VarId _) } -- 1 > LABELVARID { Loc _ (LabelVarId _) } > QVARID { Loc _ (QVarId _) } > IDUPID { Loc _ (IDupVarId _) } -- duplicable implicit parameter ?x > ILINID { Loc _ (ILinVarId _) } -- linear implicit parameter %x > CONID { Loc _ (ConId _) } > QCONID { Loc _ (QConId _) } > DVARID { Loc _ (DVarId _) } -- VARID containing dashes > VARSYM { Loc _ (VarSym _) } > CONSYM { Loc _ (ConSym _) } > QVARSYM { Loc _ (QVarSym _) } -- 10 > QCONSYM { Loc _ (QConSym _) } > INT { Loc _ (IntTok _) } > RATIONAL { Loc _ (FloatTok _) } > CHAR { Loc _ (Character _) } > STRING { Loc _ (StringTok _) } > PRIMINT { Loc _ (IntTokHash _) } > PRIMWORD { Loc _ (WordTokHash _) } > PRIMFLOAT { Loc _ (FloatTokHash _) } > PRIMDOUBLE { Loc _ (DoubleTokHash _) } > PRIMCHAR { Loc _ (CharacterHash _) } -- 20 > PRIMSTRING { Loc _ (StringHash _) } Symbols > '(' { Loc $$ LeftParen } > ')' { Loc $$ RightParen } > '(#' { Loc $$ LeftHashParen } > '#)' { Loc $$ RightHashParen } > ';' { Loc $$ SemiColon } > '{' { Loc $$ LeftCurly } > '}' { Loc $$ RightCurly } -- 30 > vccurly { Loc $$ VRightCurly } -- a virtual close brace > '[' { Loc $$ LeftSquare } > ']' { Loc $$ RightSquare } > '[:' { Loc $$ ParArrayLeftSquare } > ':]' { Loc $$ ParArrayRightSquare } > ',' { Loc $$ Comma } > '_' { Loc $$ Underscore } > '`' { Loc $$ BackQuote } Reserved operators > '.' { Loc $$ Dot } > '..' { Loc $$ DotDot } > ':' { Loc $$ Colon } > '::' { Loc $$ DoubleColon } -- 40 > '=' { Loc $$ Equals } > '\\' { Loc $$ Backslash } > '|' { Loc $$ Bar } > '<-' { Loc $$ LeftArrow } > '->' { Loc $$ RightArrow } > '@' { Loc $$ At } > TYPEAPP { Loc $$ TApp } > '~' { Loc $$ Tilde } > '=>' { Loc $$ DoubleArrow } > '-' { Loc $$ Minus } > '!' { Loc $$ Exclamation } -- 50 > '*' { Loc $$ Star } Arrows > '-<' { Loc $$ LeftArrowTail } > '>-' { Loc $$ RightArrowTail } > '-<<' { Loc $$ LeftDblArrowTail } > '>>-' { Loc $$ RightDblArrowTail } > '(|' { Loc $$ OpenArrowBracket } > '|)' { Loc $$ CloseArrowBracket } Harp > '(/' { Loc $$ RPGuardOpen } > '/)' { Loc $$ RPGuardClose } > '@:' { Loc $$ RPCAt } Template Haskell > IDSPLICE { Loc _ (THIdEscape _) } -- $x > TIDSPLICE { Loc _ (THTIdEscape _) } -- $$x > '$(' { Loc $$ THParenEscape } -- 60 > '$$(' { Loc $$ THTParenEscape } > '[|' { Loc $$ THExpQuote } > '[||' { Loc $$ THTExpQuote } > '[p|' { Loc $$ THPatQuote } > '[t|' { Loc $$ THTypQuote } > '[d|' { Loc $$ THDecQuote } > '|]' { Loc $$ THCloseQuote } > '||]' { Loc $$ THTCloseQuote } > VARQUOTE { Loc $$ THVarQuote } -- 'x > TYPQUOTE { Loc $$ THTyQuote } -- ''T > QUASIQUOTE { Loc _ (THQuasiQuote _) } Hsx > PCDATA { Loc _ (XPCDATA _) } > '<' { Loc $$ XStdTagOpen } -- 70 > ' '<%' { Loc $$ XCodeTagOpen } > '<%>' { Loc $$ XChildTagOpen } > '>' { Loc $$ XStdTagClose } > '/>' { Loc $$ XEmptyTagClose } > '%>' { Loc $$ XCodeTagClose } > '<[' { Loc $$ XRPatOpen } > ']>' { Loc $$ XRPatClose } FFI > 'foreign' { Loc $$ KW_Foreign } > 'export' { Loc $$ KW_Export } -- 80 > 'safe' { Loc $$ KW_Safe } > 'unsafe' { Loc $$ KW_Unsafe } > 'threadsafe' { Loc $$ KW_Threadsafe } > 'interruptible' { Loc $$ KW_Interruptible } > 'stdcall' { Loc $$ KW_StdCall } > 'ccall' { Loc $$ KW_CCall } > 'cplusplus' { Loc $$ KW_CPlusPlus } > 'dotnet' { Loc $$ KW_DotNet } > 'jvm' { Loc $$ KW_Jvm } > 'js' { Loc $$ KW_Js } -- 90 > 'javascript' { Loc $$ KW_JavaScript } > 'capi' { Loc $$ KW_CApi } Reserved Ids > 'as' { Loc $$ KW_As } > 'by' { Loc $$ KW_By } -- transform list comprehensions > 'case' { Loc $$ KW_Case } > 'class' { Loc $$ KW_Class } > 'data' { Loc $$ KW_Data } > 'default' { Loc $$ KW_Default } > 'deriving' { Loc $$ KW_Deriving } > 'do' { Loc $$ KW_Do } > 'else' { Loc $$ KW_Else } -- 100 > 'family' { Loc $$ KW_Family } -- indexed type families > 'forall' { Loc $$ KW_Forall } -- universal/existential qualification > 'group' { Loc $$ KW_Group } -- transform list comprehensions > 'hiding' { Loc $$ KW_Hiding } > 'if' { Loc $$ KW_If } > 'import' { Loc $$ KW_Import } > 'in' { Loc $$ KW_In } > 'infix' { Loc $$ KW_Infix } > 'infixl' { Loc $$ KW_InfixL } > 'infixr' { Loc $$ KW_InfixR } -- 110 > 'instance' { Loc $$ KW_Instance } > 'let' { Loc $$ KW_Let } > 'mdo' { Loc $$ KW_MDo } > 'module' { Loc $$ KW_Module } -- 114 > 'newtype' { Loc $$ KW_NewType } > 'of' { Loc $$ KW_Of } > 'proc' { Loc $$ KW_Proc } -- arrows > 'rec' { Loc $$ KW_Rec } -- arrows or RecursiveDo > 'then' { Loc $$ KW_Then } > 'type' { Loc $$ KW_Type } -- 120 > 'using' { Loc $$ KW_Using } -- transform list comprehensions > 'where' { Loc $$ KW_Where } > 'qualified' { Loc $$ KW_Qualified } > 'role' { Loc $$ KW_Role } > 'pattern' { Loc $$ KW_Pattern } > 'stock' { Loc $$ KW_Stock } -- for DerivingStrategies extension > 'anyclass' { Loc $$ KW_Anyclass } -- for DerivingStrategies extension > 'via' { Loc $$ KW_Via } -- for DerivingStrategies extension Pragmas > '{-# INLINE' { Loc _ (INLINE _) } > '{-# INLINE CONLIKE' { Loc $$ INLINE_CONLIKE } > '{-# SPECIALISE' { Loc $$ SPECIALISE } > '{-# SPECIALISE INLINE' { Loc _ (SPECIALISE_INLINE _) } > '{-# SOURCE' { Loc $$ SOURCE } > '{-# RULES' { Loc $$ RULES } > '{-# CORE' { Loc $$ CORE } -- 130 > '{-# SCC' { Loc $$ SCC } > '{-# GENERATED' { Loc $$ GENERATED } > '{-# DEPRECATED' { Loc $$ DEPRECATED } > '{-# WARNING' { Loc $$ WARNING } > '{-# UNPACK' { Loc $$ UNPACK } > '{-# NOUNPACK' { Loc $$ NOUNPACK } > '{-# OPTIONS' { Loc _ (OPTIONS _) } '{-# CFILES' { Loc _ (CFILES _) } '{-# INCLUDE' { Loc _ (INCLUDE _) } > '{-# LANGUAGE' { Loc $$ LANGUAGE } -- 137 > '{-# ANN' { Loc $$ ANN } > '{-# MINIMAL' { Loc $$ MINIMAL } > '{-# NO_OVERLAP' { Loc $$ NO_OVERLAP } > '{-# OVERLAP' { Loc $$ OVERLAP } > '{-# OVERLAPS' { Loc $$ OVERLAPS } > '{-# OVERLAPPING' { Loc $$ OVERLAPPING } > '{-# OVERLAPPABLE' { Loc $$ OVERLAPPABLE } > '{-# INCOHERENT' { Loc $$ INCOHERENT } > '{-# COMPLETE' { Loc $$ COMPLETE } > '#-}' { Loc $$ PragmaEnd } -- 139 Utility > NEVER { Loc $$@SrcSpan{srcSpanStartLine= -1} _ } -- never-matching terminal of type SrcSpan > %monad { P } > %lexer { lexer } { Loc _ EOF } > %error { parseError } > %name mparseModule page > %name mparseExp trueexp > %name mparsePat pat > %name mparseDeclAux body > %name mparseType truectype > %name mparseStmt stmt > %name mparseImportDecl impdecl > %partial ngparseModulePragmas toppragmas > %partial ngparseModuleHeadAndImports moduletopimps > %partial ngparsePragmasAndModuleHead moduletophead > %partial ngparsePragmasAndModuleName moduletopname > %tokentype { Loc Token } > %expect 13 > %% ----------------------------------------------------------------------------- Testing multiple modules in one file > modules :: { [Module L] } > : toppragmas modules1 { let (os,ss,l) = $1 in map (\x -> x os ss l) $2 } > modules1 :: { [[ModulePragma L] -> [S] -> L -> Module L] } > : module modules1 { $1 : $2 } > | module { [$1] } ----------------------------------------------------------------------------- HSP Pages Any HSP-specific parts requiring the XmlSyntax extension enabled will be governed by the lexing, since all productions require at least one special lexeme. TODO: Yuck, this is messy, needs fixing in the AST! > page :: { Module L } > : toppragmas topxml {% checkPageModule $2 $1 } > | toppragmas '<%' module '%>' topxml {% let (os,ss,l) = $1 in checkHybridModule $5 ($3 os ss l) $2 $4 } > | toppragmas module { let (os,ss,l) = $1 in $2 os ss l } > topxml :: { PExp L } > : '<' name attrs mattr '>' children '' {% do { n <- checkEqNames $2 $8; > let { cn = reverse $6; > as = reverse $3; }; > return $ XTag ($1 <^^> $9 <** [$1,$5,$7,$9]) n as $4 cn } } > | '<' name attrs mattr '/>' { XETag ($1 <^^> $5 <** [$1,$5]) $2 (reverse $3) $4 } > toppragmas :: { ([ModulePragma L],[S],L) } > : open toppragmasaux close { let (os,ss,ml) = $2 in (os,$1:ss++[$3],$1 <^^> $3) } > toppragmasaux :: { ([ModulePragma L],[S],Maybe L) } > : toppragma optsemis toppragmasaux { let (os,ss,ml) = $3; > ss' = reverse $2 ++ ss; > l' = case $2 of > [] -> ann $1 > _ -> ann $1 <++> nIS (last $2); > in ($1 : os, ss', Just $ l' <+?> ml) } > | {- nothing -} { ([],[],Nothing) } > toppragma :: { ModulePragma L } > : '{-# LANGUAGE' conids optsemis '#-}' { LanguagePragma ($1 <^^> $4 <** ($1:snd $2 ++ reverse $3 ++ [$4])) (fst $2) } > | '{-# OPTIONS' optsemis '#-}' { let Loc l (OPTIONS (mc, s)) = $1 > in OptionsPragma (l <^^> $3 <** (l:reverse $2 ++ [$3])) (readTool mc) s } > | '{-# ANN' annotation '#-}' { AnnModulePragma ($1 <^^> $3 <** [$1,$3]) $2 } > conids :: { ([Name L],[S]) } > : conids ',' conid { (fst $1 ++ [$3], snd $1 ++ [$2]) } > | optsemis conid { ([$2],[]) } ----------------------------------------------------------------------------- Module Header > module :: { [ModulePragma L] -> [S] -> L -> Module L } > : optmodulehead body > { let (is,ds,ss1,inf) = $2 > in \os ss l -> Module (l <++> inf <** (ss ++ ss1)) $1 os is ds } > optmodulehead :: { Maybe (ModuleHead L) } > : 'module' modid maybemodwarning maybeexports 'where' { Just $ ModuleHead ($1 <^^> $5 <** [$1,$5]) $2 $3 $4 } > | {- empty -} { Nothing } > maybemodwarning :: { Maybe (WarningText L) } > : '{-# DEPRECATED' STRING '#-}' { let Loc l (StringTok (s,_)) = $2 in Just $ DeprText ($1 <^^> $3 <** [$1,l,$3]) s } > | '{-# WARNING' STRING '#-}' { let Loc l (StringTok (s,_)) = $2 in Just $ WarnText ($1 <^^> $3 <** [$1,l,$3]) s } > | {- empty -} { Nothing } > body :: { ([ImportDecl L],[Decl L],[S],L) } > : '{' bodyaux '}' { let (is,ds,ss) = $2 in (is,ds,$1:ss ++ [$3], $1 <^^> $3) } Trailing optsemis in the next line is a workaround for #25. Having the optsemis here causes one more shift/reduce conflict. > | open bodyaux close optsemis { let (is,ds,ss) = $2 in (is,ds,$1:ss ++ [$3], $1 <^^> $3) } > bodyaux :: { ([ImportDecl L],[Decl L],[S]) } > : optsemis impdecls semis topdecls { (reverse (fst $2), fst $4, reverse $1 ++ snd $2 ++ reverse $3 ++ snd $4) } > | optsemis topdecls { ([], fst $2, reverse $1 ++ snd $2) } > | optsemis impdecls optsemis { (reverse (fst $2), [], reverse $1 ++ snd $2 ++ reverse $3) } > | optsemis { ([], [], reverse $1) } > semis :: { [S] } > : optsemis ';' { $2 : $1 } > optsemis :: { [S] } > : semis { $1 } > | {- empty -} { [] } ----------------------------------------------------------------------------- The Export List > maybeexports :: { Maybe (ExportSpecList L) } > : exports { Just $1 } > | {- empty -} { Nothing } > exports :: { ExportSpecList L } > : '(' exportlist optcomma ')' { ExportSpecList ($1 <^^> $4 <** ($1:reverse (snd $2) ++ $3 ++ [$4])) (reverse (fst $2)) } > | '(' optcomma ')' { ExportSpecList ($1 <^^> $3 <** ($1:$2++[$3])) [] } > optcomma :: { [S] } > : ',' { [$1] } > | {- empty -} { [ ] } > exportlist :: { ([ExportSpec L],[S]) } > : exportlist ',' export { ($3 : fst $1, $2 : snd $1) } > | export { ([$1],[]) } > export :: { ExportSpec L } > : qvar { EVar (ann $1) $1 } > | 'type' qcname {% do { checkEnabled ExplicitNamespaces; > return (EAbs (nIS $1 <++> ann $2 <** [$1, srcInfoSpan (ann $2)]) (TypeNamespace (nIS $1 <** [$1])) $2) } } > | qtyconorcls { EAbs (ann $1) (NoNamespace (ann $1)) $1 } > | qtyconorcls '(' ')' { EThingWith (ann $1 <++> nIS $3 <** [$2,$3]) (NoWildcard noSrcSpan) $1 [] } > | qtyconorcls '(' export_names ')' {% mkEThingWith (ann $1 <++> nIS $4 <** ($2:reverse (snd $3) ++ [$4])) $1 (reverse $ fst $3) } > | 'module' modid { EModuleContents (nIS $1 <++> ann $2 <** [$1]) $2 } > | 'pattern' qcon {% do { checkEnabled PatternSynonyms; > return $ EAbs (nIS $1 <++> (ann $2) <** [$1]) > (PatternNamespace (nIS $1)) $2 }} > export_names :: { ([Either S (CName L)],[S]) } > : export_names ',' cname_w_wildcard { ($3 : fst $1, $2 : snd $1) } > | cname_w_wildcard { ([$1],[]) } > cname_w_wildcard :: { Either S (CName L) } > : '..' { Left $1 } > | cname { Right $1 } > > qcname :: { QName L } > : qvar { $1 } > | qcon { $1 } ----------------------------------------------------------------------------- Import Declarations > impdecls :: { ([ImportDecl L],[S]) } > : impdecls semis impdecl { ($3 : fst $1, snd $1 ++ reverse $2) } > | impdecl { ([$1],[]) } > impdecl :: { ImportDecl L } > : 'import' optsrc optsafe optqualified maybepkg modid maybeas maybeimpspec > { let { (mmn,ss,ml) = $7 ; > l = nIS $1 <++> ann $6 <+?> ml <+?> (fmap ann) $8 <** ($1:snd $2 ++ snd $3 ++ snd $4 ++ snd $5 ++ ss)} > in ImportDecl l $6 (fst $4) (fst $2) (fst $3) (fst $5) mmn $8 } > optsrc :: { (Bool,[S]) } > : '{-# SOURCE' '#-}' { (True,[$1,$2]) } > | {- empty -} { (False,[]) } > optsafe :: { (Bool,[S]) } > : 'safe' {% do { checkEnabledOneOf [Safe, SafeImports, Trustworthy] ; > return (True, [$1]) } } > | {- empty -} { (False, []) } > optqualified :: { (Bool,[S]) } > : 'qualified' { (True,[$1]) } > | {- empty -} { (False, []) } Requires the PackageImports extension enabled. > maybepkg :: { (Maybe String,[S]) } > : STRING {% do { checkEnabled PackageImports ; > let { Loc l (StringTok (s,_)) = $1 } ; > return $ (Just s,[l]) } } > | {- empty -} { (Nothing,[]) } > maybeas :: { (Maybe (ModuleName L),[S],Maybe L) } > : 'as' modid { (Just $2,[$1],Just (nIS $1 <++> ann $2)) } > | {- empty -} { (Nothing,[],Nothing) } > maybeimpspec :: { Maybe (ImportSpecList L) } > : impspec { Just $1 } > | {- empty -} { Nothing } > impspec :: { ImportSpecList L } > : opthiding '(' importlist optcomma ')' { let {(b,ml,s) = $1 ; > l = (ml ($2 <^^> $5)) <** (s ++ $2:reverse (snd $3) ++ $4 ++ [$5])} > in ImportSpecList l b (reverse (fst $3)) } > | opthiding '(' optcomma ')' { let {(b,ml,s) = $1 ; l = (ml ($2 <^^> $4)) <** (s ++ $2:$3 ++ [$4])} > in ImportSpecList l b [] } > opthiding :: { (Bool, Maybe L,[S]) } > : 'hiding' { (True,Just (nIS $1),[$1]) } > | {- empty -} { (False,Nothing,[]) } > importlist :: { ([ImportSpec L],[S]) } > : importlist ',' importspec { ($3 : fst $1, $2 : snd $1) } > | importspec { ([$1],[]) } > importspec :: { ImportSpec L } > : var { IVar (ann $1) $1 } > | 'type' var {% do { checkEnabled ExplicitNamespaces; > return (IAbs (nIS $1 <++> ann $2 <** [$1, srcInfoSpan (ann $2)]) (TypeNamespace (nIS $1 <** [$1])) $2) } } > | 'pattern' con {% do { checkEnabled PatternSynonyms; > return (IAbs (nIS $1 <++> ann $2 <** [$1, srcInfoSpan (ann $2)]) (PatternNamespace (nIS $1 <** [$1])) $2) } } > | tyconorcls { IAbs (ann $1) (NoNamespace (ann $1)) $1 } > | tyconorcls '(' '..' ')' { IThingAll (ann $1 <++> nIS $4 <** [$2,$3,$4]) $1 } > | tyconorcls '(' ')' { IThingWith (ann $1 <++> nIS $3 <** [$2,$3]) $1 [] } > | tyconorcls '(' import_names ')' { IThingWith (ann $1 <++> nIS $4 <** ($2:reverse (snd $3) ++ [$4])) $1 (reverse (fst $3)) } > import_names :: { ([CName L],[S]) } > : import_names ',' cname { ($3 : fst $1, $2 : snd $1) } > | cname { ([$1],[]) } > cname :: { CName L } > : var { VarName (ann $1) $1 } > | con { ConName (ann $1) $1 } ----------------------------------------------------------------------------- Fixity Declarations > fixdecl :: { Decl L } > : infix prec ops { let (ops,ss,l) = $3 > in InfixDecl (ann $1 <++> l <** (snd $2 ++ reverse ss)) $1 (fst $2) (reverse ops) } > prec :: { (Maybe Int, [S]) } > : {- empty -} { (Nothing, []) } > | INT {% let Loc l (IntTok (i,_)) = $1 in checkPrec i >>= \i -> return (Just i, [l]) } > infix :: { Assoc L } > : 'infix' { AssocNone $ nIS $1 } > | 'infixl' { AssocLeft $ nIS $1 } > | 'infixr' { AssocRight $ nIS $1 } > ops :: { ([Op L],[S],L) } > : ops ',' op { let (ops,ss,l) = $1 in ($3 : ops, $2 : ss, l <++> ann $3) } > | op { ([$1],[],ann $1) } > opt_injectivity_info :: { Maybe (InjectivityInfo L) } > : {- empty -} { Nothing } > | injectivity_info { Just $1 } > injectivity_info :: { InjectivityInfo L } > : '|' tyvarid '->' inj_varids > { InjectivityInfo (nIS $1 <++> ann (last $4) <** [$1,$3]) $2 (reverse $4) } > > > inj_varids :: { [Name L] } > : inj_varids tyvarid { $2 : $1 } > | tyvarid { [$1] } ----------------------------------------------------------------------------- Top-Level Declarations Note: The report allows topdecls to be empty. This would result in another shift/reduce-conflict, so we don't handle this case here, but in bodyaux. > topdecls :: { ([Decl L],[S]) } > : topdecls1 optsemis {% checkRevDecls (fst $1) >>= \ds -> return (ds, snd $1 ++ reverse $2) } > topdecls1 :: { ([Decl L],[S]) } > : topdecls1 semis topdecl { ($3 : fst $1, snd $1 ++ reverse $2) } > | topdecl { ([$1],[]) } > topdecl :: { Decl L } > : role_annot {% checkEnabled RoleAnnotations >> return $1 } > | 'type' dtype '=' truectype > {% do { dh <- checkSimpleType $2; > let {l = nIS $1 <++> ann $4 <** [$1,$3]}; > return (TypeDecl l dh $4) } } Requires the TypeFamilies extension enabled, but the lexer will handle that through the 'family' keyword. > | 'type' 'family' type opt_tyfam_kind_sig opt_injectivity_info where_type_family > {% do { dh <- checkSimpleType $3; > let {l = nIS $1 <++> ann $3 <** [$1,$2]}; > case $6 of { > Nothing -> return (TypeFamDecl l dh $4 $5); > Just (x,a) -> return (ClosedTypeFamDecl (l <** [a]) dh $4 $5 x); }}} Here there is no special keyword so we must do the check. > | 'type' 'instance' truedtype '=' truectype > {% do { -- no checkSimpleType $4 since dtype may contain type patterns > checkEnabled TypeFamilies ; > let {l = nIS $1 <++> ann $5 <** [$1,$2,$4]}; > return (TypeInsDecl l $3 $5) } } > | data_or_newtype ctype constrs0 maybe_derivings > {% do { (cs,dh) <- checkDataHeader $2; > let { (qds,ss,minf) = $3; > l = $1 <> $2 <+?> minf <+?> fmap ann (listToMaybe $4) <** ss}; > checkDataOrNew $1 qds; > return (DataDecl l $1 cs dh (reverse qds) (reverse $4)) } } Requires the GADTs extension enabled, handled in gadtlist. > | data_or_newtype ctype optkind gadtlist maybe_derivings > {% do { (cs,dh) <- checkDataHeader $2; > let { (gs,ss,minf) = $4; > derivs' = reverse $5; > l = ann $1 <+?> minf <+?> fmap ann (listToMaybe $5) <** (snd $3 ++ ss)}; > checkDataOrNewG $1 gs; > case (gs, fst $3) of > ([], Nothing) -> return (DataDecl l $1 cs dh [] derivs') > _ -> checkEnabled GADTs >> return (GDataDecl l $1 cs dh (fst $3) (reverse gs) derivs') } } Same as above, lexer will handle it through the 'family' keyword. > | 'data' 'family' ctype opt_datafam_kind_sig > {% do { (cs,dh) <- checkDataHeader $3; > let {l = nIS $1 <++> ann $3 <+?> (fmap ann) $4 <** [$1,$2]}; > return (DataFamDecl l cs dh $4) } } Here we must check for TypeFamilies. > | data_or_newtype 'instance' truectype constrs0 maybe_derivings > {% do { -- (cs,c,t) <- checkDataHeader $4; > checkEnabled TypeFamilies ; > let { (qds,ss,minf) = $4 ; > l = $1 <> $3 <+?> minf <+?> fmap ann (listToMaybe $5) <** $2:ss }; > checkDataOrNew $1 qds; > return (DataInsDecl l $1 $3 (reverse qds) (reverse $5)) } } This style requires both TypeFamilies and GADTs, the latter is handled in gadtlist. > | data_or_newtype 'instance' truectype optkind gadtlist maybe_derivings > {% do { -- (cs,c,t) <- checkDataHeader $4; > checkEnabled TypeFamilies ; > let {(gs,ss,minf) = $5; > derivs' = reverse $6; > l = ann $1 <+?> minf <+?> fmap ann (listToMaybe derivs') <** ($2:snd $4 ++ ss)}; > checkDataOrNewG $1 gs; > return (GDataInsDecl l $1 $3 (fst $4) (reverse gs) derivs') } } > | 'class' ctype fds optcbody > {% do { (cs,dh) <- checkClassHeader $2; > let {(fds,ss1,minf1) = $3;(mcs,ss2,minf2) = $4} ; > let { l = nIS $1 <++> ann $2 <+?> minf1 <+?> minf2 <** ($1:ss1 ++ ss2)} ; > return (ClassDecl l cs dh fds mcs) } } > | 'instance' optoverlap ctype optvaldefs > {% do { ih <- checkInstHeader $3; > let {(mis,ss,minf) = $4}; > return (InstDecl (nIS $1 <++> ann $3 <+?> minf <** ($1:ss)) $2 ih mis) } } Requires the StandaloneDeriving extension enabled. > | 'deriving' deriv_standalone_strategy 'instance' optoverlap ctype > {% do { checkEnabled StandaloneDeriving ; > ih <- checkInstHeader $5; > let {l = nIS $1 <++> ann $5 <** [$1,$3]}; > return (DerivDecl l $2 $4 ih) } } > | 'default' '(' typelist ')' > { DefaultDecl ($1 <^^> $4 <** ($1:$2 : snd $3 ++ [$4])) (fst $3) } Requires the TemplateHaskell extension, but the lexer will handle that through the '$(' lexeme. CHANGE: Arbitrary top-level expressions are considered implicit splices > | exp0 {% do > checkToplevel $1 > checkExpr $1 >>= \e -> return (SpliceDecl (ann e) e) > } | '$(' trueexp ')' { let l = $1 <^^> $3 <** [$1,$3] in SpliceDecl l $ ParenSplice l $2 } | '$$(' trueexp ')' { let l = $1 <^^> $3 <** [$1,$3] in TSpliceDecl l $ TParenSplice l $2 } These require the ForeignFunctionInterface extension, handled by the lexer through the 'foreign' (and 'export') keyword. > | 'foreign' 'import' callconv safety fspec > { let (s,n,t,ss) = $5 in ForImp (nIS $1 <++> ann t <** ($1:$2:ss)) $3 $4 s n t } > | 'foreign' 'export' callconv fspec > { let (s,n,t,ss) = $4 in ForExp (nIS $1 <++> ann t <** ($1:$2:ss)) $3 s n t } > | '{-# RULES' rules '#-}' { RulePragmaDecl ($1 <^^> $3 <** [$1,$3]) $ reverse $2 } > | '{-# DEPRECATED' warndeprs '#-}' { DeprPragmaDecl ($1 <^^> $3 <** ($1:snd $2++[$3])) $ reverse (fst $2) } > | '{-# WARNING' warndeprs '#-}' { WarnPragmaDecl ($1 <^^> $3 <** ($1:snd $2++[$3])) $ reverse (fst $2) } > | '{-# ANN' annotation '#-}' { AnnPragma ($1 <^^> $3 <** [$1,$3]) $2 } > | '{-# COMPLETE' con_list opt_tyconsig '#-}' > { let com = maybe [] ((:[]) . fst) $3; ts = fmap snd $3 in > (CompletePragma ($1 <^^> $4 <** ([$1] ++ fst $2 ++ com ++ [$4])) (snd $2) ts) } > | decl { $1 } > -- Family result/return kind signatures > > opt_datafam_kind_sig :: { Maybe (ResultSig L) } > : { Nothing } > | '::' kind { (Just $ KindSig (nIS $1 <++> ann $2 <** [$1]) $2) } > > opt_tyfam_kind_sig :: { Maybe (ResultSig L) } > : { Nothing } > | '::' kind { (Just $ KindSig (nIS $1 <++> ann $2 <** [$1]) $2) } > | '=' ktyvar { (Just $ TyVarSig (nIS $1 <++> ann $2 <** [$1]) $2) } > > opt_at_kind_inj_sig :: { (Maybe (ResultSig L), Maybe (InjectivityInfo L))} > : { (Nothing, Nothing) } > | '::' kind { (Just (KindSig (nIS $1 <++> ann $2 <** [$1]) $2), Nothing) } > | '=' ktyvar injectivity_info > { (Just (TyVarSig (nIS $1 <++> ann $2 <** [$1]) $2), Just $3) } > opt_at_kind_inj_sig2 :: { (Maybe (ResultSig L), Maybe (S, Type L), Maybe (InjectivityInfo L))} > : { (Nothing, Nothing, Nothing) } > | '::' kind { (Just (KindSig (nIS $1 <++> ann $2 <** [$1]) $2), Nothing, Nothing) } > | '=' truectype opt_injectivity_info { (Nothing, Just ($1, $2), $3) } Role annotations > role_annot :: { Decl L } > role_annot : 'type' 'role' otycon roles > {% mkRoleAnnotDecl $1 $2 $3 (reverse $4) } -- Reversed! > roles :: { [(Maybe String, L)] } > roles : {- empty -} { [] } > | roles role { $2 : $1 } > -- read it in as a varid for better error messages > role :: { (Maybe String, L) } > role : VARID { let (VarId v) = unLoc $1 in (Just v, nIS $ loc $1) } > | '_' { (Nothing, nIS $1) } > optoverlap :: { Maybe (Overlap L) } > : '{-# OVERLAP' '#-}' { Just (Overlap (nIS $1)) } > | '{-# OVERLAPS' '#-}' { Just (Overlaps (nIS $1)) } > | '{-# OVERLAPPING' '#-}' { Just (Overlapping (nIS $1)) } > | '{-# OVERLAPPABLE' '#-}' { Just (Overlappable (nIS $1)) } > | '{-# INCOHERENT' '#-}' { Just (Incoherent (nIS $1)) } > | '{-# NO_OVERLAP' '#-}' { Just (NoOverlap (nIS $1)) } > | {- empty -} { Nothing } Parsing the body of a closed type family, partially stolen from the source of GHC. > where_type_family :: { Maybe ([TypeEqn L], S) } > : {- empty -} { Nothing } > | 'where' ty_fam_inst_eqn_list { Just ($2, $1) } > ty_fam_inst_eqn_list :: { [TypeEqn L] } > : '{' ty_fam_inst_eqns '}' { $2 } > | open ty_fam_inst_eqns close { $2 } > ty_fam_inst_eqns :: { [TypeEqn L] } > : ty_fam_inst_eqns ';' ty_fam_inst_eqn { $1 ++ [$3] } > | ty_fam_inst_eqns ';' { $1 } > | ty_fam_inst_eqn { [$1] } > | { [] } > ty_fam_inst_eqn :: { TypeEqn L } > : truectype '=' truectype > {% do { checkEnabled TypeFamilies ; > return (TypeEqn (ann $1 <++> ann $3 <** [$2]) $1 $3) } } > data_or_newtype :: { DataOrNew L } > : 'data' { DataType $ nIS $1 } > | 'newtype' { NewType $ nIS $1 } > typelist :: { ([Type L],[S]) } > : types {% do { ts <- mapM checkType (fst $1); > return $ (reverse ts, reverse (snd $1)) } } > | truetype { ([$1],[]) } > | {- empty -} { ([],[]) } > decls :: { ([Decl L],[S]) } > : optsemis decls1 optsemis {% checkRevDecls (fst $2) >>= \ds -> return (ds, reverse $1 ++ snd $2 ++ reverse $3) } > | optsemis { ([],reverse $1) } > decls1 :: { ([Decl L],[S]) } > : decls1 semis decl { ($3 : fst $1, snd $1 ++ reverse $2) } > | decl { ([$1],[]) } > decl :: { Decl L } > : signdecl { $1 } > | fixdecl { $1 } > | valdef { $1 } > | pat_syn { $1 } > | pattern_synonym_sig { $1 } > decllist :: { Binds L } > : '{' decls '}' { BDecls ($1 <^^> $3 <** ($1:snd $2++[$3])) (fst $2) } > | open decls close { let l' = if null (fst $2) then nIS $3 else (ann . last $ fst $2) > in BDecls (nIS $1 <++> l' <** ($1:snd $2++[$3])) (fst $2) } > signdecl :: { Decl L } > : signdecl0 { $1 } > | specinldecl { $1 } > signdecl0 :: { Decl L } > : exp0b '::' truectype {% do { v <- checkSigVar $1; > return $ TypeSig ($1 <> $3 <** [$2]) [v] $3 } } > | exp0b ',' vars '::' truectype {% do { v <- checkSigVar $1; > let {(vs,ss,_) = $3 ; l = $1 <> $5 <** ($2 : reverse ss ++ [$4]) } ; > return $ TypeSig l (v : reverse vs) $5 } } > specinldecl :: { Decl L } > : '{-# INLINE' activation qvar '#-}' { let Loc l (INLINE s) = $1 in InlineSig (l <^^> $4 <** [l,$4]) s $2 $3 } > | '{-# INLINE CONLIKE' activation qvar '#-}' { InlineConlikeSig ($1 <^^> $4 <** [$1,$4]) $2 $3 } > | '{-# SPECIALISE' activation qvar '::' sigtypes '#-}' > { SpecSig ($1 <^^> $6 <** ($1: $4 : snd $5 ++ [$6])) $2 $3 (fst $5) } > | '{-# SPECIALISE INLINE' activation qvar '::' sigtypes '#-}' > { let Loc l (SPECIALISE_INLINE s) = $1 > in SpecInlineSig (l <^^> $6 <** (l:$4:snd $5++[$6])) s $2 $3 (fst $5) } > | '{-# SPECIALISE' 'instance' ctype '#-}' {% do { ih <- checkInstHeader $3; > let {l = $1 <^^> $4 <** [$1,$2,$4]}; > return $ InstSig l ih } } > | '{-# MINIMAL' name_boolformula '#-}' { MinimalPragma ($1 <^^> $3 <** [$1,$3]) $2 } > sigtypes :: { ([Type L],[S]) } > : sigtype { ([$1],[]) } > | sigtype ',' sigtypes { ($1 : fst $3, $2 : snd $3) } > sigtype :: { Type L } > : ctype {% checkType $ mkTyForall (ann $1) Nothing Nothing $1 } > name_boolformula :: { Maybe (BooleanFormula L) } > : name_boolformula1 { Just $1 } > | {- empty -} { Nothing } > name_boolformula1 :: { BooleanFormula L } > : name_boolformula_and { $1 } > | name_boolformula_and '|' name_boolformula1 { OrFormula (ann $1 <++> ann $3 <** [$2]) [$1,$3] } > name_boolformula_and :: { BooleanFormula L } > : name_boolformula_atom { $1 } > | name_boolformula_atom ',' name_boolformula_and { AndFormula (ann $1 <++> ann $3 <** [$2]) [$1,$3] } > name_boolformula_atom :: { BooleanFormula L } > : '(' name_boolformula1 ')' { ParenFormula ($1 <^^> $3 <** [$1,$3]) $2 } > | var { VarFormula (ann $1) $1 } Binding can be either of implicit parameters, or it can be a normal sequence of declarations. The two kinds cannot be mixed within the same block of binding. > binds :: { Binds L } > : decllist { $1 } > | '{' ipbinds '}' { IPBinds ($1 <^^> $3 <** snd $2) (fst $2) } > | open ipbinds close { let l' = ann . last $ fst $2 > in IPBinds (nIS $1 <++> l' <** snd $2) (fst $2) } ATTENTION: Dirty Hackery Ahead! If the second alternative of vars is var instead of qvar, we get another shift/reduce-conflict. Consider the following programs: { (+) :: ... } only var { (+) x y = ... } could (incorrectly) be qvar We re-use expressions for patterns, so a qvar would be allowed in patterns instead of a var only (which would be correct). But deciding what the + is, would require more lookahead. So let's check for ourselves... > vars :: { ([Name L],[S],L) } > : vars ',' var { let (ns,ss,l) = $1 in ($3 : ns, $2 : ss, l <++> ann $3) } > | qvar {% do { n <- checkUnQual $1; > return ([n],[],ann n) } } ----------------------------------------------------------------------------- FFI These will only be called on in the presence of a 'foreign' keyword, so no need to check for extensions. > callconv :: { CallConv L } > : 'stdcall' { StdCall (nIS $1) } > | 'ccall' { CCall (nIS $1) } > | 'cplusplus' { CPlusPlus (nIS $1) } > | 'dotnet' { DotNet (nIS $1) } > | 'jvm' { Jvm (nIS $1) } > | 'js' { Js (nIS $1) } > | 'javascript' { JavaScript (nIS $1) } > | 'capi' { CApi (nIS $1) } > safety :: { Maybe (Safety L) } > : 'safe' { Just $ PlaySafe (nIS $1) False } > | 'unsafe' { Just $ PlayRisky (nIS $1) } > | 'threadsafe' { Just $ PlaySafe (nIS $1) True } > | 'interruptible' { Just $ PlayInterruptible (nIS $1) } > | {- empty -} { Nothing } > fspec :: { (Maybe String, Name L, Type L, [S]) } > : STRING var_no_safety '::' truedtype { let Loc l (StringTok (s,_)) = $1 in (Just s, $2, $4, [l,$3]) } > | var_no_safety '::' truedtype { (Nothing, $1, $3, [$2]) } ----------------------------------------------------------------------------- Pragmas > rules :: { [Rule L] } > : rules ';'rule { $3 : $1 } > | rules ';' { $1 } > | rule { [$1] } > | {- empty -} { [] } > rule :: { Rule L } > : STRING activation ruleforall exp0 '=' trueexp {% do { let {Loc l (StringTok (s,_)) = $1}; > e <- checkRuleExpr $4; > return $ Rule (nIS l <++> ann $6 <** l:snd $3 ++ [$5]) s $2 (fst $3) e $6 } } > activation :: { Maybe (Activation L) } > : {- empty -} { Nothing } > | '[' INT ']' { let Loc l (IntTok (i,_)) = $2 in Just $ ActiveFrom ($1 <^^> $3 <** [$1,l,$3]) (fromInteger i) } > | '[' '~' INT ']' { let Loc l (IntTok (i,_)) = $3 in Just $ ActiveUntil ($1 <^^> $4 <** [$1,$2,l,$4]) (fromInteger i) } > ruleforall :: { (Maybe [RuleVar L],[S]) } > : {- empty -} { (Nothing,[]) } > | 'forall' rulevars '.' { (Just $2,[$1,$3]) } > rulevars :: { [RuleVar L] } > : rulevar { [$1] } > | rulevar rulevars { $1 : $2 } > rulevar :: { RuleVar L } > : varid { RuleVar (ann $1) $1 } > | '(' varid '::' truectype ')' { TypedRuleVar ($1 <^^> $5 <** [$1,$3,$5]) $2 $4 } > warndeprs :: { ([([Name L],String)],[S]) } > : warndeprs ';' warndepr { (fst $3 : fst $1, snd $1 ++ ($2:snd $3)) } > | warndeprs ';' { (fst $1, snd $1 ++ [$2]) } > | warndepr { ([fst $1],snd $1) } > | {- empty -} { ([],[]) } > warndepr :: { (([Name L], String),[S]) } > : namevars STRING { let Loc l (StringTok (s,_)) = $2 in ((fst $1,s),snd $1 ++ [l]) } > namevars :: { ([Name L],[S]) } > : namevar { ([$1],[]) } > | namevar ',' namevars { ($1 : fst $3, $2 : snd $3) } > namevar :: { Name L } > : con { $1 } > | var { $1 } > annotation :: { Annotation L } > : 'type' conid aexp {% checkExpr $3 >>= \e -> return (TypeAnn (nIS $1 <++> ann e <** [$1]) $2 e) } > | 'module' aexp {% checkExpr $2 >>= \e -> return (ModuleAnn (nIS $1 <++> ann e <** [$1]) e) } > | namevar aexp {% checkExpr $2 >>= \e -> return (Ann ($1 <> e) $1 e) } ----------------------------------------------------------------------------- Types Type equality contraints need the TypeFamilies extension. > truedtype :: { Type L } > : dtype {% checkType $1 } > dtype :: { PType L } > : dtype_('*',NEVER) { $1 } > dtype_(ostar,kstar) :: { PType L } > : btype_(ostar,kstar) { splitTilde $1 } > | btype_(ostar,kstar) qtyconop dtype_(ostar,kstar) { TyInfix ($1 <> $3) $1 $2 $3 } > | btype_(ostar,kstar) qtyvarop_(ostar) dtype_(ostar,kstar) { TyInfix ($1 <> $3) $1 (UnpromotedName (ann $2) $2) $3 } -- FIXME > | btype_(ostar,kstar) '->' ctype_(ostar,kstar) { TyFun ($1 <> $3 <** [$2]) (splitTilde $1) $3 } | btype_(ostar,kstar) '~' btype_(ostar,kstar) {% do { checkEnabledOneOf [TypeFamilies, GADTs] ; let {l = $1 <> $3 <** [$2]}; return $ TyPred l $ EqualP l $1 $3 } } Implicit parameters can occur in normal types, as well as in contexts. > truetype :: { Type L } > : type {% checkType $1 } > type :: { PType L } > : type_('*',NEVER) { $1 } > type_(ostar,kstar) :: { PType L } > : ivar '::' dtype_(ostar,kstar) { let l = ($1 <> $3 <** [$2]) in TyPred l $ IParam l $1 $3 } > | dtype_(ostar,kstar) { $1 } > truebtype :: { Type L } > : btype {% checkType (splitTilde $1) } > trueatype :: { Type L } > : atype {% checkType $1 } > btype :: { PType L } > : btype_('*',NEVER) { $1 } > btype_(ostar,kstar) :: { PType L } > : btype_(ostar,kstar) atype_(ostar,kstar) { TyApp ($1 <> $2) $1 $2 } > | atype_(ostar,kstar) { $1 } UnboxedTuples requires the extension, but that will be handled through the (# and #) lexemes. Kinds will be handled at the kind rule. > atype :: { PType L } > : atype_('*',NEVER) { $1 } > atype_(ostar,kstar) :: { PType L } > : kstar { TyStar (nIS $1) } > | gtycon_(ostar) { TyCon (ann $1) $1 } > | tyvar {% checkTyVar $1 } > | strict_mark atype { let (mstrict, mupack) = $1 > in bangType mstrict mupack $2 } > | '(' types_(ostar,kstar) ')' { TyTuple ($1 <^^> $3 <** ($1:reverse ($3:snd $2))) Boxed (reverse (fst $2)) } > | '(#' types_bars2(ostar,kstar) '#)' { TyUnboxedSum ($1 <^^> $3 <** ($1: reverse ($3: snd $2))) (reverse (fst $2)) } > | '(#' types1_(ostar,kstar) '#)' { TyTuple ($1 <^^> $3 <** ($1:reverse ($3:snd $2))) Unboxed (reverse (fst $2)) } > | '[' type_(ostar,kstar) ']' { TyList ($1 <^^> $3 <** [$1,$3]) $2 } > | '[:' type_(ostar,kstar) ':]' { TyParArray ($1 <^^> $3 <** [$1,$3]) $2 } > | '(' ctype_(ostar,kstar) ')' { TyParen ($1 <^^> $3 <** [$1,$3]) $2 } > | '(' ctype_(ostar,kstar) '::' kind ')' { TyKind ($1 <^^> $5 <** [$1,$3,$5]) $2 $4 } > | '$(' trueexp ')' { let l = ($1 <^^> $3 <** [$1,$3]) in TySplice l $ ParenSplice l $2 } > | '$$(' trueexp ')' { let l = ($1 <^^> $3 <** [$1,$3]) in TySplice l $ TParenSplice l $2 } > | IDSPLICE { let Loc l (THIdEscape s) = $1 in TySplice (nIS l) $ IdSplice (nIS l) s } > | TIDSPLICE { let Loc l (THTIdEscape s) = $1 in TySplice (nIS l) $ TIdSplice (nIS l) s } > | '_' { TyWildCard (nIS $1) Nothing } > | QUASIQUOTE { let Loc l (THQuasiQuote (n,q)) = $1 in TyQuasiQuote (nIS l) n q } > | ptype_(ostar,kstar) { % checkEnabled DataKinds >> return (TyPromoted (ann $1) $1) } > ptype_(ostar,kstar) :: { Promoted L } > : VARQUOTE gcon_nolist {% fmap (PromotedCon (nIS $1 <++> ann $2 <** [$1]) True) (pexprToQName $2) } > | VARQUOTE '[' types1_(ostar,kstar) ']' {% PromotedList ($1 <^^> $4 <** ($1:reverse($4:snd $3))) True . reverse <\$> mapM checkType (fst $3) } > | '[' types_(ostar,kstar) ']' {% PromotedList ($1 <^^> $3 <** ($1:reverse($3:snd $2))) False . reverse <\$> mapM checkType (fst $2) } > | VARQUOTE '[' ']' { PromotedList ($1 <^^> $3 <** [$1, $3]) True [] } | '[' ']' {% PromotedList ($1 <^^> $2 <** [$1, $2]) False [] } > | VARQUOTE '(' types1 ')' {% PromotedTuple ($1 <^^> $4 <** ($1:reverse($4:snd $3))) . reverse <\$> mapM checkType (fst $3) } > | INT { let Loc l (IntTok (i,raw)) = $1 in PromotedInteger (nIS l) i raw } > | STRING { let Loc l (StringTok (s,raw)) = $1 in PromotedString (nIS l) s raw } > strict_mark :: { (Maybe (L -> BangType L,S), Maybe (Unpackedness L)) } > : strictness { (Just $1, Nothing) } > | unpackedness { (Nothing, Just $1) } > | unpackedness strictness { (Just $2, Just $1) } > strictness :: { (L -> BangType L, S) } > : '!' { (BangedTy, $1) } > | '~' { (LazyTy, $1) } > unpackedness :: { Unpackedness L } > : '{-# UNPACK' '#-}' { (Unpack ((nIS $1 <++> nIS $2) <** [$1,$2])) } > | '{-# NOUNPACK' '#-}' { (NoUnpack ((nIS $1 <++> nIS $2) <** [$1,$2])) } > gtycon :: { QName L } > : gtycon_('*') { $1 } > gtycon_(ostar) :: { QName L } > : otycon_(ostar) { $1 } > | '(' ')' { unit_tycon_name ($1 <^^> $2 <** [$1,$2]) } > | '(' '->' ')' { fun_tycon_name ($1 <^^> $3 <** [$1,$2,$3]) } > | '[' ']' { list_tycon_name ($1 <^^> $2 <** [$1,$2]) } > | '(' commas ')' { tuple_tycon_name ($1 <^^> $3 <** ($1:reverse $2 ++ [$3])) Boxed (length $2) } > | '(#' '#)' { unboxed_singleton_tycon_name ($1 <^^> $2 <** [$1,$2]) } > | '(#' commas '#)' { tuple_tycon_name ($1 <^^> $3 <** ($1:reverse $2 ++ [$3])) Unboxed (length $2) } > otycon :: { QName L } > : otycon_('*') { $1 } > otycon_(ostar) :: { QName L } > : qconid { $1 } > | '(' gconsym ')' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > | '(' qvarsym_(ostar) ')' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } These are for infix types > qtyconop :: { MaybePromotedName L } > : qconop { UnpromotedName (ann $1) $1 } > | VARQUOTE gconsym { PromotedName (nIS $1 <++> ann $2 <** [$1]) $2 } (Slightly edited) Comment from GHC's hsparser.y: "context => type" vs "type" is a problem, because you can't distinguish between foo :: (Baz a, Baz a) bar :: (Baz a, Baz a) => [a] -> [a] -> [a] with one token of lookahead. The HACK is to parse the context as a btype (more specifically as a tuple type), then check that it has the right form C a, or (C1 a, C2 b, ... Cn z) and convert it into a context. Blaach! Forall-quantified types require some extension to enable them, which is any of the keyword-enabling ones, except ExistentialQuantification. > truectype :: { Type L } > : ctype {% checkType $1 } > ctype :: { PType L } > : ctype_('*',NEVER) { $1 } > ctype_(ostar,kstar) :: { PType L } > : 'forall' ktyvars '.' ctype_(ostar,kstar) { mkTyForall (nIS $1 <++> ann $4 <** [$1,$3]) (Just (reverse (fst $2))) Nothing $4 } > | context_(ostar,kstar) ctype_(ostar,kstar) { mkTyForall ($1 <> $2) Nothing (Just $1) $2 } > | type_(ostar,kstar) { $1 } Equality constraints require the TypeFamilies extension. > context :: { PContext L } > : context_('*',NEVER) { $1 } > context_(ostar,kstar) :: { PContext L } > : btype_(ostar,kstar) '=>' {% checkPContext $ (amap (\l -> l <++> nIS $2 <** (srcInfoPoints l ++ [$2]))) (splitTilde $1) } > types :: { ([PType L],[S]) } > : types_('*',NEVER) { $1 } > types_(ostar,kstar) :: { ([PType L],[S]) } > : types1_(ostar,kstar) ',' ctype_(ostar,kstar) { ($3 : fst $1, $2 : snd $1) } > types1 :: { ([PType L],[S]) } > : types1_('*',NEVER) { $1 } > types1_(ostar,kstar) :: { ([PType L],[S]) } > : ctype_(ostar,kstar) { ([$1],[]) } > | types1_(ostar,kstar) ',' ctype_(ostar,kstar) { ($3 : fst $1, $2 : snd $1) } > types_bars2(ostar,kstar) :: { ([PType L],[S]) } > : ctype_(ostar,kstar) '|' ctype_(ostar,kstar) { ([$3, $1], [$2]) } > | types_bars2(ostar,kstar) '|' ctype_(ostar,kstar) { ($3 : fst $1, $2 : snd $1) } > ktyvars :: { ([TyVarBind L],Maybe L) } > : ktyvars ktyvar { ($2 : fst $1, Just (snd $1 ann $2)) } > | {- empty -} { ([],Nothing) } > ktyvar :: { TyVarBind L } > : tyvar { UnkindedVar (ann $1) $1 } > | '(' tyvar '::' kind ')' { KindedVar ($1 <^^> $5 <** [$1,$3,$5]) $2 $4 } > tyvars :: { ([Name L],Maybe L) } > : tyvars tyvar { ($2 : fst $1, Just (snd $1 ann $2)) } > | {- empty -} { ([], Nothing) } > tyvars1 :: { ([Name L],L) } > : tyvars tyvar { ($2 : fst $1, snd $1 ann $2) } ----------------------------------------------------------------------------- Functional Dependencies These require the FunctionalDependencies extension to be enabled. > fds :: { ([FunDep L],[S],Maybe L) } > : {- empty -} { ([],[], Nothing) } > | '|' fds1 {% do { checkEnabled FunctionalDependencies ; > let {(fds,ss,l) = $2} ; > return (reverse fds, $1 : reverse ss, Just (nIS $1 <++> l)) } } > fds1 :: { ([FunDep L],[S],L) } > : fds1 ',' fd { let (fds,ss,l) = $1 in ($3 : fds, $2 : ss, l <++> ann $3) } > | fd { ([$1],[],ann $1) } > fd :: { FunDep L } > : tyvars '->' tyvars1 { FunDep (snd $1 nIS $2 <++> snd $3 <** [$2]) (reverse (fst $1)) (reverse (fst $3)) } ----------------------------------------------------------------------------- Datatype declarations GADTs - require the GADTs extension enabled, but we handle that at the calling site. gadtlist :: { ([GadtDecl L],[S],L) } : gadtlist1 {% >> return $1 } > gadtlist :: { ([GadtDecl L],[S],Maybe L) } > : 'where' '{' gadtconstrs1 '}' {% return (fst $3, $1 : $2 : snd $3 ++ [$4], Just $ $1 <^^> $4) } > | 'where' open gadtconstrs1 close {% return (fst $3, $1 : $2 : snd $3 ++ [$4], Just $ $1 <^^> $4) } > | {- empty -} {% checkEnabled EmptyDataDecls >> return ([],[],Nothing) } > gadtconstrs1 :: { ([GadtDecl L],[S]) } > : optsemis gadtconstrs optsemis { (fst $2, reverse $1 ++ snd $2 ++ reverse $3) } > gadtconstrs :: { ([GadtDecl L],[S]) } > : gadtconstrs semis gadtconstr { ($3 ++ fst $1, snd $1 ++ reverse $2) } > | gadtconstr { ($1,[]) } > gadtconstr :: { [GadtDecl L] } > : qcon '::' truectype {% do { c <- checkUnQual $1; > return [GadtDecl ($1 <> $3 <** [$2]) c Nothing Nothing Nothing $3] } } > | qcon '::' context '{' fielddecls '}' '->' truectype > {% do { c <- checkUnQual $1; > ctxt <- checkContext (Just $3) ; > return [GadtDecl ($1 <> $8 <** [$2,$4,$6,$7] ++ snd $5) c Nothing ctxt (Just (reverse $ fst $5)) $8] } } > | qcon '::' '{' fielddecls '}' '->' truectype > {% do { c <- checkUnQual $1; > return [GadtDecl ($1 <> $7 <** [$2,$3,$5,$6] ++ snd $4) c Nothing Nothing (Just (reverse $ fst $4)) $7] } } To allow the empty case we need the EmptyDataDecls extension. > constrs0 :: { ([QualConDecl L],[S],Maybe L) } : {- empty -} {% checkEnabled EmptyDataDecls >> return ([],[],Nothing) } > : '=' constrs { let (ds,ss,l) = $2 in (ds, $1 : reverse ss, Just $ nIS $1 <++> l) } > constrs :: { ([QualConDecl L],[S],L) } > : constrs '|' constr { let (ds,ss,l) = $1 in ($3 : ds, $2 : ss, l <++> ann $3) } > | constr { ([$1],[],ann $1) } > constr :: { QualConDecl L } > : forall context constr1 {% do { checkEnabled ExistentialQuantification ; > ctxt <- checkContext (Just $2) ; > let {(mtvs,ss,ml) = $1} ; > return $ QualConDecl (ml ann $3 <** ss) mtvs ctxt $3 } } > | forall constr1 { let (mtvs, ss, ml) = $1 in QualConDecl (ml ann $2 <** ss) mtvs Nothing $2 } > forall :: { (Maybe [TyVarBind L], [S], Maybe L) } > : 'forall' ktyvars '.' {% checkEnabled ExistentialQuantification >> return (Just (fst $2), [$1,$3], Just $ $1 <^^> $3) } > | {- empty -} { (Nothing, [], Nothing) } To avoid conflicts when introducing type operators, we need to parse record constructors as qcon and then check separately that they are truly unqualified. > constr1 :: { ConDecl L } > : scontype { let (n,ts,l) = $1 in ConDecl l n ts } > | truebtype conop truebtype { InfixConDecl ($1 <> $3) $1 $2 $3 } > | qcon '{' '}' {% do { c <- checkUnQual $1; return $ RecDecl (ann $1 <++> nIS $3 <** [$2,$3]) c [] } } > | qcon '{' fielddecls '}' {% do { c <- checkUnQual $1; > return $ RecDecl (ann $1 <++> nIS $4 <** ($2:reverse (snd $3) ++ [$4])) c (reverse (fst $3)) } } > scontype :: { (Name L, [Type L], L) } > : btype {% do { (c,ts) <- splitTyConApp $1; > return (c, ts, ann $1) } } > fielddecls :: { ([FieldDecl L],[S]) } > : fielddecls ',' fielddecl { ($3 : fst $1, $2 : snd $1) } > | fielddecl { ([$1],[]) } > fielddecl :: { FieldDecl L } > : vars '::' truectype { let (ns,ss,l) = $1 in FieldDecl (l <++> ann $3 <** (reverse ss ++ [$2])) (reverse ns) $3 } > maybe_derivings :: { [Deriving L] } > : {- empty -} { [] } > | derivings { $1 } > derivings :: { [Deriving L] } > : derivings deriving { $2 : $1 } > | deriving { [$1] } > deriving :: { Deriving L } > : 'deriving' deriv_clause_types > { let (ihs, last_ss, sss) = $2 > in Deriving ($1 <^^> last_ss <** $1:sss) Nothing ihs } > | 'deriving' deriv_strategy_no_via deriv_clause_types > { let (ihs, last_ss, sss) = $3 > in Deriving ($1 <^^> last_ss <** $1:sss) (Just $2) ihs } > | 'deriving' deriv_clause_types deriv_strategy_via > { let (ihs, last_ss, sss) = $2 > in Deriving ($1 <^^> last_ss <** $1:sss) (Just $3) ihs } > dclasses :: { ([InstRule L],[S]) } > : types1 {% checkDeriving (fst $1) >>= \ds -> return (ds, snd $1) } > qtycls1 :: { InstHead L } > : qconid { IHCon (ann $1) $1 } > deriv_clause_types :: { ([InstRule L], SrcSpan, [SrcSpan]) } > : qtycls1 { [IRule (ann $1) Nothing Nothing $1], srcInfoSpan (ann $1), [] } > | '(' ')' { [], $2, [$1, $2] } > | '(' dclasses ')' { case fst $2 of > [ts] -> ([IParen ($1 <^^> $3 <** [$1,$3]) ts], $3, []) > tss -> (reverse tss, $3, $1: reverse (snd $2) ++ [$3]) } ----------------------------------------------------------------------------- Kinds > kind :: { Kind L } > : kind1 {% checkEnabled KindSignatures >> return $1 } > kind1 :: { Kind L } > : ctype_(NEVER,'*') {% checkType $1 } > optkind :: { (Maybe (Kind L), [S]) } > : {-empty-} { (Nothing,[]) } > | '::' kind { (Just $2,[$1]) } > opt_tyconsig :: { Maybe ( S, QName L ) } > : {- empty -} { Nothing } > | '::' gtycon { Just ($1, $2) } ----------------------------------------------------------------------------- Class declarations TODO: Lots of stuff to pass around here. No implicit parameters in the where clause of a class declaration. > optcbody :: { (Maybe [ClassDecl L],[S],Maybe L) } > : 'where' '{' cldecls '}' {% checkClassBody (fst $3) >>= \vs -> return (Just vs, $1:$2: snd $3 ++ [$4], Just ($1 <^^> $4)) } > | 'where' open cldecls close {% do { vs <- checkClassBody (fst $3); > let { l' = if null (fst $3) then nIS $4 else (ann . last $ fst $3) }; > return (Just vs, $1:$2: snd $3 ++ [$4], Just (nIS $1 <++> l')) } } > | {- empty -} { (Nothing,[],Nothing) } > cldecls :: { ([ClassDecl L],[S]) } > : optsemis cldecls1 optsemis {% checkRevClsDecls (fst $2) >>= \cs -> return (cs, reverse $1 ++ snd $2 ++ reverse $3) } > | optsemis { ([],reverse $1) } > cldecls1 :: { ([ClassDecl L],[S]) } > : cldecls1 semis cldecl { ($3 : fst $1, snd $1 ++ reverse $2) } > | cldecl { ([$1],[]) } Associated types require the TypeFamilies extension. > cldecl :: { ClassDecl L } > : decl { ClsDecl (ann $1) $1 } > | atdecl {% checkEnabled TypeFamilies >> return $1 } > | 'default' signdecl {% checkEnabled DefaultSignatures >> checkDefSigDef $2 >>= \(n,t,l) -> return (ClsDefSig (nIS $1 <++> ann $2 <** [$1,l]) n t) } > opt_family :: { [S] } > : {- empty -} { [] } > | 'family' { [$1] } > atdecl :: { ClassDecl L } > : 'data' opt_family type opt_datafam_kind_sig > {% do { (cs,dh) <- checkDataHeader $3; > return (ClsDataFam (nIS $1 <++> ann $3 <+?> (fmap ann) $4 <** [$1]) cs dh $4) } } > | 'type' type opt_at_kind_inj_sig2 > {% mkAssocType $1 $2 $3 } > | 'type' 'family' type opt_at_kind_inj_sig > {% do { dh <- checkSimpleType $3; > return (ClsTyFam (nIS $1 <++> ann $3 <+?> (fmap ann) (fst $4) > <+?> (fmap ann) (snd $4) > <** [$1]) dh (fst $4) (snd $4)) } } > | 'type' 'instance' ty_fam_inst_eqn > { ClsTyDef (nIS $1 <++> ann $3 <** [$1,$2]) $3 } ----------------------------------------------------------------------------- Instance declarations > optvaldefs :: { (Maybe [InstDecl L],[S],Maybe L) } > : 'where' '{' valdefs '}' {% checkInstBody (fst $3) >>= \vs -> return (Just vs, $1:$2: snd $3 ++ [$4], Just ($1 <^^> $4)) } > | 'where' open valdefs close {% checkInstBody (fst $3) >>= \vs -> return (Just vs, $1:$2: snd $3 ++ [$4], Just ($1 <^^> $4)) } > | {- empty -} { (Nothing, [], Nothing) } > valdefs :: { ([InstDecl L],[S]) } > : optsemis valdefs1 optsemis {% checkRevInstDecls (fst $2) >>= \is -> return (is, reverse $1 ++ snd $2 ++ reverse $3) } > | optsemis { ([],reverse $1) } > valdefs1 :: { ([InstDecl L],[S]) } > : valdefs1 semis insvaldef { ($3 : fst $1, snd $1 ++ reverse $2) } > | insvaldef { ([$1],[]) } Associated types require the TypeFamilies extension enabled. > insvaldef :: { InstDecl L } > : valdef { InsDecl (ann $1) $1 } > | atinst {% checkEnabled TypeFamilies >> return $1 } > | specinldecl { InsDecl (ann $1) $1 } > | signdecl0 {% checkEnabled InstanceSigs >> return (InsDecl (ann $1) $1) } inlinst :: { InstDecl L } : '{-# INLINE' activation qvar '#-}' { let Loc l (INLINE s) = $1 in InsInline (l <^^> $4 <** [l,$4]) s $2 $3 } > atinst :: { InstDecl L } > : 'type' truedtype '=' truectype > {% do { -- no checkSimpleType $4 since dtype may contain type patterns > return (InsType (nIS $1 <++> ann $4 <** [$1,$3]) $2 $4) } } > | data_or_newtype truectype constrs0 maybe_derivings > {% do { -- (cs,c,t) <- checkDataHeader $4; > let {(ds,ss,minf) = $3}; > checkDataOrNew $1 ds; > return (InsData ($1 <> $2 <+?> minf <+?> fmap ann (listToMaybe $4) <** ss ) $1 $2 (reverse ds) (reverse $4)) } } > | data_or_newtype truectype optkind gadtlist maybe_derivings > {% do { -- (cs,c,t) <- checkDataHeader $4; > let { (gs,ss,minf) = $4 } ; > checkDataOrNewG $1 gs; > return $ InsGData (ann $1 <+?> minf <+?> fmap ann (listToMaybe $5) <** (snd $3 ++ ss)) $1 $2 (fst $3) (reverse gs) (reverse $5) } } ----------------------------------------------------------------------------- Value definitions > valdef :: { Decl L } > : exp0b optsig rhs optwhere {% checkValDef (($1 <> $3 <+?> (fmap ann) (fst $4)) <** (snd $4)) $1 $2 $3 (fst $4) } > | '!' aexp rhs optwhere {% do { checkEnabled BangPatterns ; > let { l = nIS $1 <++> ann $2 <** [$1] }; > p <- checkPattern (BangPat l $2); > return $ PatBind (p <> $3 <+?> (fmap ann) (fst $4) <** snd $4) > p $3 (fst $4) } } May bind implicit parameters > optwhere :: { (Maybe (Binds L),[S]) } > : 'where' binds { (Just $2, [$1]) } > | {- empty -} { (Nothing, []) } Type signatures on value definitions require ScopedTypeVariables (or PatternSignatures, which is deprecated). > optsig :: { (Maybe (Type L, S)) } > : '::' truectype {% checkEnabled ScopedTypeVariables >> return (Just ($2, $1)) } > | {- empty -} { Nothing } > rhs :: { Rhs L } > : '=' trueexp { UnGuardedRhs (nIS $1 <++> ann $2 <** [$1]) $2 } > | gdrhs { GuardedRhss (snd $1) (reverse $ fst $1) } > gdrhs :: { ([GuardedRhs L],L) } > : gdrhs gdrh { ($2 : fst $1, snd $1 <++> ann $2) } > | gdrh { ([$1],ann $1) } Guards may contain patterns if PatternGuards is enabled, hence quals instead of exp. > gdrh :: { GuardedRhs L } > : '|' quals '=' trueexp {% do { checkPatternGuards (fst $2); > return $ GuardedRhs (nIS $1 <++> ann $4 <** ($1:snd $2 ++ [$3])) (reverse (fst $2)) $4 } } ----------------------------------------------------------------------------- Expressions Note: The Report specifies a meta-rule for lambda, let and if expressions (the exp's that end with a subordinate exp): they extend as far to the right as possible. That means they cannot be followed by a type signature or infix application. To implement this without shift/reduce conflicts, we split exp10 into these expressions (exp10a) and the others (exp10b). That also means that only an exp0 ending in an exp10b (an exp0b) can followed by a type signature or infix application. So we duplicate the exp0 productions to distinguish these from the others (exp0a). Ugly: We need non-parenthesized post-operators for HaRP, and to parse both these and normal left sections, we parse both as PostOp and let the post pass mangle them into the correct form depending on context. > trueexp :: { Exp L } > : exp {% checkExpr $1 } > exp :: { PExp L } > : exp0b '::' truectype { ExpTypeSig ($1 <> $3 <** [$2]) $1 $3 } > | exp0 { $1 } > | exp0b qop { PostOp ($1 <> $2) $1 $2 } > | exp0b '-<' exp { LeftArrApp ($1 <> $3 <** [$2]) $1 $3 } > | exp0b '>-' exp { RightArrApp ($1 <> $3 <** [$2]) $1 $3 } > | exp0b '-<<' exp { LeftArrHighApp ($1 <> $3 <** [$2]) $1 $3 } > | exp0b '>>-' exp { RightArrHighApp ($1 <> $3 <** [$2]) $1 $3 } > exp0 :: { PExp L } > : exp0a { $1 } > | exp0b { $1 } > exp0a :: { PExp L } > : exp0b qop exp10a { InfixApp ($1 <> $3) $1 $2 $3 } > | exp10a { $1 } > exp0b :: { PExp L } > : exp0b qop exp10b { InfixApp ($1 <> $3) $1 $2 $3 } > | exp10b { $1 } > exp10a :: { PExp L } > : expblocka { $1 } > | fexp expblocka {% checkEnabled BlockArguments >> > return (App ($1 <> $2) $1 $2) } > expblocka :: { PExp L } > : '\\' apats '->' exp { Lambda (nIS $1 <++> ann $4 <** [$1,$3]) (reverse $2) $4 } A let may bind implicit parameters > | 'let' binds 'in' exp { Let (nIS $1 <++> ann $4 <** [$1,$3]) $2 $4 } > | 'if' exp optlayoutsemi 'then' exp optlayoutsemi 'else' exp > { If (nIS $1 <++> ann $8 <** ($1:$3 ++ $4:$6 ++ [$7])) $2 $5 $8 } > | 'if' ifaltslist {% checkEnabled MultiWayIf >> > let (alts, inf, ss) = $2 > in return (MultiIf (nIS $1 <++> inf <** ($1:ss)) alts) } > | 'proc' apat '->' exp { Proc (nIS $1 <++> ann $4 <** [$1,$3]) $2 $4 } > | exppragma { $1 } > optlayoutsemi :: { [S] } > : ';' {% checkEnabled DoAndIfThenElse >> return [$1] } > | {- empty -} { [] } We won't come here unless XmlSyntax is already checked. > opthsxsemi :: { [S] } > : ';' { [$1] } > | {- empty -} { [] } mdo blocks require the RecursiveDo extension enabled, but the lexer handles that. > exp10b :: { PExp L } > : expblockb { $1 } > | '-' fexp { NegApp (nIS $1 <++> ann $2 <** [$1]) $2 } > | fexp { $1 } > expblockb :: { PExp L } > : 'case' exp 'of' altslist { let (als, inf, ss) = $4 in Case (nIS $1 <++> inf <** ($1:$3:ss)) $2 als } > | '\\' 'case' altslist {% do { checkEnabled LambdaCase ; > let { (als, inf, ss) = $3 } ; > return (LCase (nIS $1 <++> inf <** ($1:$2:ss)) als) } } > | 'do' stmtlist { let (sts, inf, ss) = $2 in Do (nIS $1 <++> inf <** $1:ss) sts } > | 'mdo' stmtlist { let (sts, inf, ss) = $2 in MDo (nIS $1 <++> inf <** $1:ss) sts } > exppragma :: { PExp L } > : '{-# CORE' STRING '#-}' exp { let Loc l (StringTok (s,_)) = $2 in CorePragma (nIS $1 <++> ann $4 <** [l,$3]) s $4 } > | '{-# SCC' STRING '#-}' exp { let Loc l (StringTok (s,_)) = $2 in SCCPragma (nIS $1 <++> ann $4 <** [l,$3]) s $4 } > | '{-# GENERATED' STRING INT ':' INT '-' INT ':' INT '#-}' exp > { let { Loc l0 (StringTok (s,_)) = $2; > Loc l1 (IntTok (i1,_)) = $3; > Loc l2 (IntTok (i2,_)) = $5; > Loc l3 (IntTok (i3,_)) = $7; > Loc l4 (IntTok (i4,_)) = $9} > in GenPragma (nIS $1 <++> ann $11 <** [$1,l0,l1,$4,l2,$6,l3,$8,l4,$10]) > s (fromInteger i1, fromInteger i2) > (fromInteger i3, fromInteger i4) $11 } > fexp :: { PExp L } > : fexp aexp { App ($1 <> $2) $1 $2 } > | fexp expblockb {% checkEnabled BlockArguments >> > return (App ($1 <> $2) $1 $2) } > | aexp { $1 } > apats :: { [Pat L] } > : apats apat { $2 : $1 } > | apat { [$1] } > apat :: { Pat L } > : aexp {% checkPattern $1 } > | '!' aexp {% checkPattern (BangPat (nIS $1 <++> ann $2 <** [$1]) $2) } UGLY: Because patterns and expressions are mixed, aexp has to be split into two rules: One right-recursive and one left-recursive. Otherwise we get two reduce/reduce-errors (for as-patterns and irrefutable patters). Even though the variable in an as-pattern cannot be qualified, we use qvar here to avoid a shift/reduce conflict, and then check it ourselves (as for vars above). Non-linear name binding, @:, requires RegularPatterns, but the lexer handles that. > aexp :: { PExp L } > : qvar '@' aexp {% do { n <- checkUnQual $1; > return (AsPat ($1 <> $3 <** [$2]) n $3) } } > | qvar '@:' aexp {% do { n <- checkUnQual $1; > return (CAsRP ($1 <> $3 <** [$2]) n $3) } } > | '~' aexp { IrrPat (nIS $1 <++> ann $2 <** [$1]) $2 } > | TYPEAPP trueatype { TypeApp (nIS $1 <++> ann $2 <** [$1]) $2 } > | aexp1 { $1 } Note: The first two alternatives of aexp1 are not necessarily record updates: they could be labeled constructions. > aexp1 :: { PExp L } > : aexp1 '{' '}' {% liftM (amap (const (ann $1 <++> nIS $3 <** [$2,$3]))) $ mkRecConstrOrUpdate $1 [] } > | aexp1 '{' fbinds '}' {% liftM (amap (const (ann $1 <++> nIS $4 <** ($2:snd $3 ++ [$4])))) > $ mkRecConstrOrUpdate $1 (fst $3) } > | aexp2 { $1 } According to the Report, the left section (e op) is legal iff (e op x) parses equivalently to ((e) op x). Thus e must be an exp0b. An implicit parameter can be used as an expression, enabled by the lexer. Extensions using banana brackets are also enabled by the lexer. The only thing we need to look at here is the erpats that use no non-standard lexemes. > aexp2 :: { PExp L } > : ivar { IPVar (ann $1) $1 } > | overloaded_label { $1 } > | qvar { Var (ann $1) $1 } > | gcon { $1 } > | literal { Lit (ann $1) $1 } > | '(' texp ')' { Paren ($1 <^^> $3 <** [$1,$3]) $2 } > | '(' tup_exprs ')' {% do { e <- mkSumOrTuple Boxed ($1 <^^> $3) (snd $2) > ; return $ amap (\l -> l <** [$1] ++ fst $2 ++ [$3]) e } } > | '(#' texp '#)' { TupleSection ($1 <^^> $3 <** [$1,$3]) Unboxed [Just $2] } > | '(#' tup_exprs '#)' {% do { e <- mkSumOrTuple Unboxed ($1 <^^> $3) (snd $2) > ; return $ amap (\l -> l <** [$1] ++ fst $2 ++ [$3]) e } } > | '[' list ']' { amap (\l -> l <** [$3]) $ $2 ($1 <^^> $3 <** [$1]) } > | '[:' parr ':]' { amap (\l -> l <** [$3]) $ $2 ($1 <^^> $3 <** [$1]) } > | '(' erpats ')' {% checkEnabled RegularPatterns >> return (Paren ($1 <^^> $3 <** [$1,$3]) $2) } > | '(|' exp '|)' { ArrOp ($1 <^^> $3 <** [$1,$3]) $2 } > | '(/' sexps '/)' { SeqRP ($1 <^^> $3 <** ($1:reverse (snd $2) ++ [$3])) $ reverse (fst $2) } > | '(/' exp '|' quals '/)' { GuardRP ($1 <^^> $5 <** ($1:$3 : snd $4 ++ [$5])) $2 $ (reverse $ fst $4) } > | xml { $1 } Template Haskell - all this is enabled in the lexer. > | IDSPLICE { let Loc l (THIdEscape s) = $1 in SpliceExp (nIS l) $ IdSplice (nIS l) s } > | TIDSPLICE { let Loc l (THTIdEscape s) = $1 in SpliceExp (nIS l) $ TIdSplice (nIS l) s } > | '$(' trueexp ')' { let l = ($1 <^^> $3 <** [$1,$3]) in SpliceExp l $ ParenSplice l $2 } > | '$$(' trueexp ')' { let l = ($1 <^^> $3 <** [$1,$3]) in SpliceExp l $ TParenSplice l $2 } > | '[|' trueexp '|]' { let l = ($1 <^^> $3 <** [$1,$3]) in BracketExp l $ ExpBracket l $2 } > | '[||' trueexp '||]' { let l = ($1 <^^> $3 <** [$1,$3]) in BracketExp l $ TExpBracket l $2 } > | '[p|' exp0 '|]' {% do { p <- checkPattern $2; > let {l = ($1 <^^> $3 <** [$1,$3]) }; > return $ BracketExp l $ PatBracket l p } } > | '[t|' truectype '|]' { let l = $1 <^^> $3 <** [$1,$3] in BracketExp l $ TypeBracket l $2 } > | '[d|' open topdecls close '|]' { let l = $1 <^^> $5 <** ($1:snd $3 ++ [$5]) > in BracketExp l $ DeclBracket ($1 <^^> $5 <** ($2:snd $3 ++ [$4,$5])) (fst $3) } > | VARQUOTE '(' ')' { let {l1 = $1 <^^> $3 <** [$1]; > l2 = $2 <^^> $3 <** [$2,$3];} > in VarQuote l1 (unit_con_name l2) } > | VARQUOTE '[' ']' { let {l1 = $1 <^^> $3 <** [$1]; > l2 = $2 <^^> $3 <** [$2,$3];} > in VarQuote l1 (list_con_name l2) } > | VARQUOTE qvar { VarQuote (nIS $1 <++> ann $2 <** [$1]) $2 } > | VARQUOTE qcon { VarQuote (nIS $1 <++> ann $2 <** [$1]) $2 } > | TYPQUOTE tyvar { TypQuote (nIS $1 <++> ann $2 <** [$1]) (UnQual (ann $2) $2) } > | TYPQUOTE gtycon { TypQuote (nIS $1 <++> ann $2 <** [$1]) $2 } > | QUASIQUOTE { let Loc l (THQuasiQuote (n,q)) = $1 in QuasiQuote (nIS l) n q } End Template Haskell > tup_exprs :: { ([S], SumOrTuple L) } > : texp commas_tup_tail { (fst $2, STuple (Just $1 : snd $2)) } > | texp bars { ($2, SSum 0 (length $2) $1) } > | commas tup_tail { ($1 ++ (fst $2), STuple ((map (const Nothing) $1) ++ snd $2)) } > | bars texp bars0 { ($1 ++ $3, SSum (length $1) (length $3) $2) } > commas_tup_tail :: { ([S], [Maybe (PExp L)]) } > : commas tup_tail { (reverse $1 ++ fst $2, map (const Nothing) (tail $1) ++ snd $2) } > tup_tail :: { ([S], [Maybe (PExp L)]) } > : texp commas_tup_tail { (fst $2, Just $1 : snd $2) } > | texp { ([], [Just $1]) } > | {- empty -} { ([], [Nothing]) } > commas :: { [S] } > : commas ',' { $2 : $1 } > | ',' { [$1] } > bars :: { [S] } > : bars '|' { $2 : $1 } > | '|' { [$1] } > bars0 :: { [S] } > : bars { $1 } > | { [] } > texp :: { PExp L } > : exp { $1 } > | qopm exp0 { PreOp ($1 <> $2) $1 $2 } > | exp '->' pat {% do {checkEnabled ViewPatterns; > return $ ViewPat ($1 <> $3 <** [$2]) $1 $3} } ----------------------------------------------------------------------------- Harp Extensions > sexps :: { ([PExp L],[S]) } > : sexps ',' exp { ($3 : fst $1, $2 : snd $1) } > | exp { ([$1],[]) } Either patterns are left associative > erpats :: { PExp L } > : exp '|' erpats { EitherRP ($1 <> $3 <** [$2]) $1 $3 } > | exp '|' exp { EitherRP ($1 <> $3 <** [$2]) $1 $3 } ----------------------------------------------------------------------------- Hsx Extensions - requires XmlSyntax, but the lexer handles all that. > xml :: { PExp L } > : '<' name attrs mattr '>' children opthsxsemi '' > {% do { n <- checkEqNames $2 $9; > let { cn = reverse $6; > as = reverse $3; > l = $1 <^^> $10 <** [$1,$5] ++ $7 ++ [$8,srcInfoSpan (ann $9),$10] }; > return $ XTag l n as $4 cn } } > | '<' name attrs mattr '/>' { XETag ($1 <^^> $5 <** [$1,$5]) $2 (reverse $3) $4 } > | '<%' exp '%>' { XExpTag ($1 <^^> $3 <** [$1,$3]) $2 } > | '<%>' children opthsxsemi '' { XChildTag ($1 <^^> $5 <** ($1:$3++[$4,$5])) (reverse $2) } > children :: { [PExp L] } > : children child { $2 : $1 } > | {- empty -} { [] } > child :: { PExp L } > : PCDATA { let Loc l (XPCDATA pcd) = $1 in XPcdata (nIS l) pcd } > | '<[' sexps ']>' { XRPats ($1 <^^> $3 <** (snd $2 ++ [$1,$3])) $ reverse (fst $2) } > | xml { $1 } > name :: { XName L } > : xmlname ':' xmlname { let {Loc l1 s1 = $1; Loc l2 s2 = $3} > in XDomName (nIS l1 <++> nIS l2 <** [l1,$2,l2]) s1 s2 } > | xmlname { let Loc l str = $1 in XName (nIS l) str } > xmlname :: { Loc String } > : VARID { let Loc l (VarId s) = $1 in Loc l s } > | CONID { let Loc l (ConId s) = $1 in Loc l s } > | DVARID { let Loc l (DVarId s) = $1 in Loc l $ mkDVar s } > | xmlkeyword { $1 } > xmlkeyword :: { Loc String } > : 'type' { Loc $1 "type" } > | 'class' { Loc $1 "class" } > | 'data' { Loc $1 "data" } > | 'foreign' { Loc $1 "foreign" } > | 'export' { Loc $1 "export" } > | 'safe' { Loc $1 "safe" } > | 'unsafe' { Loc $1 "unsafe" } > | 'interruptible' { Loc $1 "interruptible" } > | 'threadsafe' { Loc $1 "threadsafe" } > | 'stdcall' { Loc $1 "stdcall" } > | 'ccall' { Loc $1 "ccall" } > | 'cplusplus' { Loc $1 "cplusplus" } > | 'dotnet' { Loc $1 "dotnet" } > | 'jvm' { Loc $1 "jvm" } > | 'js' { Loc $1 "js" } > | 'javascript' { Loc $1 "javascript" } > | 'capi' { Loc $1 "capi" } > | 'as' { Loc $1 "as" } > | 'by' { Loc $1 "by" } > | 'case' { Loc $1 "case" } > | 'default' { Loc $1 "default" } > | 'deriving' { Loc $1 "deriving" } > | 'do' { Loc $1 "do" } > | 'else' { Loc $1 "else" } > | 'family' { Loc $1 "family" } > | 'forall' { Loc $1 "forall" } > | 'group' { Loc $1 "group" } > | 'hiding' { Loc $1 "hiding" } > | 'if' { Loc $1 "if" } > | 'import' { Loc $1 "import" } > | 'in' { Loc $1 "in" } > | 'infix' { Loc $1 "infix" } > | 'infixl' { Loc $1 "infixl" } > | 'infixr' { Loc $1 "infixr" } > | 'instance' { Loc $1 "instance" } > | 'let' { Loc $1 "let" } > | 'mdo' { Loc $1 "mdo" } > | 'module' { Loc $1 "module" } > | 'newtype' { Loc $1 "newtype" } > | 'of' { Loc $1 "of" } > | 'proc' { Loc $1 "proc" } > | 'rec' { Loc $1 "rec" } > | 'then' { Loc $1 "then" } > | 'using' { Loc $1 "using" } > | 'where' { Loc $1 "where" } > | 'qualified' { Loc $1 "qualified" } > attrs :: { [ParseXAttr L] } > : attrs attr { $2 : $1 } > | {- empty -} { [] } > attr :: { ParseXAttr L } > : name '=' aexp { XAttr ($1 <> $3 <** [$2]) $1 $3 } > mattr :: { Maybe (PExp L) } > : aexp { Just $1 } > | {-empty-} { Nothing } ----------------------------------------------------------------------------- List expressions The rules below are little bit contorted to keep lexps left-recursive while avoiding another shift/reduce-conflict. > list :: { L -> PExp L } > : texp { \l -> List l [$1] } > | lexps { \l -> let (ps,ss) = $1 in List (l <** reverse ss) (reverse ps) } > | texp '..' { \l -> EnumFrom (l <** [$2]) $1 } > | texp ',' exp '..' { \l -> EnumFromThen (l <** [$2,$4]) $1 $3 } > | texp '..' exp { \l -> EnumFromTo (l <** [$2]) $1 $3 } > | texp ',' exp '..' exp { \l -> EnumFromThenTo (l <** [$2,$4]) $1 $3 $5 } > | texp '|' pqualstmts { \l -> let (stss, ss) = $3 in ParComp (l <** ($2:ss)) $1 (reverse stss) } > lexps :: { ([PExp L],[S]) } > : lexps ',' texp { let (es, ss) = $1 in ($3 : es, $2 : ss) } > | texp ',' texp { ([$3,$1], [$2]) } ----------------------------------------------------------------------------- List comprehensions > pqualstmts :: { ([[QualStmt L]],[S]) } > : pqualstmts '|' qualstmts { let { (stss, ss1) = $1; > (sts, ss2) = $3 } > in (reverse sts : stss, ss1 ++ [$2] ++ reverse ss2) } > | qualstmts { let (sts, ss) = $1 in ([reverse sts], reverse ss) } > qualstmts :: { ([QualStmt L],[S]) } > : qualstmts ',' qualstmt { let (sts, ss) = $1 in ($3 : sts, $2 : ss) } > | qualstmt { ([$1],[]) } > qualstmt :: { QualStmt L } > : transformqual { $1 } > | qual { QualStmt (ann $1) $1 } > transformqual :: { QualStmt L } > : 'then' trueexp { ThenTrans (nIS $1 <++> ann $2 <** [$1]) $2 } > | 'then' trueexp 'by' trueexp { ThenBy (nIS $1 <++> ann $4 <** [$1,$3]) $2 $4 } > | 'then' 'group' 'by' trueexp { GroupBy (nIS $1 <++> ann $4 <** [$1,$2,$3]) $4 } > | 'then' 'group' 'using' trueexp { GroupUsing (nIS $1 <++> ann $4 <** [$1,$2,$3]) $4 } > | 'then' 'group' 'by' trueexp 'using' trueexp { GroupByUsing (nIS $1 <++> ann $6 <** [$1,$2,$3,$5]) $4 $6 } > quals :: { ([Stmt L],[S]) } > : quals ',' qual { let (sts, ss) = $1 in ($3 : sts, $2 : ss) } > | qual { ([$1],[]) } > qual :: { Stmt L } > : pat '<-' trueexp { Generator ($1 <> $3 <** [$2]) $1 $3 } > | trueexp { Qualifier (ann $1) $1 } > | 'let' binds { LetStmt (nIS $1 <++> ann $2 <** [$1]) $2 } ----------------------------------------------------------------------------- Parallel array expressions See comments on list expressions. Parallel arrays are finite sequences. This definition also allows empty arrays. > parr :: { L -> PExp L } > : { \l -> ParArray l [] } > | texp { \l -> ParArray l [$1] } > | lexps { \l -> let (ps,ss) = $1 in ParArray (l <** reverse ss) (reverse ps) } > | texp '..' exp { \l -> ParArrayFromTo (l <** [$2]) $1 $3 } > | texp ',' exp '..' exp { \l -> ParArrayFromThenTo (l <** [$2,$4]) $1 $3 $5 } > | texp '|' pqualstmts { \l -> let (stss, ss) = $3 in ParArrayComp (l <** ($2:ss)) $1 (reverse stss) } ----------------------------------------------------------------------------- Case alternatives > altslist :: { ([Alt L],L,[S]) } > : '{' alts '}' { (fst $2, $1 <^^> $3, $1:snd $2 ++ [$3]) } > | open alts close { let l' = ann . last $ fst $2 > in (fst $2, nIS $1 <++> l', $1:snd $2 ++ [$3]) } > | '{' '}' {% do { checkEnabled EmptyCase; > return ([], $1 <^^> $2, [$1, $2]) } } > alts :: { ([Alt L],[S]) } > : optsemis alts1 optsemis { (reverse $ fst $2, $1 ++ snd $2 ++ $3) } > alts1 :: { ([Alt L],[S]) } > : alts1 semis alt { ($3 : fst $1, snd $1 ++ $2) } > | alt { ([$1],[]) } > alt :: { Alt L } > : pat ralt optwhere { Alt ($1 <> $2 <+?> (fmap ann) (fst $3) <** snd $3) $1 $2 (fst $3) } > ralt :: { Rhs L } > : '->' trueexp { UnGuardedRhs (nIS $1 <++> ann $2 <** [$1]) $2 } > | gdpats { GuardedRhss (snd $1) (reverse $ fst $1) } > gdpats :: { ([GuardedRhs L],L) } > : gdpats gdpat { ($2 : fst $1, snd $1 <++> ann $2) } > | gdpat { ([$1], ann $1) } A guard can be a pattern guard if PatternGuards is enabled, hence quals instead of exp0. > gdpat :: { GuardedRhs L } > : '|' quals '->' trueexp {% do { checkPatternGuards (fst $2); > let {l = nIS $1 <++> ann $4 <** ($1:snd $2 ++ [$3])}; > return (GuardedRhs l (reverse (fst $2)) $4) } } > pat :: { Pat L } > : exp {% checkPattern $1 } > | '!' aexp {% checkPattern (BangPat (nIS $1 <++> ann $2 <** [$1]) $2) } > ifaltslist :: { ([GuardedRhs L], L, [S]) } > : '{' ifalts '}' { (fst $2, $1 <^^> $3, $1:snd $2 ++ [$3]) } > | open ifalts close { let l' = ann . last $ fst $2 > in (fst $2, nIS $1 <++> l', $1:snd $2 ++ [$3]) } > ifalts :: { ([GuardedRhs L], [S]) } > : optsemis ifalts1 optsemis { (reverse $ fst $2, $1 ++ snd $2 ++ $3) } > ifalts1 :: { ([GuardedRhs L], [S]) } > : ifalts1 optsemis gdpat { ($3 : fst $1, snd $1 ++ $2) } > | gdpat { ([$1], []) } ----------------------------------------------------------------------------- Statement sequences As per the Report, but with stmt expanded to simplify building the list without introducing conflicts. This also ensures that the last stmt is an expression. TODO: The points can't be added here, must be propagated! > stmtlist :: { ([Stmt L],L,[S]) } > : '{' stmts '}' { (fst $2, $1 <^^> $3, $1:snd $2 ++ [$3]) } > | open stmts close { let l' = ann . last $ fst $2 > in (fst $2, nIS $1 <++> l', $1:snd $2 ++ [$3]) } > stmts :: { ([Stmt L],[S]) } > : stmt stmts1 { ($1 : fst $2, snd $2) } > | ';' stmts { (fst $2, $1 : snd $2) } > | {- empty -} { ([],[]) } > stmts1 :: { ([Stmt L],[S]) } > : ';' stmts { (fst $2, $1 : snd $2) } > | {- empty -} { ([],[]) } A let statement may bind implicit parameters. > stmt :: { Stmt L } > : 'let' binds { LetStmt (nIS $1 <++> ann $2 <** [$1]) $2 } > | pat '<-' trueexp { Generator ($1 <> $3 <** [$2]) $1 $3 } > | trueexp { Qualifier (ann $1) $1 } > | 'rec' stmtlist { let (stms,inf,ss) = $2 in RecStmt (nIS $1 <++> inf <** $1:ss) stms } ----------------------------------------------------------------------------- Record Field Update/Construction > fbinds :: { ([PFieldUpdate L],[S]) } > : fbind ',' fbinds { let (fbs, ss) = $3 in ($1 : fbs, $2 : ss) } > | fbind { ([$1],[]) } > | '..' {% do { checkEnabled RecordWildCards `atSrcLoc` (getPointLoc $1); > return ([FieldWildcard (nIS $1)], []) } } Puns and wild cards need the respective extensions enabled. > fbind :: { PFieldUpdate L } > : qvar '=' exp { FieldUpdate ($1 <>$3 <** [$2]) $1 $3 } > | qvar {% checkEnabled NamedFieldPuns >> checkQualOrUnQual $1 >>= return . FieldPun (ann $1) } ----------------------------------------------------------------------------- Implicit parameter bindings - need the ImplicitParameter extension enabled, but the lexer handles that. > ipbinds :: { ([IPBind L],[S]) } > : optsemis ipbinds1 optsemis { (reverse (fst $2), reverse $1 ++ snd $2 ++ reverse $3) } > ipbinds1 :: { ([IPBind L],[S]) } > : ipbinds1 semis ipbind { ($3 : fst $1, snd $1 ++ reverse $2) } > | ipbind { ([$1],[]) } > ipbind :: { IPBind L } > : ivar '=' trueexp { IPBind ($1 <> $3 <** [$2]) $1 $3 } ----------------------------------------------------------------------------- Variables, Constructors and Operators. > gcon :: { PExp L } > : sysdcon { $1 } > | qcon { Con (ann $1) $1 } > gcon_nolist :: { PExp L } > : sysdcon_nolist { $1 } > | qcon { Con (ann $1) $1 } > sysdcon_nolist :: { PExp L } > : '(' ')' { p_unit_con ($1 <^^> $2 <** [$1,$2]) } > | '(#' '#)' { p_unboxed_singleton_con ($1 <^^> $2 <** [$1,$2]) } > | '(#' commas '#)' { p_tuple_con ($1 <^^> $3 <** $1:reverse ($3:$2)) Unboxed (length $2) } > | '(' commas ')' { p_tuple_con ($1 <^^> $3 <** $1:reverse ($3:$2)) Boxed (length $2) } > sysdcon :: { PExp L } > : '[' ']' { List ($1 <^^> $2 <** [$1,$2]) [] } > | sysdcon_nolist { $1 } > var :: { Name L } > : varid { $1 } > | '(' varsym ')' { fmap (const ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3])) $2 } > var_no_safety :: { Name L } > : varid_no_safety { $1 } > | '(' varsym ')' { fmap (const ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3])) $2 } > qvar :: { QName L } > : qvarid { $1 } > | '(' qvarsym ')' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } Implicit parameter > ivar :: { IPName L } > : ivarid { $1 } > con :: { Name L } > : conid { $1 } > | '(' consym ')' { fmap (const ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3])) $2 } > con_list :: { ([S], [Name L]) } > : con { ([], [$1]) } > | con ',' con_list { let (ss, cs) = $3 > in ($2 : ss, $1 :cs) } > qcon :: { QName L } > : qconid { $1 } > | '(' gconsym ')' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > varop :: { Name L } > : varsym { $1 } > | '`' varid '`' { fmap (const ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3])) $2 } > qvarop :: { QName L } > : qvarsym { $1 } > | '`' qvarid '`' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > qvaropm :: { QName L } > : qvarsymm { $1 } > | '`' qvarid '`' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > conop :: { Name L } > : consym { $1 } > | '`' conid '`' { fmap (const ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3])) $2 } > qconop :: { QName L } > : gconsym { $1 } > | '`' qconid '`' { updateQNameLoc ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > op :: { Op L } > : varop { VarOp (ann $1) $1 } > | conop { ConOp (ann $1) $1 } > qop :: { QOp L } > : qvarop { QVarOp (ann $1) $1 } > | qconop { QConOp (ann $1) $1 } > qopm :: { QOp L } > : qvaropm { QVarOp (ann $1) $1 } > | qconop { QConOp (ann $1) $1 } > gconsym :: { QName L } > : ':' { list_cons_name (nIS $1) } > | qconsym { $1 } > overloaded_label :: { PExp L } > : LABELVARID { let Loc l (LabelVarId v) = $1 in OverloadedLabel > (nIS l) v } ----------------------------------------------------------------------------- Identifiers and Symbols > qvarid :: { QName L } > : varid { UnQual (ann $1) $1 } > | QVARID { let {Loc l (QVarId q) = $1; nis = nIS l} > in Qual nis (ModuleName nis (fst q)) (Ident nis (snd q)) } > | '_' { hole_name (nIS $1) } > varid_no_safety :: { Name L } > : VARID { let Loc l (VarId v) = $1 in Ident (nIS l) v } > | 'as' { as_name (nIS $1) } > | 'qualified' { qualified_name (nIS $1) } > | 'hiding' { hiding_name (nIS $1) } > | 'export' { export_name (nIS $1) } > | 'stdcall' { stdcall_name (nIS $1) } > | 'ccall' { ccall_name (nIS $1) } > | 'cplusplus' { cplusplus_name (nIS $1) } > | 'dotnet' { dotnet_name (nIS $1) } > | 'jvm' { jvm_name (nIS $1) } > | 'js' { js_name (nIS $1) } > | 'javascript' { javascript_name (nIS $1) } > | 'capi' { capi_name (nIS $1) } > | 'stock' { stock_name (nIS $1) } > | 'anyclass' { anyclass_name (nIS $1) } > varid :: { Name L } > : varid_no_safety { $1 } > | 'safe' { safe_name (nIS $1) } > | 'unsafe' { unsafe_name (nIS $1) } > | 'interruptible' { interruptible_name (nIS $1) } > | 'threadsafe' { threadsafe_name (nIS $1) } > | 'forall' { forall_name (nIS $1) } > | 'family' { family_name (nIS $1) } > | 'role' { role_name (nIS $1) } Implicit parameter > ivarid :: { IPName L } > : IDUPID { let Loc l (IDupVarId i) = $1 in IPDup (nIS l) i } > | ILINID { let Loc l (ILinVarId i) = $1 in IPLin (nIS l) i } > qconid :: { QName L } > : conid { UnQual (ann $1) $1 } > | QCONID { let {Loc l (QConId q) = $1; nis = nIS l} in Qual nis (ModuleName nis (fst q)) (Ident nis (snd q)) } > conid :: { Name L } > : CONID { let Loc l (ConId c) = $1 in Ident (nIS l) c } > qconsym :: { QName L } > : consym { UnQual (ann $1) $1 } > | QCONSYM { let {Loc l (QConSym q) = $1; nis = nIS l} in Qual nis (ModuleName nis (fst q)) (Symbol nis (snd q)) } > consym :: { Name L } > : CONSYM { let Loc l (ConSym c) = $1 in Symbol (nIS l) c } > qvarsym :: { QName L } > : qvarsym_('*') { $1 } > qvarsym_(ostar) :: { QName L } > : varsym_(ostar) { UnQual (ann $1) $1 } > | qvarsym1 { $1 } > qvarsymm :: { QName L } > : varsymm { UnQual (ann $1) $1 } > | qvarsym1 { $1 } > varsym :: { Name L } > : varsym_('*') { $1 } > varsym_(ostar) :: { Name L } > : varsymm_(ostar) { $1 } > | '-' { minus_name (nIS $1) } > varsymm :: { Name L } > : varsymm_('*') { $1 } > varsymm_(ostar) :: { Name L } -- varsym not including '-' > : VARSYM { let Loc l (VarSym v) = $1 in Symbol (nIS l) v } > | '!' { bang_name (nIS $1) } > | '.' { dot_name (nIS $1) } > | ostar { star_name (nIS $1) } > qvarsym1 :: { QName L } > : QVARSYM { let {Loc l (QVarSym q) = $1; nis = nIS l} in Qual nis (ModuleName nis (fst q)) (Symbol nis (snd q)) } > literal :: { Literal L } > : INT { let Loc l (IntTok (i,raw)) = $1 in Int (nIS l) i raw } > | CHAR { let Loc l (Character (c,raw)) = $1 in Char (nIS l) c raw } > | RATIONAL { let Loc l (FloatTok (r,raw)) = $1 in Frac (nIS l) r raw } > | STRING { let Loc l (StringTok (s,raw)) = $1 in String (nIS l) s raw } > | PRIMINT { let Loc l (IntTokHash (i,raw)) = $1 in PrimInt (nIS l) i raw } > | PRIMWORD { let Loc l (WordTokHash (w,raw)) = $1 in PrimWord (nIS l) w raw } > | PRIMFLOAT { let Loc l (FloatTokHash (f,raw)) = $1 in PrimFloat (nIS l) f raw } > | PRIMDOUBLE { let Loc l (DoubleTokHash (d,raw)) = $1 in PrimDouble (nIS l) d raw } > | PRIMCHAR { let Loc l (CharacterHash (c,raw)) = $1 in PrimChar (nIS l) c raw } > | PRIMSTRING { let Loc l (StringHash (s,raw)) = $1 in PrimString (nIS l) s raw } ----------------------------------------------------------------------------- Layout > open :: { S } : {% pushCurrentContext >> getSrcLoc >>= \s -> return $ mkSrcSpan s s {- >>= \x -> trace (show x) (return x) -} } > close :: { S } > : vccurly { $1 {- >>= \x -> trace (show x ++ show x ++ show x) (return x) -} } -- context popped in lexer. > | error {% popContext >> getSrcLoc >>= \s -> return $ mkSrcSpan s s {- >>= \x -> trace (show x ++ show x) (return x) -} } ----------------------------------------------------------------------------- Pattern Synonyms -- Pattern synonyms > pat_syn :: { Decl L } > : pattern_synonym_decl {% checkEnabled PatternSynonyms >> return $1 } -- Glasgow extension: pattern synonyms > pattern_synonym_decl :: { Decl L } > : 'pattern' pattern_synonym_lhs '=' pat > { let l = nIS $1 <++> ann $4 <** [$1,$3] > in PatSyn l $2 $4 ImplicitBidirectional > } > | 'pattern' pattern_synonym_lhs '<-' pat > { let l = nIS $1 <++> ann $4 <** [$1,$3] > in PatSyn l $2 $4 Unidirectional > } > | 'pattern' pattern_synonym_lhs '<-' pat where_decls > { let l = nIS $1 <++> ann $4 <** [$1, $3] > in PatSyn l $2 $4 $5} > > pattern_synonym_lhs :: { Pat L } > : con vars0 { let l = case $2 of > [] -> ann $1 > (_:_) -> ann $1 <++> (ann $ last $2) > in PApp l (UnQual (ann $1) $1) $2 } > | varid qconsym varid { PInfixApp (ann $1 <++> ann $3) (PVar (ann $1) $1) $2 (PVar (ann $3) $3) } > | con '{' commavars '}' { let { (ss, ns) = $3 ; > qnames = (map (\n -> UnQual (ann n) n) ns) } > in PRec (ann $1 <++> nIS $4 <** ($2 : ss ++ [$4])) > (UnQual (ann $1) $1) (map (\q -> PFieldPun (ann q) q) qnames) } > > vars0 :: { [Pat L] } > : {- empty -} { [] } > | varid vars0 { PVar (ann $1) $1 : $2 } > commavars :: { ([S], [Name L]) } > : varid { ([], [$1] ) } > | varid ',' commavars { let (ss, ns) = $3 in ($2 : ss, $1 : ns) } > where_decls :: { PatternSynDirection L } > : 'where' '{' decls '}' {% checkExplicitPatSyn $1 $2 $3 $4 } > | 'where' open decls close {% checkExplicitPatSyn $1 $2 $3 $4 } > pattern_synonym_sig :: { Decl L } > : 'pattern' con_list '::' pstype > {% do { checkEnabled PatternSynonyms ; > let {(qtvs, ps, prov, req_vars, req, ty) = $4} ; > let {sig = PatSynSig (nIS $1 <++> ann ty <** [$1] ++ fst $2 ++ [$3] ++ ps) (snd $2) qtvs prov req_vars req ty} ; > return sig } } > pstype :: { (Maybe [TyVarBind L], [S], Maybe (Context L), Maybe [TyVarBind L] > , Maybe (Context L), Type L )} > : 'forall' ktyvars '.' pstype > { let (qtvs, ps, prov, req_vars, req, ty) = $4 > in (Just (reverse (fst $2) ++ fromMaybe [] qtvs), ($1 : $3 : ps), prov, req_vars, req, ty) } > | context context type > {% do { c1 <- checkContext (Just $1) ; > c2 <- checkContext (Just $2) ; > t <- checkType $3 ; > return $ (Nothing, [], c1, Nothing, c2, t) }} > | context 'forall' ktyvars '.' context type > {% do { c1 <- checkContext (Just $1) ; > c2 <- checkContext (Just $5) ; > t <- checkType $6 ; > return $ (Nothing, [], c1, Just (reverse (fst $3)), c2, t) }} > | context type > {% do { c1 <- checkContext (Just $1); > t <- checkType $2; > return (Nothing, [], c1, Nothing, Nothing, t) } } > | type > {% checkType $1 >>= \t -> return (Nothing, [], Nothing, Nothing, Nothing, t) } ----------------------------------------------------------------------------- Deriving strategies > deriv_strategy_no_via :: { DerivStrategy L } > : 'stock' {% do { checkEnabled DerivingStrategies > ; return (DerivStock (nIS $1)) } } > | 'anyclass' {% do { checkEnabled DerivingStrategies > ; checkEnabled DeriveAnyClass > ; return (DerivAnyclass (nIS $1)) } } > | 'newtype' {% do { checkEnabled DerivingStrategies > ; checkEnabled GeneralizedNewtypeDeriving > ; return (DerivNewtype (nIS $1)) } } > deriv_strategy_via :: { DerivStrategy L } > : 'via' truedtype {% do { checkEnabled DerivingVia > ; return (DerivVia (nIS $1) $2) } } > deriv_standalone_strategy :: { Maybe (DerivStrategy L) } > : deriv_strategy_no_via { Just $1 } > | deriv_strategy_via { Just $1 } > | {- empty -} { Nothing } ----------------------------------------------------------------------------- Miscellaneous (mostly renamings) > modid :: { ModuleName L } > : CONID { let Loc l (ConId n) = $1 in ModuleName (nIS l) n } > | QCONID { let Loc l (QConId n) = $1 in ModuleName (nIS l) (fst n ++ '.':snd n) } > tyconorcls :: { Name L } > : con { $1 } > qtyconorcls :: { QName L } > : qcon { $1 } > tyvar :: { Name L } > : tyvarid { $1 } > tyvarid :: { Name L } > : varid_no_safety { $1 } > | 'safe' { safe_name (nIS $1) } > | 'unsafe' { unsafe_name (nIS $1) } > | 'threadsafe' { threadsafe_name (nIS $1) } | 'forall' { forall_name (nIS $1) } | 'family' { family_name (nIS $1) } > qtyvarop_(ostar) :: { QName L } > qtyvarop_ : '`' tyvar '`' { UnQual ($1 <^^> $3 <** [$1, srcInfoSpan (ann $2), $3]) $2 } > | tyvarsym_(ostar) { UnQual (ann $1) $1 } > tyvarsym_(ostar) :: { Name L } > tyvarsym : VARSYM { let Loc l (VarSym x) = $1 in Symbol (nIS l) x } > | '-' { Symbol (nIS $1) "-" } > | ostar { Symbol (nIS $1) "*" } > impdeclsblock :: { ([ImportDecl L],[S],L) } > : '{' optsemis impdecls optsemis '}' { let (ids, ss) = $3 in (ids, $1 : reverse $2 ++ ss ++ reverse $4 ++ [$5], $1 <^^> $5) } > | open optsemis impdecls optsemis close { let (ids, ss) = $3 in (ids, $1 : reverse $2 ++ ss ++ reverse $4 ++ [$5], $1 <^^> $5) } Exported as partial parsers: > moduletopname :: { (([ModulePragma L], [S], L), Maybe (ModuleName L)) } > : toppragmas 'module' modid { ($1, Just $3) } > | toppragmas {- empty -} { ($1, Nothing) } > moduletophead :: { (([ModulePragma L], [S], L), Maybe (ModuleHead L)) } > : toppragmas optmodulehead { ($1, $2) } > moduletopimps :: { (([ModulePragma L], [S], L), Maybe (ModuleHead L), Maybe ([ImportDecl L],[S],L)) } > : toppragmas optmodulehead impdeclsblock { ($1, $2, Just $3) } > | toppragmas optmodulehead {- empty -} { ($1, $2, Nothing) } ----------------------------------------------------------------------------- > { > type L = SrcSpanInfo -- just for convenience > type S = SrcSpan > parseError :: Loc Token -> P a > parseError t = fail $ "Parse error: " ++ showToken (unLoc t) > (<>) :: (Annotated a, Annotated b) => a SrcSpanInfo -> b SrcSpanInfo -> SrcSpanInfo > a <> b = ann a <++> ann b > > infixl 6 <> > nIS = noInfoSpan > iS = infoSpan > mparseDecl :: P (Decl SrcSpanInfo) > mparseDecl = do > (is, ds, _, _) <- mparseDeclAux > when (not $ null is) $ > fail $ "Expected single declaration, found import declaration" > checkSingleDecl ds > } haskell-src-exts-1.23.1/src/Language/Preprocessor/Unlit.hs0000644000000000000000000000702513534314632021614 0ustar0000000000000000-- | Part of this code is from "Report on the Programming Language Haskell", -- version 1.2, appendix C. {-# OPTIONS_GHC -Wwarn #-} module Language.Preprocessor.Unlit (unlit) where import Data.Char import Data.List (isPrefixOf) data Classified = Program String | Blank | Comment | Include Int String | Pre String classify :: [String] -> [Classified] classify [] = [] classify (('\\':x):xs) | x == "begin{code}" = Blank : allProg xs where allProg [] = [] -- Should give an error message, -- but I have no good position information. allProg (('\\':x):xs) | "end{code}"`isPrefixOf`x = Blank : classify xs allProg (x:xs) = Program x:allProg xs classify (('>':x):xs) = Program (' ':x) : classify xs classify (('#':x):xs) = (case words x of (line:rest) | all isDigit line -> Include (read line) (unwords rest) _ -> Pre x ) : classify xs --classify (x:xs) | "{-# LINE" `isPrefixOf` x = Program x: classify xs classify (x:xs) | all isSpace x = Blank:classify xs classify (x:xs) = Comment:classify xs unclassify :: Classified -> String unclassify (Program s) = s unclassify (Pre s) = '#':s unclassify (Include i f) = '#':' ':show i ++ ' ':f unclassify Blank = "" unclassify Comment = "" -- | 'unlit' takes a filename (for error reports), and transforms the -- given string, to eliminate the literate comments from the program text. unlit :: FilePath -> String -> String unlit file lhs = (unlines . map unclassify . adjacent file (0::Int) Blank . classify) (inlines lhs) adjacent :: FilePath -> Int -> Classified -> [Classified] -> [Classified] adjacent file 0 _ (x :xs) = x : adjacent file 1 x xs -- force evaluation of line number adjacent file n y@(Program _) (x@Comment :xs) = error (message file n "program" "comment") adjacent file n y@(Program _) (x@(Include i f):xs) = x: adjacent f i y xs adjacent file n y@(Program _) (x@(Pre _) :xs) = x: adjacent file (n+1) y xs adjacent file n y@Comment (x@(Program _) :xs) = error (message file n "comment" "program") adjacent file n y@Comment (x@(Include i f):xs) = x: adjacent f i y xs adjacent file n y@Comment (x@(Pre _) :xs) = x: adjacent file (n+1) y xs adjacent file n y@Blank (x@(Include i f):xs) = x: adjacent f i y xs adjacent file n y@Blank (x@(Pre _) :xs) = x: adjacent file (n+1) y xs adjacent file n _ (x@next :xs) = x: adjacent file (n+1) x xs adjacent file n _ [] = [] message :: String -> Int -> String -> String -> String message "\"\"" n p c = "Line "++show n++": "++p++ " line before "++c++" line.\n" message [] n p c = "Line "++show n++": "++p++ " line before "++c++" line.\n" message file n p c = "In file " ++ file ++ " at line "++show n++": "++p++ " line before "++c++" line.\n" -- Re-implementation of 'lines', for better efficiency (but decreased laziness). -- Also, importantly, accepts non-standard DOS and Mac line ending characters. inlines :: String -> [String] inlines s = lines' s id where lines' [] acc = [acc []] lines' ('\^M':'\n':s) acc = acc [] : lines' s id -- DOS lines' ('\^M':s) acc = acc [] : lines' s id -- MacOS lines' ('\n':s) acc = acc [] : lines' s id -- Unix lines' (c:s) acc = lines' s (acc . (c:)) haskell-src-exts-1.23.1/tests/Runner.hs0000644000000000000000000001373513534314632016141 0ustar0000000000000000{-# LANGUAGE ViewPatterns #-} -- | Use "runhaskell Setup.hs test" or "cabal test" to run these tests. module Main where import Language.Haskell.Exts import Test.Tasty hiding (defaultMain) import Test.Tasty.Golden import Test.Tasty.Golden.Manage import System.FilePath import System.IO import Control.Monad.Trans import Control.Applicative import Extensions import Text.Show.Pretty main :: IO () main = do sources <- getTestFiles examplesDir defaultMain $ testGroup "Tests" $ [ parserTests sources , exactPrinterTests sources , prettyPrinterTests sources , prettyParserTests sources , extensionProperties , commentsTests examplesDir ] -- | Where all the tests are to be found examplesDir :: FilePath examplesDir = "tests/examples" getTestFiles :: MonadIO m => FilePath -> m [FilePath] getTestFiles dir = liftIO $ findByExtension [".hs", ".lhs"] dir parserTests :: [FilePath] -> TestTree -- {{{ parserTests sources = testGroup "Parser tests" $ do -- list monad file <- sources let out = file <.> "parser" <.> "out" golden = file <.> "parser" <.> "golden" run = do ast <- parseUTF8FileWithComments (defaultParseMode { parseFilename = file }) file writeBinaryFile out $ ppShow ast ++ "\n" return $ goldenVsFile (takeBaseName file) golden out run -- }}} exactPrinterTests :: [FilePath] -> TestTree -- {{{ exactPrinterTests sources = testGroup "Exact printer tests" $ do -- list monad file <- sources let out = file <.> "exactprinter" <.> "out" golden = file <.> "exactprinter" <.> "golden" run = do contents <- readUTF8File file let -- parse mbAst = parseFileContentsWithComments (defaultParseMode { parseFilename = file }) contents -- try to pretty-print; summarize the test result result = case mbAst of f@ParseFailed{} -> show f ParseOk ast -> let printed = uncurry exactPrint ast in if printed == contents then "Match" else printed writeBinaryFile out $ result ++ "\n" return $ goldenVsFile (takeBaseName file) golden out run -- }}} prettyPrinterTests :: [FilePath] -> TestTree -- {{{ prettyPrinterTests sources = testGroup "Pretty printer tests" $ do -- list monad file <- sources let out = file <.> "prettyprinter" <.> "out" golden = file <.> "prettyprinter" <.> "golden" run = do contents <- readUTF8File file let -- parse mbAst = parseFileContentsWithMode (defaultParseMode { parseFilename = file }) contents -- try to pretty-print; summarize the test result result = case mbAst of f@ParseFailed{} -> show f ParseOk ast -> prettyPrint ast writeBinaryFile out $ result ++ "\n" return $ goldenVsFile (takeBaseName file) golden out run -- }}} prettyParserTests :: [FilePath] -> TestTree -- {{{ prettyParserTests sources = testGroup "Pretty-parser tests" $ do -- list monad file <- sources let out = file <.> "prettyparser" <.> "out" golden = file <.> "prettyparser" <.> "golden" run = do contents <- readUTF8File file let -- parse parse1Result :: ParseResult (Module SrcSpanInfo) parse1Result = parseFileContentsWithMode (defaultParseMode { parseFilename = file }) contents prettyResult :: ParseResult String prettyResult = prettyPrint <$> parse1Result parse2Result :: ParseResult (ParseResult (Module SrcSpanInfo)) parse2Result = parseFileContents <$> prettyResult -- Even the un-annotated AST contains certain locations. -- Obviously, they may differ, so we have to erase them. eraseLocs :: Module l -> Module () eraseLocs = (() <$) summary = case liftA3 (,,) parse1Result prettyResult parse2Result of f@ParseFailed{} -> show f ParseOk (eraseLocs -> ast1, pretty, mbAst2) -> case mbAst2 of f@ParseFailed{} -> "Failed to parse output of pretty-printer:\n" ++ show f ++ "\n" ++ "The pretty-printer output follows.\n\n" ++ pretty ParseOk (eraseLocs -> ast2) -> if ast1 == ast2 then "Match" else "Roundtrip test failed\n\n" ++ "AST 1:\n\n" ++ show ast1 ++ "\n\n" ++ "AST 2:\n\n" ++ show ast2 ++ "\n" writeBinaryFile out $ summary ++ "\n" return $ goldenVsFile (takeBaseName file) golden out run -- }}} commentsTests :: FilePath -> TestTree -- {{{ commentsTests dir = testGroup "Comments tests" $ do let file = dir ++ "/HaddockComments.hs" out = file <.> "comments" <.> "out" golden = file <.> "comments" <.> "golden" run = do contents <- readUTF8File file let -- parse parse1Result :: ParseResult (Module SrcSpanInfo,[Comment]) parse1Result = parseFileContentsWithComments (defaultParseMode { parseFilename = file }) contents withC = case parse1Result of ParseOk res -> ParseOk $ associateHaddock res ParseFailed sloc msg -> ParseFailed sloc msg writeBinaryFile out $ show withC ++ "\n" return $ goldenVsFile (takeBaseName file) golden out run -- UTF8 utils {{{ readUTF8File :: FilePath -> IO String readUTF8File fp = openFile fp ReadMode >>= \h -> do hSetEncoding h utf8 hGetContents h parseUTF8FileWithComments :: ParseMode -> FilePath -> IO (ParseResult (Module SrcSpanInfo, [Comment])) parseUTF8FileWithComments p fp = readUTF8File fp >>= (return . parseFileContentsWithComments p) -- }}} haskell-src-exts-1.23.1/tests/Extensions.hs0000644000000000000000000000273213534314632017022 0ustar0000000000000000{-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, StandaloneDeriving #-} {-# OPTIONS_GHC -fno-warn-orphans #-} module Extensions (extensionProperties) where import Test.Tasty import Test.Tasty.SmallCheck import Test.SmallCheck.Series import Language.Haskell.Exts import Data.Function import Data.List instance Monad m => Serial m Language where series = generate (const knownLanguages) instance Monad m => Serial m Extension where series = generate (const knownExtensions) instance Monad m => Serial m KnownExtension where series = generate $ const [ e | EnableExtension e <- knownExtensions ] infix 3 ~~ (~~) :: Monad m => [Extension] -> [Extension] -> Property m xts1 ~~ xts2 = forAll $ \lang -> ((==) `on` sort . toExtensionList lang) xts1 xts2 extensionProperties :: TestTree extensionProperties = localOption (SmallCheckDepth 2) $ testGroup "Properties of LANGUAGE extensions" $ [ testProperty "identity" $ \x -> x ~~ x , testProperty "idempotence" $ \x -> x ++ x ~~ x , testProperty "right bias" $ \x y -> x ++ y ++ x ~~ y ++ x , testProperty "closedness of implication" $ \x -> impliesExts (impliesExts x) == impliesExts x , testProperty "closedness of toExtensionList" $ \l x -> let es = toExtensionList l x in es == impliesExts es , testProperty "opposite extensions 1" $ \x -> [EnableExtension x, DisableExtension x] ~~ [DisableExtension x] , testProperty "opposite extensions 2" $ \x -> [DisableExtension x, EnableExtension x] ~~ [EnableExtension x] ] haskell-src-exts-1.23.1/LICENSE0000644000000000000000000001077613534314632014201 0ustar0000000000000000This library (Haskell Source eXtensions) is derived from code from several sources: * Code from the GHC project which is largely (c) The University of Glasgow, and distributable under a BSD-style license (see below), * Code from the Haskell 98 Report which is (c) Simon Peyton Jones and freely redistributable (but see the full license for restrictions). The full text of these licenses is reproduced below. All of the licenses are BSD-style or compatible. ----------------------------------------------------------------------------- The haskell-src-exts package itself is distributable under the modified BSD license: Copyright (c) 2005, Niklas Broberg All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: * Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. * Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. * The names of its contributors may not be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. ----------------------------------------------------------------------------- The Glasgow Haskell Compiler License Copyright 2004, The University Court of the University of Glasgow. All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: - Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. - Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. - Neither name of the University nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY THE UNIVERSITY COURT OF THE UNIVERSITY OF GLASGOW AND THE CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE UNIVERSITY COURT OF THE UNIVERSITY OF GLASGOW OR THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. ----------------------------------------------------------------------------- Code derived from the document "Report on the Programming Language Haskell 98", is distributed under the following license: Copyright (c) 2002 Simon Peyton Jones The authors intend this Report to belong to the entire Haskell community, and so we grant permission to copy and distribute it for any purpose, provided that it is reproduced in its entirety, including this Notice. Modified versions of this Report may also be copied and distributed for any purpose, provided that the modified version is clearly presented as such, and that it does not claim to be a definition of the Haskell 98 Language. ----------------------------------------------------------------------------- haskell-src-exts-1.23.1/Setup.hs0000644000000000000000000000005613534314632014616 0ustar0000000000000000import Distribution.Simple main = defaultMain haskell-src-exts-1.23.1/haskell-src-exts.cabal0000644000000000000000000001074113665335535017353 0ustar0000000000000000Name: haskell-src-exts Version: 1.23.1 License: BSD3 License-File: LICENSE Build-Type: Simple Author: Niklas Broberg Maintainer: Dan Burton Category: Language Synopsis: Manipulating Haskell source: abstract syntax, lexer, parser, and pretty-printer Description: Haskell-Source with Extensions (HSE, haskell-src-exts) is a standalone parser for Haskell. In addition to standard Haskell, all extensions implemented in GHC are supported. . Apart from these standard extensions, it also handles regular patterns as per the HaRP extension as well as HSX-style embedded XML syntax. Homepage: https://github.com/haskell-suite/haskell-src-exts Bug-Reports: https://github.com/haskell-suite/haskell-src-exts/issues Stability: Stable Cabal-Version: >= 1.10 Tested-With: GHC == 7.8.2 , GHC == 7.10.3 , GHC == 8.0.2 , GHC == 8.2.2 , GHC == 8.4.4 , GHC == 8.6.5 , GHC == 8.8.3 , GHC == 8.10.1 Extra-Source-Files: README.md CHANGELOG RELEASENOTES-1.17.0 tests/examples/*.hs tests/examples/*.lhs tests/examples/*.hs.parser.golden tests/examples/*.lhs.parser.golden tests/examples/*.hs.exactprinter.golden tests/examples/*.lhs.exactprinter.golden tests/examples/*.hs.prettyprinter.golden tests/examples/*.lhs.prettyprinter.golden tests/examples/*.hs.prettyparser.golden tests/examples/*.lhs.prettyparser.golden tests/Runner.hs tests/Extensions.hs Library Default-language: Haskell98 Build-Tools: happy >= 1.19 Build-Depends: array >= 0.1, pretty >= 1.0, base >= 4.5 && < 5, -- this is needed to access GHC.Generics on GHC 7.4 ghc-prim -- this is needed to access Data.Semigroup and Control.Monad.Fail on GHCs -- before 8.0 if !impl(ghc >= 8.0) Build-Depends: semigroups >= 0.18.3, fail == 4.9.* Exposed-modules: Language.Haskell.Exts, Language.Haskell.Exts.Lexer, Language.Haskell.Exts.Pretty, Language.Haskell.Exts.Extension, Language.Haskell.Exts.Build, Language.Haskell.Exts.SrcLoc, Language.Haskell.Exts.Syntax, Language.Haskell.Exts.Fixity, Language.Haskell.Exts.ExactPrint, Language.Haskell.Exts.Parser, Language.Haskell.Exts.Comments Other-modules: Language.Haskell.Exts.ExtScheme, Language.Haskell.Exts.ParseMonad, Language.Haskell.Exts.ParseSyntax, Language.Haskell.Exts.InternalLexer, Language.Haskell.Exts.ParseUtils, Language.Haskell.Exts.InternalParser Language.Preprocessor.Unlit Hs-source-dirs: src Ghc-options: -Wall Source-Repository head Type: git Location: https://github.com/haskell-suite/haskell-src-exts.git Test-Suite test type: exitcode-stdio-1.0 hs-source-dirs: tests main-is: Runner.hs other-modules: Extensions GHC-Options: -threaded -Wall Default-language: Haskell2010 Build-depends: base, mtl, containers, haskell-src-exts, smallcheck >= 1.0, tasty >= 0.3, tasty-smallcheck, tasty-golden >= 2.2.2, filepath, directory, pretty-show >= 1.6.16 haskell-src-exts-1.23.1/README.md0000644000000000000000000000341013534314632014436 0ustar0000000000000000Haskell Source Extensions ========================= haskell-src-exts is a package for handling and manipulating Haskell source code. It is a descendant of the haskell-src package that is part of the standard libraries, but extends this to support a number of syntactic extensions, e.g. MPTCs, fundeps, GADTs, TH etc. The aim is to support all extensions recognized by the community, as determined by what is implemented in compilers and tools. Apart from the more standard extensions supported by e.g. GHC, haskell-src-exts provides support for HaRP (Haskell Regular Patterns) and HSX (Haskell Source with XML) syntax. Package structure ----------------- The modules that comprise haskell-src-exts all reside in the hierarchic namespace Language.Haskell.Exts. Notable exposed modules include: * `Language.Haskell.Exts` - Imports and re-exports all the below, and also defines some functions that combine functionality from several modules. * `Language.Haskell.Exts.Syntax` - The abstract syntax tree that the other modules work on. * `Language.Haskell.Exts.Build` - Combinators for building abstract syntax. * `Language.Haskell.Exts.Parser` - Functions for parsing Haskell source code into an abstract syntax representation. License ------- The haskell-src-exts Package is distributed under a derived BSD-style license. It derives from several sources, all of which are distributable under BSD-style or compatible licenses. See the file LICENSE for the complete license text. Maintenance -------------- Dan Burton is currently keeping haskell-src-exts on life support. If you are interested in more actively making improvements to this package, please make your interests known. You might want to try [ghc-lib-parser](http://hackage.haskell.org/package/ghc-lib-parser) instead. haskell-src-exts-1.23.1/CHANGELOG0000644000000000000000000005130313603730322014370 0ustar00000000000000001.22.0 --> 1.23.0 ================= * Add support for BlockArguments (#444) - Technically breaking change: KnownExtension gained a new constructor BlockArguments * Add support for Arrow Brackets (#445) - Tecnically breaking change: Exp gained new constructor ArrOp 1.21.1 --> 1.22.0 ================= * Support QuantifiedConstraints (#427) - Breaking change: constructors for PAsst changed - Technically breaking change: KnownExtention gained a new constructor QuantifiedConstraints * Support Template Haskell typed splices and quotations (#432) - Breaking change: new constructors on Token data type * Fix unicode identifier parsing (#442) 1.21.0 --> 1.21.1 ================= * GHC 8.8.1 compatibility (MonadFail) 1.20.3 --> 1.21.0 ================= * DerivingVia (#420) * TypeInType (#414) * Parse TH-quoted list constructor (#415) 1.20.2 --> 1.20.3 ================= * GHC 8.6.1 compatability (MonadFail) * Remove cpphs dependency 1.20.1 --> 1.20.2 ================= * Add fixity of (&) * GHC 8.4.1 compatability 1.20.0 --> 1.20.1 =================== * Fix two test failures 1.19.1 --> 1.20.0 =================== * GHC 8.2 updates * Add some missing Generics instances (#380) * Support Template Haskell pattern splices (#352) * Fix overloaded labels starting with _ (#362) * Relax MultiParamTypeClass check (#333) * DeriveAnyClass (#337) * Deriving Strategies (#387) * OVERLAPS/OVERLAPPING/OVERLAPPABLE pragmas * Unboxed Sums * Expression holes in infix expressions * Support multiple pattern synonyms per pattern synonym signature * COMPLETE pragmas * Fix #309, remove unnecessary semi-colon from pretty printer * Refine ExplicitNamespaces to properly export type operators 1.19.0 --> 1.19.1 =================== * Revert making fields of `SrcLoc` strict. (#340) 1.18.2 --> 1.19.0 =================== * Add JavaScriptFFI to known extensions (#335) * Remove space when pretty printing `SrcLoc`. (#307) * Don't reverse arguments in a context. (#328) * Add support for EmptyCase extension (#255) 1.18.1 --> 1.18.2 =================== * Fix overzealous lexing of type applications 1.18.0 --> 1.18.1 =================== * Fix overzealous lexing of overloaded labels. 1.17.1 --> 1.18.0 =================== * Remove simplified AST * GHC 8.0 update: Overloaded labels, type applications, pattern synonym extensions, StrictData, injective type families AST changes: * Add TyQuasiQuote (#279). Other changes: * Only treat 'role' as a keyword in certain contexts (#286). * Prettyprint '!' in patterns correctly when BangPatterns are enabled (#287). * Parse magic hash with multiple trailing hashes (#300). * Apply fixities inside pattern synonym builders * Fix lexing of idents with multiple trailing # ** 1.17.x 1.17.0 --> 1.17.1 ================= Bug Fix: * Fix bug in parsing view patterns (#284) 1.16.0.1 --> 1.17.0 =================== AST changes: * Replaced VarA with AppA in Asst (#168). * Promoted list/tuple members changed from Promoted to Type (#162). * Update PatBind, Match, and Alt from containing Binds to Maybe Binds to distinguish between empty where clauses and where clauses with no binds (#244). * Add RoleAnnotDecl and Role to support Role annotations (#215). * Move NameSpace field from EVar/IVar to EAbs/IAbs. Other changes: * Add standalone parsers for ImportDecl. * Fix pretty-printer bugs for HaRP (#160). * Insert parentheses when pretty-printing non-atomic bang types (#169). * Un-reverse confusion of left and right arrow (#175). * Prettyprint option pragmas like 1.15 (#172). * Conditionally insert lines when pretty-printing declarations (#171). * Distinguish deriving (Show) from deriving Show (#189). * Allow parsing of unicode subscript and superscript functions (#173). * Pretty print unboxed tuples with spaces (#193). * Improve performance when parsing long extension lists (#200). * Properly pretty print constructor and class operators (#204). * Read Haskell source files as UTF-8 (#223). * Fix ExplicitNamespaces parsing (#216). * PolyKinds implies KindSignatures (#220). * Preserve location information for infix binds (#205). * Preserve positional information in checkPattern (#231). * Maintain correct line numbers when parsing multiline GHC_OPTIONS (#218). * Correctly parse "*" with TypeOperators (#81). * Export the "pretty" method (#222). * Add javascript calling convention for foreign imports (#236). * Add non-greedy parsers for module heads (#191). * Add a flag to disable arity checking when parsing (#260). * Parse "-" in type signatures (#206). * Add support for type wildcards and expression holes (#252). * Add support for Pattern Synonyms (#197). * Bump the happy lower bound (#250). * Make test suite pass on GHC 7.12 (#224). * Support linking Haddock comments to AST nodes (#213). * Parse multiline LANGUAGE pragmas (#217). * Parse trailing where (#25). * Parse modules starting with pragmas and indented "module" keyword (#122). * Use pretty-show to get human readable test outputs. * Respect fixity declarations inside where/let/class in `applyFixities` (#212). * Correctly parse the combination of view patterns and bang patterns. (#276) ** 1.16.x 1.16.0 --> 1.16.0.1 =================== Include generated InternalParser.hs in the release tarball (See http://ro-che.info/articles/2014-03-08-happy-alex-ghc-7.8 for details) 1.15.0.1 --> 1.16.0 =================== New language features: * DoRec * Closed type families * GADT records * ExplicitNamespaces * Type equality constraints * PolyKinds * DataKinds * Default associated types * Instance signatures * OVERLAP pragma * Parallel arrays * MINIMAL pragma * Default signatures * Safe Haskell * Binary literals * Qualified record puns * Type splices AST changes: * PatBind no longer contains the optional Maybe Type field. The type signature is now represented as part of the pattern (PatTypeSig) * GuardedAlt and GuardedAlts types are replaced with the isomorphic GuardedRhs and Rhs types * Move parentheses from the Context to Asst type * Change DeclHead and InstHead to make it possible to represent various ways to put parentheses around parts of declarations. Introduce a new type InstRule for the same purpose. * Change representation of negated patterns * Make strictness annotations on data type fields part of those fields' Type Notable bug fixes: * Allow statements, and not just expression, in MultiWayIf conditions * Allow equality constraints when GADTs are enabled * Fix parsing and printing of pragma modifiers, such as CONLIKE * Don't treat 'capi' or 'interruptible' as a keyword except after 'foreign' * Let ImpredicativeTypes imply ExplicitForAll * Let RecursiveDo enable 'rec' keyword * Fix pretty-printing of the unary minus sign * Do not require FlexibleContexts for things like Ord (i Int) => ... * Fix pretty-printing of deriving clauses * Parse "Constraint" as a kind with ConstraintKinds enabled * Support qualified quasi-quoters * Enable ScopedTypeVariables when parsing rules * Only permit record wildcards in last position * Allow n-parameter infix data declaration heads Other changes: * Expose showToken from Language.Haskell.Exts.Lexer * Show instance for SrcLoc and SrcSpan are changed (now they do not contain * field names) * Add DeriveGeneric to known extensions ** 1.15.x 1.15.0 --> 1.15.0.1 =============== * Eliminate inexhaustive patterns (and consequent bugs) * The test suite for 1.15.0 wouldn't build due to a missing file in the source distribution. Fixed. 1.14.0.1 --> 1.15.0 =============== * Add support for extensions: - MultiWayIf - LambdaCase - DataKinds * Remove support for old (deprecated) Generics * Derive GHC's Generic instances for datatypes * Derive some missing Data and Typeable instances * Multiple bug fixes * Add missing Functor and Applicative instances for monads * Remove support for GHCs older than 7.4 ** 1.14.x 1.14.0 --> 1.14.0.1 =============== Nothing has actually changed here (apart from the CHANGELOG). This release is done to include InternalParser.hs generated with happy 1.19 so that it compiles with GHC 7.8. 1.13.6 --> 1.14.0 =============== * Modernize the Extension datatype in L.H.E.Extension, following the lead of Cabal, to allow negative and positive extension modifiers (turning features on and off). You need to worry about backwards-incompatible changes if any of the following pertains to you: 1) If you use the Extension datatype programmatically - it has changed significantly (see documentation). 2) The ParseMode record now has one more field (baseLanguage :: Language), which might give you a type error. 3) The behavior of the (extensions :: [Extension]) field has changed, which could bite you if you pass custom extensions in the ParseMode. Previously, the ParseMode defaulted to the list of extensions accepted by Haskell2010, and if you set the list explicitly you would override this. Now, the defaults are { baseLanguage = Haskell2010, extensions = [] }, and explicitly setting a list of extensions will be interpreted on top of Haskell2010. See further the documentation for L.H.E.Extension. * Add support for the 'capi' calling convention. It is enabled with the CApiFFI extension. It's been included since GHC 7.4, and advertised since 7.6. * Add support for the 'interruptible' FFI safety annotation, enabled with the InterruptibleFFI extension. * Give better error message when lexing newline fails. In particular, fix the bug when the parser would crash if the file didn't end with a newline. * Support unboxed tuple expressions and patterns. * Fix bug in lexing of primitive integer literals in hex or octal notation. * Disallow negative primitive word literals (such as W# (-0x8000000000000000##)). * Allow phase control for SPECIALIZE pragma. * Derive Foldable and Traversable instances for all annotated AST types. * Fix bug with pretty-printing WARNING and DEPRECATED pragmas. ** 1.13.x 1.13.5 --> 1.13.6 =============== * Allow 0-parameter type classes when MultiParamTypeClasses is on. * Add support for NondecreasingIndentation. Previously it was always on, which is the default behavior in GHC. Now it is on only if enabled, or when using the newly added ghcDefaults extension set (instead of haskell2010). 1.13.4 --> 1.13.5 =============== * Expose Language.Haskell.Exts.Lexer, which implements a standalone token stream lexer. The module is re-exported both by Language.Haskell.Exts and by Language.Haskell.Exts.Annotated. 1.13.3 --> 1.13.4 =============== * Fix bug where operators starting with # written in parentheses would not be parsed when UnboxedTuples is turned on. Now works. * Allow 'family' and 'forall' as (non-type) varid's. This adds one more shift/reduce conflict to the parser, and its resolution means that '{-# RULES "name" forall = ... #-}' is not allowed. * Complete the set of FFI calling conventions from the Haskell 2010 report (even if no compiler implements them). Also include the 'js' calling convention, supported by UHC. 1.13.2 --> 1.13.3 =============== * Fundep premises are now allowed to be empty. * Fix the bug where the lexer would crash on a LINE pragma that did not include a line number. * Fix the bug where the lexer would require the # of a MagicHash-style type constructor to be succeeded by at least one character in the file. * Fix long-standing bug where the parser would crash with an ugly "Internal error" error message if encountering an extra }. * Report errors at the right place for function arity mismatches. Earlier they were reported at end of file, now they are reported where the function is declared. * Lexer now properly fails on line-breaks in string literals. * Lexer now handles character escapes up to 0x10FFFF (unicode). 1.13.1 --> 1.13.2 =============== * Fix the bug with the precedence of unary prefix minus. Previously it was resolved as binding more tightly than any infix operator, now it is correctly treated as having the same fixity as binary infix minus. 1.13.0 --> 1.13.1 =============== * Allow an optional semi before the closing tag of an element. This achieves a similar effect for XmlSyntax in do blocks as DoAndIfThenElse does for the if construct. No more need to indent the closing tag one step further than the opening tag. * Add a dummy 'noLoc :: SrcLoc' to L.H.E.SrcLoc, to use when generating code. It could definitely be done more elegantly, but not without inducing another major version bump, so later. * Fix a regression from 1.11.x where the parser would crash upon encountering non-simple class/data declaration heads, e.g. 'data A [a]'. Now fails with a parse error as intended. 1.12.0 --> 1.13.0 =============== * Add extensions DoAndIfThenElse and NPlusKPatterns to Language.Haskell.Exts.Extensions. * DoAndIfThenElse is now supported, at long last, making HSE compatible with Haskell2010 * Introduce haskell98 and haskell2010 extension groups, exported from Language.Haskell.Exts.Extensions. * Backwards-incompatible change: default parse mode is now to use haskell2010, which means the following features are recognized by default: DoAndIfThenElse, PatternGuards, ForeignFunctionInterface, EmptyDataDecls. NPlusKPatterns is no longer recognized by default. ** 1.12.x 1.11.1 --> 1.12.0 =============== * Move from old [$...| quasi-quote syntax to the new [...| one. The old syntax is still recognized while parsing. * Allow symbols as variables when TypeOperators is enabled. * Rename ExplicitForall in ExplicitForAll, to be consistent with GHC and the Haskell' process. ** 1.11.x 1.10.2 --> 1.11.1 =============== * API change: the fixities field in ParseMode is now of type Maybe [Fixity]. If the field is Nothing the parsing will not try to do any fixity resolution whatsoever, otherwise it behaves as before. * API change, bug fix: The Fixity type contains a QName rather than an Op to name the operator. The operator must match the given QName exactly (i.e., unqualified names only match unqualified names, and qualified names only match qualified names) for applyFixities to perform fixups. * Bug fix: End-of-file inside an OPTIONS pragma no longer loops. ** 1.10.x 1.10.1 --> 1.10.2 =============== * Fix a missing case in the Functor declaration for Decl. Thanks to Malcolm Wallace for the patch! 1.10.0 --> 1.10.1 =============== * Enable the unicode version of DoubleColon (x2237). Thanks to Andr�s Sicard-Ram�rez for the patch! 1.9.6 --> 1.10.0 =============== * Ensure that implied extensions are always picked up, not only when using the parseFile* family of functions as previously. * Add the newly devised <%>... syntax to the XmlSyntax support. This causes changes to pretty much everything, including adding a case to the AST which prompts the major version bump. ** 1.9.x 1.9.5 --> 1.9.6 =============== * Fix a bug (#203) where the lexer loops on malformed quasi-quoters. * Fix a bug with pretty-printing RULES pragmas. 1.9.4 --> 1.9.5 =============== * Fix a bug where deriving clauses for GADT-style data declarations were not properly indented. * Pretty-printing patterns is now more accurate in inserting (and not inserting) parentheses when needed. 1.9.3 --> 1.9.4 =============== * Pretty-printer now inserts parentheses in clever places when printing kinds. * Pretty-printing expressions is now far more accurate in inserting (and not inserting) parentheses when needed. * Pretty-printing negative expressions no longer inserts a superfluous space between the - and the expression. 1.9.2 --> 1.9.3 =============== * Constructors for newtype declarations must now have exactly one argument. This is only when using the classic syntax, not with GADT-style syntax. * Fix a bug where preceding commas in tuple sections were counted one too few. 1.9.1 --> 1.9.2 =============== * Fix a bug with pretty-printing lexer tokens. * Fix a bug where non-colon TypeOperators could not be used in prefix mode. 1.9.0 --> 1.9.1 =============== * Export parseFileContentsWithExts from .Exts. 1.8.2 --> 1.9.0 =============== * OptionPragma is renamed to the more descriptive ModulePragma, and adds a constructor AnnModulePragma for handling ANN pragmas preceding module header. * Add instances for Eq/Ord/Data/Typeable for Fixity. * Add 'parseFileWithComments' and 'parseFileContentsWithComments' to L.H.Exts . * More informative error messages when HSX tags are mismatched. ** 1.8.x 1.8.1 --> 1.8.2 =============== * Don't insert redundant parentheses around record constructions and updates. 1.8.0 --> 1.8.1 =============== * Fix three bugs with the handling of ANN. I must have been really tired when implementing that support. 1.7.2 --> 1.8.0 =============== * Add an instance Show Fixity (derived). * Support for the new ANN and INLINE_CONLIKE pragmas. * Export knownExtensions from .Extension. * Remove support for CFILES and INCLUDE pragmas. The support wasn't correct anyway, as it assumed the pragmas appeared at the top of files. As CFILES/INCLUDE pragmas can (and do) appear anywhere, there's no hope to support them in the AST. Better to remove the support altogether. Files with CFILES/INCLUDE pragmas can still be parsed of course, but those pragmas will be handled as comments. * Parsing with ignoreLinePragmas = False now correctly updates the file name. * Allow the whole SPECIALISE/INLINE family of pragmas in instance declarations. The InsInline constructor is removed, and is now represented by InsDecl (InlineSig ...). * Fix a bug with line numbering and quasi quotes, and a similar one with line numbering and CDATA. * Fix a few minor bugs in the exactPrinter. * Fix the strange handling of so called strings in LINE pragmas. ** 1.7.x 1.7.1 --> 1.7.2 =============== * Fixes a bug in lexing LINE pragmas (used when ignoreLinePragmas is set to False). 1.7.0 --> 1.7.1 =============== * UnicodeSyntax now also enables the forall symbol (U+2200). 1.6.1 --> 1.7.0 =============== * Operators defined on the form (a `op` b) c = ... could not be handled by the (annotated) AST, nor the parser. I had to change the definition of the AST node for InfixMatch to allow a list of right-hand subpatterns, i.e. InfixMatch l (Pat l) (Name l) (Pat l) ... has become InfixMatch l (Pat l) (Name l) [Pat l] ... I also had an epiphany and fixed the issue that would arise with exact printing of prefix definitions including parentheses, so that now works too! ** 1.6.x 1.6.0 --> 1.6.1 =============== * UnicodeSyntax now works not only for identifiers, but also for ->, <- and =>, as well as Arrows arrows and kind stars. 1.5.3 --> 1.6.0 =============== * (=~=) turns out to be too general at Functor (for intuitive and not technical reasons), so is specialised to Annotated to closer mirror the original intention. * applyFixities is hoisted to a monad, and now fails on ambiguous infix expressions. ** 1.5.x 1.5.2 --> 1.5.3 =============== * Several small bug fixes in the exact printer, and fail more gracefully if the number of srcInfoPoints doesn't match the needs of the node. 1.5.1 --> 1.5.2 =============== * Fix a bug in the exact printer that made it always print the first token at position (0,0). * In fixing the above, Annotated is now a superclass of ExactP. It was already a superclass in spirit, and nothing can break from this since ExactP is only exported abstractly. 1.5.0 --> 1.5.1 =============== * The pretty printer now introduces parentheses for non-atomic arguments to function application. Note that infix applications are left untouched, no parentheses will be inserted there, as it is assumed that fixities are already properly resolved. * Fix a bug in the pretty printer where view patterns and n+k patterns were not properly parenthesised. 1.4.0 --> 1.5.0 =============== * Add support for acting on LINE pragmas while parsing, i.e. updating the source position according to info given in LINE pragmas. This is done conditionally based on a new flag ignoreLinePragmas in the ParseMode, hence the need to increase the major version. ** 1.4.x 1.3.5 --> 1.4.0 =============== * The AST node for Proc in the simple AST is changed to include a SrcLoc argument, to make it consistent with similar nodes e.g. Lambda. This is specifically needed for transformation of patterns in HSX. ** 1.3.x 1.3.4 --> 1.3.5 =============== * Added an entry point in the parser for statements, and an instance Parseable Stmt to go with it. * Ensured that .Annotated exports all relevant parseXXX(WithYYY) functions. 1.3.3 --> 1.3.4 =============== * Operator fixities are now resolved in patterns. 1.3.2 --> 1.3.3 =============== * Fixes a bug where qualified keywords are rejected even if the extension that enables the keyword in question is not turned on. 1.3.0 --> 1.3.2 =============== (Let's forget 1.3.1 ever existed.) * Fix a bug where declarations of infix operators were not properly merged as FunBinds. haskell-src-exts-1.23.1/RELEASENOTES-1.17.00000644000000000000000000000146613534314632015526 0ustar0000000000000000I am pleased to announce the release of haskell-src-exts-1.17.0! Hackage: https://hackage.haskell.org/package/haskell-src-exts-1.17.0 GitHub: https://github.com/haskell-suite/haskell-src-exts This release brings bugfixes, as well as the following language features: * Type wildcards and expression holes (#252). * Pattern Synonyms (#197). The full changelog is available at https://github.com/haskell-suite/haskell-src-exts/blob/1.17.0/CHANGELOG This release is brought to you by: Matthew Pickering Michael Walker Simon Marlow Neil Mitchell JP Moresmau Ðртур Файзрахманов phischu Michael Sloan m00nlight Niklas Broberg Stijn van Drongelen Jakub Kozlowski Leonid Onokhov Matthew Pickering is a force of nature who deserves a special mention for all his contributions to this release. Peter haskell-src-exts-1.23.1/tests/examples/InstanceSigs.hs0000644000000000000000000000036413534314633021073 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE InstanceSigs #-} {-# LANGUAGE TypeFamilies #-} instance SupportsDelta (Map k v) where type Delta (Map k v) = Map k v mkDelta :: Map k v -> Map k v -> Delta (Map k v) mkDelta = undefined haskell-src-exts-1.23.1/tests/examples/T13050.hs0000644000000000000000000000014613534314633017273 0ustar0000000000000000module HolesInfix where f, g, q :: Int -> Int -> Int f x y = _ x y g x y = x `_` y q x y = x `_a` y haskell-src-exts-1.23.1/tests/examples/t403.hs0000644000000000000000000000047413534314633017175 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ViewPatterns #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE DataKinds #-} module T403 where pattern (:&&:) :: () => forall k. ((k :+ 1) ~ n) => a -> HoHeList k a -> HoHeList n a pattern (:&&:) x rest <- (matchNext -> Right (x, Refl, rest)) haskell-src-exts-1.23.1/tests/examples/EmptyCase.hs0000644000000000000000000000013313534314633020365 0ustar0000000000000000{-# LANGUAGE EmptyCase #-} {-# LANGUAGE LambdaCase #-} f x = case x of {} g x = \case {} haskell-src-exts-1.23.1/tests/examples/EmptyContext.hs0000644000000000000000000000002713534314633021140 0ustar0000000000000000happyThen :: () => P a haskell-src-exts-1.23.1/tests/examples/UnicodeRelation.hs0000644000000000000000000000071113534314633021561 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} import Prelude.Unicode testAnd ∷ Int → Int → Bool testAnd a b = let bâ‚ = a ≤ 3 bâ‚‚ = b ≥ 5 in b₠∧ bâ‚‚ testOr ∷ Int → Int → Int → Int → Int → Bool testOr a b c d e = let bâ‚ = a ≤ 3 bâ‚‚ = b ≢ 5 b₃ = c ≮ 5 bâ‚„ = d ≯ 6 bâ‚… = e ∈ [1,2,3,4] b₆ = e ∉ [5,6,7,8] in b₠∨ bâ‚‚ ∨ b₃ ∨ bâ‚„ ∨ bâ‚… ∨ b₆ haskell-src-exts-1.23.1/tests/examples/DoubleHashOp.hs0000644000000000000000000000030713534314633021013 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} module DoubleHashOp where (##) :: a -> b -> Int a ## b = 0 (#*) :: a -> b -> Int a #* b = 1 -- This still does not work though: -- (#) :: a -> b -> Int -- a # b = 2 haskell-src-exts-1.23.1/tests/examples/DsStrictData.hs0000644000000000000000000000262213534314633021031 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables, StrictData, GADTs #-} -- | Tests the StrictData LANGUAGE pragma. module Main where import qualified Control.Exception as E import System.IO.Unsafe (unsafePerformIO) data Strict a = S a data Strict2 b = S2 !b data Strict3 c where S3 :: c -> Strict3 c data UStrict = US {-# UNPACK #-} Int data Lazy d = L ~d data Lazy2 e where L2 :: ~e -> Lazy2 e main :: IO () main = do print (isBottom (S bottom)) print (isBottom (S2 bottom)) print (isBottom (US bottom)) print (isBottom (S3 bottom)) putStrLn "" print (not (isBottom (L bottom))) print (not (isBottom (L2 bottom))) print (not (isBottom (Just bottom))) -- sanity check ------------------------------------------------------------------------ -- Support for testing for bottom bottom :: a bottom = error "_|_" isBottom :: a -> Bool isBottom f = unsafePerformIO $ (E.evaluate f >> return False) `E.catches` [ E.Handler (\(_ :: E.ArrayException) -> return True) , E.Handler (\(_ :: E.ErrorCall) -> return True) , E.Handler (\(_ :: E.NoMethodError) -> return True) , E.Handler (\(_ :: E.NonTermination) -> return True) , E.Handler (\(_ :: E.PatternMatchFail) -> return True) , E.Handler (\(_ :: E.RecConError) -> return True) , E.Handler (\(_ :: E.RecSelError) -> return True) , E.Handler (\(_ :: E.RecUpdError) -> return True) ] haskell-src-exts-1.23.1/tests/examples/BadStringLineBreak.hs0000644000000000000000000000026513534314632022132 0ustar0000000000000000module BadStringLineBreak where main = print $ "hello" ++ "world -- any random junk that goes here gets added onto the character count -- and the quote ends it with some garbage " haskell-src-exts-1.23.1/tests/examples/HexPrec.hs0000644000000000000000000000011313534314633020027 0ustar0000000000000000module HexPrec where (%%) :: Int -> Int -> Int a %% b = 0 infixl 0x02 %% haskell-src-exts-1.23.1/tests/examples/EqualityConstraints2.hs0000644000000000000000000000003413534314633022602 0ustar0000000000000000one :: a ~ Int => a one = 1 haskell-src-exts-1.23.1/tests/examples/SafeImports2.hs0000644000000000000000000000005713534314633021016 0ustar0000000000000000{-# LANGUAGE Safe #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/InfixBang.hs0000644000000000000000000000006113534314633020340 0ustar0000000000000000{-# LANGUAGE BangPatterns #-} (!) arr i = arr i haskell-src-exts-1.23.1/tests/examples/DerivingVia.hs0000644000000000000000000002761413534314632020716 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE InstanceSigs #-} {-# LANGUAGE TypeInType #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE TypeApplications #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE MultiWayIf #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE UndecidableInstances #-} module DerivingVia where import Data.Void import Data.Complex import Data.Functor.Const import Data.Functor.Identity import Data.Ratio import Control.Monad.Reader import Control.Monad.State import Control.Monad.Writer import Control.Applicative hiding (WrappedMonad(..)) import Data.Bifunctor import Data.Monoid import Data.Kind type f ~> g = forall xx. f xx -> g xx ----- -- Simple example ----- data Foo a = MkFoo a a deriving Show via (Identity (Foo a)) ----- -- Eta reduction at work ----- newtype Flip p a b = Flip { runFlip :: p b a } instance Bifunctor p => Bifunctor (Flip p) where bimap f g = Flip . bimap g f . runFlip instance Bifunctor p => Functor (Flip p a) where fmap f = Flip . first f . runFlip newtype Bar a = MkBar (Either a Int) deriving Functor via (Flip Either Int) ----- -- Monad transformers ----- type MTrans = (Type -> Type) -> (Type -> Type) -- From `constraints' data Dict c where Dict :: c => Dict c newtype a :- b = Sub (a => Dict b) infixl 1 \\ (\\) :: a => (b => r) -> (a :- b) -> r r \\ Sub Dict = r -- With `-XQuantifiedConstraints' this just becomes -- -- type Lifting cls trans = forall mm. cls mm => cls (trans mm) -- -- type LiftingMonad trans = Lifting Monad trans -- class LiftingMonad (trans :: MTrans) where proof :: Monad m :- Monad (trans m) instance LiftingMonad (StateT s :: MTrans) where proof :: Monad m :- Monad (StateT s m) proof = Sub Dict instance Monoid w => LiftingMonad (WriterT w :: MTrans) where proof :: Monad m :- Monad (WriterT w m) proof = Sub Dict instance (LiftingMonad trans, LiftingMonad trans') => LiftingMonad (ComposeT trans trans' :: MTrans) where proof :: forall m. Monad m :- Monad (ComposeT trans trans' m) proof = Sub (Dict \\ proof @trans @(trans' m) \\ proof @trans' @m) newtype Stack :: MTrans where Stack :: ReaderT Int (StateT Bool (WriterT String m)) a -> Stack m a deriving newtype ( Functor , Applicative , Monad , MonadReader Int , MonadState Bool , MonadWriter String ) deriving (MonadTrans, MFunctor) via (ReaderT Int `ComposeT` StateT Bool `ComposeT` WriterT String) class MFunctor (trans :: MTrans) where hoist :: Monad m => (m ~> m') -> (trans m ~> trans m') instance MFunctor (ReaderT r :: MTrans) where hoist :: Monad m => (m ~> m') -> (ReaderT r m ~> ReaderT r m') hoist nat = ReaderT . fmap nat . runReaderT instance MFunctor (StateT s :: MTrans) where hoist :: Monad m => (m ~> m') -> (StateT s m ~> StateT s m') hoist nat = StateT . fmap nat . runStateT instance MFunctor (WriterT w :: MTrans) where hoist :: Monad m => (m ~> m') -> (WriterT w m ~> WriterT w m') hoist nat = WriterT . nat . runWriterT infixr 9 `ComposeT` newtype ComposeT :: MTrans -> MTrans -> MTrans where ComposeT :: { getComposeT :: f (g m) a } -> ComposeT f g m a deriving newtype (Functor, Applicative, Monad) instance (MonadTrans f, MonadTrans g, LiftingMonad g) => MonadTrans (ComposeT f g) where lift :: forall m. Monad m => m ~> ComposeT f g m lift = ComposeT . lift . lift \\ proof @g @m instance (MFunctor f, MFunctor g, LiftingMonad g) => MFunctor (ComposeT f g) where hoist :: forall m m'. Monad m => (m ~> m') -> (ComposeT f g m ~> ComposeT f g m') hoist f = ComposeT . hoist (hoist f) . getComposeT \\ proof @g @m ----- -- Using tuples in a `via` type ----- newtype X a = X (a, a) deriving (Semigroup, Monoid) via (Product a, Sum a) deriving (Show, Eq) via (a, a) ----- -- Abstract data types ----- class C f where c :: f a -> Int newtype X2 f a = X2 (f a) instance C (X2 f) where c = const 0 deriving via (X2 IO) instance C IO ---- -- Testing parser ---- newtype P0 a = P0 a deriving Show via a newtype P1 a = P1 [a] deriving Show via [a] newtype P2 a = P2 (a, a) deriving Show via (a, a) newtype P3 a = P3 (Maybe a) deriving Show via (First a) newtype P4 a = P4 (Maybe a) deriving Show via (First $ a) newtype P5 a = P5 a deriving Show via (Identity $ a) newtype P6 a = P6 [a] deriving Show via ([] $ a) newtype P7 a = P7 (a, a) deriving Show via (Identity $ (a, a)) newtype P8 a = P8 (Either () a) deriving Functor via (($) (Either ())) newtype f $ a = APP (f a) deriving newtype Show deriving newtype Functor ---- -- From Baldur's notes ---- ---- -- 1 ---- newtype WrapApplicative f a = WrappedApplicative (f a) deriving (Functor, Applicative) instance (Applicative f, Num a) => Num (WrapApplicative f a) where (+) = liftA2 (+) (*) = liftA2 (*) negate = fmap negate fromInteger = pure . fromInteger abs = fmap abs signum = fmap signum instance (Applicative f, Fractional a) => Fractional (WrapApplicative f a) where recip = fmap recip fromRational = pure . fromRational instance (Applicative f, Floating a) => Floating (WrapApplicative f a) where pi = pure pi sqrt = fmap sqrt exp = fmap exp log = fmap log sin = fmap sin cos = fmap cos asin = fmap asin atan = fmap atan acos = fmap acos sinh = fmap sinh cosh = fmap cosh asinh = fmap asinh atanh = fmap atanh acosh = fmap acosh instance (Applicative f, Semigroup s) => Semigroup (WrapApplicative f s) where (<>) = liftA2 (<>) instance (Applicative f, Monoid m) => Monoid (WrapApplicative f m) where mempty = pure mempty ---- -- 2 ---- class Pointed p where pointed :: a -> p a newtype WrapMonad f a = WrappedMonad (f a) deriving newtype (Pointed, Monad) instance (Monad m, Pointed m) => Functor (WrapMonad m) where fmap = liftM instance (Monad m, Pointed m) => Applicative (WrapMonad m) where pure = pointed (<*>) = ap -- data data Sorted a = Sorted a a a deriving (Functor, Applicative) via (WrapMonad Sorted) deriving (Num, Fractional, Floating, Semigroup, Monoid) via (WrapApplicative Sorted a) instance Monad Sorted where (>>=) :: Sorted a -> (a -> Sorted b) -> Sorted b Sorted a b c >>= f = Sorted a' b' c' where Sorted a' _ _ = f a Sorted _ b' _ = f b Sorted _ _ c' = f c instance Pointed Sorted where pointed :: a -> Sorted a pointed a = Sorted a a a ---- -- 3 ---- class IsZero a where isZero :: a -> Bool newtype WrappedNumEq a = WrappedNumEq a newtype WrappedShow a = WrappedShow a newtype WrappedNumEq2 a = WrappedNumEq2 a instance (Num a, Eq a) => IsZero (WrappedNumEq a) where isZero :: WrappedNumEq a -> Bool isZero (WrappedNumEq a) = 0 == a instance Show a => IsZero (WrappedShow a) where isZero :: WrappedShow a -> Bool isZero (WrappedShow a) = "0" == show a instance (Num a, Eq a) => IsZero (WrappedNumEq2 a) where isZero :: WrappedNumEq2 a -> Bool isZero (WrappedNumEq2 a) = a + a == a newtype INT = INT Int deriving newtype Show deriving IsZero via (WrappedNumEq Int) newtype VOID = VOID Void deriving IsZero via (WrappedShow Void) ---- -- 4 ---- class Bifunctor p => Biapplicative p where bipure :: a -> b -> p a b biliftA2 :: (a -> b -> c) -> (a' -> b' -> c') -> p a a' -> p b b' -> p c c' instance Biapplicative (,) where bipure = (,) biliftA2 f f' (a, a') (b, b') = (f a b, f' a' b') newtype WrapBiapp p a b = WrapBiap (p a b) deriving newtype (Bifunctor, Biapplicative, Eq) instance (Biapplicative p, Num a, Num b) => Num (WrapBiapp p a b) where (+) = biliftA2 (+) (+) (-) = biliftA2 (*) (*) (*) = biliftA2 (*) (*) negate = bimap negate negate abs = bimap abs abs signum = bimap signum signum fromInteger n = fromInteger n `bipure` fromInteger n newtype INT2 = INT2 (Int, Int) deriving IsZero via (WrappedNumEq2 (WrapBiapp (,) Int Int)) ---- -- 5 ---- class Monoid a => MonoidNull a where null :: a -> Bool newtype WrpMonNull a = WRM a deriving (Eq, Semigroup, Monoid) instance (Eq a, Monoid a) => MonoidNull (WrpMonNull a) where null :: WrpMonNull a -> Bool null = (== mempty) deriving via (WrpMonNull Any) instance MonoidNull Any deriving via () instance MonoidNull () deriving via Ordering instance MonoidNull Ordering ---- -- 6 ---- -- https://github.com/mikeizbicki/subhask/blob/f53fd8f465747681c88276c7dabe3646fbdf7d50/src/SubHask/Algebra.hs#L635 class Lattice a where sup :: a -> a -> a (.>=) :: a -> a -> Bool (.>) :: a -> a -> Bool newtype WrapOrd a = WrappedOrd a deriving newtype (Eq, Ord) instance Ord a => Lattice (WrapOrd a) where sup = max (.>=) = (>=) (.>) = (>) deriving via [a] instance Ord a => Lattice [a] deriving via (a, b) instance (Ord a, Ord b) => Lattice (a, b) --mkLattice_(Bool) deriving via Bool instance Lattice Bool --mkLattice_(Char) deriving via Char instance Lattice Char --mkLattice_(Int) deriving via Int instance Lattice Int --mkLattice_(Integer) deriving via Integer instance Lattice Integer --mkLattice_(Float) deriving via Float instance Lattice Float --mkLattice_(Double) deriving via Double instance Lattice Double --mkLattice_(Rational) deriving via Rational instance Lattice Rational ---- -- 7 ---- -- https://hackage.haskell.org/package/linear-1.20.7/docs/src/Linear-Affine.html class Functor f => Additive f where zero :: Num a => f a (^+^) :: Num a => f a -> f a -> f a (^+^) = liftU2 (+) (^-^) :: Num a => f a -> f a -> f a x ^-^ y = x ^+^ fmap negate y liftU2 :: (a -> a -> a) -> f a -> f a -> f a instance Additive [] where zero = [] liftU2 f = go where go (x:xs) (y:ys) = f x y : go xs ys go [] ys = ys go xs [] = xs instance Additive Maybe where zero = Nothing liftU2 f (Just a) (Just b) = Just (f a b) liftU2 _ Nothing ys = ys liftU2 _ xs Nothing = xs instance Applicative f => Additive (WrapApplicative f) where zero = pure 0 liftU2 = liftA2 deriving via (WrapApplicative ((->) a)) instance Additive ((->) a) deriving via (WrapApplicative Complex) instance Additive Complex deriving via (WrapApplicative Identity) instance Additive Identity instance Additive ZipList where zero = ZipList [] liftU2 f (ZipList xs) (ZipList ys) = ZipList (liftU2 f xs ys) class Additive (Diff p) => Affine p where type Diff p :: Type -> Type (.-.) :: Num a => p a -> p a -> Diff p a (.+^) :: Num a => p a -> Diff p a -> p a (.-^) :: Num a => p a -> Diff p a -> p a p .-^ v = p .+^ fmap negate v -- #define ADDITIVEC(CTX,T) instance CTX => Affine T where type Diff T = T ; \ -- (.-.) = (^-^) ; {-# INLINE (.-.) #-} ; (.+^) = (^+^) ; {-# INLINE (.+^) #-} ; \ -- (.-^) = (^-^) ; {-# INLINE (.-^) #-} -- #define ADDITIVE(T) ADDITIVEC((), T) newtype WrapAdditive f a = WrappedAdditive (f a) instance Additive f => Affine (WrapAdditive f) where type Diff (WrapAdditive f) = f WrappedAdditive a .-. WrappedAdditive b = a ^-^ b WrappedAdditive a .+^ b = WrappedAdditive (a ^+^ b) WrappedAdditive a .-^ b = WrappedAdditive (a ^-^ b) -- ADDITIVE(((->) a)) deriving via (WrapAdditive ((->) a)) instance Affine ((->) a) -- ADDITIVE([]) deriving via (WrapAdditive []) instance Affine [] -- ADDITIVE(Complex) deriving via (WrapAdditive Complex) instance Affine Complex -- ADDITIVE(Maybe) deriving via (WrapAdditive Maybe) instance Affine Maybe -- ADDITIVE(ZipList) deriving via (WrapAdditive ZipList) instance Affine ZipList -- ADDITIVE(Identity) deriving via (WrapAdditive Identity) instance Affine Identity ---- -- 8 ---- class C2 a b c where c2 :: a -> b -> c instance C2 a b (Const a b) where c2 x _ = Const x newtype Fweemp a = Fweemp a deriving (C2 a b) via (Const a (b :: Type)) haskell-src-exts-1.23.1/tests/examples/Unpack.hs0000644000000000000000000000021013534314633017710 0ustar0000000000000000{-# LANGUAGE GADTs #-} data CmmNode e x where CmmEntry :: {-# UNPACK #-} !Int -> CmmNode e x data UI = UI {-# UNPACK #-} !Int haskell-src-exts-1.23.1/tests/examples/ClassContext.hs0000644000000000000000000000006113534314632021104 0ustar0000000000000000f :: Ord (i Int) => i Int -> i Int f = undefined haskell-src-exts-1.23.1/tests/examples/PatternSplice.hs0000644000000000000000000000021113534314633021245 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} module PatternSpliceTest where foo :: Int -> Bool foo $( [p| 42 |] ) = True foo _ = False haskell-src-exts-1.23.1/tests/examples/UnicodeIdents.hs0000644000000000000000000000003213551225765021234 0ustar0000000000000000猫 = () 自乗 x = x * x haskell-src-exts-1.23.1/tests/examples/GadtStrictness.hs0000644000000000000000000000006613534314633021441 0ustar0000000000000000{-# LANGUAGE GADTs #-} data X where X :: !Int -> X haskell-src-exts-1.23.1/tests/examples/QuasiQuoteSplice.hs0000644000000000000000000000036013534314633021735 0ustar0000000000000000{-# LANGUAGE TemplateHaskell, RankNTypes #-} {-# OPTIONS_GHC -F -pgmFtrhsx #-} import Language.Haskell.TH data PageFunction m a = PF main = let a = mkName "a" in runQ [t| forall m. PageFunction m $(conT (mkName "a")) |] >>= print haskell-src-exts-1.23.1/tests/examples/CxtWhitespace.hs0000644000000000000000000000012013534314632021241 0ustar0000000000000000-- is not ok instance ( Eq h) => Eq h -- is ok instance ( Eq h, Eq h) => Eq h haskell-src-exts-1.23.1/tests/examples/DataKinds.hs0000644000000000000000000000110213534314632020331 0ustar0000000000000000{-# LANGUAGE KindSignatures #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE PolyKinds #-} class C1 (a :: Bool {- 1 -}) where c :: proxy a -> Int class C2 (a :: [ * ]) data Baz = Baz data Foo = Foo class C3 (a :: [(Baz, Foo)]) class C4 (a :: ( * )) class C5 (a :: App foo baz) class C6 (a :: (parens)) data X (a :: [*]) x1 = undefined :: X '[Int] x2 = undefined :: X '[Int, Double] data Y (a :: (*, Bool)) y1 = undefined :: Y '(Double, True) y2 = undefined :: Y '(Double, 'False {-comment-}) z1 = undefined :: X [ a -> b, X '[] ] z2 = undefined :: Y (a -> b, True) haskell-src-exts-1.23.1/tests/examples/MinimalPragma.hs0000644000000000000000000000024113534314633021211 0ustar0000000000000000class Eq a where (==) :: a -> a -> Bool (/=) :: a -> a -> Bool x == y = not (x /= y) x /= y = not (x == y) {-# MINIMAL (==) | (/=) #-} haskell-src-exts-1.23.1/tests/examples/WildcardTyFam.hs0000644000000000000000000000010513534314633021164 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} type family Foo a where Foo _ = Int haskell-src-exts-1.23.1/tests/examples/ParenFunBind.hs0000644000000000000000000000005513534314633021011 0ustar0000000000000000module ParenFunBind where (foo x) y = x + y haskell-src-exts-1.23.1/tests/examples/ParallelArrays.hs0000644000000000000000000000021413534314633021411 0ustar0000000000000000{-# LANGUAGE ParallelArrays #-} dotp_double :: [:Double:] -> [:Double:] -> Double dotp_double xs ys = sumP [:x * y | x <- xs | y <- ys:] haskell-src-exts-1.23.1/tests/examples/RegularPatterns.hs0000644000000000000000000000035713534314633021625 0ustar0000000000000000{-# OPTIONS_GHC -F -pgmFhsx2hs #-} {-# LANGUAGE RegularPatterns #-} module RegularPatterns where f :: [Int] -> [[Int]] f [ 0+!, b+, 1?, (| 2,3 |) ] = [b] f [ 1+, (| x | x `mod` 2 == 0 |) ] = [[x]] f [ 2, a@(| b@:_, _ |)* ] = b:a f _ = [] haskell-src-exts-1.23.1/tests/examples/PartialSignatures.hs0000644000000000000000000001312513534314633022141 0ustar0000000000000000{-# LANGUAGE GADTs, NamedWildCards, ScopedTypeVariables #-} bar :: Int -> _ Int bar x = Foo True () x addAndOr1 :: _ addAndOr1 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr2 :: _ -> _ addAndOr2 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr3 :: _ -> _ -> _ addAndOr3 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr4 :: (_ _ _) -> (_ _ _) -> (_ _ _) addAndOr4 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr5 :: (_, _) -> (_, _) -> (_, _) addAndOr5 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr6 :: (Int, _) -> (Bool, _) -> (_ Int Bool) addAndOr6 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y bar :: _ -> _ bar x = not x alpha :: _ alpha = 3 bravo :: _ => _ bravo = 3 bravo :: _ => _ bravo = 3 barry :: _a -> (_b _a, _b _) barry x = (Left "x", Right x) foo :: a ~ Bool => (a, _) foo = (True, False) every :: _ -> _ -> Bool every _ [] = True every p (x:xs) = p x && every p xs every :: (_a -> Bool) -> [_a] -> Bool every _ [] = True every p (x:xs) = p x && every p xs bar :: Bool -> Bool bar x = (x :: _) bar :: _a -> _a bar True = (False :: _a) bar False = (True :: _a) arbitCs1 :: _ => a -> String arbitCs1 x = show (succ x) ++ show (x == x) arbitCs2 :: (Show a, _) => a -> String arbitCs2 x = arbitCs1 x arbitCs3 :: (Show a, Enum a, _) => a -> String arbitCs3 x = arbitCs1 x arbitCs4 :: (Eq a, _) => a -> String arbitCs4 x = arbitCs1 x arbitCs5 :: (Eq a, Enum a, Show a, _) => a -> String arbitCs5 x = arbitCs1 x foo :: _ => String foo = "x" -- No extra constraints foo :: _ => a foo = 3 foo :: _ => a foo = 3 fall :: forall a . _ -> a fall v = v bar :: _a -> _a bar x = not x foo :: (forall a. [a] -> [a]) -> _ foo x = (x [True, False], x ['a', 'b']) foo :: (forall a. [a] -> [a]) -> (_, _ _) foo x = (x [True, False], x ['a', 'b']) monoLoc :: forall a. a -> ((a, String), (a, _)) monoLoc x = (g True , g False) where g :: t -> (a, String) g _ = (x, "foo") -- Test case for (fixed) bug that previously generated the following error message: -- LocalDefinitionBug.hs:9:16: -- GHC internal error: ‘a’ is not in scope during type checking, but it passed the renamer -- tcl_env of environment: [alA :-> Type variable ‘_’ = _, -- alC :-> Identifier[x::a, ], -- alE :-> Type variable ‘t’ = t, -- rjF :-> Identifier[monoLoc::a -- -> ((a, String), (a, _)), ]] -- In the type signature for ‘g’: g :: t -> (a, String) -- In an equation for ‘monoLoc’: -- monoLoc x -- = (g True, g False) -- where -- g :: t -> (a, String) -- g _ = (x, "foo") -- Fixed by using tcExtendTyVarEnv2 instead of tcExtendTyVarEnv data NukeMonad a b c instance Functor (NukeMonad a b) where fmap = undefined instance Applicative (NukeMonad a b) where pure = undefined (<*>) = undefined instance Monad (NukeMonad a b) where return = undefined (>>=) = undefined isMeltdown :: NukeMonad param1 param2 Bool isMeltdown = undefined unlessMeltdown :: _nm () -> _nm () unlessMeltdown c = do m <- isMeltdown if m then return () else c monoLoc :: forall a. a -> ((a, String), (a, String)) monoLoc x = (g True , g 'v') where -- g :: b -> (a, String) -- #1 g :: b -> (a, _) -- #2 g y = (x, "foo") -- For #2, we should infer the same type as in #1. foo :: (_a, b) -> (a, _b) foo (x, y) = (x, y) f :: (_) => a -> a -> Bool f x y = x == y foo :: _ Just foo = Just id foo :: Bool -> _ Just foo = Just id bar :: Bool -> Bool bar (x :: _) = True orr :: a -> a -> a orr = undefined g :: _ g = f `orr` True f :: _ f = g test3 :: _ test3 x = const (let x :: _b x = True in False) $ const (let x :: _b x = 'a' in True) $ not x -- The named wildcards aren't scoped as the ScopedTypeVariables extension -- isn't enabled, of which the behaviour is copied. Thus, the _a annotation of -- x, which must be Bool, isn't the same as the _a in g, which is now -- generalised over. foo :: _a -> _ foo x = let v = not x g :: _a -> _a g x = x in (g 'x') showTwo :: Show _a => _a -> String showTwo x = show x bar :: _ -> Bool bar _ = True data GenParser tok st a = GenParser tok st a skipMany' :: GenParser tok st a -> GenParser tok st () skipMany' = undefined skipMany :: _ -> _ () skipMany = skipMany' somethingShowable :: Show _x => _x -> _ somethingShowable x = show (not x) -- Inferred type: Bool -> String data I a = I a instance Functor I where fmap f (I a) = I (f a) newtype B t a = B a instance Functor (B t) where fmap f (B a) = B (f a) newtype H f = H (f ()) h1 :: _ => _ -- h :: Functor m => (a -> b) -> m a -> H m h1 f b = (H . fmap (const ())) (fmap f b) h2 :: _ -- h2 :: Functor m => (a -> b) -> m a -> H m h2 f b = (H . fmap (const ())) (fmap f b) app1 :: H (B t) app1 = h1 (H . I) (B ()) app2 :: H (B t) app2 = h2 (H . I) (B ()) foo f = g where g r = x where x :: _ x = r unc :: (_ -> _ -> _) -> (_, _) -> _ unc = uncurry unc :: (_a -> _b -> _c) -> (_a, _b) -> _c unc = uncurry foo :: (Show _a, _) => _a -> _ foo x = show (succ x) bar :: _ -> _ -> _ bar x y = y x haskell-src-exts-1.23.1/tests/examples/TySplice4.hs0000644000000000000000000000015713534314633020321 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} x = [d| f :: a -> Int f x = 1 |] y = [d| f2 :: a -> Int; f2 x = 1 |] haskell-src-exts-1.23.1/tests/examples/EmptyAnn.hs0000644000000000000000000000004613534314633020231 0ustar0000000000000000{-# ANN foo "Hlint: ignore Test4" #-} haskell-src-exts-1.23.1/tests/examples/ArrowLayout.hs0000644000000000000000000000020213534314632020757 0ustar0000000000000000{-# LANGUAGE Arrows #-} module ArrowLayout where exp = proc () -> do rec let e = 1 + i i <- integral -< e returnA -< e haskell-src-exts-1.23.1/tests/examples/GenericTree.hs0000644000000000000000000000030313534314633020666 0ustar0000000000000000{-# LANGUAGE RankNTypes #-} module GenericTree where import Data.Typeable dynRep :: (Typeable a) => a -> (TypeRep, forall b. (Typeable b) => b -> (Maybe b)) dynRep a = (typeOf a, \_ -> cast a) haskell-src-exts-1.23.1/tests/examples/Completesig03A.hs0000644000000000000000000000010113534314632021204 0ustar0000000000000000module Completesig03A where data A = A | B {-# COMPLETE A #-} haskell-src-exts-1.23.1/tests/examples/HaddockComments.hs0000644000000000000000000000241713534314633021545 0ustar0000000000000000{-| Module : W Description : Short description Copyright : (c) Some Guy, 2013 Someone Else, 2014 License : GPL-3 Maintainer : sample@email.com Stability : experimental Portability : POSIX Here is a longer description of this module, containing some commentary with @some markup@. -} module HaddockComments where -- | Function1 comment fun1 :: Int -- ^ The 'Int' argument -> Float -- ^ The 'Float' argument -> IO () -- ^ The return value fun1 = undefined -- not a haddock comment fun2 = undefined fun3 :: Int -> Int -- ^ Function3 comment fun3 = undefined {-| The 'square' function squares an integer. It takes one argument, of type 'Int'. -} square :: Int -> Int square x = x * x -- beware! class C a where -- | This is the documentation for the 'f' method f :: a -> Int -- | This is the documentation for the 'g' method g :: Int -> a -- | Data type comment -- With a second line data MyData = -- | Constructor1 comment Cons1 { cons1Field1 :: Int -- ^ Constructor 1 field 1 comment -- spanning two lines -- | Constructor 1 field 2 comment , cons1Field2 :: Int , cons1Field3 :: String -- Not a haddock comment } | Cons2 -- ^ Constructor 2 comment Int -- ^ Last haskell-src-exts-1.23.1/tests/examples/StarInType.hs0000644000000000000000000000015113534314633020535 0ustar0000000000000000{-# language TypeOperators, KindSignatures #-} data B = B data a * b = Foo type A = B * B main = print 1 haskell-src-exts-1.23.1/tests/examples/SimpleDeriving.hs0000644000000000000000000000002713534314633021416 0ustar0000000000000000data T = T deriving Eq haskell-src-exts-1.23.1/tests/examples/PolyKinds.hs0000644000000000000000000000031013534314633020404 0ustar0000000000000000{-# LANGUAGE PolyKinds #-} data Proxy t = Proxy class Typeable t where typeOf :: Proxy t -> TypeRep instance Typeable Int where typeOf _ = TypeRep instance Typeable [] where typeOf _ = TypeRep haskell-src-exts-1.23.1/tests/examples/QuasiQuoteToplevel.hs0000644000000000000000000000031213534314633022305 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} [undefined| this quasiquote is acceptable to ghc's parser. Previously hse would reject this because -XTemplateHaskell is not enabled to allow "expressions" at top-level |] haskell-src-exts-1.23.1/tests/examples/IndentedWhere.hs0000644000000000000000000000005013534314633021216 0ustar0000000000000000 f x = g where g :: Int g = 0 haskell-src-exts-1.23.1/tests/examples/MagicHashUnboxedTuples.hs0000644000000000000000000000020113534314633023035 0ustar0000000000000000{-# LANGUAGE MagicHash, UnboxedTuples #-} module MagicHashUnboxedTuples where f (#x, y #) = (# a#, b #) where a# = a# b = b haskell-src-exts-1.23.1/tests/examples/EmptyWhere.hs0000644000000000000000000000001613534314633020564 0ustar0000000000000000foo = 5 where haskell-src-exts-1.23.1/tests/examples/MultiParam.hs0000644000000000000000000000011413534314633020545 0ustar0000000000000000module MultiParam where foo :: MonadError e m => e -> m () foo = undefined haskell-src-exts-1.23.1/tests/examples/Vta1.hs0000644000000000000000000000376613534314633017325 0ustar0000000000000000{-# LANGUAGE TypeApplications, ScopedTypeVariables, PolyKinds, TypeFamilies, RankNTypes, FlexibleContexts #-} -- tests about visible type application module Vta1 where quad :: a -> b -> c -> d -> (a, b, c, d) quad = (,,,) silly = quad @_ @Bool @Char @_ 5 True 'a' "Hello" pairup_nosig x y = (x, y) pairup_sig :: a -> b -> (a,b) pairup_sig u w = (u, w) answer_sig = pairup_sig @Bool @Int False 7 -- -- (False, 7) :: (Bool, Int) answer_read = show (read @Int "3") -- "3" :: String answer_show = show @Integer (read "5") -- "5" :: String answer_showread = show @Int (read @Int "7") -- "7" :: String intcons a = (:) @Int a intpair x y = pairup_sig @Int x y answer_pairup = pairup_sig @Int 5 True -- (5, True) :: (Int, Bool) answer_intpair = intpair 1 "hello" -- (1, "hello") :: (Int, String) answer_intcons = intcons 7 [] -- [7] :: [Int] type family F a type instance F Char = Bool g :: F a -> a g _ = undefined f :: Char f = g True answer = g @Char False mapSame :: forall b. (forall a. a -> a) -> [b] -> [b] mapSame _ [] = [] mapSame fun (x:xs) = fun @b x : (mapSame @b fun xs) pair :: forall a. a-> (forall b. b -> (a, b)) pair x y = (x, y) b = pair @Int 3 @Bool True c = mapSame id [1,2,3] d = pair 3 @Bool True pairnum :: forall a. Num a => forall b. b -> (a, b) pairnum = pair 3 e = (pair 3 :: forall a. Num a => forall b. b -> (a, b)) @Int @Bool True h = pairnum @Int @Bool True data First (a :: * -> *) = F data Proxy (a :: k) = P -- This expands to P (kind variable) (type variable) data Three (a :: * -> k -> *) = T foo :: Proxy a -> Int foo _ = 0 first :: First a -> Int first _ = 0 fTest = first F fMaybe = first @Maybe F test = foo P bar = foo @Bool P -- should work too :: Three a -> Int too _ = 3 threeBase = too T threeOk = too @Either T blah = Nothing @Int newtype N = MkN { unMkN :: forall a. Show a => a -> String } n = MkN show boo = unMkN n @Bool boo2 :: forall (a :: * -> *) . Proxy a -> Bool boo2 _ = False base = boo2 P bar'= boo2 @Maybe P -- should work haskell-src-exts-1.23.1/tests/examples/InfixApp.hs0000644000000000000000000000001213534314633020205 0ustar0000000000000000f = -w/2 haskell-src-exts-1.23.1/tests/examples/SCCPragmas.hs0000644000000000000000000000006413534314633020421 0ustar0000000000000000module SCCPragmas where x = {-# SCC "wibble" #-} 3 haskell-src-exts-1.23.1/tests/examples/AtOperator.hs0000644000000000000000000000017413534314632020557 0ustar0000000000000000{-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeOperators #-} data a :+: b = Proxy foo = id @(Int :+: Int) _ @> m = m haskell-src-exts-1.23.1/tests/examples/MultiWayIf.hs0000644000000000000000000000126313534314633020532 0ustar0000000000000000{-# LANGUAGE MultiWayIf #-} module MultiWayIf where foo = if | test1 -> e1 | test2 witharg -> e2 | otherwise -> def bar = if { | test1 -> if { | test2 -> e1 | test3 -> e2 } | test4 -> e3 } -- taken from GHC's test suite x = 10 x1 = if | x < 10 -> "< 10" | otherwise -> "" x2 = if | x < 10 -> "< 10" | otherwise -> "" x3 = if | x < 10 -> "< 10" | otherwise -> "" x4 = if | True -> "yes" x5 = if | True -> if | False -> 1 | True -> 2 x6 = if | x < 10 -> if | True -> "yes" | False -> "no" | otherwise -> "maybe" x7 = (if | True -> 0) -- issue #98 spam = if | () <- () -> () haskell-src-exts-1.23.1/tests/examples/RoleAnnotations.hs0000644000000000000000000000043013534314633021612 0ustar0000000000000000{-# LANGUAGE RoleAnnotations, PolyKinds, KindSignatures #-} module Roles where data T1 a = K1 a data T2 a = K2 a data T5 a = K5 a data T6 a = K6 data T7 a b = K7 b type role T1 nominal type role T2 representational type role T3 phantom type role T4 nominal _ type role T5 _ haskell-src-exts-1.23.1/tests/examples/HashOperator.hs0000644000000000000000000000013113534314633021070 0ustar0000000000000000{-# LANGUAGE OverloadedLabels #-} (#.) :: Int -> Int -> Int x #. y = x + y infixr 9 #. haskell-src-exts-1.23.1/tests/examples/QuasiQuoteLines.hs0000644000000000000000000000020413534314633021565 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import Here str :: String str = [here|test test test test |] main :: IO() main = do putStrLn str haskell-src-exts-1.23.1/tests/examples/MultiLinePragma.hs0000644000000000000000000000017213534314633021530 0ustar0000000000000000{-# OPTIONS_GHC -a -a -a -a -a -a -a -a -a -a -a #-} main :: IO () main = dat haskell-src-exts-1.23.1/tests/examples/SafeImports3.hs0000644000000000000000000000006613534314633021017 0ustar0000000000000000{-# LANGUAGE Trustworthy #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/UnicodeSubscript.hs0000644000000000000000000000047313534314633021767 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where data Point = Point { pointX, pointY ∷ Double , name ∷ String } deriving (Show) distance ∷ Point → Point → Double distance x y = let tâ‚ = (pointX x - pointX y)^2 tâ‚‚ = (pointY x - pointY y)^2 in sqrt $ tâ‚ + tâ‚‚ haskell-src-exts-1.23.1/tests/examples/RCategory.hs0000644000000000000000000000214713534314633020401 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds, MultiParamTypeClasses #-} module Control.RCategory where import qualified Prelude import GHC.Prim infixr 9 . infixr 1 >>>, <<< -- | A class for categories. -- id and (.) must form a monoid. class RCategory cat where type RCategoryCtxt cat a b :: Constraint -- | the identity morphism id :: RCategoryCtxt cat a a => cat a a -- | morphism composition (.) :: (RCategoryCtxt cat b c, RCategoryCtxt cat a b, RCategoryCtxt cat a c) => cat b c -> cat a b -> cat a c {-# RULES "identity/left" forall p . id . p = p "identity/right" forall p . p . id = p #-} instance RCategory (->) where type RCategoryCtxt (->) a a = () id = Prelude.id (.) = (Prelude..) -- | Right-to-left composition (<<<) :: (RCategoryCtxt cat a c, RCategoryCtxt cat a b, RCategoryCtxt cat b c, RCategory cat) => cat b c -> cat a b -> cat a c (<<<) = (.) -- | Left-to-right composition (>>>) :: (RCategoryCtxt cat a c, RCategoryCtxt cat a b, RCategoryCtxt cat b c, RCategory cat) => cat a b -> cat b c -> cat a c f >>> g = g . f haskell-src-exts-1.23.1/tests/examples/t412.hs0000644000000000000000000000015613534314633017172 0ustar0000000000000000{-# LANGUAGE TypeInType #-} module Typeintype ( App ) where import Data.Kind data App (f :: k -> *) haskell-src-exts-1.23.1/tests/examples/ForeignImportJavascript.hs0000644000000000000000000000021013534314633023302 0ustar0000000000000000{-# LANGUAGE JavascriptFFI #-} foreign import javascript unsafe "somethingUseful_ = $1" js_set_somethingUseful :: JSFun a -> IO () haskell-src-exts-1.23.1/tests/examples/ExprHole.hs0000644000000000000000000000010313534314633020216 0ustar0000000000000000 foo = _ foo = _ x foo = _ foo x = baz where foo _ = _ haskell-src-exts-1.23.1/tests/examples/QualifiedDot.hs0000644000000000000000000000006113534314633021045 0ustar0000000000000000module QualifiedDot where twoDots = (Prelude..) haskell-src-exts-1.23.1/tests/examples/IllDataTypeDecl.hs0000644000000000000000000000012213534314633021435 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} module IllDataTypeDecl where data (f :+: g) p = L haskell-src-exts-1.23.1/tests/examples/Fixity3.hs0000644000000000000000000000017413534314633020037 0ustar0000000000000000class Foo f where (<^>) :: Applicative f => f a -> f (a -> b) -> f b infixr 4 <^> foo = pure 1 <^> pure 2 <^> pure (+) haskell-src-exts-1.23.1/tests/examples/completesig01.hs0000644000000000000000000000047413534314633021157 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -Wall #-} module Simple where pattern Foo :: () pattern Foo = () a :: () -> () a Foo = () data A = B | C | D {-# COMPLETE Foo #-} {-# COMPLETE B,C #-} {-# COMPLETE B #-} b :: A -> A b B = B b C = C {-# COMPLETE Foo :: () #-} haskell-src-exts-1.23.1/tests/examples/QualifiedRecordfieldPuns.hs0000644000000000000000000000006113534314633023407 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} f (C {M.a}) = a haskell-src-exts-1.23.1/tests/examples/QuasiQuoteUnit.hs0000644000000000000000000000012413534314633021433 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE TemplateHaskell #-} unNest n = conP '() haskell-src-exts-1.23.1/tests/examples/FamilyVarid.hs0000644000000000000000000000012413534314633020702 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} module FamilyVarid where f family forall = undefined haskell-src-exts-1.23.1/tests/examples/DoRec.hs0000644000000000000000000000010413534314633017465 0ustar0000000000000000{-# LANGUAGE DoRec #-} main = do rec let x = 1 return () haskell-src-exts-1.23.1/tests/examples/GadtDeriving.hs0000644000000000000000000000013413534314633021043 0ustar0000000000000000{-# LANGUAGE GADTs #-} data Foo where Foo :: Int -> Foo deriving (Eq,Ord,Typeable) haskell-src-exts-1.23.1/tests/examples/RecordInfixSelector.hs0000644000000000000000000000013213534314633022407 0ustar0000000000000000data RecordWithInfixSelector = Cons { (<>) :: Int -> Int } idRecord = Cons { (<>) = id } haskell-src-exts-1.23.1/tests/examples/LanguagePragma.hs0000644000000000000000000000006713534314633021354 0ustar0000000000000000{-# LANGUAGE RecordWildCards #-} main = print "hello" haskell-src-exts-1.23.1/tests/examples/PackageImportsMissing.hs0000644000000000000000000000016613534314633022744 0ustar0000000000000000module PackageImportsMissing where import "wibble" PackageImports.Default import "wibble" PackageImports.Builtin.All haskell-src-exts-1.23.1/tests/examples/TrailingWhere3.hs0000644000000000000000000000007613534314633021330 0ustar0000000000000000main = f where f = g where g = putStrLn "hello world" haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces2.hs0000644000000000000000000000014513534314633022341 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} module ExplicitNamespaces2 ( f, type (++) ) where f = undefined haskell-src-exts-1.23.1/tests/examples/DerivingStrategies.hs0000644000000000000000000000067513534314632022307 0ustar0000000000000000{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE StandaloneDeriving #-} module DerivingStrategies where class C a class D a newtype Foo a = MkFoo a deriving () deriving stock (Eq, Ord) deriving newtype Show deriving anyclass C deriving stock instance Read a => Read (Foo a) deriving newtype instance Num a => Num (Foo a) deriving anyclass instance D (Foo a) haskell-src-exts-1.23.1/tests/examples/ArrowBrackets.hs0000644000000000000000000000024413603723515021247 0ustar0000000000000000{-# LANGUAGE Arrows #-} module ArrowBrackets where foo = proc (x, y) -> (| f (g -< x) |) y bar = proc (x, y) -> do z <- (| f (g -< x) |) y (| f (h -< z) |) y haskell-src-exts-1.23.1/tests/examples/HaskellParser.hs0000644000000000000000000000131513534314633021236 0ustar0000000000000000import qualified Language.Haskell.Exts.Annotated as Parser import qualified Language.Haskell.Exts.Annotated.Syntax as Syn import qualified Language.Haskell.Exts.Extension as Ext parse originalFileName input = Parser.parseModuleWithMode parseMode input where parseMode :: Parser.ParseMode parseMode = Parser.defaultParseMode { Parser.parseFilename = originalFileName , Parser.extensions = Ext.glasgowExts ++ [Ext.ExplicitForall] } main = do s <- readFile "Bug.hs" let x = parse "Bug.hs" s putStrLn (show x) haskell-src-exts-1.23.1/tests/examples/NegativePatterns.hs0000644000000000000000000000036513534314633021765 0ustar0000000000000000f 1 = -1 f (-1) = 1 f ( - 2) = 2 f ( - 3) = 3 data Z a = Higher a a | Same a a | Lower a a infixr 7 `Higher` infixr 6 `Same` infixr 5 `Lower` g :: Z Int -> () g ( -1 `Higher` x) = () g ( - 2 `Same` x) = () g ( - 3 `Lower` x) = () haskell-src-exts-1.23.1/tests/examples/FlexibleContextsWithoutVars.hs0000644000000000000000000000010213534314633024171 0ustar0000000000000000{-# LANGUAGE FlexibleContexts #-} f :: Log.Stack => a -> a f = id haskell-src-exts-1.23.1/tests/examples/ExtraPrettyParentheses.hs0000644000000000000000000000042113534314633023170 0ustar0000000000000000data Q a = Q a a -- In this example, the pretty-printer should insert extra parentheses around -- the negative literal pattern. x * - 1 = negate x -- In these examples, the pretty-printer should not insert extra parentheses. Just x <> Nothing = Just x f (- 1 `Q` _) = () haskell-src-exts-1.23.1/tests/examples/InjectiveTypeFamilies.hs0000644000000000000000000001544413534314633022742 0ustar0000000000000000{-# LANGUAGE DataKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE TypeFamilyDependencies #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE UndecidableInstances #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE NoMonomorphismRestriction #-} module T6018 where import T6018a -- defines G, identical to F type family F a b c = (result :: k) | result -> a b c type instance F Int Char Bool = Bool type instance F Char Bool Int = Int type instance F Bool Int Char = Char type instance G Bool Int Char = Char type family I (a :: k) b (c :: k) = r | r -> a b type instance I Int Char Bool = Bool type instance I Int Char Int = Bool type instance I Bool Int Int = Int -- this is injective - a type variable introduced in the LHS is not mentioned on -- RHS but we don't claim injectivity in that argument. type family J a (b :: k) = r | r -> a type instance J Int b = Char type MaybeSyn a = Maybe a newtype MaybeNew a = MaybeNew (Maybe a) -- make sure we look through type synonyms... type family K a = r | r -> a type instance K a = MaybeSyn a -- .. but not newtypes type family M a = r | r -> a type instance M (Maybe a) = MaybeSyn a type instance M (MaybeNew a) = MaybeNew a -- Closed type families -- these are simple conversions from open type families. They should behave the -- same type family FClosed a b c = result | result -> a b c where FClosed Int Char Bool = Bool FClosed Char Bool Int = Int FClosed Bool Int Char = Char type family IClosed (a :: *) (b :: *) (c :: *) = r | r -> a b where IClosed Int Char Bool = Bool IClosed Int Char Int = Bool IClosed Bool Int Int = Int type family JClosed a (b :: k) = r | r -> a where JClosed Int b = Char type family KClosed a = r | r -> a where KClosed a = MaybeSyn a -- Here the last equation might return both Int and Char but we have to -- recognize that it is not possible due to equation overlap type family Bak a = r | r -> a where Bak Int = Char Bak Char = Int Bak a = a -- This is similar, except that the last equation contains concrete type. Since -- it is overlapped it should be dropped with a warning type family Foo a = r | r -> a where Foo Int = Bool Foo Bool = Int Foo Bool = Bool -- this one was tricky in the early implementation of injectivity. Now it is -- identical to the above but we still keep it as a regression test. type family Bar a = r | r -> a where Bar Int = Bool Bar Bool = Int Bar Bool = Char -- Now let's use declared type families. All the below definitions should work -- No ambiguity for any of the arguments - all are injective f :: F a b c -> F a b c f x = x -- From 1st instance of F: a ~ Int, b ~ Char, c ~ Bool fapp :: Bool fapp = f True -- now the closed variant of F fc :: FClosed a b c -> FClosed a b c fc x = x fcapp :: Bool fcapp = fc True -- The last argument is not injective so it must be instantiated i :: I a b Int -> I a b Int i x = x -- From 1st instance of I: a ~ Int, b ~ Char iapp :: Bool iapp = i True -- again, closed variant of I ic :: IClosed a b Int -> IClosed a b Int ic x = x icapp :: Bool icapp = ic True -- Now we have to test weird closed type families: bak :: Bak a -> Bak a bak x = x bakapp1 :: Char bakapp1 = bak 'c' bakapp2 :: Double bakapp2 = bak 1.0 bakapp3 :: () bakapp3 = bak () foo :: Foo a -> Foo a foo x = x fooapp1 :: Bool fooapp1 = foo True bar :: Bar a -> Bar a bar x = x barapp1 :: Bool barapp1 = bar True barapp2 :: Int barapp2 = bar 1 -- Declarations below test more liberal RHSs of injectivity annotations: -- permiting variables to appear in different order than the one in which they -- were declared. type family H a b = r | r -> b a type family Hc a b = r | r -> b a where Hc a b = a b class Hcl a b where type Ht a b = r | r -> b a -- repeated tyvars in the RHS of injectivity annotation: no warnings or errors -- (consistent with behaviour for functional dependencies) type family Jx a b = r | r -> a a type family Jcx a b = r | r -> a a where Jcx a b = a b class Jcl a b where type Jt a b = r | r -> a a type family Kx a b = r | r -> a b b type family Kcx a b = r | r -> a b b where Kcx a b = a b class Kcl a b where type Kt a b = r | r -> a b b -- Declaring kind injectivity. Here we only claim that knowing the RHS -- determines the LHS kind but not the type. type family L (a :: k1) = (r :: k2) | r -> k1 where L 'True = Int L 'False = Int L Maybe = 3 L IO = 3 data KProxy (a :: *) = KProxy type family KP (kproxy :: KProxy k) = r | r -> k type instance KP ('KProxy :: KProxy Bool) = Int type instance KP ('KProxy :: KProxy *) = Char kproxy_id :: KP ('KProxy :: KProxy k) -> KP ('KProxy :: KProxy k) kproxy_id x = x kproxy_id_use = kproxy_id 'a' -- Now test some awkward cases from The Injectivity Paper. All should be -- accepted. type family Gx a type family Hx a type family Gi a = r | r -> a type instance Gi Int = Char type family Hi a = r | r -> a type family F2 a = r | r -> a type instance F2 [a] = [Gi a] type instance F2 (Maybe a) = Hi a -> Int type family F4 a = r | r -> a type instance F4 [a] = (Gx a, a, a, a) type instance F4 (Maybe a) = (Hx a, a, Int, Bool) type family G2 a b = r | r -> a b type instance G2 a Bool = (a, a) type instance G2 Bool b = (b, Bool) type family G6 a = r | r -> a type instance G6 [a] = [Gi a] type instance G6 Bool = Int g6_id :: G6 a -> G6 a g6_id x = x g6_use :: [Char] g6_use = g6_id "foo" -- A sole exception to "bare variables in the RHS" rule type family Id (a :: k) = (result :: k) | result -> a type instance Id a = a -- This makes sure that over-saturated type family applications at the top-level -- are accepted. type family IdProxy (a :: k) b = r | r -> a type instance IdProxy a b = (Id a) b -- make sure we look through type synonyms properly type IdSyn a = Id a type family IdProxySyn (a :: k) b = r | r -> a type instance IdProxySyn a b = (IdSyn a) b -- this has bare variable in the RHS but all LHS varaiables are also bare so it -- should be accepted type family Fa (a :: k) (b :: k) = (r :: k2) | r -> k type instance Fa a b = a -- Taken from #9587. This exposed a bug in the solver. type family Arr (repr :: * -> *) (a :: *) (b :: *) = (r :: *) | r -> repr a b class ESymantics repr where int :: Int -> repr Int add :: repr Int -> repr Int -> repr Int lam :: (repr a -> repr b) -> repr (Arr repr a b) app :: repr (Arr repr a b) -> repr a -> repr b te4 = let c3 = lam (\f -> lam (\x -> f `app` (f `app` (f `app` x)))) in (c3 `app` (lam (\x -> x `add` int 14))) `app` (int 0) -- This used to fail during development class Manifold' a where type Base a = r | r -> a project :: a -> Base a unproject :: Base a -> a id' :: forall a. ( Manifold' a ) => Base a -> Base a id' = project . unproject haskell-src-exts-1.23.1/tests/examples/BangViewPat.hs0000644000000000000000000000011513534314632020641 0ustar0000000000000000{-# LANGUAGE BangPatterns, ViewPatterns #-} someFun (id -> !arg) = undefined haskell-src-exts-1.23.1/tests/examples/CStyleLinePragmas.hs0000644000000000000000000000004413534314632022021 0ustar0000000000000000#line 1 "Main.hs" #line 2 "Main.hs" haskell-src-exts-1.23.1/tests/examples/DerivingVia2.hs0000644000000000000000000000207513534314632020772 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} module DerivingVia2 where import Control.Applicative import Data.Functor.Compose import Data.Proxy import Data.Semigroup newtype App (f :: * -> *) a = App (f a) deriving newtype (Functor, Applicative) instance (Applicative f, Semigroup a) => Semigroup (App f a) where (<>) = liftA2 (<>) deriving via (App (Compose (f :: * -> *) g) a) instance (Applicative f, Applicative g, Semigroup a) => Semigroup (Compose f g a) class C (a :: k -> *) instance C Proxy newtype MyProxy a = MyProxy (Proxy a) deriving via (Proxy :: * -> *) instance C MyProxy class Z a b data T a data X1 a data X2 a data X3 a deriving via (forall a. T a) instance Z a (X1 b) deriving via (T a) instance forall b. Z a (X2 b) deriving via (forall a. T a) instance forall b. Z a (X3 b) haskell-src-exts-1.23.1/tests/examples/UnicodeSyntax.hs0000644000000000000000000000037113534314633021274 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax, ExplicitForAll #-} module UnicodeSyntax where import System.Environment (getArgs) main ∷ IO () main = do as ↠getArgs print $ test 0 test ∷ Int → Bool test x = x*5 == x+8 id1 ∷ ∀ a . a → a id1 x = x haskell-src-exts-1.23.1/tests/examples/Testing.hs0000644000000000000000000000007713534314633020117 0ustar0000000000000000{-# LINE 5 "templates\GenericTemplate.hs" #-} main = return () haskell-src-exts-1.23.1/tests/examples/ClassInstType.hs0000644000000000000000000000073513534314632021247 0ustar0000000000000000module ClassInstType where class Dir d where localDir :: d -> IO FilePath instance Dir Directory where localDir (Local f) = return f localDir (Darcs {url=url,darcsVersion=Patch patch,subDirectory=subDir}) = do tmp <- createTempDir 0 "haskelld" darcsOut <- runDarcsCommand tmp "get" ["--lazy","--to-match","hash "++ patch,url,"fs"] print darcsOut let (ExitSuccess,"",out) = darcsOut print out return $ tmp "fs" subDir type URL = String haskell-src-exts-1.23.1/tests/examples/TrailingWhere2.hs0000644000000000000000000000011613534314633021322 0ustar0000000000000000data Baz = Baz instance Show Baz where show _ = "" where show _ = "" haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces3.hs0000644000000000000000000000012013534314633022333 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} module Foo(type Str) where data Str = Str haskell-src-exts-1.23.1/tests/examples/GhcDeriving.hs0000644000000000000000000000014413534314633020666 0ustar0000000000000000 newtype CodeGenModule a = CGM (StateT CGMState IO a) deriving (Monad, MonadState [s], MonadIO) haskell-src-exts-1.23.1/tests/examples/DataKinds2.hs0000644000000000000000000000016613534314632020424 0ustar0000000000000000{-# LANGUAGE DataKinds #-} data Foo a = Foo type FooB = Foo "a" type FooC = Foo 1 instance Show (Foo "bar") where haskell-src-exts-1.23.1/tests/examples/DeriveGeneric.hs0000644000000000000000000000015513534314632021211 0ustar0000000000000000{-# LANGUAGE DeriveGeneric #-} data UserTree a = Node a (UserTree a) (UserTree a) | Leaf deriving Generic haskell-src-exts-1.23.1/tests/examples/RecordWildcardError.hs0000644000000000000000000000002413534314633022374 0ustar0000000000000000foo Record{..} = xs haskell-src-exts-1.23.1/tests/examples/Directory.hs0000644000000000000000000007240613534314632020452 0ustar0000000000000000{-# LANGUAGE ForeignFunctionInterface, NondecreasingIndentation #-} ----------------------------------------------------------------------------- -- | -- Module : System.Directory -- Copyright : (c) The University of Glasgow 2001 -- License : BSD-style (see the file libraries/base/LICENSE) -- -- Maintainer : libraries@haskell.org -- Stability : stable -- Portability : portable -- -- System-independent interface to directory manipulation. -- ----------------------------------------------------------------------------- module System.Directory ( -- $intro -- * Actions on directories createDirectory -- :: FilePath -> IO () , createDirectoryIfMissing -- :: Bool -> FilePath -> IO () , removeDirectory -- :: FilePath -> IO () , removeDirectoryRecursive -- :: FilePath -> IO () , renameDirectory -- :: FilePath -> FilePath -> IO () , getDirectoryContents -- :: FilePath -> IO [FilePath] , getCurrentDirectory -- :: IO FilePath , setCurrentDirectory -- :: FilePath -> IO () -- * Pre-defined directories , getHomeDirectory , getAppUserDataDirectory , getUserDocumentsDirectory , getTemporaryDirectory -- * Actions on files , removeFile -- :: FilePath -> IO () , renameFile -- :: FilePath -> FilePath -> IO () , copyFile -- :: FilePath -> FilePath -> IO () , canonicalizePath , makeRelativeToCurrentDirectory , findExecutable -- * Existence tests , doesFileExist -- :: FilePath -> IO Bool , doesDirectoryExist -- :: FilePath -> IO Bool -- * Permissions -- $permissions , Permissions( Permissions, readable, -- :: Permissions -> Bool writable, -- :: Permissions -> Bool executable, -- :: Permissions -> Bool searchable -- :: Permissions -> Bool ) , getPermissions -- :: FilePath -> IO Permissions , setPermissions -- :: FilePath -> Permissions -> IO () , copyPermissions -- * Timestamps , getModificationTime -- :: FilePath -> IO ClockTime ) where import Prelude hiding ( catch ) import qualified Prelude import Control.Monad (guard) import System.Environment ( getEnv ) import System.FilePath import System.IO import System.IO.Error hiding ( catch, try ) import Control.Monad ( when, unless ) import Control.Exception.Base import Foreign import Foreign.C {-# CFILES cbits/directory.c #-} import System.Time ( ClockTime(..) ) import GHC.IO.Exception ( IOException(..), IOErrorType(..), ioException ) import System.Posix.Types import System.Posix.Internals import qualified System.Win32 as Win32 {- $intro A directory contains a series of entries, each of which is a named reference to a file system object (file, directory etc.). Some entries may be hidden, inaccessible, or have some administrative function (e.g. `.' or `..' under POSIX ), but in this standard all such entries are considered to form part of the directory contents. Entries in sub-directories are not, however, considered to form part of the directory contents. Each file system object is referenced by a /path/. There is normally at least one absolute path to each file system object. In some operating systems, it may also be possible to have paths which are relative to the current directory. -} ----------------------------------------------------------------------------- -- Permissions {- $permissions The 'Permissions' type is used to record whether certain operations are permissible on a file\/directory. 'getPermissions' and 'setPermissions' get and set these permissions, respectively. Permissions apply both to files and directories. For directories, the executable field will be 'False', and for files the searchable field will be 'False'. Note that directories may be searchable without being readable, if permission has been given to use them as part of a path, but not to examine the directory contents. Note that to change some, but not all permissions, a construct on the following lines must be used. > makeReadable f = do > p <- getPermissions f > setPermissions f (p {readable = True}) -} data Permissions = Permissions { readable, writable, executable, searchable :: Bool } deriving (Eq, Ord, Read, Show) {- |The 'getPermissions' operation returns the permissions for the file or directory. The operation may fail with: * 'isPermissionError' if the user is not permitted to access the permissions; or * 'isDoesNotExistError' if the file or directory does not exist. -} getPermissions :: FilePath -> IO Permissions getPermissions name = do withFilePath name $ \s -> do -- stat() does a better job of guessing the permissions on Windows -- than access() does. e.g. for execute permission, it looks at the -- filename extension :-) -- -- I tried for a while to do this properly, using the Windows security API, -- and eventually gave up. getPermissions is a flawed API anyway. -- SimonM allocaBytes sizeof_stat $ \ p_stat -> do throwErrnoIfMinus1_ "getPermissions" $ c_stat s p_stat mode <- st_mode p_stat let usr_read = mode .&. s_IRUSR let usr_write = mode .&. s_IWUSR let usr_exec = mode .&. s_IXUSR let is_dir = mode .&. s_IFDIR return ( Permissions { readable = usr_read /= 0, writable = usr_write /= 0, executable = is_dir == 0 && usr_exec /= 0, searchable = is_dir /= 0 && usr_exec /= 0 } ) {- |The 'setPermissions' operation sets the permissions for the file or directory. The operation may fail with: * 'isPermissionError' if the user is not permitted to set the permissions; or * 'isDoesNotExistError' if the file or directory does not exist. -} setPermissions :: FilePath -> Permissions -> IO () setPermissions name (Permissions r w e s) = do allocaBytes sizeof_stat $ \ p_stat -> do withFilePath name $ \p_name -> do throwErrnoIfMinus1_ "setPermissions" $ do c_stat p_name p_stat mode <- st_mode p_stat let mode1 = modifyBit r mode s_IRUSR let mode2 = modifyBit w mode1 s_IWUSR let mode3 = modifyBit (e || s) mode2 s_IXUSR c_wchmod p_name mode3 where modifyBit :: Bool -> CMode -> CMode -> CMode modifyBit False m b = m .&. (complement b) modifyBit True m b = m .|. b foreign import ccall unsafe "_wchmod" c_wchmod :: CWString -> CMode -> IO CInt copyPermissions :: FilePath -> FilePath -> IO () copyPermissions source dest = do allocaBytes sizeof_stat $ \ p_stat -> do withFilePath source $ \p_source -> do withFilePath dest $ \p_dest -> do throwErrnoIfMinus1_ "copyPermissions" $ c_stat p_source p_stat mode <- st_mode p_stat throwErrnoIfMinus1_ "copyPermissions" $ c_wchmod p_dest mode ----------------------------------------------------------------------------- -- Implementation {- |@'createDirectory' dir@ creates a new directory @dir@ which is initially empty, or as near to empty as the operating system allows. The operation may fail with: * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EROFS, EACCES]@ * 'isAlreadyExistsError' \/ 'AlreadyExists' The operand refers to a directory that already exists. @ [EEXIST]@ * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' The operand is not a valid directory name. @[ENAMETOOLONG, ELOOP]@ * 'NoSuchThing' There is no path to the directory. @[ENOENT, ENOTDIR]@ * 'ResourceExhausted' Insufficient resources (virtual memory, process file descriptors, physical disk space, etc.) are available to perform the operation. @[EDQUOT, ENOSPC, ENOMEM, EMLINK]@ * 'InappropriateType' The path refers to an existing non-directory object. @[EEXIST]@ -} createDirectory :: FilePath -> IO () createDirectory path = do Win32.createDirectory path Nothing -- | @'createDirectoryIfMissing' parents dir@ creates a new directory -- @dir@ if it doesn\'t exist. If the first argument is 'True' -- the function will also create all parent directories if they are missing. createDirectoryIfMissing :: Bool -- ^ Create its parents too? -> FilePath -- ^ The path to the directory you want to make -> IO () createDirectoryIfMissing create_parents path0 | create_parents = createDirs (parents path0) | otherwise = createDirs (take 1 (parents path0)) where parents = reverse . scanl1 () . splitDirectories . normalise createDirs [] = return () createDirs (dir:[]) = createDir dir throw createDirs (dir:dirs) = createDir dir $ \_ -> do createDirs dirs createDir dir throw createDir :: FilePath -> (IOException -> IO ()) -> IO () createDir dir notExistHandler = do r <- try $ createDirectory dir case (r :: Either IOException ()) of Right () -> return () Left e | isDoesNotExistError e -> notExistHandler e -- createDirectory (and indeed POSIX mkdir) does not distinguish -- between a dir already existing and a file already existing. So we -- check for it here. Unfortunately there is a slight race condition -- here, but we think it is benign. It could report an exeption in -- the case that the dir did exist but another process deletes the -- directory and creates a file in its place before we can check -- that the directory did indeed exist. | isAlreadyExistsError e -> (do withFileStatus "createDirectoryIfMissing" dir $ \st -> do isDir <- isDirectory st if isDir then return () else throw e ) `catch` ((\_ -> return ()) :: IOException -> IO ()) | otherwise -> throw e {- | @'removeDirectory' dir@ removes an existing directory /dir/. The implementation may specify additional constraints which must be satisfied before a directory can be removed (e.g. the directory has to be empty, or may not be in use by other processes). It is not legal for an implementation to partially remove a directory unless the entire directory is removed. A conformant implementation need not support directory removal in all situations (e.g. removal of the root directory). The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. EIO * 'InvalidArgument' The operand is not a valid directory name. [ENAMETOOLONG, ELOOP] * 'isDoesNotExistError' \/ 'NoSuchThing' The directory does not exist. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EROFS, EACCES, EPERM]@ * 'UnsatisfiedConstraints' Implementation-dependent constraints are not satisfied. @[EBUSY, ENOTEMPTY, EEXIST]@ * 'UnsupportedOperation' The implementation does not support removal in this situation. @[EINVAL]@ * 'InappropriateType' The operand refers to an existing non-directory object. @[ENOTDIR]@ -} removeDirectory :: FilePath -> IO () removeDirectory path = Win32.removeDirectory path -- | @'removeDirectoryRecursive' dir@ removes an existing directory /dir/ -- together with its content and all subdirectories. Be careful, -- if the directory contains symlinks, the function will follow them. removeDirectoryRecursive :: FilePath -> IO () removeDirectoryRecursive startLoc = do cont <- getDirectoryContents startLoc sequence_ [rm (startLoc x) | x <- cont, x /= "." && x /= ".."] removeDirectory startLoc where rm :: FilePath -> IO () rm f = do temp <- try (removeFile f) case temp of Left e -> do isDir <- doesDirectoryExist f -- If f is not a directory, re-throw the error unless isDir $ throw (e :: SomeException) removeDirectoryRecursive f Right _ -> return () {- |'removeFile' /file/ removes the directory entry for an existing file /file/, where /file/ is not itself a directory. The implementation may specify additional constraints which must be satisfied before a file can be removed (e.g. the file may not be in use by other processes). The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' The operand is not a valid file name. @[ENAMETOOLONG, ELOOP]@ * 'isDoesNotExistError' \/ 'NoSuchThing' The file does not exist. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EROFS, EACCES, EPERM]@ * 'UnsatisfiedConstraints' Implementation-dependent constraints are not satisfied. @[EBUSY]@ * 'InappropriateType' The operand refers to an existing directory. @[EPERM, EINVAL]@ -} removeFile :: FilePath -> IO () removeFile path = Win32.deleteFile path {- |@'renameDirectory' old new@ changes the name of an existing directory from /old/ to /new/. If the /new/ directory already exists, it is atomically replaced by the /old/ directory. If the /new/ directory is neither the /old/ directory nor an alias of the /old/ directory, it is removed as if by 'removeDirectory'. A conformant implementation need not support renaming directories in all situations (e.g. renaming to an existing directory, or across different physical devices), but the constraints must be documented. On Win32 platforms, @renameDirectory@ fails if the /new/ directory already exists. The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' Either operand is not a valid directory name. @[ENAMETOOLONG, ELOOP]@ * 'isDoesNotExistError' \/ 'NoSuchThing' The original directory does not exist, or there is no path to the target. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EROFS, EACCES, EPERM]@ * 'ResourceExhausted' Insufficient resources are available to perform the operation. @[EDQUOT, ENOSPC, ENOMEM, EMLINK]@ * 'UnsatisfiedConstraints' Implementation-dependent constraints are not satisfied. @[EBUSY, ENOTEMPTY, EEXIST]@ * 'UnsupportedOperation' The implementation does not support renaming in this situation. @[EINVAL, EXDEV]@ * 'InappropriateType' Either path refers to an existing non-directory object. @[ENOTDIR, EISDIR]@ -} renameDirectory :: FilePath -> FilePath -> IO () renameDirectory opath npath = do -- XXX this test isn't performed atomically with the following rename -- ToDo: use Win32 API withFileStatus "renameDirectory" opath $ \st -> do is_dir <- isDirectory st if (not is_dir) then ioException (ioeSetErrorString (mkIOError InappropriateType "renameDirectory" Nothing (Just opath)) "not a directory") else do Win32.moveFileEx opath npath Win32.mOVEFILE_REPLACE_EXISTING {- |@'renameFile' old new@ changes the name of an existing file system object from /old/ to /new/. If the /new/ object already exists, it is atomically replaced by the /old/ object. Neither path may refer to an existing directory. A conformant implementation need not support renaming files in all situations (e.g. renaming across different physical devices), but the constraints must be documented. The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' Either operand is not a valid file name. @[ENAMETOOLONG, ELOOP]@ * 'isDoesNotExistError' \/ 'NoSuchThing' The original file does not exist, or there is no path to the target. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EROFS, EACCES, EPERM]@ * 'ResourceExhausted' Insufficient resources are available to perform the operation. @[EDQUOT, ENOSPC, ENOMEM, EMLINK]@ * 'UnsatisfiedConstraints' Implementation-dependent constraints are not satisfied. @[EBUSY]@ * 'UnsupportedOperation' The implementation does not support renaming in this situation. @[EXDEV]@ * 'InappropriateType' Either path refers to an existing directory. @[ENOTDIR, EISDIR, EINVAL, EEXIST, ENOTEMPTY]@ -} renameFile :: FilePath -> FilePath -> IO () renameFile opath npath = do -- XXX this test isn't performed atomically with the following rename -- ToDo: use Win32 API withFileOrSymlinkStatus "renameFile" opath $ \st -> do is_dir <- isDirectory st if is_dir then ioException (ioeSetErrorString (mkIOError InappropriateType "renameFile" Nothing (Just opath)) "is a directory") else do Win32.moveFileEx opath npath Win32.mOVEFILE_REPLACE_EXISTING {- |@'copyFile' old new@ copies the existing file from /old/ to /new/. If the /new/ file already exists, it is atomically replaced by the /old/ file. Neither path may refer to an existing directory. The permissions of /old/ are copied to /new/, if possible. -} copyFile :: FilePath -> FilePath -> IO () copyFile fromFPath toFPath = copy `Prelude.catch` (\exc -> throw $ ioeSetLocation exc "copyFile") where copy = bracket (openBinaryFile fromFPath ReadMode) hClose $ \hFrom -> bracketOnError openTmp cleanTmp $ \(tmpFPath, hTmp) -> do allocaBytes bufferSize $ copyContents hFrom hTmp hClose hTmp ignoreIOExceptions $ copyPermissions fromFPath tmpFPath renameFile tmpFPath toFPath openTmp = openBinaryTempFile (takeDirectory toFPath) ".copyFile.tmp" cleanTmp (tmpFPath, hTmp) = do ignoreIOExceptions $ hClose hTmp ignoreIOExceptions $ removeFile tmpFPath bufferSize = 1024 copyContents hFrom hTo buffer = do count <- hGetBuf hFrom buffer bufferSize when (count > 0) $ do hPutBuf hTo buffer count copyContents hFrom hTo buffer ignoreIOExceptions io = io `catch` ioExceptionIgnorer ioExceptionIgnorer :: IOException -> IO () ioExceptionIgnorer _ = return () -- | Given path referring to a file or directory, returns a -- canonicalized path, with the intent that two paths referring -- to the same file\/directory will map to the same canonicalized -- path. Note that it is impossible to guarantee that the -- implication (same file\/dir \<=\> same canonicalizedPath) holds -- in either direction: this function can make only a best-effort -- attempt. canonicalizePath :: FilePath -> IO FilePath canonicalizePath fpath = do path <- Win32.getFullPathName fpath return (normalise path) -- normalise does more stuff, like upper-casing the drive letter -- | 'makeRelative' the current directory. makeRelativeToCurrentDirectory :: FilePath -> IO FilePath makeRelativeToCurrentDirectory x = do cur <- getCurrentDirectory return $ makeRelative cur x -- | Given an executable file name, searches for such file in the -- directories listed in system PATH. The returned value is the path -- to the found executable or Nothing if an executable with the given -- name was not found. For example (findExecutable \"ghc\") gives you -- the path to GHC. -- -- The path returned by 'findExecutable' corresponds to the -- program that would be executed by 'System.Process.createProcess' -- when passed the same string (as a RawCommand, not a ShellCommand). -- -- On Windows, 'findExecutable' calls the Win32 function 'SearchPath', -- which may search other places before checking the directories in -- @PATH@. Where it actually searches depends on registry settings, -- but notably includes the directory containing the current -- executable. See -- for more -- details. -- findExecutable :: String -> IO (Maybe FilePath) findExecutable binary = Win32.searchPath Nothing binary ('.':exeExtension) {- |@'getDirectoryContents' dir@ returns a list of /all/ entries in /dir/. The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' The operand is not a valid directory name. @[ENAMETOOLONG, ELOOP]@ * 'isDoesNotExistError' \/ 'NoSuchThing' The directory does not exist. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EACCES]@ * 'ResourceExhausted' Insufficient resources are available to perform the operation. @[EMFILE, ENFILE]@ * 'InappropriateType' The path refers to an existing non-directory object. @[ENOTDIR]@ -} getDirectoryContents :: FilePath -> IO [FilePath] getDirectoryContents path = modifyIOError ((`ioeSetFileName` path) . (`ioeSetLocation` "getDirectoryContents")) $ do bracket (Win32.findFirstFile (path "*")) (\(h,_) -> Win32.findClose h) (\(h,fdat) -> loop h fdat []) where -- we needn't worry about empty directories: adirectory always -- has at least "." and ".." entries loop :: Win32.HANDLE -> Win32.FindData -> [FilePath] -> IO [FilePath] loop h fdat acc = do filename <- Win32.getFindDataFileName fdat more <- Win32.findNextFile h fdat if more then loop h fdat (filename:acc) else return (filename:acc) -- no need to reverse, ordering is undefined {- |If the operating system has a notion of current directories, 'getCurrentDirectory' returns an absolute path to the current directory of the calling process. The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'isDoesNotExistError' \/ 'NoSuchThing' There is no path referring to the current directory. @[EPERM, ENOENT, ESTALE...]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EACCES]@ * 'ResourceExhausted' Insufficient resources are available to perform the operation. * 'UnsupportedOperation' The operating system has no notion of current directory. -} getCurrentDirectory :: IO FilePath getCurrentDirectory = do Win32.getCurrentDirectory {- |If the operating system has a notion of current directories, @'setCurrentDirectory' dir@ changes the current directory of the calling process to /dir/. The operation may fail with: * 'HardwareFault' A physical I\/O error has occurred. @[EIO]@ * 'InvalidArgument' The operand is not a valid directory name. @[ENAMETOOLONG, ELOOP]@ * 'isDoesNotExistError' \/ 'NoSuchThing' The directory does not exist. @[ENOENT, ENOTDIR]@ * 'isPermissionError' \/ 'PermissionDenied' The process has insufficient privileges to perform the operation. @[EACCES]@ * 'UnsupportedOperation' The operating system has no notion of current directory, or the current directory cannot be dynamically changed. * 'InappropriateType' The path refers to an existing non-directory object. @[ENOTDIR]@ -} setCurrentDirectory :: FilePath -> IO () setCurrentDirectory path = Win32.setCurrentDirectory path {- |The operation 'doesDirectoryExist' returns 'True' if the argument file exists and is a directory, and 'False' otherwise. -} doesDirectoryExist :: FilePath -> IO Bool doesDirectoryExist name = (withFileStatus "doesDirectoryExist" name $ \st -> isDirectory st) `catch` ((\ _ -> return False) :: IOException -> IO Bool) {- |The operation 'doesFileExist' returns 'True' if the argument file exists and is not a directory, and 'False' otherwise. -} doesFileExist :: FilePath -> IO Bool doesFileExist name = (withFileStatus "doesFileExist" name $ \st -> do b <- isDirectory st; return (not b)) `catch` ((\ _ -> return False) :: IOException -> IO Bool) {- |The 'getModificationTime' operation returns the clock time at which the file or directory was last modified. The operation may fail with: * 'isPermissionError' if the user is not permitted to access the modification time; or * 'isDoesNotExistError' if the file or directory does not exist. -} getModificationTime :: FilePath -> IO ClockTime getModificationTime name = do -- ToDo: use Win32 API withFileStatus "getModificationTime" name $ \ st -> do modificationTime st withFileStatus :: String -> FilePath -> (Ptr CStat -> IO a) -> IO a withFileStatus loc name f = do modifyIOError (`ioeSetFileName` name) $ allocaBytes sizeof_stat $ \p -> withFilePath (fileNameEndClean name) $ \s -> do throwErrnoIfMinus1Retry_ loc (c_stat s p) withFileOrSymlinkStatus :: String -> FilePath -> (Ptr CStat -> IO a) -> IO a withFileOrSymlinkStatus loc name f = do modifyIOError (`ioeSetFileName` name) $ allocaBytes sizeof_stat $ \p -> withFilePath name $ \s -> do throwErrnoIfMinus1Retry_ loc (lstat s p) modificationTime :: Ptr CStat -> IO ClockTime modificationTime stat = do mtime <- st_mtime stat let realToInteger = round . realToFrac :: Real a => a -> Integer return (TOD (realToInteger (mtime :: CTime)) 0) isDirectory :: Ptr CStat -> IO Bool isDirectory stat = do mode <- st_mode stat return (s_isdir mode) fileNameEndClean :: String -> String fileNameEndClean name = if isDrive name then addTrailingPathSeparator name else dropTrailingPathSeparator name foreign import ccall unsafe "HsDirectory.h __hscore_S_IRUSR" s_IRUSR :: CMode foreign import ccall unsafe "HsDirectory.h __hscore_S_IWUSR" s_IWUSR :: CMode foreign import ccall unsafe "HsDirectory.h __hscore_S_IXUSR" s_IXUSR :: CMode foreign import ccall unsafe "__hscore_S_IFDIR" s_IFDIR :: CMode foreign import ccall unsafe "__hscore_long_path_size" long_path_size :: Int {- | Returns the current user's home directory. The directory returned is expected to be writable by the current user, but note that it isn't generally considered good practice to store application-specific data here; use 'getAppUserDataDirectory' instead. On Unix, 'getHomeDirectory' returns the value of the @HOME@ environment variable. On Windows, the system is queried for a suitable path; a typical path might be @C:/Documents And Settings/user@. The operation may fail with: * 'UnsupportedOperation' The operating system has no notion of home directory. * 'isDoesNotExistError' The home directory for the current user does not exist, or cannot be found. -} getHomeDirectory :: IO FilePath getHomeDirectory = modifyIOError ((`ioeSetLocation` "getHomeDirectory")) $ do r <- try $ Win32.sHGetFolderPath nullPtr Win32.cSIDL_PROFILE nullPtr 0 case (r :: Either IOException String) of Right s -> return s Left _ -> do r1 <- try $ Win32.sHGetFolderPath nullPtr Win32.cSIDL_WINDOWS nullPtr 0 case r1 of Right s -> return s Left e -> ioError (e :: IOException) {- | Returns the pathname of a directory in which application-specific data for the current user can be stored. The result of 'getAppUserDataDirectory' for a given application is specific to the current user. The argument should be the name of the application, which will be used to construct the pathname (so avoid using unusual characters that might result in an invalid pathname). Note: the directory may not actually exist, and may need to be created first. It is expected that the parent directory exists and is writable. On Unix, this function returns @$HOME\/.appName@. On Windows, a typical path might be > C:/Documents And Settings/user/Application Data/appName The operation may fail with: * 'UnsupportedOperation' The operating system has no notion of application-specific data directory. * 'isDoesNotExistError' The home directory for the current user does not exist, or cannot be found. -} getAppUserDataDirectory :: String -> IO FilePath getAppUserDataDirectory appName = do modifyIOError ((`ioeSetLocation` "getAppUserDataDirectory")) $ do s <- Win32.sHGetFolderPath nullPtr Win32.cSIDL_APPDATA nullPtr 0 return (s++'\\':appName) {- | Returns the current user's document directory. The directory returned is expected to be writable by the current user, but note that it isn't generally considered good practice to store application-specific data here; use 'getAppUserDataDirectory' instead. On Unix, 'getUserDocumentsDirectory' returns the value of the @HOME@ environment variable. On Windows, the system is queried for a suitable path; a typical path might be @C:\/Documents and Settings\/user\/My Documents@. The operation may fail with: * 'UnsupportedOperation' The operating system has no notion of document directory. * 'isDoesNotExistError' The document directory for the current user does not exist, or cannot be found. -} getUserDocumentsDirectory :: IO FilePath getUserDocumentsDirectory = do modifyIOError ((`ioeSetLocation` "getUserDocumentsDirectory")) $ do Win32.sHGetFolderPath nullPtr Win32.cSIDL_PERSONAL nullPtr 0 {- | Returns the current directory for temporary files. On Unix, 'getTemporaryDirectory' returns the value of the @TMPDIR@ environment variable or \"\/tmp\" if the variable isn\'t defined. On Windows, the function checks for the existence of environment variables in the following order and uses the first path found: * TMP environment variable. * TEMP environment variable. * USERPROFILE environment variable. * The Windows directory The operation may fail with: * 'UnsupportedOperation' The operating system has no notion of temporary directory. The function doesn\'t verify whether the path exists. -} getTemporaryDirectory :: IO FilePath getTemporaryDirectory = do Win32.getTemporaryDirectory -- ToDo: This should be determined via autoconf (AC_EXEEXT) -- | Extension for executable files -- (typically @\"\"@ on Unix and @\"exe\"@ on Windows or OS\/2) exeExtension :: String exeExtension = "exe" haskell-src-exts-1.23.1/tests/examples/ForeignImport.hs0000644000000000000000000000035313534314633021263 0ustar0000000000000000{- If compiled without ForeignFunctionInterface (part of Haskell2010), it complains not about FFI but about missing TemplateHaskell -} foreign import ccall unsafe "getProgArgv" getProgArgv :: Ptr CInt -> Ptr (Ptr CString) -> IO () haskell-src-exts-1.23.1/tests/examples/PrimitiveIntHexLiteral.hs0000644000000000000000000000007513534314633023105 0ustar0000000000000000{-# LANGUAGE MagicHash #-} minInt = I# (0x8000000000000000#) haskell-src-exts-1.23.1/tests/examples/BlockArguments.hs0000644000000000000000000000052613603723515021421 0ustar0000000000000000{-# LANGUAGE BlockArguments #-} module BlockArguments where foo = when (x > 0) do print x exitFailure bar = withForeignPtr fptr \ptr -> c_memcpy buf ptr size baz arg1 arg2 arg3 arg4 = initialValue & someFunction arg1 arg2 >>= traverse \(x, y) -> do a <- f x b <- g y h a b >>= anotherFunction arg3 arg4 haskell-src-exts-1.23.1/tests/examples/ClassDeclSrcSpan.hs0000644000000000000000000000011113534314632021615 0ustar0000000000000000 class C1 a where toString :: a -> String t1 :: String t1 = "Hello" haskell-src-exts-1.23.1/tests/examples/WhereBlock.hs0000644000000000000000000000011313534314633020516 0ustar0000000000000000hash ptr len = f len where f h = return h f p = (p `advancePtr` 1) haskell-src-exts-1.23.1/tests/examples/TypeListCons.hs0000644000000000000000000000023613534314633021077 0ustar0000000000000000{-# LANGUAGE DataKinds, TypeOperators #-} module TypeListCons where type List1 a = a ': '[] type List2 a b = a ': '[] type List3 a b c = a ': b ': c ': '[] haskell-src-exts-1.23.1/tests/examples/UnboxedTuples.hs0000644000000000000000000000017513534314633021302 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} foo :: (a, b) -> (# b , a #) foo (a, b) = case (# b, a #) of (# b, a #) -> (# , #) b a haskell-src-exts-1.23.1/tests/examples/TypeOperatorAsVariable.hs0000644000000000000000000000010013534314633023054 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} type T (~>) = () type Foo = () haskell-src-exts-1.23.1/tests/examples/QQType.hs0000644000000000000000000000025513534314633017663 0ustar0000000000000000{-# LANGUAGE FlexibleInstances, TemplateHaskell, QuasiQuotes #-} module QQType where import Language.Haskell.TH x :: DecsQ x = [d| instance Show $(conT (mkName "Int")) |] haskell-src-exts-1.23.1/tests/examples/Fixity2.hs0000644000000000000000000000011713534314633020033 0ustar0000000000000000foo = pure 1 <^> pure 2 <^> pure (+) where (<^>) = flip (<*>) infixr 4 <^> haskell-src-exts-1.23.1/tests/examples/IndentedModule1.hs0000644000000000000000000000010713534314633021455 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} module Main where main = putStr "foo" haskell-src-exts-1.23.1/tests/examples/BracketInstanceHead.hs0000644000000000000000000000005213534314632022314 0ustar0000000000000000instance (Bounded a => Bounded [a]) where haskell-src-exts-1.23.1/tests/examples/TySplice.hs0000644000000000000000000000010613534314633020227 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} [| f :: $ty |] [| f :: $(fun ty) |] haskell-src-exts-1.23.1/tests/examples/FFIExtensions.hs0000644000000000000000000000034113534314633021160 0ustar0000000000000000{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI, CApiFFI #-} module FFIExtensions where foreign import ccall interruptible "sleep" sleep :: CUint -> IO CUint foreign import capi "header.h f" f :: CInt -> IO CInt haskell-src-exts-1.23.1/tests/examples/InlineConlike.hs0000644000000000000000000000006213534314633021217 0ustar0000000000000000{-# INLINE CONLIKE size #-} size :: Int size = 64 haskell-src-exts-1.23.1/tests/examples/RecordPatternSynonyms.hs0000644000000000000000000000042213534314633023030 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module ShouldCompile where pattern Single{x} = [x] pattern Double{y,z} = (y,z) pattern More{x} <- (x,_) where More x = (x, Nothing) -- Selector selector :: Int selector = x [5] update :: [String] update = ["String"] { x = "updated" } haskell-src-exts-1.23.1/tests/examples/THTypedSplices.hs0000644000000000000000000000017213546001445021337 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} import Language.Haskell.TH import THTypedSplices.Defs main = $$justTH ($$([e|| 2 ||])) haskell-src-exts-1.23.1/tests/examples/Overlapable.hs0000644000000000000000000000014013534314633020725 0ustar0000000000000000instance {-# OVERLAP #-} C a instance {-# NO_OVERLAP #-} C a instance {-# INCOHERENT #-} C a haskell-src-exts-1.23.1/tests/examples/GADTRecord2.hs0000644000000000000000000000011013534314633020426 0ustar0000000000000000{-# LANGUAGE GADTs #-} data T where T :: () => { field :: Int } -> T haskell-src-exts-1.23.1/tests/examples/ByteStringUtils.hs0000644000000000000000000004715013534314632021617 0ustar0000000000000000{-# LANGUAGE BangPatterns, ForeignFunctionInterface, CPP #-} ----------------------------------------------------------------------------- -- | -- Module : ByteStringUtils -- Copyright : (c) The University of Glasgow 2001, -- David Roundy 2003-2005 -- License : GPL (I'm happy to also license this file BSD style but don't -- want to bother distributing two license files with darcs. -- -- Maintainer : droundy@abridgegame.org -- Stability : experimental -- Portability : portable -- -- GZIp and MMap IO for ByteStrings, and miscellaneous functions for Data.ByteString -- module ByteStringUtils ( unsafeWithInternals, unpackPSfromUTF8, -- IO with mmap or gzip gzReadFilePS, mmapFilePS, gzWriteFilePS, gzWriteFilePSs, -- list utilities ifHeadThenTail, dropSpace, breakSpace, linesPS, unlinesPS, hashPS, breakFirstPS, breakLastPS, substrPS, readIntPS, is_funky, fromHex2PS, fromPS2Hex, betweenLinesPS, break_after_nth_newline, break_before_nth_newline, intercalate ) where import Prelude hiding ( catch ) import qualified Data.ByteString as B import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Internal as BI import Data.ByteString (intercalate, uncons) import Data.ByteString.Internal (fromForeignPtr) -- #if defined (HAVE_MMAP) || ! defined (HAVE_HASKELL_ZLIB) import Control.Exception ( catch ) -- #endif import System.IO import System.IO.Unsafe ( unsafePerformIO ) import Foreign.Storable ( peekElemOff, peek ) import Foreign.Marshal.Alloc ( free ) import Foreign.Marshal.Array ( mallocArray, peekArray, advancePtr ) import Foreign.C.Types ( CInt ) import Data.Bits ( rotateL ) import Data.Char ( chr, ord, isSpace ) import Data.Word ( Word8 ) import Data.Int ( Int32 ) import Control.Monad ( when ) -- #ifndef HAVE_HASKELL_ZLIB import Foreign.Ptr ( nullPtr ) import Foreign.ForeignPtr ( ForeignPtr ) -- #endif import Foreign.Ptr ( plusPtr, Ptr ) import Foreign.ForeignPtr ( withForeignPtr ) -- #ifdef DEBUG_PS import Foreign.ForeignPtr ( addForeignPtrFinalizer ) import Foreign.Ptr ( FunPtr ) -- #endif -- #if HAVE_HASKELL_ZLIB import qualified Data.ByteString.Lazy as BL import qualified Codec.Compression.GZip as GZ -- #else import Foreign.C.String ( CString, withCString ) -- #endif -- #ifdef HAVE_MMAP import System.IO.MMap( mmapFileByteString ) import System.Mem( performGC ) import System.Posix.Files( fileSize, getSymbolicLinkStatus ) -- #endif -- ----------------------------------------------------------------------------- -- obsolete debugging code -- # ifndef HAVE_HASKELL_ZLIB debugForeignPtr :: ForeignPtr a -> String -> IO () -- #ifdef DEBUG_PS foreign import ccall unsafe "static fpstring.h debug_alloc" debug_alloc :: Ptr a -> CString -> IO () foreign import ccall unsafe "static fpstring.h & debug_free" debug_free :: FunPtr (Ptr a -> IO ()) debugForeignPtr fp n = withCString n $ \cname-> withForeignPtr fp $ \p-> do debug_alloc p cname addForeignPtrFinalizer debug_free fp -- #else debugForeignPtr _ _ = return () -- #endif -- #endif -- ----------------------------------------------------------------------------- -- unsafeWithInternals -- | Do something with the internals of a PackedString. Beware of -- altering the contents! unsafeWithInternals :: B.ByteString -> (Ptr Word8 -> Int -> IO a) -> IO a unsafeWithInternals ps f = case BI.toForeignPtr ps of (fp,s,l) -> withForeignPtr fp $ \p -> f (p `plusPtr` s) l -- | readIntPS skips any whitespace at the beginning of its argument, and -- reads an Int from the beginning of the PackedString. If there is no -- integer at the beginning of the string, it returns Nothing, otherwise it -- just returns the int read, along with a B.ByteString containing the -- remainder of its input. readIntPS :: B.ByteString -> Maybe (Int, B.ByteString) readIntPS = BC.readInt . BC.dropWhile isSpace -- ----------------------------------------------------------------------------- -- Destructor functions (taking PackedStrings apart) unpackPSfromUTF8 :: B.ByteString -> String unpackPSfromUTF8 ps = case BI.toForeignPtr ps of (_,_, 0) -> "" (x,s,l) -> unsafePerformIO $ withForeignPtr x $ \p-> do outbuf <- mallocArray l lout <- fromIntegral `fmap` utf8_to_ints outbuf (p `plusPtr` s) (fromIntegral l) when (lout < 0) $ error "Bad UTF8!" str <- (map (chr . fromIntegral)) `fmap` peekArray lout outbuf free outbuf return str foreign import ccall unsafe "static fpstring.h utf8_to_ints" utf8_to_ints :: Ptr Int -> Ptr Word8 -> CInt -> IO CInt -- ----------------------------------------------------------------------------- -- List-mimicking functions for PackedStrings {-# INLINE ifHeadThenTail #-} ifHeadThenTail :: Word8 -> B.ByteString -> Maybe B.ByteString ifHeadThenTail c s = case uncons s of Just (w, t) | w == c -> Just t _ -> Nothing ------------------------------------------------------------------------ -- A reimplementation of Data.ByteString.Char8.dropSpace, but -- specialised to darcs' need for a 4 way isspace. -- -- TODO: if it is safe to use the expanded definition of isSpaceWord8 -- provided by Data.ByteString.Char8, then all this can go. -- A locale-independent isspace(3) so patches are interpreted the same everywhere. -- ((c) == ' ' || (c) == '\t' || (c) == '\n' || (c) == '\r') isSpaceWord8 :: Word8 -> Bool isSpaceWord8 w = w == 0x20 || -- ' ' w == 0x09 || -- '\t' w == 0x0A || -- '\n' w == 0x0D -- '\r' {-# INLINE isSpaceWord8 #-} firstnonspace :: Ptr Word8 -> Int -> Int -> IO Int firstnonspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if isSpaceWord8 w then firstnonspace ptr (n+1) m else return n firstspace :: Ptr Word8 -> Int -> Int -> IO Int firstspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if (not . isSpaceWord8) w then firstspace ptr (n+1) m else return n -- | 'dropSpace' efficiently returns the 'ByteString' argument with -- white space Chars removed from the front. It is more efficient than -- calling dropWhile for removing whitespace. I.e. -- -- > dropWhile isSpace == dropSpace -- dropSpace :: B.ByteString -> B.ByteString dropSpace (BI.PS x s l) = BI.inlinePerformIO $ withForeignPtr x $ \p -> do i <- firstnonspace (p `plusPtr` s) 0 l return $! if i == l then B.empty else BI.PS x (s+i) (l-i) {-# INLINE dropSpace #-} -- | 'breakSpace' returns the pair of ByteStrings when the argument is -- broken at the first whitespace byte. I.e. -- -- > break isSpace == breakSpace -- breakSpace :: B.ByteString -> (B.ByteString,B.ByteString) breakSpace (BI.PS x s l) = BI.inlinePerformIO $ withForeignPtr x $ \p -> do i <- firstspace (p `plusPtr` s) 0 l return $! case () of {_ | i == 0 -> (B.empty, BI.PS x s l) | i == l -> (BI.PS x s l, B.empty) | otherwise -> (BI.PS x s i, BI.PS x (s+i) (l-i)) } {-# INLINE breakSpace #-} ------------------------------------------------------------------------ {-# INLINE is_funky #-} is_funky :: B.ByteString -> Bool is_funky ps = case BI.toForeignPtr ps of (x,s,l) -> unsafePerformIO $ withForeignPtr x $ \p-> (/=0) `fmap` has_funky_char (p `plusPtr` s) (fromIntegral l) foreign import ccall unsafe "fpstring.h has_funky_char" has_funky_char :: Ptr Word8 -> CInt -> IO CInt ------------------------------------------------------------------------ -- ByteString rewrites break (=='x') to breakByte 'x' -- break ((==) x) = breakChar x -- break (==x) = breakChar x -- {- {-# INLINE breakOnPS #-} breakOnPS :: Char -> B.ByteString -> (B.ByteString, B.ByteString) breakOnPS c p = case BC.elemIndex c p of Nothing -> (p, BC.empty) Just n -> (B.take n p, B.drop n p) -} {-# INLINE hashPS #-} hashPS :: B.ByteString -> Int32 hashPS ps = case BI.toForeignPtr ps of (x,s,l) -> unsafePerformIO $ withForeignPtr x $ \p-> do hash (p `plusPtr` s) l hash :: Ptr Word8 -> Int -> IO Int32 hash ptr len = f (0 :: Int32) ptr len where f h _ 0 = return h f h p n = do x <- peek p let !h' = (fromIntegral x) + (rotateL h 8) f h' (p `advancePtr` 1) (n-1) {-# INLINE substrPS #-} substrPS :: B.ByteString -> B.ByteString -> Maybe Int substrPS tok str | B.null tok = Just 0 | B.length tok > B.length str = Nothing | otherwise = do n <- BC.elemIndex (BC.head tok) str let ttok = B.tail tok reststr = B.drop (n+1) str if ttok == B.take (B.length ttok) reststr then Just n else ((n+1)+) `fmap` substrPS tok reststr ------------------------------------------------------------------------ -- TODO: replace breakFirstPS and breakLastPS with definitions based on -- ByteString's break/breakEnd {-# INLINE breakFirstPS #-} breakFirstPS :: Char -> B.ByteString -> Maybe (B.ByteString,B.ByteString) breakFirstPS c p = case BC.elemIndex c p of Nothing -> Nothing Just n -> Just (B.take n p, B.drop (n+1) p) {-# INLINE breakLastPS #-} breakLastPS :: Char -> B.ByteString -> Maybe (B.ByteString,B.ByteString) breakLastPS c p = case BC.elemIndexEnd c p of Nothing -> Nothing Just n -> Just (B.take n p, B.drop (n+1) p) -- TODO: rename {-# INLINE linesPS #-} linesPS :: B.ByteString -> [B.ByteString] linesPS ps | B.null ps = [B.empty] | otherwise = BC.split '\n' ps {- QuickCheck property: import Test.QuickCheck import qualified Data.ByteString.Char8 as BC import Data.Char instance Arbitrary BC.ByteString where arbitrary = fmap BC.pack arbitrary instance Arbitrary Char where arbitrary = chr `fmap` choose (32,127) deepCheck = check (defaultConfig { configMaxTest = 10000}) testLines = deepCheck (\x -> (linesPS x == linesPSOld x)) linesPSOld ps = case BC.elemIndex '\n' ps of Nothing -> [ps] Just n -> B.take n ps : linesPS (B.drop (n+1) ps) -} {-| This function acts exactly like the "Prelude" unlines function, or like "Data.ByteString.Char8" 'unlines', but with one important difference: it will produce a string which may not end with a newline! That is: > unlinesPS ["foo", "bar"] evaluates to \"foo\\nbar\", not \"foo\\nbar\\n\"! This point should hold true for 'linesPS' as well. TODO: rename this function. -} unlinesPS :: [B.ByteString] -> B.ByteString unlinesPS [] = BC.empty unlinesPS x = BC.init $ BC.unlines x {-# INLINE unlinesPS #-} {- QuickCheck property: testUnlines = deepCheck (\x -> (unlinesPS x == unlinesPSOld x)) unlinesPSOld ss = BC.concat $ intersperse_newlines ss where intersperse_newlines (a:b:s) = a : newline : intersperse_newlines (b:s) intersperse_newlines s = s newline = BC.pack "\n" -} -- ----------------------------------------------------------------------------- -- gzReadFilePS -- | Read an entire file, which may or may not be gzip compressed, directly -- into a 'B.ByteString'. -- #ifndef HAVE_HASKELL_ZLIB foreign import ccall unsafe "static zlib.h gzopen" c_gzopen :: CString -> CString -> IO (Ptr ()) foreign import ccall unsafe "static zlib.h gzclose" c_gzclose :: Ptr () -> IO () foreign import ccall unsafe "static zlib.h gzread" c_gzread :: Ptr () -> Ptr Word8 -> CInt -> IO CInt foreign import ccall unsafe "static zlib.h gzwrite" c_gzwrite :: Ptr () -> Ptr Word8 -> CInt -> IO CInt -- #endif gzReadFilePS :: FilePath -> IO B.ByteString gzReadFilePS f = do h <- openBinaryFile f ReadMode header <- B.hGet h 2 if header /= BC.pack "\31\139" then do hClose h mmapFilePS f else do hSeek h SeekFromEnd (-4) len <- hGetLittleEndInt h hClose h -- #ifdef HAVE_HASKELL_ZLIB -- Passing the length to GZ.decompressWith means -- that BL.toChunks only produces one chunk, which in turn -- means that B.concat won't need to copy data. -- If the length is wrong this will just affect efficiency, not correctness let decompress = GZ.decompressWith GZ.defaultDecompressParams { GZ.decompressBufferSize = len } fmap (B.concat . BL.toChunks . decompress) $ -- #ifdef HAVE_OLD_BYTESTRING -- bytestring < 0.9.1 had a bug where it did not know to close handles upon EOF -- performance would be better with a newer bytestring and lazy -- readFile below -- ratify readFile: comment fmap (BL.fromChunks . (:[])) $ B.readFile f -- ratify readFile: immediately consumed -- #else BL.readFile f -- ratify readFile: immediately consumed by the conversion to a strict bytestring -- #endif -- #else withCString f $ \fstr-> withCString "rb" $ \rb-> do gzf <- c_gzopen fstr rb when (gzf == nullPtr) $ fail $ "problem opening file "++f fp <- BI.mallocByteString len debugForeignPtr fp $ "gzReadFilePS "++f lread <- withForeignPtr fp $ \p -> c_gzread gzf p (fromIntegral len) c_gzclose gzf when (fromIntegral lread /= len) $ fail $ "problem gzreading file "++f return $ fromForeignPtr fp 0 len -- #endif hGetLittleEndInt :: Handle -> IO Int hGetLittleEndInt h = do b1 <- ord `fmap` hGetChar h b2 <- ord `fmap` hGetChar h b3 <- ord `fmap` hGetChar h b4 <- ord `fmap` hGetChar h return $ b1 + 256*b2 + 65536*b3 + 16777216*b4 gzWriteFilePS :: FilePath -> B.ByteString -> IO () gzWriteFilePS f ps = gzWriteFilePSs f [ps] gzWriteFilePSs :: FilePath -> [B.ByteString] -> IO () gzWriteFilePSs f pss = -- #ifdef HAVE_HASKELL_ZLIB BL.writeFile f $ GZ.compress $ BL.fromChunks pss -- #else withCString f $ \fstr -> withCString "wb" $ \wb -> do gzf <- c_gzopen fstr wb when (gzf == nullPtr) $ fail $ "problem gzopening file for write: "++f mapM_ (gzWriteToGzf gzf) pss `catch` \_ -> fail $ "problem gzwriting file: "++f c_gzclose gzf gzWriteToGzf :: Ptr () -> B.ByteString -> IO () gzWriteToGzf gzf ps = case BI.toForeignPtr ps of (_,_,0) -> return () -- avoid calling gzwrite with 0 length this would -- trouble on some versions of zlib, and is always -- unnecessary. (x,s,l) -> do lw <- withForeignPtr x $ \p -> c_gzwrite gzf (p `plusPtr` s) (fromIntegral l) when (fromIntegral lw /= l) $ fail $ "problem in gzWriteToGzf" -- #endif -- ----------------------------------------------------------------------------- -- mmapFilePS -- | Like readFilePS, this reads an entire file directly into a -- 'B.ByteString', but it is even more efficient. It involves directly -- mapping the file to memory. This has the advantage that the contents of -- the file never need to be copied. Also, under memory pressure the page -- may simply be discarded, wile in the case of readFilePS it would need to -- be written to swap. If you read many small files, mmapFilePS will be -- less memory-efficient than readFilePS, since each mmapFilePS takes up a -- separate page of memory. Also, you can run into bus errors if the file -- is modified. NOTE: as with 'readFilePS', the string representation in -- the file is assumed to be ISO-8859-1. mmapFilePS :: FilePath -> IO B.ByteString -- #ifdef HAVE_MMAP mmapFilePS f = do x <- mmapFileByteString f Nothing `catch` (\_ -> do size <- fileSize `fmap` getSymbolicLinkStatus f if size == 0 then return B.empty else performGC >> mmapFileByteString f Nothing) return x -- #else mmapFilePS = B.readFile -- #endif -- ------------------------------------------------------------------------- -- fromPS2Hex foreign import ccall unsafe "static fpstring.h conv_to_hex" conv_to_hex :: Ptr Word8 -> Ptr Word8 -> CInt -> IO () fromPS2Hex :: B.ByteString -> B.ByteString fromPS2Hex ps = case BI.toForeignPtr ps of (x,s,l) -> BI.unsafeCreate (2*l) $ \p -> withForeignPtr x $ \f -> conv_to_hex p (f `plusPtr` s) $ fromIntegral l -- ------------------------------------------------------------------------- -- fromHex2PS foreign import ccall unsafe "static fpstring.h conv_from_hex" conv_from_hex :: Ptr Word8 -> Ptr Word8 -> CInt -> IO () fromHex2PS :: B.ByteString -> B.ByteString fromHex2PS ps = case BI.toForeignPtr ps of (x,s,l) -> BI.unsafeCreate (l `div` 2) $ \p -> withForeignPtr x $ \f -> conv_from_hex p (f `plusPtr` s) (fromIntegral $ l `div` 2) -- ------------------------------------------------------------------------- -- betweenLinesPS -- | betweenLinesPS returns the B.ByteString between the two lines given, -- or Nothing if they do not appear. betweenLinesPS :: B.ByteString -> B.ByteString -> B.ByteString -> Maybe (B.ByteString) betweenLinesPS start end ps = case break (start ==) (linesPS ps) of (_, _:rest@(bs1:_)) -> case BI.toForeignPtr bs1 of (ps1,s1,_) -> case break (end ==) rest of (_, bs2:_) -> case BI.toForeignPtr bs2 of (_,s2,_) -> Just $ fromForeignPtr ps1 s1 (s2 - s1) _ -> Nothing _ -> Nothing -- ------------------------------------------------------------------------- -- break_after_nth_newline break_after_nth_newline :: Int -> B.ByteString -> Maybe (B.ByteString, B.ByteString) break_after_nth_newline 0 the_ps | B.null the_ps = Just (B.empty, B.empty) break_after_nth_newline n the_ps = case BI.toForeignPtr the_ps of (fp,the_s,l) -> unsafePerformIO $ withForeignPtr fp $ \p -> do let findit 0 s | s == end = return $ Just (the_ps, B.empty) findit _ s | s == end = return Nothing findit 0 s = let left_l = s - the_s in return $ Just (fromForeignPtr fp the_s left_l, fromForeignPtr fp s (l - left_l)) findit i s = do w <- peekElemOff p s if w == nl then findit (i-1) (s+1) else findit i (s+1) nl = BI.c2w '\n' end = the_s + l findit n the_s -- ------------------------------------------------------------------------- -- break_before_nth_newline break_before_nth_newline :: Int -> B.ByteString -> (B.ByteString, B.ByteString) break_before_nth_newline 0 the_ps | B.null the_ps = (B.empty, B.empty) break_before_nth_newline n the_ps = case BI.toForeignPtr the_ps of (fp,the_s,l) -> unsafePerformIO $ withForeignPtr fp $ \p -> do let findit _ s | s == end = return (the_ps, B.empty) findit i s = do w <- peekElemOff p s if w == nl then if i == 0 then let left_l = s - the_s in return (fromForeignPtr fp the_s left_l, fromForeignPtr fp s (l - left_l)) else findit (i-1) (s+1) else findit i (s+1) nl = BI.c2w '\n' end = the_s + l findit n the_s haskell-src-exts-1.23.1/tests/examples/EmptyInstance.hs0000644000000000000000000000006013534314633021255 0ustar0000000000000000instance Traversable Tree where x :: Int x = 1 haskell-src-exts-1.23.1/tests/examples/Bundles.hs0000644000000000000000000000015713534314632020074 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module Bundles(Foo(..), Baz(..,Q), Qux(F,..), Tux(Q,..,F)) where main = main haskell-src-exts-1.23.1/tests/examples/Lib.hs0000644000000000000000000000052213534314633017203 0ustar0000000000000000{-# LANGUAGE UnboxedSums, MagicHash #-} module Lib (flip, getInt) where import GHC.Exts import Prelude (Int) {-# NOINLINE flip #-} flip :: (# Int | Int# #) -> (# Int# | Int #) flip (# i | #) = (# | i #) flip (# | i #) = (# i | #) {-# NOINLINE getInt #-} getInt :: (# Int# | Int #) -> Int getInt (# i | #) = I# i getInt (# | i #) = i haskell-src-exts-1.23.1/tests/examples/TyQuasiQuote.hs0000644000000000000000000000012413534314633021110 0ustar0000000000000000{-# LANGUAGE QuasiQuotes, TemplateHaskell #-} f :: [qq| something in here |] f = () haskell-src-exts-1.23.1/tests/examples/Unicode.hs0000644000000000000000000000514413534314633020070 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where import System.Environment main :: IO () main = do as ↠getArgs print $ as print $ test 0 print $ test2 0 print $ testRewrite 0 print $ testRewriteReverse 0 print $ testRewrite2 0 print $ testRewriteReverse2 0 test :: a → Bool test x = pi where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 test2 :: a → (Bool,Bool) test2 x = (pf,pi) where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 testRewrite :: a → Bool testRewrite x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = lf > 300 pi = li > 300 testRewriteReverse :: a → Bool testRewriteReverse x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 300 ≤ lf pi = 300 ≤ li testRewrite2 :: a → (Bool,Bool) testRewrite2 x = (length i > 300,300 > length i) where -- f = replicate 2000 x i = repeat x -- lf = length f -- li = length i -- pf = lf > 300 -- pi = li > 300 testRewriteReverse2 :: a → (Bool,Bool) testRewriteReverse2 x = (2000 < length i,length i > 20) where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 2000 == lf pi = lf ≥ li lengthOP :: (Num a, Ord a) ⇒ Bool → (a → a → Bool) → [b] → a → Bool lengthOP v (⊜) [] n = 0 ⊜ n lengthOP v (⊜) xxs n = co xxs 0 where co (_:xs) c | n > c = co xs (c+1) | otherwise = v co [] c = c ⊜ n (≣) = (==) (≤) = (<=) (≥) = (>=) (|≣) = lengthOP False (≣) (|<) = lengthOP False (<) (|≤) = lengthOP False (≤) (|>) = lengthOP True (>) (|≥) = lengthOP True (≥) (|=) = lengthOP False (==) (|==) = lengthOP False (==) (|<=) = lengthOP False (<=) (|>=) = lengthOP False (>=) -- ≣≤≥ (≣|) = flip (|≣) (<|) = flip (|≥) (≤|) = flip (|>) (>|) = flip (|≤) (≥|) = flip (|<) {-# RULES -- length "xs |≣ n" forall xs n. (length xs) == n = xs |≣ n "xs |< n" forall xs n. (length xs) < n = xs |< n "xs |≤ n" forall xs n. (length xs) <= n = xs |≤ n "xs |> n" forall xs n. (length xs) > n = xs |> n "xs |≥ n" forall xs n. (length xs) >= n = xs |≥ n "n ≣| xs" forall xs n. n == (length xs) = xs |≣ n "n <| xs" forall xs n. n < (length xs) = xs |≥ n "n ≤| xs" forall xs n. n <= (length xs) = xs |> n "n >| xs" forall xs n. n > (length xs) = xs |≤ n "n ≥| xs" forall xs n. n >= (length xs) = xs |< n #-} haskell-src-exts-1.23.1/tests/examples/ForallInInstance.hs0000644000000000000000000000016613534314633021674 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} module ForallInInstance where instance forall a. MyClass a => MyClass [a] where haskell-src-exts-1.23.1/tests/examples/FFIInterruptible.hs0000644000000000000000000000006713534314633021656 0ustar0000000000000000{-# LANGUAGE InterruptibleFFI #-} foo = interruptible haskell-src-exts-1.23.1/tests/examples/RecordWildcard.hs0000644000000000000000000000011413534314633021362 0ustar0000000000000000{-# LANGUAGE RecordWildCards #-} -- Should fail. f A { .., b = v, .. } = v haskell-src-exts-1.23.1/tests/examples/NestedAsPat.hs0000644000000000000000000000007713534314633020655 0ustar0000000000000000module NestedAsPat where nestedAsPat [x@(Just _)] = undefined haskell-src-exts-1.23.1/tests/examples/PatternSynonymSignatures.hs0000644000000000000000000000034513534314633023557 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern Syn :: Typ pattern Syn :: () => () => Typ pattern Syn :: Show a => Show b => Typ pattern Syn :: Show b => Typ pattern Syn :: Show b => () => Typ pattern Syn :: () => Show b => Typ haskell-src-exts-1.23.1/tests/examples/LineOptionsPragma.hs0000644000000000000000000000012213534314633022064 0ustar0000000000000000{-# OPTIONS #-} {-# LINE 49 "src/Language/C/Parser/Lexer.x" #-} module Fail where haskell-src-exts-1.23.1/tests/examples/UnboxedSingleton.hs0000644000000000000000000000012013534314633021756 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} -- See e.g. GHC.Prim.indexArray# foo a = (# a #) haskell-src-exts-1.23.1/tests/examples/DefaultSignatures.hs0000644000000000000000000000021013534314632022117 0ustar0000000000000000{-# LANGUAGE DefaultSignatures #-} class C a where f :: a -> a -> Bool default f :: (Eq a) => a -> a -> Bool f x y = x == y haskell-src-exts-1.23.1/tests/examples/InfixParser.hs0000644000000000000000000000021013534314633020721 0ustar0000000000000000module InfixParser where type Parse a b = [a] -> [(b, [a])] (<|>) :: Parse a b -> Parse a b -> Parse a b (p1 <|> p2) i = p1 i ++ p2 i haskell-src-exts-1.23.1/tests/examples/TypeErrorMessage.hs0000644000000000000000000000004113534314633021731 0ustar0000000000000000newtype PoC = PoC (forall b . b) haskell-src-exts-1.23.1/tests/examples/Attributes.hs0000644000000000000000000026646113534314632020642 0ustar0000000000000000{- | Module : Data.GraphViz.Attributes Description : Definition of the Graphviz attributes. Copyright : (c) Matthew Sackman, Ivan Lazar Miljenovic License : 3-Clause BSD-style Maintainer : Ivan.Miljenovic@gmail.com This module defines the various attributes that different parts of a Graphviz graph can have. These attributes are based on the documentation found at: For more information on usage, etc. please see that document. A summary of known current constraints\/limitations\/differences: * There might still be a few cases where quotes are still not escaped/parsed correctly; if you find such a situation, please let me know; however, you should be able to use 'String' values directly without having to worry about when quotes are required or extra escaping of quote characters as 'PrintDot' and 'ParseDot' instances for 'String' should take care of that for you. * Note that for an edge, in /Dot/ parlance if the edge goes from /A/ to /B/, then /A/ is the tail node and /B/ is the head node (since /A/ is at the tail end of the arrow). * ColorList and PointfList are defined as actual lists (but 'LayerList' is not). Note that for the Color 'Attribute' for node values, only a single Color is valid; edges are allowed multiple colors with one spline/arrow per color in the list (but you must have at least one 'Color' in the list). This might be changed in future. * Style is implemented as a list of 'StyleItem' values; note that empty lists are not allowed. * A lot of values have a possible value of @none@. These now have custom constructors. In fact, most constructors have been expanded upon to give an idea of what they represent rather than using generic terms. * @PointF@ and 'Point' have been combined, and feature support for pure 'Int'-based co-ordinates as well as 'Double' ones (i.e. no floating point-only points for Point). The optional '!' and third value for Point are not available. * 'Rect' uses two 'Point' values to denote the lower-left and top-right corners. * The two 'LabelLoc' attributes have been combined. * The defined 'LayerSep' is not used to parse 'LayerRange' or 'LayerList'; the default (@[' ', ':', '\t']@) is instead used. * @SplineType@ has been replaced with @['Spline']@. * Only polygon-based 'Shape's are available. * 'PortPos' only has the 'CompassPoint' option, not @PortName[:CompassPoint]@ (since record shapes aren't allowed, and parsing HTML-like labels could be problematic). * Not every 'Attribute' is fully documented/described. However, all those which have specific allowed values should be covered. * Deprecated 'Overlap' algorithms are not defined. * The global @Orientation@ attribute is not defined, as it is difficult to distinguish from the node-based 'Orientation' 'Attribute'; also, its behaviour is duplicated by 'Rotate'. -} module Data.GraphViz.Attributes ( -- * The actual /Dot/ attributes. Attribute(..) , Attributes -- ** Validity functions on @Attribute@ values. , usedByGraphs , usedBySubGraphs , usedByClusters , usedByNodes , usedByEdges -- * Value types for @Attribute@s. , EscString , URL(..) , ArrowType(..) , AspectType(..) , Rect(..) , ClusterMode(..) , DirType(..) , DEConstraints(..) , DPoint(..) , ModeType(..) , Model(..) , Label(..) , Point(..) , Overlap(..) , LayerRange(..) , LayerID(..) , LayerList(..) , OutputMode(..) , Pack(..) , PackMode(..) , Pos(..) , EdgeType(..) , PageDir(..) , Spline(..) , QuadType(..) , Root(..) , RankType(..) , RankDir(..) , Shape(..) , SmoothType(..) , StartType(..) , STStyle(..) , StyleItem(..) , StyleName(..) , PortPos(..) , CompassPoint(..) , ViewPort(..) , FocusType(..) , VerticalPlacement(..) , ScaleType(..) , Justification(..) , Ratios(..) , module Data.GraphViz.Attributes.Colors -- * Types representing the Dot grammar for @ArrowType@. , ArrowShape(..) , ArrowModifier(..) , ArrowFill(..) , ArrowSide(..) -- ** Default @ArrowType@ aliases. -- *** The 9 primitive @ArrowShape@s. , box , crow , diamond , dotArrow , inv , noArrow , normal , tee , vee -- *** 5 derived Arrows. , oDot , invDot , invODot , oBox , oDiamond -- *** 5 supported cases for backwards compatibility , eDiamond , openArr , halfOpen , emptyArr , invEmpty -- ** @ArrowModifier@ instances , noMods , openMod -- * Other exported functions\/values , defLayerSep , notLayerSep ) where import Data.GraphViz.Attributes.Colors import Data.GraphViz.Util import Data.GraphViz.Parsing import Data.GraphViz.Printing import Data.Char(toLower) import Data.Maybe(isJust) import Control.Arrow(first) import Control.Monad(liftM, liftM2) -- ----------------------------------------------------------------------------- {- | These attributes have been implemented in a /permissive/ manner: that is, rather than split them up based on which type of value they are allowed, they have all been included in the one data type, with functions to determine if they are indeed valid for what they're being applied to. To interpret the /Valid for/ listings: [@G@] Valid for Graphs. [@C@] Valid for Clusters. [@S@] Valid for Sub-Graphs (and also Clusters). [@N@] Valid for Nodes. [@E@] Valid for Edges. The /Default/ listings are those that the various Graphviz commands use if that 'Attribute' isn't specified (in cases where this is /none/, this is equivalent to a 'Nothing' value; that is, no value is used). The /Parsing Default/ listings represent what value is used (i.e. corresponds to 'True') when the 'Attribute' name is listed on its own in /Dot/ source code. -} data Attribute = Damping Double -- ^ /Valid for/: G; /Default/: @0.99@; /Minimum/: @0.0@; /Notes/: neato only | K Double -- ^ /Valid for/: GC; /Default/: @0.3@; /Minimum/: @0@; /Notes/: sfdp, fdp only | URL URL -- ^ /Valid for/: ENGC; /Default/: none; /Notes/: svg, postscript, map only | ArrowHead ArrowType -- ^ /Valid for/: E; /Default/: @'normal'@ | ArrowSize Double -- ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0.0@ | ArrowTail ArrowType -- ^ /Valid for/: E; /Default/: @'normal'@ | Aspect AspectType -- ^ /Valid for/: G; /Notes/: dot only | Bb Rect -- ^ /Valid for/: G; /Notes/: write only | BgColor Color -- ^ /Valid for/: GC; /Default/: X11Color 'Transparent' | Center Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True' | Charset String -- ^ /Valid for/: G; /Default/: @\"UTF-8\"@ | ClusterRank ClusterMode -- ^ /Valid for/: G; /Default/: @'Local'@; /Notes/: dot only | ColorScheme ColorScheme -- ^ /Valid for/: ENCG; /Default/: @'X11'@ | Color [Color] -- ^ /Valid for/: ENC; /Default/: @X11Color 'Black'@ | Comment String -- ^ /Valid for/: ENG; /Default/: @\"\"@ | Compound Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: dot only | Concentrate Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True' | Constraint Bool -- ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True'; /Notes/: dot only | Decorate Bool -- ^ /Valid for/: E; /Default/: @'False'@; /Parsing Default/: 'True' | DefaultDist Double -- ^ /Valid for/: G; /Default/: @1+(avg. len)*sqrt(|V|)@; /Minimum/: @epsilon@; /Notes/: neato only | Dimen Int -- ^ /Valid for/: G; /Default/: @2@; /Minimum/: @2@; /Notes/: sfdp, fdp, neato only | Dim Int -- ^ /Valid for/: G; /Default/: @2@; /Minimum/: @2@; /Notes/: sfdp, fdp, neato only | Dir DirType -- ^ /Valid for/: E; /Default/: @'Forward'@ (directed), @'NoDir'@ (undirected) | DirEdgeConstraints DEConstraints -- ^ /Valid for/: G; /Default/: @'NoConstraints'@; /Parsing Default/: 'EdgeConstraints'; /Notes/: neato only | Distortion Double -- ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-100.0@ | DPI Double -- ^ /Valid for/: G; /Default/: @96.0@, @0.0@; /Notes/: svg, bitmap output only; \"resolution\" is a synonym | EdgeURL URL -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, map only | EdgeTarget EscString -- ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only | EdgeTooltip EscString -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, cmap only | Epsilon Double -- ^ /Valid for/: G; /Default/: @.0001 * # nodes@ (@mode == 'KK'@), @.0001@ (@mode == 'Major'@); /Notes/: neato only | ESep DPoint -- ^ /Valid for/: G; /Default/: @+3@; /Notes/: not dot | FillColor Color -- ^ /Valid for/: NC; /Default/: @X11Color 'LightGray'@ (nodes), @X11Color 'Black'@ (clusters) | FixedSize Bool -- ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True' | FontColor Color -- ^ /Valid for/: ENGC; /Default/: @X11Color 'Black'@ | FontName String -- ^ /Valid for/: ENGC; /Default/: @\"Times-Roman\"@ | FontNames String -- ^ /Valid for/: G; /Default/: @\"\"@; /Notes/: svg only | FontPath String -- ^ /Valid for/: G; /Default/: system-dependent | FontSize Double -- ^ /Valid for/: ENGC; /Default/: @14.0@; /Minimum/: @1.0@ | Group String -- ^ /Valid for/: N; /Default/: @\"\"@; /Notes/: dot only | HeadURL URL -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, map only | HeadClip Bool -- ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True' | HeadLabel Label -- ^ /Valid for/: E; /Default/: @\"\"@ | HeadPort PortPos -- ^ /Valid for/: E; /Default/: @'PP' 'CenterPoint'@ | HeadTarget EscString -- ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only | HeadTooltip EscString -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, cmap only | Height Double -- ^ /Valid for/: N; /Default/: @0.5@; /Minimum/: @0.02@ | ID Label -- ^ /Valid for/: GNE; /Default/: @\"\"@; /Notes/: svg, postscript, map only | Image String -- ^ /Valid for/: N; /Default/: @\"\"@ | ImageScale ScaleType -- ^ /Valid for/: N; /Default/: @'NoScale'@; /Parsing Default/: 'UniformScale' | LabelURL URL -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, map only | LabelAngle Double -- ^ /Valid for/: E; /Default/: @-25.0@; /Minimum/: @-180.0@ | LabelDistance Double -- ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0.0@ | LabelFloat Bool -- ^ /Valid for/: E; /Default/: @'False'@; /Parsing Default/: 'True' | LabelFontColor Color -- ^ /Valid for/: E; /Default/: @X11Color 'Black'@ | LabelFontName String -- ^ /Valid for/: E; /Default/: @\"Times-Roman\"@ | LabelFontSize Double -- ^ /Valid for/: E; /Default/: @14.0@; /Minimum/: @1.0@ | LabelJust Justification -- ^ /Valid for/: GC; /Default/: @'JCenter'@ | LabelLoc VerticalPlacement -- ^ /Valid for/: GCN; /Default/: @'VTop'@ (clusters), @'VBottom'@ (root graphs), @'VCenter'@ (nodes) | LabelTarget EscString -- ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only | LabelTooltip EscString -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, cmap only | Label Label -- ^ /Valid for/: ENGC; /Default/: @'StrLabel' \"\N\"@ (nodes), @'StrLabel' \"\"@ (otherwise) | Landscape Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True' | LayerSep String -- ^ /Valid for/: G; /Default/: @\" :\t\"@ | Layers LayerList -- ^ /Valid for/: G; /Default/: @\"\"@ | Layer LayerRange -- ^ /Valid for/: EN; /Default/: @\"\"@ | Layout String -- ^ /Valid for/: G; /Default/: @\"\"@ | Len Double -- ^ /Valid for/: E; /Default/: @1.0@ (neato), @0.3@ (fdp); /Notes/: fdp, neato only | LevelsGap Double -- ^ /Valid for/: G; /Default/: @0.0@; /Notes/: neato only | Levels Int -- ^ /Valid for/: G; /Default/: @MAXINT@; /Minimum/: @0@; /Notes/: sfdp only | LHead String -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: dot only | LPos Point -- ^ /Valid for/: EGC; /Notes/: write only | LTail String -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: dot only | Margin DPoint -- ^ /Valid for/: NG; /Default/: device-dependent | MaxIter Int -- ^ /Valid for/: G; /Default/: @100 * # nodes@ (@mode == 'KK'@), @200@ (@mode == 'Major'@), @600@ (fdp); /Notes/: fdp, neato only | MCLimit Double -- ^ /Valid for/: G; /Default/: @1.0@; /Notes/: dot only | MinDist Double -- ^ /Valid for/: G; /Default/: @1.0@; /Minimum/: @0.0@; /Notes/: circo only | MinLen Int -- ^ /Valid for/: E; /Default/: @1@; /Minimum/: @0@; /Notes/: dot only | Model Model -- ^ /Valid for/: G; /Default/: @'ShortPath'@; /Notes/: neato only | Mode ModeType -- ^ /Valid for/: G; /Default/: @'Major'@; /Notes/: neato only | Mosek Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: neato only; requires the Mosek software | NodeSep Double -- ^ /Valid for/: G; /Default/: @0.25@; /Minimum/: @0.02@; /Notes/: dot only | NoJustify Bool -- ^ /Valid for/: GCNE; /Default/: @'False'@; /Parsing Default/: 'True' | Normalize Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: not dot | Nslimit1 Double -- ^ /Valid for/: G; /Notes/: dot only | Nslimit Double -- ^ /Valid for/: G; /Notes/: dot only | Ordering String -- ^ /Valid for/: G; /Default/: @\"\"@; /Notes/: dot only | Orientation Double -- ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @360.0@ | OutputOrder OutputMode -- ^ /Valid for/: G; /Default/: @'BreadthFirst'@ | OverlapScaling Double -- ^ /Valid for/: G; /Default/: @-4@; /Minimum/: @-1.0e10@; /Notes/: prism only | Overlap Overlap -- ^ /Valid for/: G; /Default/: @'KeepOverlaps'@; /Parsing Default/: 'KeepOverlaps'; /Notes/: not dot | PackMode PackMode -- ^ /Valid for/: G; /Default/: @'PackNode'@; /Notes/: not dot | Pack Pack -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'DoPack'; /Notes/: not dot | Pad DPoint -- ^ /Valid for/: G; /Default/: @'DVal' 0.0555@ (4 points) | PageDir PageDir -- ^ /Valid for/: G; /Default/: @'BL'@ | Page Point -- ^ /Valid for/: G | PenColor Color -- ^ /Valid for/: C; /Default/: @X11Color 'Black'@ | PenWidth Double -- ^ /Valid for/: CNE; /Default/: @1.0@; /Minimum/: @0.0@ | Peripheries Int -- ^ /Valid for/: NC; /Default/: shape default (nodes), @1@ (clusters); /Minimum/: 0 | Pin Bool -- ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: fdp, neato only | Pos Pos -- ^ /Valid for/: EN | QuadTree QuadType -- ^ /Valid for/: G; /Default/: @'NormalQT'@; /Parsing Default/: 'NormalQT'; /Notes/: sfdp only | Quantum Double -- ^ /Valid for/: G; /Default/: @0.0@; /Minimum/: @0.0@ | RankDir RankDir -- ^ /Valid for/: G; /Default/: @'TB'@; /Notes/: dot only | RankSep Double -- ^ /Valid for/: G; /Default/: @0.5@ (dot), @1.0@ (twopi); /Minimum/: 0.02; /Notes/: twopi, dot only | Rank RankType -- ^ /Valid for/: S; /Notes/: dot only | Ratio Ratios -- ^ /Valid for/: G | Rects Rect -- ^ /Valid for/: N; /Notes/: write only | Regular Bool -- ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True' | ReMinCross Bool -- ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: dot only | RepulsiveForce Double -- ^ /Valid for/: G; /Default/: @1.0@; /Minimum/: @0.0@; /Notes/: sfdp only | Root Root -- ^ /Valid for/: GN; /Default/: @'NodeName' \"\"@ (graphs), @'NotCentral'@ (nodes); /Parsing Default/: 'IsCentral'; /Notes/: circo, twopi only | Rotate Int -- ^ /Valid for/: G; /Default/: @0@ | SameHead String -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: dot only | SameTail String -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: dot only | SamplePoints Int -- ^ /Valid for/: N; /Default/: @8@ (output), @20@ (overlap and image maps) | SearchSize Int -- ^ /Valid for/: G; /Default/: @30@; /Notes/: dot only | Sep DPoint -- ^ /Valid for/: G; /Default/: @+4@; /Notes/: not dot | ShapeFile String -- ^ /Valid for/: N; /Default/: @\"\"@ | Shape Shape -- ^ /Valid for/: N; /Default/: @'Ellipse'@ | ShowBoxes Int -- ^ /Valid for/: ENG; /Default/: @0@; /Minimum/: @0@; /Notes/: dot only | Sides Int -- ^ /Valid for/: N; /Default/: @4@; /Minimum/: @0@ | Size Point -- ^ /Valid for/: G | Skew Double -- ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-100.0@ | Smoothing SmoothType -- ^ /Valid for/: G; /Default/: @'NoSmooth'@; /Notes/: sfdp only | SortV Int -- ^ /Valid for/: GCN; /Default/: @0@; /Minimum/: @0@ | Splines EdgeType -- ^ /Valid for/: G; /Parsing Default/: 'SplineEdges' | Start StartType -- ^ /Valid for/: G; /Default/: @\"\"@; /Notes/: fdp, neato only | StyleSheet String -- ^ /Valid for/: G; /Default/: @\"\"@; /Notes/: svg only | Style [StyleItem] -- ^ /Valid for/: ENC | TailURL URL -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, map only | TailClip Bool -- ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True' | TailLabel Label -- ^ /Valid for/: E; /Default/: @\"\"@ | TailPort PortPos -- ^ /Valid for/: E; /Default/: center | TailTarget EscString -- ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only | TailTooltip EscString -- ^ /Valid for/: E; /Default/: @\"\"@; /Notes/: svg, cmap only | Target EscString -- ^ /Valid for/: ENGC; /Default/: none; /Notes/: svg, map only | Tooltip EscString -- ^ /Valid for/: NEC; /Default/: @\"\"@; /Notes/: svg, cmap only | TrueColor Bool -- ^ /Valid for/: G; /Parsing Default/: 'True'; /Notes/: bitmap output only | Vertices [Point] -- ^ /Valid for/: N; /Notes/: write only | ViewPort ViewPort -- ^ /Valid for/: G; /Default/: none | VoroMargin Double -- ^ /Valid for/: G; /Default/: @0.05@; /Minimum/: @0.0@; /Notes/: not dot | Weight Double -- ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0@ (dot), @1@ (neato,fdp,sfdp) | Width Double -- ^ /Valid for/: N; /Default/: @0.75@; /Minimum/: @0.01@ | Z Double -- ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-MAXFLOAT@, @-1000@ deriving (Eq, Ord, Show, Read) type Attributes = [Attribute] instance PrintDot Attribute where unqtDot (Damping v) = printField "Damping" v unqtDot (K v) = printField "K" v unqtDot (URL v) = printField "URL" v unqtDot (ArrowHead v) = printField "arrowhead" v unqtDot (ArrowSize v) = printField "arrowsize" v unqtDot (ArrowTail v) = printField "arrowtail" v unqtDot (Aspect v) = printField "aspect" v unqtDot (Bb v) = printField "bb" v unqtDot (BgColor v) = printField "bgcolor" v unqtDot (Center v) = printField "center" v unqtDot (Charset v) = printField "charset" v unqtDot (ClusterRank v) = printField "clusterrank" v unqtDot (ColorScheme v) = printField "colorscheme" v unqtDot (Color v) = printField "color" v unqtDot (Comment v) = printField "comment" v unqtDot (Compound v) = printField "compound" v unqtDot (Concentrate v) = printField "concentrate" v unqtDot (Constraint v) = printField "constraint" v unqtDot (Decorate v) = printField "decorate" v unqtDot (DefaultDist v) = printField "defaultdist" v unqtDot (Dimen v) = printField "dimen" v unqtDot (Dim v) = printField "dim" v unqtDot (Dir v) = printField "dir" v unqtDot (DirEdgeConstraints v) = printField "diredgeconstraints" v unqtDot (Distortion v) = printField "distortion" v unqtDot (DPI v) = printField "dpi" v unqtDot (EdgeURL v) = printField "edgeURL" v unqtDot (EdgeTarget v) = printField "edgetarget" v unqtDot (EdgeTooltip v) = printField "edgetooltip" v unqtDot (Epsilon v) = printField "epsilon" v unqtDot (ESep v) = printField "esep" v unqtDot (FillColor v) = printField "fillcolor" v unqtDot (FixedSize v) = printField "fixedsize" v unqtDot (FontColor v) = printField "fontcolor" v unqtDot (FontName v) = printField "fontname" v unqtDot (FontNames v) = printField "fontnames" v unqtDot (FontPath v) = printField "fontpath" v unqtDot (FontSize v) = printField "fontsize" v unqtDot (Group v) = printField "group" v unqtDot (HeadURL v) = printField "headURL" v unqtDot (HeadClip v) = printField "headclip" v unqtDot (HeadLabel v) = printField "headlabel" v unqtDot (HeadPort v) = printField "headport" v unqtDot (HeadTarget v) = printField "headtarget" v unqtDot (HeadTooltip v) = printField "headtooltip" v unqtDot (Height v) = printField "height" v unqtDot (ID v) = printField "id" v unqtDot (Image v) = printField "image" v unqtDot (ImageScale v) = printField "imagescale" v unqtDot (LabelURL v) = printField "labelURL" v unqtDot (LabelAngle v) = printField "labelangle" v unqtDot (LabelDistance v) = printField "labeldistance" v unqtDot (LabelFloat v) = printField "labelfloat" v unqtDot (LabelFontColor v) = printField "labelfontcolor" v unqtDot (LabelFontName v) = printField "labelfontname" v unqtDot (LabelFontSize v) = printField "labelfontsize" v unqtDot (LabelJust v) = printField "labeljust" v unqtDot (LabelLoc v) = printField "labelloc" v unqtDot (LabelTarget v) = printField "labeltarget" v unqtDot (LabelTooltip v) = printField "labeltooltip" v unqtDot (Label v) = printField "label" v unqtDot (Landscape v) = printField "landscape" v unqtDot (LayerSep v) = printField "layersep" v unqtDot (Layers v) = printField "layers" v unqtDot (Layer v) = printField "layer" v unqtDot (Layout v) = printField "layout" v unqtDot (Len v) = printField "len" v unqtDot (LevelsGap v) = printField "levelsgap" v unqtDot (Levels v) = printField "levels" v unqtDot (LHead v) = printField "lhead" v unqtDot (LPos v) = printField "lp" v unqtDot (LTail v) = printField "ltail" v unqtDot (Margin v) = printField "margin" v unqtDot (MaxIter v) = printField "maxiter" v unqtDot (MCLimit v) = printField "mclimit" v unqtDot (MinDist v) = printField "mindist" v unqtDot (MinLen v) = printField "minlen" v unqtDot (Model v) = printField "model" v unqtDot (Mode v) = printField "mode" v unqtDot (Mosek v) = printField "mosek" v unqtDot (NodeSep v) = printField "nodesep" v unqtDot (NoJustify v) = printField "nojustify" v unqtDot (Normalize v) = printField "normalize" v unqtDot (Nslimit1 v) = printField "nslimit1" v unqtDot (Nslimit v) = printField "nslimit" v unqtDot (Ordering v) = printField "ordering" v unqtDot (Orientation v) = printField "orientation" v unqtDot (OutputOrder v) = printField "outputorder" v unqtDot (OverlapScaling v) = printField "overlap_scaling" v unqtDot (Overlap v) = printField "overlap" v unqtDot (PackMode v) = printField "packmode" v unqtDot (Pack v) = printField "pack" v unqtDot (Pad v) = printField "pad" v unqtDot (PageDir v) = printField "pagedir" v unqtDot (Page v) = printField "page" v unqtDot (PenColor v) = printField "pencolor" v unqtDot (PenWidth v) = printField "penwidth" v unqtDot (Peripheries v) = printField "peripheries" v unqtDot (Pin v) = printField "pin" v unqtDot (Pos v) = printField "pos" v unqtDot (QuadTree v) = printField "quadtree" v unqtDot (Quantum v) = printField "quantum" v unqtDot (RankDir v) = printField "rankdir" v unqtDot (RankSep v) = printField "ranksep" v unqtDot (Rank v) = printField "rank" v unqtDot (Ratio v) = printField "ratio" v unqtDot (Rects v) = printField "rects" v unqtDot (Regular v) = printField "regular" v unqtDot (ReMinCross v) = printField "remincross" v unqtDot (RepulsiveForce v) = printField "repulsiveforce" v unqtDot (Root v) = printField "root" v unqtDot (Rotate v) = printField "rotate" v unqtDot (SameHead v) = printField "samehead" v unqtDot (SameTail v) = printField "sametail" v unqtDot (SamplePoints v) = printField "samplepoints" v unqtDot (SearchSize v) = printField "searchsize" v unqtDot (Sep v) = printField "sep" v unqtDot (ShapeFile v) = printField "shapefile" v unqtDot (Shape v) = printField "shape" v unqtDot (ShowBoxes v) = printField "showboxes" v unqtDot (Sides v) = printField "sides" v unqtDot (Size v) = printField "size" v unqtDot (Skew v) = printField "skew" v unqtDot (Smoothing v) = printField "smoothing" v unqtDot (SortV v) = printField "sortv" v unqtDot (Splines v) = printField "splines" v unqtDot (Start v) = printField "start" v unqtDot (StyleSheet v) = printField "stylesheet" v unqtDot (Style v) = printField "style" v unqtDot (TailURL v) = printField "tailURL" v unqtDot (TailClip v) = printField "tailclip" v unqtDot (TailLabel v) = printField "taillabel" v unqtDot (TailPort v) = printField "tailport" v unqtDot (TailTarget v) = printField "tailtarget" v unqtDot (TailTooltip v) = printField "tailtooltip" v unqtDot (Target v) = printField "target" v unqtDot (Tooltip v) = printField "tooltip" v unqtDot (TrueColor v) = printField "truecolor" v unqtDot (Vertices v) = printField "vertices" v unqtDot (ViewPort v) = printField "viewport" v unqtDot (VoroMargin v) = printField "voro_margin" v unqtDot (Weight v) = printField "weight" v unqtDot (Width v) = printField "width" v unqtDot (Z v) = printField "z" v listToDot = unqtListToDot instance ParseDot Attribute where parseUnqt = oneOf [ liftM Damping $ parseField "Damping" , liftM K $ parseField "K" , liftM URL $ parseFields ["URL", "href"] , liftM ArrowHead $ parseField "arrowhead" , liftM ArrowSize $ parseField "arrowsize" , liftM ArrowTail $ parseField "arrowtail" , liftM Aspect $ parseField "aspect" , liftM Bb $ parseField "bb" , liftM BgColor $ parseField "bgcolor" , liftM Center $ parseFieldBool "center" , liftM Charset $ parseField "charset" , liftM ClusterRank $ parseField "clusterrank" , liftM ColorScheme $ parseField "colorscheme" , liftM Color $ parseField "color" , liftM Comment $ parseField "comment" , liftM Compound $ parseFieldBool "compound" , liftM Concentrate $ parseFieldBool "concentrate" , liftM Constraint $ parseFieldBool "constraint" , liftM Decorate $ parseFieldBool "decorate" , liftM DefaultDist $ parseField "defaultdist" , liftM Dimen $ parseField "dimen" , liftM Dim $ parseField "dim" , liftM Dir $ parseField "dir" , liftM DirEdgeConstraints $ parseFieldDef EdgeConstraints "diredgeconstraints" , liftM Distortion $ parseField "distortion" , liftM DPI $ parseFields ["dpi", "resolution"] , liftM EdgeURL $ parseFields ["edgeURL", "edgehref"] , liftM EdgeTarget $ parseField "edgetarget" , liftM EdgeTooltip $ parseField "edgetooltip" , liftM Epsilon $ parseField "epsilon" , liftM ESep $ parseField "esep" , liftM FillColor $ parseField "fillcolor" , liftM FixedSize $ parseFieldBool "fixedsize" , liftM FontColor $ parseField "fontcolor" , liftM FontName $ parseField "fontname" , liftM FontNames $ parseField "fontnames" , liftM FontPath $ parseField "fontpath" , liftM FontSize $ parseField "fontsize" , liftM Group $ parseField "group" , liftM HeadURL $ parseFields ["headURL", "headhref"] , liftM HeadClip $ parseFieldBool "headclip" , liftM HeadLabel $ parseField "headlabel" , liftM HeadPort $ parseField "headport" , liftM HeadTarget $ parseField "headtarget" , liftM HeadTooltip $ parseField "headtooltip" , liftM Height $ parseField "height" , liftM ID $ parseField "id" , liftM Image $ parseField "image" , liftM ImageScale $ parseFieldDef UniformScale "imagescale" , liftM LabelURL $ parseFields ["labelURL", "labelhref"] , liftM LabelAngle $ parseField "labelangle" , liftM LabelDistance $ parseField "labeldistance" , liftM LabelFloat $ parseFieldBool "labelfloat" , liftM LabelFontColor $ parseField "labelfontcolor" , liftM LabelFontName $ parseField "labelfontname" , liftM LabelFontSize $ parseField "labelfontsize" , liftM LabelJust $ parseField "labeljust" , liftM LabelLoc $ parseField "labelloc" , liftM LabelTarget $ parseField "labeltarget" , liftM LabelTooltip $ parseField "labeltooltip" , liftM Label $ parseField "label" , liftM Landscape $ parseFieldBool "landscape" , liftM LayerSep $ parseField "layersep" , liftM Layers $ parseField "layers" , liftM Layer $ parseField "layer" , liftM Layout $ parseField "layout" , liftM Len $ parseField "len" , liftM LevelsGap $ parseField "levelsgap" , liftM Levels $ parseField "levels" , liftM LHead $ parseField "lhead" , liftM LPos $ parseField "lp" , liftM LTail $ parseField "ltail" , liftM Margin $ parseField "margin" , liftM MaxIter $ parseField "maxiter" , liftM MCLimit $ parseField "mclimit" , liftM MinDist $ parseField "mindist" , liftM MinLen $ parseField "minlen" , liftM Model $ parseField "model" , liftM Mode $ parseField "mode" , liftM Mosek $ parseFieldBool "mosek" , liftM NodeSep $ parseField "nodesep" , liftM NoJustify $ parseFieldBool "nojustify" , liftM Normalize $ parseFieldBool "normalize" , liftM Nslimit1 $ parseField "nslimit1" , liftM Nslimit $ parseField "nslimit" , liftM Ordering $ parseField "ordering" , liftM Orientation $ parseField "orientation" , liftM OutputOrder $ parseField "outputorder" , liftM OverlapScaling $ parseField "overlap_scaling" , liftM Overlap $ parseFieldDef KeepOverlaps "overlap" , liftM PackMode $ parseField "packmode" , liftM Pack $ parseFieldDef DoPack "pack" , liftM Pad $ parseField "pad" , liftM PageDir $ parseField "pagedir" , liftM Page $ parseField "page" , liftM PenColor $ parseField "pencolor" , liftM PenWidth $ parseField "penwidth" , liftM Peripheries $ parseField "peripheries" , liftM Pin $ parseFieldBool "pin" , liftM Pos $ parseField "pos" , liftM QuadTree $ parseFieldDef NormalQT "quadtree" , liftM Quantum $ parseField "quantum" , liftM RankDir $ parseField "rankdir" , liftM RankSep $ parseField "ranksep" , liftM Rank $ parseField "rank" , liftM Ratio $ parseField "ratio" , liftM Rects $ parseField "rects" , liftM Regular $ parseFieldBool "regular" , liftM ReMinCross $ parseFieldBool "remincross" , liftM RepulsiveForce $ parseField "repulsiveforce" , liftM Root $ parseFieldDef IsCentral "root" , liftM Rotate $ parseField "rotate" , liftM SameHead $ parseField "samehead" , liftM SameTail $ parseField "sametail" , liftM SamplePoints $ parseField "samplepoints" , liftM SearchSize $ parseField "searchsize" , liftM Sep $ parseField "sep" , liftM ShapeFile $ parseField "shapefile" , liftM Shape $ parseField "shape" , liftM ShowBoxes $ parseField "showboxes" , liftM Sides $ parseField "sides" , liftM Size $ parseField "size" , liftM Skew $ parseField "skew" , liftM Smoothing $ parseField "smoothing" , liftM SortV $ parseField "sortv" , liftM Splines $ parseFieldDef SplineEdges "splines" , liftM Start $ parseField "start" , liftM StyleSheet $ parseField "stylesheet" , liftM Style $ parseField "style" , liftM TailURL $ parseFields ["tailURL", "tailhref"] , liftM TailClip $ parseFieldBool "tailclip" , liftM TailLabel $ parseField "taillabel" , liftM TailPort $ parseField "tailport" , liftM TailTarget $ parseField "tailtarget" , liftM TailTooltip $ parseField "tailtooltip" , liftM Target $ parseField "target" , liftM Tooltip $ parseField "tooltip" , liftM TrueColor $ parseFieldBool "truecolor" , liftM Vertices $ parseField "vertices" , liftM ViewPort $ parseField "viewport" , liftM VoroMargin $ parseField "voro_margin" , liftM Weight $ parseField "weight" , liftM Width $ parseField "width" , liftM Z $ parseField "z" ] parse = parseUnqt parseList = parseUnqtList -- | Determine if this Attribute is valid for use with Graphs. usedByGraphs :: Attribute -> Bool usedByGraphs Damping{} = True usedByGraphs K{} = True usedByGraphs URL{} = True usedByGraphs Aspect{} = True usedByGraphs Bb{} = True usedByGraphs BgColor{} = True usedByGraphs Center{} = True usedByGraphs Charset{} = True usedByGraphs ClusterRank{} = True usedByGraphs ColorScheme{} = True usedByGraphs Comment{} = True usedByGraphs Compound{} = True usedByGraphs Concentrate{} = True usedByGraphs DefaultDist{} = True usedByGraphs Dimen{} = True usedByGraphs Dim{} = True usedByGraphs DirEdgeConstraints{} = True usedByGraphs DPI{} = True usedByGraphs Epsilon{} = True usedByGraphs ESep{} = True usedByGraphs FontColor{} = True usedByGraphs FontName{} = True usedByGraphs FontNames{} = True usedByGraphs FontPath{} = True usedByGraphs FontSize{} = True usedByGraphs ID{} = True usedByGraphs LabelJust{} = True usedByGraphs LabelLoc{} = True usedByGraphs Label{} = True usedByGraphs Landscape{} = True usedByGraphs LayerSep{} = True usedByGraphs Layers{} = True usedByGraphs Layout{} = True usedByGraphs LevelsGap{} = True usedByGraphs Levels{} = True usedByGraphs LPos{} = True usedByGraphs Margin{} = True usedByGraphs MaxIter{} = True usedByGraphs MCLimit{} = True usedByGraphs MinDist{} = True usedByGraphs Model{} = True usedByGraphs Mode{} = True usedByGraphs Mosek{} = True usedByGraphs NodeSep{} = True usedByGraphs NoJustify{} = True usedByGraphs Normalize{} = True usedByGraphs Nslimit1{} = True usedByGraphs Nslimit{} = True usedByGraphs Ordering{} = True usedByGraphs OutputOrder{} = True usedByGraphs OverlapScaling{} = True usedByGraphs Overlap{} = True usedByGraphs PackMode{} = True usedByGraphs Pack{} = True usedByGraphs Pad{} = True usedByGraphs PageDir{} = True usedByGraphs Page{} = True usedByGraphs QuadTree{} = True usedByGraphs Quantum{} = True usedByGraphs RankDir{} = True usedByGraphs RankSep{} = True usedByGraphs Ratio{} = True usedByGraphs ReMinCross{} = True usedByGraphs RepulsiveForce{} = True usedByGraphs Root{} = True usedByGraphs Rotate{} = True usedByGraphs SearchSize{} = True usedByGraphs Sep{} = True usedByGraphs ShowBoxes{} = True usedByGraphs Size{} = True usedByGraphs Smoothing{} = True usedByGraphs SortV{} = True usedByGraphs Splines{} = True usedByGraphs Start{} = True usedByGraphs StyleSheet{} = True usedByGraphs Target{} = True usedByGraphs TrueColor{} = True usedByGraphs ViewPort{} = True usedByGraphs VoroMargin{} = True usedByGraphs _ = False -- | Determine if this Attribute is valid for use with Clusters. usedByClusters :: Attribute -> Bool usedByClusters K{} = True usedByClusters URL{} = True usedByClusters BgColor{} = True usedByClusters ColorScheme{} = True usedByClusters Color{} = True usedByClusters FillColor{} = True usedByClusters FontColor{} = True usedByClusters FontName{} = True usedByClusters FontSize{} = True usedByClusters LabelJust{} = True usedByClusters LabelLoc{} = True usedByClusters Label{} = True usedByClusters LPos{} = True usedByClusters NoJustify{} = True usedByClusters PenColor{} = True usedByClusters PenWidth{} = True usedByClusters Peripheries{} = True usedByClusters Rank{} = True usedByClusters SortV{} = True usedByClusters Style{} = True usedByClusters Target{} = True usedByClusters Tooltip{} = True usedByClusters _ = False -- | Determine if this Attribute is valid for use with SubGraphs. usedBySubGraphs :: Attribute -> Bool usedBySubGraphs Rank{} = True usedBySubGraphs _ = False -- | Determine if this Attribute is valid for use with Nodes. usedByNodes :: Attribute -> Bool usedByNodes URL{} = True usedByNodes ColorScheme{} = True usedByNodes Color{} = True usedByNodes Comment{} = True usedByNodes Distortion{} = True usedByNodes FillColor{} = True usedByNodes FixedSize{} = True usedByNodes FontColor{} = True usedByNodes FontName{} = True usedByNodes FontSize{} = True usedByNodes Group{} = True usedByNodes Height{} = True usedByNodes ID{} = True usedByNodes Image{} = True usedByNodes ImageScale{} = True usedByNodes LabelLoc{} = True usedByNodes Label{} = True usedByNodes Layer{} = True usedByNodes Margin{} = True usedByNodes NoJustify{} = True usedByNodes Orientation{} = True usedByNodes PenWidth{} = True usedByNodes Peripheries{} = True usedByNodes Pin{} = True usedByNodes Pos{} = True usedByNodes Rects{} = True usedByNodes Regular{} = True usedByNodes Root{} = True usedByNodes SamplePoints{} = True usedByNodes ShapeFile{} = True usedByNodes Shape{} = True usedByNodes ShowBoxes{} = True usedByNodes Sides{} = True usedByNodes Skew{} = True usedByNodes SortV{} = True usedByNodes Style{} = True usedByNodes Target{} = True usedByNodes Tooltip{} = True usedByNodes Vertices{} = True usedByNodes Width{} = True usedByNodes Z{} = True usedByNodes _ = False -- | Determine if this Attribute is valid for use with Edges. usedByEdges :: Attribute -> Bool usedByEdges URL{} = True usedByEdges ArrowHead{} = True usedByEdges ArrowSize{} = True usedByEdges ArrowTail{} = True usedByEdges ColorScheme{} = True usedByEdges Color{} = True usedByEdges Comment{} = True usedByEdges Constraint{} = True usedByEdges Decorate{} = True usedByEdges Dir{} = True usedByEdges EdgeURL{} = True usedByEdges EdgeTarget{} = True usedByEdges EdgeTooltip{} = True usedByEdges FontColor{} = True usedByEdges FontName{} = True usedByEdges FontSize{} = True usedByEdges HeadURL{} = True usedByEdges HeadClip{} = True usedByEdges HeadLabel{} = True usedByEdges HeadPort{} = True usedByEdges HeadTarget{} = True usedByEdges HeadTooltip{} = True usedByEdges ID{} = True usedByEdges LabelURL{} = True usedByEdges LabelAngle{} = True usedByEdges LabelDistance{} = True usedByEdges LabelFloat{} = True usedByEdges LabelFontColor{} = True usedByEdges LabelFontName{} = True usedByEdges LabelFontSize{} = True usedByEdges LabelTarget{} = True usedByEdges LabelTooltip{} = True usedByEdges Label{} = True usedByEdges Layer{} = True usedByEdges Len{} = True usedByEdges LHead{} = True usedByEdges LPos{} = True usedByEdges LTail{} = True usedByEdges MinLen{} = True usedByEdges NoJustify{} = True usedByEdges PenWidth{} = True usedByEdges Pos{} = True usedByEdges SameHead{} = True usedByEdges SameTail{} = True usedByEdges ShowBoxes{} = True usedByEdges Style{} = True usedByEdges TailURL{} = True usedByEdges TailClip{} = True usedByEdges TailLabel{} = True usedByEdges TailPort{} = True usedByEdges TailTarget{} = True usedByEdges TailTooltip{} = True usedByEdges Target{} = True usedByEdges Tooltip{} = True usedByEdges Weight{} = True usedByEdges _ = False {- Delete to here -} -- ----------------------------------------------------------------------------- {- | Some 'Attribute's (mainly label-like ones) take a 'String' argument that allows for extra escape codes. This library doesn't do any extra checks or special parsing for these escape codes, but usage of 'EscString' rather than 'String' indicates that the Graphviz tools will recognise these extra escape codes for these 'Attribute's. The extra escape codes include (note that these are all 'String's): [@\\N@] Replace with the name of the node (for Node 'Attribute's). [@\\G@] Replace with the name of the graph (for Node 'Attribute's) or the name of the graph or cluster, whichever is applicable (for Graph, Cluster and Edge 'Attribute's). [@\\E@] Replace with the name of the edge, formed by the two adjoining nodes and the edge type (for Edge 'Attribute's). [@\\T@] Replace with the name of the tail node (for Edge 'Attribute's). [@\\H@] Replace with the name of the head node (for Edge 'Attribute's). [@\\L@] Replace with the object's label (for all 'Attribute's). Also, if the 'Attribute' in question is 'Label', 'HeadLabel' or 'TailLabel', then @\\n@, @\\l@ and @\\r@ split the label into lines centered, left-justified and right-justified respectively. -} type EscString = String -- ----------------------------------------------------------------------------- -- | No checks are placed on the content of a 'URL' value; however, -- you should ensure that it does not contain any \'@>@\' or \'@<@\' -- characters; Graphviz might care about escaping other characters -- properly, but for the purposes of this library the presence of -- these characters will make it harder to parse URLs. newtype URL = UStr { urlString :: EscString } deriving (Eq, Ord, Show, Read) instance PrintDot URL where unqtDot = wrap (char '<') (char '>') -- Explicitly use text here... no quotes! . text . urlString instance ParseDot URL where parseUnqt = liftM UStr $ bracket (character open) (character close) (many1 $ satisfy ((/=) close)) where open = '<' close = '>' -- No quotes parse = parseUnqt -- ----------------------------------------------------------------------------- -- | /Dot/ has a basic grammar of arrow shapes which allows usage of -- up to 1,544,761 different shapes from 9 different basic -- 'ArrowShape's. Note that whilst an explicit list is used in the -- definition of 'ArrowType', there must be at least one tuple and a -- maximum of 4 (since that is what is required by Dot). For more -- information, see: -- -- The 19 basic arrows shown on the overall attributes page have -- been defined below as a convenience. Parsing of the 5 -- backward-compatible special cases is also supported. newtype ArrowType = AType [(ArrowModifier, ArrowShape)] deriving (Eq, Ord, Show, Read) box, crow, diamond, dotArrow, inv, noArrow, normal, tee, vee :: ArrowType oDot, invDot, invODot, oBox, oDiamond :: ArrowType eDiamond, openArr, halfOpen, emptyArr, invEmpty :: ArrowType normal = AType [(noMods, Normal)] inv = AType [(noMods, Inv)] dotArrow = AType [(noMods, DotArrow)] invDot = AType [ (noMods, Inv) , (noMods, DotArrow)] oDot = AType [(ArrMod OpenArrow BothSides, DotArrow)] invODot = AType [ (noMods, Inv) , (openMod, DotArrow)] noArrow = AType [(noMods, NoArrow)] tee = AType [(noMods, Tee)] emptyArr = AType [(openMod, Normal)] invEmpty = AType [ (noMods, Inv) , (openMod, Normal)] diamond = AType [(noMods, Diamond)] oDiamond = AType [(openMod, Diamond)] eDiamond = oDiamond crow = AType [(noMods, Crow)] box = AType [(noMods, Box)] oBox = AType [(openMod, Box)] openArr = vee halfOpen = AType [(ArrMod FilledArrow LeftSide, Vee)] vee = AType [(noMods, Vee)] instance PrintDot ArrowType where unqtDot (AType mas) = hcat $ map appMod mas where appMod (m, a) = unqtDot m <> unqtDot a instance ParseDot ArrowType where parseUnqt = do mas <- many1 $ do m <- parseUnqt a <- parseUnqt return (m,a) return $ AType mas `onFail` specialArrowParse specialArrowParse :: Parse ArrowType specialArrowParse = oneOf [ stringRep eDiamond "ediamond" , stringRep openArr "open" , stringRep halfOpen "halfopen" , stringRep emptyArr "empty" , stringRep invEmpty "invempty" ] data ArrowShape = Box | Crow | Diamond | DotArrow | Inv | NoArrow | Normal | Tee | Vee deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowShape where unqtDot Box = unqtDot "box" unqtDot Crow = unqtDot "crow" unqtDot Diamond = unqtDot "diamond" unqtDot DotArrow = unqtDot "dot" unqtDot Inv = unqtDot "inv" unqtDot NoArrow = unqtDot "none" unqtDot Normal = unqtDot "normal" unqtDot Tee = unqtDot "tee" unqtDot Vee = unqtDot "vee" instance ParseDot ArrowShape where parseUnqt = oneOf [ stringRep Box "box" , stringRep Crow "crow" , stringRep Diamond "diamond" , stringRep DotArrow "dot" , stringRep Inv "inv" , stringRep NoArrow "none" , stringRep Normal "normal" , stringRep Tee "tee" , stringRep Vee "vee" ] -- | What modifications to apply to an 'ArrowShape'. data ArrowModifier = ArrMod { arrowFill :: ArrowFill , arrowSide :: ArrowSide } deriving (Eq, Ord, Show, Read) -- | Apply no modifications to an 'ArrowShape'. noMods :: ArrowModifier noMods = ArrMod FilledArrow BothSides -- | 'OpenArrow' and 'BothSides' openMod :: ArrowModifier openMod = ArrMod OpenArrow BothSides instance PrintDot ArrowModifier where unqtDot (ArrMod f s) = unqtDot f <> unqtDot s instance ParseDot ArrowModifier where parseUnqt = do f <- parseUnqt s <- parseUnqt return $ ArrMod f s data ArrowFill = OpenArrow | FilledArrow deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowFill where unqtDot OpenArrow = char 'o' unqtDot FilledArrow = empty instance ParseDot ArrowFill where parseUnqt = liftM (bool FilledArrow OpenArrow . isJust) $ optional (character 'o') -- Not used individually parse = parseUnqt -- | Represents which side (when looking towards the node the arrow is -- pointing to) is drawn. data ArrowSide = LeftSide | RightSide | BothSides deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowSide where unqtDot LeftSide = char 'l' unqtDot RightSide = char 'r' unqtDot BothSides = empty instance ParseDot ArrowSide where parseUnqt = liftM getSideType $ optional (oneOf $ map character ['l', 'r']) where getSideType = maybe BothSides (bool RightSide LeftSide . (==) 'l') -- Not used individually parse = parseUnqt -- ----------------------------------------------------------------------------- data AspectType = RatioOnly Double | RatioPassCount Double Int deriving (Eq, Ord, Show, Read) instance PrintDot AspectType where unqtDot (RatioOnly r) = unqtDot r unqtDot (RatioPassCount r p) = commaDel r p toDot at@RatioOnly{} = unqtDot at toDot at@RatioPassCount{} = doubleQuotes $ unqtDot at instance ParseDot AspectType where parseUnqt = liftM (uncurry RatioPassCount) commaSepUnqt `onFail` liftM RatioOnly parseUnqt parse = quotedParse (liftM (uncurry RatioPassCount) commaSepUnqt) `onFail` liftM RatioOnly parse -- ----------------------------------------------------------------------------- data Rect = Rect Point Point deriving (Eq, Ord, Show, Read) instance PrintDot Rect where unqtDot (Rect p1 p2) = commaDel p1 p2 toDot = doubleQuotes . unqtDot instance ParseDot Rect where parseUnqt = liftM (uncurry Rect) commaSepUnqt parse = quotedParse parseUnqt -- ----------------------------------------------------------------------------- data ClusterMode = Local | Global | NoCluster deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ClusterMode where unqtDot Local = unqtDot "local" unqtDot Global = unqtDot "global" unqtDot NoCluster = unqtDot "none" instance ParseDot ClusterMode where parseUnqt = oneOf [ stringRep Local "local" , stringRep Global "global" , stringRep NoCluster "none" ] -- ----------------------------------------------------------------------------- data DirType = Forward | Back | Both | NoDir deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot DirType where unqtDot Forward = unqtDot "forward" unqtDot Back = unqtDot "back" unqtDot Both = unqtDot "both" unqtDot NoDir = unqtDot "none" instance ParseDot DirType where parseUnqt = oneOf [ stringRep Forward "forward" , stringRep Back "back" , stringRep Both "both" , stringRep NoDir "none" ] -- ----------------------------------------------------------------------------- -- | Only when @mode == 'IpSep'@. data DEConstraints = EdgeConstraints | NoConstraints | HierConstraints deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot DEConstraints where unqtDot EdgeConstraints = unqtDot True unqtDot NoConstraints = unqtDot False unqtDot HierConstraints = text "hier" instance ParseDot DEConstraints where parseUnqt = liftM (bool NoConstraints EdgeConstraints) parse `onFail` stringRep HierConstraints "hier" -- ----------------------------------------------------------------------------- -- | Either a 'Double' or a 'Point'. data DPoint = DVal Double | PVal Point deriving (Eq, Ord, Show, Read) instance PrintDot DPoint where unqtDot (DVal d) = unqtDot d unqtDot (PVal p) = unqtDot p toDot (DVal d) = toDot d toDot (PVal p) = toDot p instance ParseDot DPoint where parseUnqt = liftM PVal parseUnqt `onFail` liftM DVal parseUnqt parse = liftM PVal parse `onFail` liftM DVal parse -- ----------------------------------------------------------------------------- data ModeType = Major | KK | Hier | IpSep deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ModeType where unqtDot Major = text "major" unqtDot KK = text "KK" unqtDot Hier = text "hier" unqtDot IpSep = text "ipsep" instance ParseDot ModeType where parseUnqt = oneOf [ stringRep Major "major" , stringRep KK "KK" , stringRep Hier "hier" , stringRep IpSep "ipsep" ] -- ----------------------------------------------------------------------------- data Model = ShortPath | SubSet | Circuit deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Model where unqtDot ShortPath = text "shortpath" unqtDot SubSet = text "subset" unqtDot Circuit = text "circuit" instance ParseDot Model where parseUnqt = oneOf [ stringRep ShortPath "shortpath" , stringRep SubSet "subset" , stringRep Circuit "circuit" ] -- ----------------------------------------------------------------------------- data Label = StrLabel EscString | URLLabel URL deriving (Eq, Ord, Show, Read) instance PrintDot Label where unqtDot (StrLabel s) = unqtDot s unqtDot (URLLabel u) = unqtDot u toDot (StrLabel s) = toDot s toDot (URLLabel u) = toDot u instance ParseDot Label where parseUnqt = liftM StrLabel parseUnqt `onFail` liftM URLLabel parseUnqt parse = liftM StrLabel parse `onFail` liftM URLLabel parse -- ----------------------------------------------------------------------------- data Point = Point Int Int | PointD Double Double deriving (Eq, Ord, Show, Read) instance PrintDot Point where unqtDot (Point x y) = commaDel x y unqtDot (PointD x y) = commaDel x y toDot = doubleQuotes . unqtDot unqtListToDot = hsep . map unqtDot listToDot = doubleQuotes . unqtListToDot instance ParseDot Point where -- Need to take into account the situation where first value is an -- integer, second a double: if Point parsing first, then it won't -- parse the second number properly; but if PointD first then it -- will treat Int/Int as Double/Double. parseUnqt = intDblPoint `onFail` liftM (uncurry Point) commaSepUnqt `onFail` liftM (uncurry PointD) commaSepUnqt where intDblPoint = liftM (uncurry PointD . first fI) $ commaSep' parseUnqt parseStrictFloat fI :: Int -> Double fI = fromIntegral parse = quotedParse parseUnqt parseUnqtList = sepBy1 parseUnqt whitespace -- ----------------------------------------------------------------------------- data Overlap = KeepOverlaps | RemoveOverlaps | ScaleOverlaps | ScaleXYOverlaps | PrismOverlap (Maybe Int) -- ^ Only when sfdp is available, 'Int' is non-negative | CompressOverlap | VpscOverlap | IpsepOverlap -- ^ Only when @mode == 'IpSep'@ deriving (Eq, Ord, Show, Read) instance PrintDot Overlap where unqtDot KeepOverlaps = unqtDot True unqtDot RemoveOverlaps = unqtDot False unqtDot ScaleOverlaps = text "scale" unqtDot ScaleXYOverlaps = text "scalexy" unqtDot (PrismOverlap i) = maybe id (flip (<>) . unqtDot) i $ text "prism" unqtDot CompressOverlap = text "compress" unqtDot VpscOverlap = text "vpsc" unqtDot IpsepOverlap = text "ipsep" instance ParseDot Overlap where parseUnqt = oneOf [ stringRep KeepOverlaps "true" , stringRep RemoveOverlaps "false" , stringRep ScaleXYOverlaps "scalexy" , stringRep ScaleOverlaps "scale" , string "prism" >> liftM PrismOverlap (optional parse) , stringRep CompressOverlap "compress" , stringRep VpscOverlap "vpsc" , stringRep IpsepOverlap "ipsep" ] -- ----------------------------------------------------------------------------- data LayerRange = LRID LayerID | LRS LayerID String LayerID deriving (Eq, Ord, Show, Read) instance PrintDot LayerRange where unqtDot (LRID lid) = unqtDot lid unqtDot (LRS id1 s id2) = unqtDot id1 <> unqtDot s <> unqtDot id2 toDot (LRID lid) = toDot lid toDot lrs = doubleQuotes $ unqtDot lrs instance ParseDot LayerRange where parseUnqt = do id1 <- parseUnqt s <- parseLayerSep id2 <- parseUnqt return $ LRS id1 s id2 `onFail` liftM LRID parseUnqt parse = quotedParse ( do id1 <- parseUnqt s <- parseLayerSep id2 <- parseUnqt return $ LRS id1 s id2 ) `onFail` liftM LRID parse parseLayerSep :: Parse String parseLayerSep = many1 . oneOf $ map character defLayerSep defLayerSep :: [Char] defLayerSep = [' ', ':', '\t'] parseLayerName :: Parse String parseLayerName = many1 . orQuote $ satisfy (liftM2 (&&) notLayerSep ((/=) quoteChar)) parseLayerName' :: Parse String parseLayerName' = stringBlock `onFail` quotedParse parseLayerName notLayerSep :: Char -> Bool notLayerSep = flip notElem defLayerSep -- | You should not have any quote characters for the 'LRName' option, -- as it won't be parseable. data LayerID = AllLayers | LRInt Int | LRName String deriving (Eq, Ord, Show, Read) instance PrintDot LayerID where unqtDot AllLayers = text "all" unqtDot (LRInt n) = unqtDot n unqtDot (LRName nm) = unqtDot nm toDot (LRName nm) = toDot nm -- Other two don't need quotes toDot li = unqtDot li instance ParseDot LayerID where parseUnqt = liftM checkLayerName parseLayerName -- tests for Int and All parse = oneOf [ liftM checkLayerName parseLayerName' , liftM LRInt parse -- Mainly for unquoted case. ] checkLayerName :: String -> LayerID checkLayerName str = maybe checkAll LRInt $ stringToInt str where checkAll = if map toLower str == "all" then AllLayers else LRName str -- | The list represent (Separator, Name). You should not have any -- quote characters for any of the 'String's, since there are -- parsing problems with them. data LayerList = LL String [(String, String)] deriving (Eq, Ord, Show, Read) instance PrintDot LayerList where unqtDot (LL l1 ols) = unqtDot l1 <> hcat (map subLL ols) where subLL (s, l) = unqtDot s <> unqtDot l toDot (LL l1 []) = toDot l1 -- Might not need quotes, but probably will. toDot ll = doubleQuotes $ unqtDot ll instance ParseDot LayerList where parseUnqt = do l1 <- parseLayerName ols <- many $ do s <- parseLayerSep lnm <- parseLayerName return (s, lnm) return $ LL l1 ols parse = quotedParse parseUnqt `onFail` liftM (flip LL []) (parseLayerName' `onFail` numString) -- ----------------------------------------------------------------------------- data OutputMode = BreadthFirst | NodesFirst | EdgesFirst deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot OutputMode where unqtDot BreadthFirst = text "breadthfirst" unqtDot NodesFirst = text "nodesfirst" unqtDot EdgesFirst = text "edgesfirst" instance ParseDot OutputMode where parseUnqt = oneOf [ stringRep BreadthFirst "breadthfirst" , stringRep NodesFirst "nodesfirst" , stringRep EdgesFirst "edgesfirst" ] -- ----------------------------------------------------------------------------- data Pack = DoPack | DontPack | PackMargin Int -- ^ If non-negative, then packs; otherwise doesn't. deriving (Eq, Ord, Show, Read) instance PrintDot Pack where unqtDot DoPack = unqtDot True unqtDot DontPack = unqtDot False unqtDot (PackMargin m) = unqtDot m instance ParseDot Pack where -- What happens if it parses 0? It's non-negative, but parses as False parseUnqt = oneOf [ liftM PackMargin parseUnqt , liftM (bool DontPack DoPack) onlyBool ] -- ----------------------------------------------------------------------------- data PackMode = PackNode | PackClust | PackGraph | PackArray Bool Bool (Maybe Int) -- ^ Sort by cols, sort -- by user, number of -- rows/cols deriving (Eq, Ord, Show, Read) instance PrintDot PackMode where unqtDot PackNode = text "node" unqtDot PackClust = text "clust" unqtDot PackGraph = text "graph" unqtDot (PackArray c u mi) = addNum . isU . isC . isUnder $ text "array" where addNum = maybe id (flip (<>) . unqtDot) mi isUnder = if c || u then flip (<>) $ char '_' else id isC = if c then flip (<>) $ char 'c' else id isU = if u then flip (<>) $ char 'u' else id instance ParseDot PackMode where parseUnqt = oneOf [ stringRep PackNode "node" , stringRep PackClust "clust" , stringRep PackGraph "graph" , do string "array" mcu <- optional $ do character '_' many1 $ satisfy isCU let c = hasCharacter mcu 'c' u = hasCharacter mcu 'u' mi <- optional parseUnqt return $ PackArray c u mi ] where hasCharacter ms c = maybe False (elem c) ms -- Also checks and removes quote characters isCU = flip elem ['c', 'u'] -- ----------------------------------------------------------------------------- data Pos = PointPos Point | SplinePos [Spline] deriving (Eq, Ord, Show, Read) instance PrintDot Pos where unqtDot (PointPos p) = unqtDot p unqtDot (SplinePos ss) = unqtDot ss toDot (PointPos p) = toDot p toDot (SplinePos ss) = toDot ss instance ParseDot Pos where -- Have to be careful with this: if we try to parse points first, -- then a spline with no start and end points will erroneously get -- parsed as a point and then the parser will crash as it expects -- a closing quote character... parseUnqt = do splns <- parseUnqt case splns of [Spline Nothing Nothing [p]] -> return $ PointPos p _ -> return $ SplinePos splns parse = quotedParse parseUnqt -- ----------------------------------------------------------------------------- -- | Controls how (and if) edges are represented. data EdgeType = SplineEdges | LineEdges | NoEdges | PolyLine | CompoundEdge -- ^ fdp only deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot EdgeType where unqtDot SplineEdges = toDot True unqtDot LineEdges = toDot False unqtDot NoEdges = empty unqtDot PolyLine = text "polyline" unqtDot CompoundEdge = text "compound" toDot NoEdges = doubleQuotes empty toDot et = unqtDot et instance ParseDot EdgeType where -- Can't parse NoEdges without quotes. parseUnqt = oneOf [ liftM (bool LineEdges SplineEdges) parse , stringRep SplineEdges "spline" , stringRep LineEdges "line" , stringRep PolyLine "polyline" , stringRep CompoundEdge "compound" ] parse = stringRep NoEdges "\"\"" `onFail` optionalQuoted parseUnqt -- ----------------------------------------------------------------------------- -- | Upper-case first character is major order; -- lower-case second character is minor order. data PageDir = Bl | Br | Tl | Tr | Rb | Rt | Lb | Lt deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot PageDir where unqtDot Bl = text "BL" unqtDot Br = text "BR" unqtDot Tl = text "TL" unqtDot Tr = text "TR" unqtDot Rb = text "RB" unqtDot Rt = text "RT" unqtDot Lb = text "LB" unqtDot Lt = text "LT" instance ParseDot PageDir where parseUnqt = oneOf [ stringRep Bl "BL" , stringRep Br "BR" , stringRep Tl "TL" , stringRep Tr "TR" , stringRep Rb "RB" , stringRep Rt "RT" , stringRep Lb "LB" , stringRep Lt "LT" ] -- ----------------------------------------------------------------------------- -- | The number of points in the list must be equivalent to 1 mod 3; -- note that this is not checked. data Spline = Spline (Maybe Point) (Maybe Point) [Point] deriving (Eq, Ord, Show, Read) instance PrintDot Spline where unqtDot (Spline ms me ps) = addS . addE . hsep $ map unqtDot ps where addP t = maybe id ((<+>) . commaDel t) addS = addP 's' ms addE = addP 'e' me toDot = doubleQuotes . unqtDot unqtListToDot = hcat . punctuate semi . map unqtDot listToDot = doubleQuotes . unqtListToDot instance ParseDot Spline where parseUnqt = do ms <- parseP 's' me <- parseP 'e' ps <- sepBy1 parseUnqt whitespace return $ Spline ms me ps where parseP t = optional $ do character t parseComma parseUnqt `discard` whitespace parse = quotedParse parseUnqt parseUnqtList = sepBy1 parseUnqt (character ';') -- ----------------------------------------------------------------------------- data QuadType = NormalQT | FastQT | NoQT deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot QuadType where unqtDot NormalQT = text "normal" unqtDot FastQT = text "fast" unqtDot NoQT = text "none" instance ParseDot QuadType where -- Have to take into account the slightly different interpretation -- of Bool used as an option for parsing QuadType parseUnqt = oneOf [ stringRep NormalQT "normal" , stringRep FastQT "fast" , stringRep NoQT "none" , character '2' >> return FastQT -- weird bool , liftM (bool NoQT NormalQT) parse ] -- ----------------------------------------------------------------------------- -- | Specify the root node either as a Node attribute or a Graph attribute. data Root = IsCentral -- ^ For Nodes only | NotCentral -- ^ For Nodes only | NodeName String -- ^ For Graphs only deriving (Eq, Ord, Show, Read) instance PrintDot Root where unqtDot IsCentral = unqtDot True unqtDot NotCentral = unqtDot False unqtDot (NodeName n) = unqtDot n toDot (NodeName n) = toDot n toDot r = unqtDot r instance ParseDot Root where parseUnqt = liftM (bool NotCentral IsCentral) onlyBool `onFail` liftM NodeName parseUnqt parse = optionalQuoted (liftM (bool NotCentral IsCentral) onlyBool) `onFail` liftM NodeName parse -- ----------------------------------------------------------------------------- data RankType = SameRank | MinRank | SourceRank | MaxRank | SinkRank deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot RankType where unqtDot SameRank = text "same" unqtDot MinRank = text "min" unqtDot SourceRank = text "source" unqtDot MaxRank = text "max" unqtDot SinkRank = text "sink" instance ParseDot RankType where parseUnqt = oneOf [ stringRep SameRank "same" , stringRep MinRank "min" , stringRep SourceRank "source" , stringRep MaxRank "max" , stringRep SinkRank "sink" ] -- ----------------------------------------------------------------------------- data RankDir = FromTop | FromLeft | FromBottom | FromRight deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot RankDir where unqtDot FromTop = text "TB" unqtDot FromLeft = text "LR" unqtDot FromBottom = text "BT" unqtDot FromRight = text "RL" instance ParseDot RankDir where parseUnqt = oneOf [ stringRep FromTop "TB" , stringRep FromLeft "LR" , stringRep FromBottom "BT" , stringRep FromRight "RL" ] -- ----------------------------------------------------------------------------- data Shape = BoxShape -- ^ Has synonyms of /rect/ and /rectangle/. | Polygon | Ellipse | Circle | PointShape | Egg | Triangle | PlainText -- ^ Has synonym of /none/. | DiamondShape | Trapezium | Parallelogram | House | Pentagon | Hexagon | Septagon | Octagon | DoubleCircle | DoubleOctagon | TripleOctagon | InvTriangle | InvTrapezium | InvHouse | MDiamond | MSquare | MCircle | Note | Tab | Folder | Box3D | Component deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Shape where unqtDot BoxShape = text "box" unqtDot Polygon = text "polygon" unqtDot Ellipse = text "ellipse" unqtDot Circle = text "circle" unqtDot PointShape = text "point" unqtDot Egg = text "egg" unqtDot Triangle = text "triangle" unqtDot PlainText = text "plaintext" unqtDot DiamondShape = text "diamond" unqtDot Trapezium = text "trapezium" unqtDot Parallelogram = text "parallelogram" unqtDot House = text "house" unqtDot Pentagon = text "pentagon" unqtDot Hexagon = text "hexagon" unqtDot Septagon = text "septagon" unqtDot Octagon = text "octagon" unqtDot DoubleCircle = text "doublecircle" unqtDot DoubleOctagon = text "doubleoctagon" unqtDot TripleOctagon = text "tripleoctagon" unqtDot InvTriangle = text "invtriangle" unqtDot InvTrapezium = text "invtrapezium" unqtDot InvHouse = text "invhouse" unqtDot MDiamond = text "Mdiamond" unqtDot MSquare = text "Msquare" unqtDot MCircle = text "Mcircle" unqtDot Note = text "note" unqtDot Tab = text "tab" unqtDot Folder = text "folder" unqtDot Box3D = text "box3d" unqtDot Component = text "component" instance ParseDot Shape where parseUnqt = oneOf [ stringRep Box3D "box3d" -- Parse this before "box" , stringReps BoxShape ["box","rectangle","rect"] , stringRep Polygon "polygon" , stringRep Ellipse "ellipse" , stringRep Circle "circle" , stringRep PointShape "point" , stringRep Egg "egg" , stringRep Triangle "triangle" , stringReps PlainText ["plaintext","none"] , stringRep DiamondShape "diamond" , stringRep Trapezium "trapezium" , stringRep Parallelogram "parallelogram" , stringRep House "house" , stringRep Pentagon "pentagon" , stringRep Hexagon "hexagon" , stringRep Septagon "septagon" , stringRep Octagon "octagon" , stringRep DoubleCircle "doublecircle" , stringRep DoubleOctagon "doubleoctagon" , stringRep TripleOctagon "tripleoctagon" , stringRep InvTriangle "invtriangle" , stringRep InvTrapezium "invtrapezium" , stringRep InvHouse "invhouse" , stringRep MDiamond "Mdiamond" , stringRep MSquare "Msquare" , stringRep MCircle "Mcircle" , stringRep Note "note" , stringRep Tab "tab" , stringRep Folder "folder" , stringRep Component "component" ] -- ----------------------------------------------------------------------------- data SmoothType = NoSmooth | AvgDist | GraphDist | PowerDist | RNG | Spring | TriangleSmooth deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot SmoothType where unqtDot NoSmooth = text "none" unqtDot AvgDist = text "avg_dist" unqtDot GraphDist = text "graph_dist" unqtDot PowerDist = text "power_dist" unqtDot RNG = text "rng" unqtDot Spring = text "spring" unqtDot TriangleSmooth = text "triangle" instance ParseDot SmoothType where parseUnqt = oneOf [ stringRep NoSmooth "none" , stringRep AvgDist "avg_dist" , stringRep GraphDist "graph_dist" , stringRep PowerDist "power_dist" , stringRep RNG "rng" , stringRep Spring "spring" , stringRep TriangleSmooth "triangle" ] -- ----------------------------------------------------------------------------- data StartType = StartStyle STStyle | StartSeed Int | StartStyleSeed STStyle Int deriving (Eq, Ord, Show, Read) instance PrintDot StartType where unqtDot (StartStyle ss) = unqtDot ss unqtDot (StartSeed s) = unqtDot s unqtDot (StartStyleSeed ss s) = unqtDot ss <> unqtDot s instance ParseDot StartType where parseUnqt = oneOf [ do ss <- parseUnqt s <- parseUnqt return $ StartStyleSeed ss s , liftM StartStyle parseUnqt , liftM StartSeed parseUnqt ] data STStyle = RegularStyle | SelfStyle | RandomStyle deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot STStyle where unqtDot RegularStyle = text "regular" unqtDot SelfStyle = text "self" unqtDot RandomStyle = text "random" instance ParseDot STStyle where parseUnqt = oneOf [ stringRep RegularStyle "regular" , stringRep SelfStyle "self" , stringRep RandomStyle "random" ] -- ----------------------------------------------------------------------------- data StyleItem = SItem StyleName [String] deriving (Eq, Ord, Show, Read) instance PrintDot StyleItem where unqtDot (SItem nm args) | null args = dnm | otherwise = dnm <> parens args' where dnm = unqtDot nm args' = hcat . punctuate comma $ map unqtDot args toDot si@(SItem nm args) | null args = toDot nm | otherwise = doubleQuotes $ unqtDot si unqtListToDot = hcat . punctuate comma . map unqtDot listToDot [SItem nm []] = toDot nm listToDot sis = doubleQuotes $ unqtListToDot sis instance ParseDot StyleItem where parseUnqt = do nm <- parseUnqt args <- tryParseList' parseArgs return $ SItem nm args parse = quotedParse (liftM2 SItem parseUnqt parseArgs) `onFail` liftM (flip SItem []) parse parseUnqtList = sepBy1 parseUnqt parseComma parseList = quotedParse parseUnqtList `onFail` -- Might not necessarily need to be quoted if a singleton... liftM return parse parseArgs :: Parse [String] parseArgs = bracketSep (character '(') parseComma (character ')') parseStyleName data StyleName = Dashed -- ^ Nodes and Edges | Dotted -- ^ Nodes and Edges | Solid -- ^ Nodes and Edges | Bold -- ^ Nodes and Edges | Invisible -- ^ Nodes and Edges | Filled -- ^ Nodes and Clusters | Diagonals -- ^ Nodes only | Rounded -- ^ Nodes and Clusters | DD String -- ^ Device Dependent deriving (Eq, Ord, Show, Read) instance PrintDot StyleName where unqtDot Dashed = text "dashed" unqtDot Dotted = text "dotted" unqtDot Solid = text "solid" unqtDot Bold = text "bold" unqtDot Invisible = text "invis" unqtDot Filled = text "filled" unqtDot Diagonals = text "diagonals" unqtDot Rounded = text "rounded" unqtDot (DD nm) = unqtDot nm toDot (DD nm) = toDot nm toDot sn = unqtDot sn instance ParseDot StyleName where parseUnqt = liftM checkDD parseStyleName parse = liftM checkDD $ quotedParse parseStyleName `onFail` -- In case a singleton DD is at the end of an attribute list. do f <- orQuote $ noneOf [quoteChar, '(', ')', ',', ' ', ']'] r <- many (orQuote $ noneOf [quoteChar, '(', ')', ',', ']']) return $ f:r checkDD :: String -> StyleName checkDD str = case map toLower str of "dashed" -> Dashed "dotted" -> Dotted "solid" -> Solid "bold" -> Bold "invis" -> Invisible "filled" -> Filled "diagonals" -> Diagonals "rounded" -> Rounded _ -> DD str parseStyleName :: Parse String parseStyleName = do f <- orQuote $ noneOf [quoteChar, '(', ')', ',', ' '] r <- many (orQuote $ noneOf [quoteChar, '(', ')', ',']) return $ f:r -- ----------------------------------------------------------------------------- newtype PortPos = PP CompassPoint deriving (Eq, Ord, Show, Read) instance PrintDot PortPos where unqtDot (PP cp) = unqtDot cp toDot (PP cp) = toDot cp instance ParseDot PortPos where parseUnqt = liftM PP parseUnqt data CompassPoint = North | NorthEast | East | SouthEast | South | SouthWest | West | NorthWest | CenterPoint | NoCP deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot CompassPoint where unqtDot NorthEast = text "ne" unqtDot NorthWest = text "nw" unqtDot North = text "n" unqtDot East = text "e" unqtDot SouthEast = text "se" unqtDot SouthWest = text "sw" unqtDot South = text "s" unqtDot West = text "w" unqtDot CenterPoint = text "c" unqtDot NoCP = text "_" instance ParseDot CompassPoint where -- Have to take care of longer parsing values first. parseUnqt = oneOf [ stringRep NorthEast "ne" , stringRep NorthWest "nw" , stringRep North "n" , stringRep SouthEast "se" , stringRep SouthWest "sw" , stringRep South "s" , stringRep East "e" , stringRep West "w" , stringRep CenterPoint "c" , stringRep NoCP "_" ] -- ----------------------------------------------------------------------------- data ViewPort = VP { wVal :: Double , hVal :: Double , zVal :: Double , focus :: Maybe FocusType } deriving (Eq, Ord, Show, Read) instance PrintDot ViewPort where unqtDot vp = maybe vs ((<>) (vs <> comma) . unqtDot) $ focus vp where vs = hcat . punctuate comma $ map (unqtDot . flip ($) vp) [wVal, hVal, zVal] toDot = doubleQuotes . unqtDot instance ParseDot ViewPort where parseUnqt = do wv <- parseUnqt parseComma hv <- parseUnqt parseComma zv <- parseUnqt mf <- optional $ parseComma >> parseUnqt return $ VP wv hv zv mf parse = quotedParse parseUnqt data FocusType = XY Point | NodeFocus String deriving (Eq, Ord, Show, Read) instance PrintDot FocusType where unqtDot (XY p) = unqtDot p unqtDot (NodeFocus nm) = unqtDot nm toDot (XY p) = toDot p toDot (NodeFocus nm) = toDot nm instance ParseDot FocusType where parseUnqt = liftM XY parseUnqt `onFail` liftM NodeFocus parseUnqt parse = liftM XY parse `onFail` liftM NodeFocus parse -- ----------------------------------------------------------------------------- data VerticalPlacement = VTop | VCenter -- ^ Only valid for Nodes. | VBottom deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot VerticalPlacement where unqtDot VTop = char 't' unqtDot VCenter = char 'c' unqtDot VBottom = char 'b' instance ParseDot VerticalPlacement where parseUnqt = oneOf [ stringRep VTop "t" , stringRep VCenter "c" , stringRep VBottom "b" ] -- ----------------------------------------------------------------------------- data ScaleType = UniformScale | NoScale | FillWidth | FillHeight | FillBoth deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ScaleType where unqtDot UniformScale = unqtDot True unqtDot NoScale = unqtDot False unqtDot FillWidth = text "width" unqtDot FillHeight = text "height" unqtDot FillBoth = text "both" instance ParseDot ScaleType where parseUnqt = oneOf [ stringRep UniformScale "true" , stringRep NoScale "false" , stringRep FillWidth "width" , stringRep FillHeight "height" , stringRep FillBoth "both" ] -- ----------------------------------------------------------------------------- data Justification = JLeft | JRight | JCenter deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Justification where unqtDot JLeft = char 'l' unqtDot JRight = char 'r' unqtDot JCenter = char 'c' instance ParseDot Justification where parseUnqt = oneOf [ stringRep JLeft "l" , stringRep JRight "r" , stringRep JCenter "c" ] -- ----------------------------------------------------------------------------- data Ratios = AspectRatio Double | FillRatio | CompressRatio | ExpandRatio | AutoRatio deriving (Eq, Ord, Show, Read) instance PrintDot Ratios where unqtDot (AspectRatio r) = unqtDot r unqtDot FillRatio = text "fill" unqtDot CompressRatio = text "compress" unqtDot ExpandRatio = text "expand" unqtDot AutoRatio = text "auto" instance ParseDot Ratios where parseUnqt = oneOf [ liftM AspectRatio parseUnqt , stringRep FillRatio "fill" , stringRep CompressRatio "compress" , stringRep ExpandRatio "expand" , stringRep AutoRatio "auto" ] haskell-src-exts-1.23.1/tests/examples/ArityMismatch.hs0000644000000000000000000000010313534314632021245 0ustar0000000000000000module ArityMismatch where foo a b = 1 foo a = 2 bar = 1 baz = 2 haskell-src-exts-1.23.1/tests/examples/TrailingWhere.hs0000644000000000000000000000007513534314633021244 0ustar0000000000000000fail = x where broken = 24 where x = 413 haskell-src-exts-1.23.1/tests/examples/ParallelArrays2.hs0000644000000000000000000000021513534314633021474 0ustar0000000000000000-- Should fail without extensions. dotp_double :: [:Double:] -> [:Double:] -> Double dotp_double xs ys = sumP [:x * y | x <- xs | y <- ys:] haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces4.hs0000644000000000000000000000016113534314633022341 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} {-# LANGUAGE TypeOperators #-} module Foo (type (:-)) where data (:-) = Foo haskell-src-exts-1.23.1/tests/examples/PatternSynonyms2.hs0000644000000000000000000000042613534314633021757 0ustar0000000000000000{-# LANGUAGE PatternSynonyms, ScopedTypeVariables, KindSignatures #-} module Foo (pattern Single) where pattern Single x <- [x] where Single 4 = [x] Single 5 = [x] pattern Double x = [x] single :: [a] -> Maybe a single (Single x) = Just x single _ = Nothing haskell-src-exts-1.23.1/tests/examples/SpecializeInstance.hs0000644000000000000000000000032013534314633022246 0ustar0000000000000000instance Sized a => Sized (Digit a) where {-# SPECIALIZE instance Sized (Digit (Elem a)) #-} {-# SPECIALIZE instance Sized (Digit (Node a)) #-} size xs = foldl (\ i x -> i + size x) 0 xs haskell-src-exts-1.23.1/tests/examples/EmptyList.hs0000644000000000000000000000004413534314633020426 0ustar0000000000000000module EmptyList where eAttrs = [] haskell-src-exts-1.23.1/tests/examples/BangPatterns.hs0000644000000000000000000000044013534314632021063 0ustar0000000000000000{-# LANGUAGE BangPatterns #-} module BangPatterns where firstnonspace :: Ptr Word8 -> Int -> Int -> IO Int firstnonspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if isSpaceWord8 w then firstnonspace ptr (n+1) m else return n haskell-src-exts-1.23.1/tests/examples/PatternSynonyms.hs0000644000000000000000000000031713534314633021674 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern A = Nothing pattern B a = Just a pattern a :+: b = (a,b) pattern Tuple a b = (a,b) pattern A = Nothing pattern B a = Just a pattern a :+: b = (a,b) haskell-src-exts-1.23.1/tests/examples/ClosedTypeFamily.hs0000644000000000000000000000020413534314632021706 0ustar0000000000000000{-# LANGUAGE TypeFamilies, DataKinds #-} module ClosedTypeFamily where type family Eq x y where Eq x x = True Eq x y = False haskell-src-exts-1.23.1/tests/examples/InfixFunBind.hs0000644000000000000000000000002613534314633021017 0ustar0000000000000000left `first` _ = left haskell-src-exts-1.23.1/tests/examples/DataHeadParen.hs0000644000000000000000000000012213534314632021111 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} module DataHeadParen where data (a1 :< a2) = Foo haskell-src-exts-1.23.1/tests/examples/TensorTests.hs0000644000000000000000000000124213534314633020772 0ustar0000000000000000{-# LANGUAGE ConstraintKinds, FlexibleContexts, DataKinds, NoImplicitPrelude, RebindableSyntax, ScopedTypeVariables, TypeFamilies, TypeOperators, UndecidableInstances #-} module TensorTests (tensorTests) where type TMRParams = ( '(,) <$> Tensors) <*> MRCombos tmrParams :: Proxy TMRParams tmrParams = Proxy --type ExtParams = ( '(,) <$> Tensors) <*> MRExtCombos type TrEmParams = ( '(,) <$> Tensors) <*> MM'RCombos tremParams :: Proxy TrEmParams tremParams = Proxy type NormParams = ( '(,) <$> '[RT]) <*> (Filter Liftable MRCombos) --data Liftable :: TyFun (Factored, *) Bool -> * type instance Apply Liftable '(m,zq) = Int64 :== (LiftOf zq) haskell-src-exts-1.23.1/tests/examples/IndentedModule2.hs0000644000000000000000000000011413534314633021454 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} {- -} module Main where main = putStr "foo" haskell-src-exts-1.23.1/tests/examples/THTypes.hs0000644000000000000000000000034213534314633020035 0ustar0000000000000000{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE QuasiQuotes #-} module THTypes where import Language.Haskell.TH x :: DecsQ x = [d| instance Show $(conT (mkName "Int")) |] unit x = [t| $x |] haskell-src-exts-1.23.1/tests/examples/ReadP.hs0000644000000000000000000000012213534314633017464 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} newtype ReadP a = R (forall b . (a -> P b) -> P b) haskell-src-exts-1.23.1/tests/examples/Unicode2.hs0000644000000000000000000000007313534314633020146 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} lengthOP n (⊜) = 0 ⊜ n haskell-src-exts-1.23.1/tests/examples/ImplicitWhereBlocks.hs0000644000000000000000000000006213534314633022377 0ustar0000000000000000foo = x where x = 1 z = 19 y = 2 haskell-src-exts-1.23.1/tests/examples/DerivingViaStealing.hs0000644000000000000000000000010413534314632022366 0ustar0000000000000000module DerivingViaStealing where via = () stock = () anyclass = () haskell-src-exts-1.23.1/tests/examples/PatternSynonyms3.hs0000644000000000000000000000230313534314633021754 0ustar0000000000000000{-# LANGUAGE PatternSynonyms, BangPatterns, PolyKinds, DataKinds, GADTs, FlexibleContexts, ViewPatterns #-} {-# LANGUAGE ExplicitForAll #-} pattern Single x <- [x] single :: [a] -> Maybe a single (Single x) = Just x single _ = Nothing pattern Single :: a -> [a] pattern Single x = [x] pattern Single :: () => (Show a) => a -> [a] pattern Single x = [x] f :: (Show a) => [a] -> a f (Single x) = x pattern SinglePair :: (a, a) -> [(a, a)] pattern SinglePair x = [x] f :: (Show a) => [(a, a)] -> String f (SinglePair x) = show x pattern Q = D pattern C :: a -> X Maybe (Maybe a) pattern C x = Y (Just x) pattern Syn :: forall a b c . () => () => Int pattern C :: (Show (a, Bool)) => a -> X Maybe (Maybe (a, Bool)) pattern C x = Y (Just (x, True)) pattern P :: T Bool b pattern P <- MkT True pattern D :: a -> T (Maybe a) Bool pattern D x = MkT (Just x) pattern P a b = Just (a, b) pattern Single x = [x] pattern a :+: b = (a, b) pattern P x <- MkT 42 x pattern P x y <- MkT x y pattern P x <- MkT (f -> True) x data T where MkT :: b -> (b -> Bool) -> T pattern P x f <- MkT x f pattern Single x <- [x] pattern P <- Just True pattern P = 42 pattern P = () pattern Single x <- [x] haskell-src-exts-1.23.1/tests/examples/EmptyFunDepPremise.hs0000644000000000000000000000013213534314633022217 0ustar0000000000000000{-# LANGUAGE FunctionalDependencies #-} module EmptyFunDepPremise where class C a | -> a haskell-src-exts-1.23.1/tests/examples/ParallelListComp.hs0000644000000000000000000000014113534314633021701 0ustar0000000000000000{-# LANGUAGE ParallelListComp #-} f xs ys zs = [ (x,y,z) | x <- xs | y <- ys, y > 2 | z <- zs ] haskell-src-exts-1.23.1/tests/examples/RecordPuns.hs0000644000000000000000000000012713534314633020562 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} module RecordPuns where cotile = tile {Kind.ospeedup} haskell-src-exts-1.23.1/tests/examples/IfThenElseLayout.hs0000644000000000000000000000076213534314633021667 0ustar0000000000000000{-# LANGUAGE DoAndIfThenElse #-} module IfThenElseLayout where askCardsForExchange :: Hand -> IO [Card] askCardsForExchange h = do putStrLn "Wich card do you want to exchange? (Max. 3)" response <- getLine if length (readCards response) > 3 || not (all (flip elem h) h) then askCardsForExchange h else return (readCards response) haskell-src-exts-1.23.1/tests/examples/Bug.hs0000644000000000000000000000007613534314632017215 0ustar0000000000000000import Test.QuickCheck -- prop_susShortest = 2 > 1 ==> 1 /= 2 haskell-src-exts-1.23.1/tests/examples/PackageImports.hs0000644000000000000000000000021713534314633021407 0ustar0000000000000000{-# LANGUAGE PackageImports #-} module PackageImports where import "wibble" PackageImports.Default import "wibble" PackageImports.Builtin.All haskell-src-exts-1.23.1/tests/examples/ScopedTypeVariables.hs0000644000000000000000000000034113534314633022404 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} test :: IO Char test = do x :: Char <- getChar return x value :: String = "Hello" forallTest :: forall x . Eq x => x -> x forallTest x = if x == x then (undefined :: x) else x haskell-src-exts-1.23.1/tests/examples/RelaxedDo.hs0000644000000000000000000000045113534314633020345 0ustar0000000000000000{-# LANGUAGE NondecreasingIndentation #-} module Main where import Control.Monad main :: IO () main = do when ( 2 > 1) $ do putStrLn "a" putStrLn "b" nestedDoBlocks = getChar >>= (\c1 -> do getChar >>= (\c2 -> do getChar >>= (\c3 -> return [c1,c2,c3]))) haskell-src-exts-1.23.1/tests/examples/RoleAnnotations2.hs0000644000000000000000000000021313534314633021673 0ustar0000000000000000{-# LANGUAGE RoleAnnotations #-} data Foo a = Foo a type role Foo representational main = print $ foo 1 foo :: Int -> Int foo role = 42 haskell-src-exts-1.23.1/tests/examples/MultiCtxt.hs0000644000000000000000000000016213534314633020432 0ustar0000000000000000{-# LANGUAGE RankNTypes #-} module MultiCtxt where multipleCtx :: Eq a => (Show a => a) multipleCtx = undefined haskell-src-exts-1.23.1/tests/examples/T11727.hs0000644000000000000000000000014713534314633017305 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module T11727 where pattern A,B :: Int pattern A = 5 pattern B = 5 haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces1.hs0000644000000000000000000000031513534314633022337 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} import Data.Array.Repa ( type (++) ) import Data.Array.Repa ( type {- comment here -} (++) ) import Data.Array.Repa ( type {- comment2 here -} (++) {- and here -} ) haskell-src-exts-1.23.1/tests/examples/UnicodeArrow.hs0000644000000000000000000000026713534314633021104 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} arrowTest ∷ String → String arrowTest input = case input of "hello" → "world" "world" → "hello" otherwise → "unknow" haskell-src-exts-1.23.1/tests/examples/MagicHashN.hs0000644000000000000000000000015113534314633020435 0ustar0000000000000000{-# LANGUAGE MagicHash #-} module MagicHashN where a# = 1 b## = 2 c### = 3 main = print (a#, b##, c###) haskell-src-exts-1.23.1/tests/examples/UnicodeSuperscript.hs0000644000000000000000000000022513534314633022327 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} dumy ∷ Double → Double → Double dumy a b = let a² = a ★ a b² = b ★ b in sqrt $ a² + b² haskell-src-exts-1.23.1/tests/examples/ConstraintKinds.hs0000644000000000000000000000032013534314632021605 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} class Foo a where data Bar a type Bazable a b = (Bar a ~ Maybe b) baz :: Bazable a b => a -> a baz = id haskell-src-exts-1.23.1/tests/examples/QuasiQuoteOld.hs0000644000000000000000000000020513534314633021232 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import Here str :: String str = [$here|test test test test |] main :: IO() main = do putStrLn str haskell-src-exts-1.23.1/tests/examples/TypeFunctions.hs0000644000000000000000000000017613534314633021314 0ustar0000000000000000{-# LANGUAGE TypeFamilies, KindSignatures #-} data Id = Id type family Rep (f :: * -> *) x :: * type instance Rep Id x = x haskell-src-exts-1.23.1/tests/examples/UnindentedPragmaClose.hs0000644000000000000000000000006613534314633022713 0ustar0000000000000000{-# LANGUAGE MultiParamTypeClasses #-} f :: Int f = 4 haskell-src-exts-1.23.1/tests/examples/TabWhitespace.hs0000644000000000000000000000000713534314633021216 0ustar0000000000000000 -- hi haskell-src-exts-1.23.1/tests/examples/NPlusK.hs0000644000000000000000000000005513534314633017652 0ustar0000000000000000{-# LANGUAGE NPlusKPatterns #-} f (n+3) = n haskell-src-exts-1.23.1/tests/examples/IndentedWhereBlock.hs0000644000000000000000000000030313534314633022172 0ustar0000000000000000module Graph where countryLookUp :: String -> Graph -> Maybe Int countryLookUp country graph = indexOf country graph where indexOf :: String -> Graph -> Maybe Int indexOf _ Empty = Nothing haskell-src-exts-1.23.1/tests/examples/QuasiQuoteQual2.hs0000644000000000000000000000006313534314633021502 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} f [True] = 1 f _ = 0 haskell-src-exts-1.23.1/tests/examples/CApiFFI.hs0000644000000000000000000000004513534314632017635 0ustar0000000000000000{-# LANGUAGE CApiFFI #-} foo = capi haskell-src-exts-1.23.1/tests/examples/brackets.hs0000644000000000000000000000161013534314633020272 0ustar0000000000000000{-# LANGUAGE Arrows #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE UnicodeSyntax #-} -- See Trac #10162 and #11743 for details module ShouldCompile where import Control.Arrow import Language.Haskell.TH handle :: ArrowPlus a => a (b,s) c -> a (b,(String,s)) c -> a (b,s) c handle f h = proc (b,s) -> (f -< (b,s)) <+> (h -< (b,("FAIL",s))) f :: ArrowPlus a => a (Int,Int) String f = proc (x,y) -> ⦇handle (returnA -< show y) (\s -> returnA -< s ++ show x) ⦈ g :: ArrowPlus a => a (Int,Int) String g = proc (x,y) -> ⦇handle (\msg -> returnA -< msg ++ show y) (\s msg -> returnA -< s ++ show x) ⦈ ("hello " ++ show x) h :: ArrowPlus a => a (Int,Int) Int h = proc (x,y) -> ( (\z -> returnA -< x + z) <+> (\z -> returnA -< y + z) ) (x*y) matches :: PatQ -> ExpQ matches pat = ⟦\x -> case x of $pat -> True _ -> False ⟧ haskell-src-exts-1.23.1/tests/examples/QualifiedQQuote.hs0000644000000000000000000000014413534314633021537 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import qualified Language.Haskell.TH as T x :: T.DecsQ x = [T.d|id|] haskell-src-exts-1.23.1/tests/examples/ConstraintKinds2.hs0000644000000000000000000000017713534314632021701 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE RankNTypes #-} data Dict p where Dict :: p => Dict p haskell-src-exts-1.23.1/tests/examples/THTSplices.hs0000644000000000000000000000013513534314633020457 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} import Language.Haskell.TH main = undefined :: $(undefined) haskell-src-exts-1.23.1/tests/examples/RecursiveDo.hs0000644000000000000000000000014113534314633020724 0ustar0000000000000000{-# LANGUAGE RecursiveDo #-} justOnes = do rec xs <- Just (1:xs) return (map negate xs) haskell-src-exts-1.23.1/tests/examples/List2.hs0000644000000000000000000000200013534314633017463 0ustar0000000000000000{-# LANGUAGE TypeFamilyDependencies #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} {-# LANGUAGE UndecidableInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE GADTs #-} ----------------------------------------------------------------------------- -- | -- Module : Type.Family.List -- Copyright : Copyright (C) 2015 Kyle Carter -- License : BSD3 -- -- Maintainer : Kyle Carter -- Stability : experimental -- Portability : RankNTypes -- -- Convenient aliases and type families for working with -- type-level lists. ---------------------------------------------------------------------------- module Type.Family.List where type Ø = '[] type (:<) = '(:) infixr 5 :< haskell-src-exts-1.23.1/tests/examples/IndentedTopLevelWhere.hs0000644000000000000000000000012513534314633022674 0ustar0000000000000000module IndentedTopLevelWhere where foo :: Int foo = 5 where bar :: Int bar = 3 haskell-src-exts-1.23.1/tests/examples/TypeOperatorsTest.hs0000644000000000000000000000016013534314633022153 0ustar0000000000000000{-# LANGUAGE TypeOperators, FlexibleContexts, FlexibleInstances #-} f :: ArrowXml (~>) => a ~> a f = undefined haskell-src-exts-1.23.1/tests/examples/PatternSynonymImport.hs0000644000000000000000000000017013534314633022701 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module Main (pattern Foo, pattern (:>)) where import Foo (pattern Foo, pattern (:>)) haskell-src-exts-1.23.1/tests/examples/FamilyKindSig.hs0000644000000000000000000000014013534314633021163 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} module FamilyKindSig where type family WithKindSig (a :: * -> *) haskell-src-exts-1.23.1/tests/examples/OptionsPragma.hs0000644000000000000000000000004313534314633021256 0ustar0000000000000000{-# OPTIONS -fno-warn-orphans #-} haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsBad.hs0000644000000000000000000000013013534314632022022 0ustar0000000000000000-- Missing binary literals extension. Should fail. f :: Int -> () f 0b0 = () f _ = () haskell-src-exts-1.23.1/tests/examples/PatSynFix.hs0000644000000000000000000000017313534314633020364 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern A <- (True, True) where A = (not $ False && True, True) exp = not $ False && True haskell-src-exts-1.23.1/tests/examples/GroupKeyword.hs0000644000000000000000000000014613534314633021140 0ustar0000000000000000-- {-# LANGUAGE TransformListComp #-} module GroupKeyword where a = map head $ group $ sort [1..100] haskell-src-exts-1.23.1/tests/examples/SpecializePhaseControl.hs0000644000000000000000000000064613534314633023116 0ustar0000000000000000{-# SPECIALISE [1] x :: Integer -> Integer -> Integer, Integer -> Int -> Integer, Int -> Int -> Int #-} {-# INLINABLE [1] x #-} x :: (Num a, Integral b) => a -> b -> a x = undefined {-# SPECIALISE INLINE [999] y :: Integer -> Integer -> Integer, Integer -> Int -> Integer, Int -> Int -> Int #-} {-# INLINABLE [1] y #-} y :: (Num a, Integral b) => a -> b -> a y = undefined haskell-src-exts-1.23.1/tests/examples/RCategory2.hs0000644000000000000000000000020613534314633020455 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds #-} import GHC.Prim class RCategory cat where type RCategoryCtxt cat a b :: Constraint haskell-src-exts-1.23.1/tests/examples/Rules.hs0000644000000000000000000000015113534314633017565 0ustar0000000000000000{-# RULES "head/build" forall (g::forall b.(a->b->b)->b->b) . head (build g) = g (\x _ -> x) badHead #-} haskell-src-exts-1.23.1/tests/examples/NonDecreasing.hs0000644000000000000000000000025513534314633021217 0ustar0000000000000000module NonDecreasing where -- This should not work unless NondecreasingIndentation is -- on (which is is by default in GHC) main = do print 16 do print 17 print 18 haskell-src-exts-1.23.1/tests/examples/SingleClassAsst.hs0000644000000000000000000000006513534314633021541 0ustar0000000000000000module Test where foo :: (Eq a) => a -> a foo x = x haskell-src-exts-1.23.1/tests/examples/Vta2.hs0000644000000000000000000000061613534314633017315 0ustar0000000000000000{-# LANGUAGE RankNTypes, TypeApplications #-} module Vta2 where checkIf :: Bool -> (forall a. a -> a) -> (Bool, Int) checkIf _ = if True then \f -> (f True, f 5) else \f -> (f False, f @Int 3) checkCase :: Bool -> (forall a. a -> a) -> (Bool, Int) checkCase _ = case True of True -> \f -> (f True, f 5) False -> \f -> (f False, f @Int 3) haskell-src-exts-1.23.1/tests/examples/TupleSections.hs0000644000000000000000000000006213534314633021275 0ustar0000000000000000{-# LANGUAGE TupleSections #-} foo x = (1,,) x 3 haskell-src-exts-1.23.1/tests/examples/TypeEqualityParen.hs0000644000000000000000000000011313534314633022116 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} f :: ( Eq a, (a ~ Int) ) => a -> Int f _ = 3 haskell-src-exts-1.23.1/tests/examples/TySplice3.hs0000644000000000000000000000005113534314633020311 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} [qq| abc |] haskell-src-exts-1.23.1/tests/examples/ContextOrdering.hs0000644000000000000000000000013513534314632021612 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} module ContextOrdering where foo :: (x m a) => Int foo = 5 haskell-src-exts-1.23.1/tests/examples/GADTRecord.hs0000644000000000000000000000010213534314633020345 0ustar0000000000000000{-# LANGUAGE GADTs #-} data T where T :: { field :: Int } -> T haskell-src-exts-1.23.1/tests/examples/PolyKindSigs.hs0000644000000000000000000000023613534314633021056 0ustar0000000000000000{-# LANGUAGE GADTs #-} --{-# LANGUAGE KindSignatures #-} {-# LANGUAGE PolyKinds #-} module Test where data Foo :: * -> * where Foo :: Foo a haskell-src-exts-1.23.1/tests/examples/ConstructorAndClassOperators.hs0000644000000000000000000000016013534314632024327 0ustar0000000000000000{-# LANGUAGE TypeOperators, MultiParamTypeClasses #-} ins :: (:=>) b h => b :- h data (:><:) a b = (:><:) a b haskell-src-exts-1.23.1/tests/examples/DerivingParen.hs0000644000000000000000000000006413534314632021232 0ustar0000000000000000data X = X deriving Show data X = X deriving (Show) haskell-src-exts-1.23.1/tests/examples/AtSign.hs0000644000000000000000000000074213534314632017665 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE TypeApplications #-} {- | Accelerate interface to the native CUDA implementation of the Fourier Transform provided by the CUFFT library. -} module Data.Array.Accelerate.CUFFT.Private where transform hndl@(Handle fallback mode width _) = wrap mode (A.constant width) $ A.foreignAcc (AF.CUDAForeignAcc "transformForeign" $ transformForeign hndl) (unwrap mode (A.constant width) fallback) haskell-src-exts-1.23.1/tests/examples/ViewPatterns.hs0000644000000000000000000000012013534314633021122 0ustar0000000000000000{-# LANGUAGE ViewPatterns #-} f (id -> Just _) "" = "" g (id -> True) = False haskell-src-exts-1.23.1/tests/examples/AmbiguousFixities.hs0000644000000000000000000000003213534314632022130 0ustar0000000000000000f = (+ 1) . head &&& tail haskell-src-exts-1.23.1/tests/examples/RCategory3.hs0000644000000000000000000000016213534314633020457 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds #-} instance RCategory (->) where type RCategoryCtxt (->) a a = () haskell-src-exts-1.23.1/tests/examples/Nounpack2.hs0000644000000000000000000000004613534314633020336 0ustar0000000000000000 data Foo = Foo {-# NOUNPACK #-} Int haskell-src-exts-1.23.1/tests/examples/GadtRecordFields.hs0000644000000000000000000000014613534314633021644 0ustar0000000000000000{-# LANGUAGE GADTs #-} data Ty where TCon :: { field1 :: Int, field2 :: Bool } -> Ty TCon2 :: Ty haskell-src-exts-1.23.1/tests/examples/ExtraEndBrace.hs0000644000000000000000000000006113534314633021142 0ustar0000000000000000module ExtraEndBrace where data A = B {c :: D}} haskell-src-exts-1.23.1/tests/examples/TySplice2.hs0000644000000000000000000000007513534314633020316 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} t1 :: $( [t|Int|] ) t1 = 1 haskell-src-exts-1.23.1/tests/examples/TemplateHaskellQuotedNames.hs0000644000000000000000000000011413534314633023717 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} f = g 'Constructor 'function h = g '() '[] haskell-src-exts-1.23.1/tests/examples/Ppr048.hs0000644000000000000000000000016713534314633017477 0ustar0000000000000000module Ppr048 where {-# SCc foo #-} foo :: Int -> Int foo x = x {-# SCc foo2 "label" #-} foo2 :: () foo2 = () haskell-src-exts-1.23.1/tests/examples/Overlapping.hs0000644000000000000000000000063613534314633020771 0ustar0000000000000000{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE MultiParamTypeClasses #-} module Overlapping where class C a b where f :: a -> b -> Bool instance C a b where f _ _ = False instance {-# OVERLAPPING #-} C a a where f _ _ = True instance {-# OVERLAPS #-} C a a where f _ _ = True instance {-# OVERLAPPABLE #-} C a a where f _ _ = True -- >>> f 'a' 'b' -- True -- -- >>> f 'a' "starfish" -- False haskell-src-exts-1.23.1/tests/examples/EqualityConstraints1.hs0000644000000000000000000000016313534314633022604 0ustar0000000000000000-- https://github.com/haskell-suite/haskell-src-exts/issues/91 {-# LANGUAGE GADTs #-} one :: a ~ Int => a one = 1 haskell-src-exts-1.23.1/tests/examples/SafeImports1.hs0000644000000000000000000000006613534314633021015 0ustar0000000000000000{-# LANGUAGE SafeImports #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/HappyDoAction.hs0000644000000000000000000000171013534314633021177 0ustar0000000000000000{-# LANGUAGE MagicHash #-} module HappyDoAction where foo :: Int# happyDoAction i tk st = {- nothing -} case action of 0# -> {- nothing -} happyFail i tk st -1# -> {- nothing -} happyAccept i tk st n | (n <# (0# :: Int#)) -> {- nothing -} (happyReduceArr ! rule) i tk st where rule = (I# ((negateInt# ((n +# (1# :: Int#)))))) n -> {- nothing -} happyShift new_state i tk st where new_state = (n -# (1# :: Int#)) where off = indexShortOffAddr happyActOffsets st off_i = (off +# i) check = if (off_i >=# (0# :: Int#)) then (indexShortOffAddr happyCheck off_i ==# i) else False action | check = indexShortOffAddr happyTable off_i | otherwise = indexShortOffAddr happyDefActions st haskell-src-exts-1.23.1/tests/examples/LambdaCase.hs0000644000000000000000000000021413534314633020447 0ustar0000000000000000{-# LANGUAGE LambdaCase #-} module LambdaCase where foo = \case Nothing -> e1 Just e2 -> e2 bar = \ case { _ -> True } haskell-src-exts-1.23.1/tests/examples/NegPrimWordLiteral.hs0000644000000000000000000000010213534314633022201 0ustar0000000000000000{-# LANGUAGE MagicHash #-} dummyWord = W# (-0x8000000000000000##) haskell-src-exts-1.23.1/tests/examples/TypeInstances.hs0000644000000000000000000000017713534314633021274 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} class MapType v where type Key v :: * type instance Key v = TileKey v type Source v :: * haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsGood.hs0000644000000000000000000000212213534314632022227 0ustar0000000000000000{-# LANGUAGE BinaryLiterals #-} {-# LANGUAGE MagicHash #-} import GHC.Types main = do print [ I# 0b0#, I# -0b0#, I# 0b1#, I# -0b1# , I# 0b00000000000000000000000000000000000000000000000000000000000000000000000000001# , I# -0b00000000000000000000000000000000000000000000000000000000000000000000000000001# , I# -0b11001001#, I# -0b11001001# , I# -0b11111111#, I# -0b11111111# ] print [ W# 0b0##, W# 0b1##, W# 0b11001001##, W# 0b11##, W# 0b11111111## , W# 0b00000000000000000000000000000000000000000000000000000000000000000000000000001## ] print [ 0b0, 0b1, 0b10, 0b11, 0b100, 0b101, 0b110, 0b111 :: Integer , -0b0, -0b1, -0b10, -0b11, -0b100, -0b101, -0b110, -0b111 , 0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 , -0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 ] print [ I8# -0B10000000#, I8# 0B1111111# ] haskell-src-exts-1.23.1/tests/examples/FixityTests.hs0000644000000000000000000000020413534314633020771 0ustar0000000000000000main = forM_ cmdReports $ \x -> do putStrLn $ "Writing report to " ++ x ++ " ..." writeReport x ideas haskell-src-exts-1.23.1/tests/examples/OverloadedLabels.hs0000644000000000000000000000102013534314633021676 0ustar0000000000000000-- Basic tests of overloaded labels {-# LANGUAGE OverloadedLabels , DataKinds , FlexibleContexts , FlexibleInstances , MultiParamTypeClasses , NoMonomorphismRestriction #-} import GHC.OverloadedLabels instance IsLabel "true" Bool where fromLabel _ = True instance IsLabel "_False1'" Bool where fromLabel _ = False a :: IsLabel "true" t => t a = #true b = #_False1' c :: Bool c = #true main = do print (a :: Bool) print (b :: Bool) print c haskell-src-exts-1.23.1/tests/examples/ConstraintKinds3.hs0000644000000000000000000000017013534314632021673 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} class Foo c a where bar :: (c a) => a -> a haskell-src-exts-1.23.1/tests/examples/QuantifiedConstraints.hs0000644000000000000000000000015213556712523023021 0ustar0000000000000000{-# LANGUAGE ExplicitForAll #-} {-# LANGUAGE QuantifiedConstraints #-} class (forall a. Eq (f a)) => C f haskell-src-exts-1.23.1/tests/examples/InfixTypeMinus.hs0000644000000000000000000000063513534314633021435 0ustar0000000000000000{-# LANGUAGE DataKinds, KindSignatures, TypeOperators, GADTs #-} module Foo where -- Test cases data Vec (n :: Nat) where { VCons :: (m ~ (n-1)) => Double -> Vec m -> Vec n } data Vec (n :: Nat) where { VCons :: ((n-1) ~ m) => Double -> Vec m -> Vec n } data Vec (n :: Nat) where { VCons :: ((m+1) ~ n) => Double -> Vec m -> Vec n } data Vec (n :: Nat) where { VCons :: (n ~ (m+1)) => Double -> Vec m -> Vec n } haskell-src-exts-1.23.1/tests/examples/NoStartNumIdents.hs0000644000000000000000000000001013551227063021705 0ustar00000000000000001a = () haskell-src-exts-1.23.1/tests/examples/RealGHC.lhs0000644000000000000000000010243413534314633020063 0ustar0000000000000000% % (c) The GRASP/AQUA Project, Glasgow University, 1992-1998 % \section[CoreRules]{Transformation rules} \begin{code} {-# OPTIONS -w #-} {-# LANGUAGE PatternGuards #-} -- The above warning supression flag is a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See -- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details -- | Functions for collecting together and applying rewrite rules to a module. -- The 'CoreRule' datatype itself is declared elsewhere. module Rules ( -- * RuleBase RuleBase, -- ** Constructing emptyRuleBase, mkRuleBase, extendRuleBaseList, unionRuleBase, pprRuleBase, -- ** Checking rule applications ruleCheckProgram, -- ** Manipulating 'SpecInfo' rules mkSpecInfo, extendSpecInfo, addSpecInfo, addIdSpecialisations, -- * Misc. CoreRule helpers rulesOfBinds, getRules, pprRulesForUser, lookupRule, mkLocalRule, roughTopNames ) where -- #include "HsVersions.h" import CoreSyn -- All of it import OccurAnal ( occurAnalyseExpr ) import CoreFVs ( exprFreeVars, exprsFreeVars, bindFreeVars, rulesFreeVars ) import CoreUtils ( tcEqExprX, exprType ) import PprCore ( pprRules ) import Type ( Type, TvSubstEnv ) import Coercion ( coercionKind ) import TcType ( tcSplitTyConApp_maybe ) import CoreTidy ( tidyRules ) import Id import IdInfo ( SpecInfo( SpecInfo ) ) import Var ( Var ) import VarEnv import VarSet import Name ( Name, NamedThing(..) ) import NameEnv import Unify ( ruleMatchTyX, MatchEnv(..) ) import BasicTypes ( Activation ) import StaticFlags ( opt_PprStyle_Debug ) import Outputable import FastString import Maybes import OrdList import Bag import Util import Data.List \end{code} %************************************************************************ %* * \subsection[specialisation-IdInfo]{Specialisation info about an @Id@} %* * %************************************************************************ A @CoreRule@ holds details of one rule for an @Id@, which includes its specialisations. For example, if a rule for @f@ contains the mapping: \begin{verbatim} forall a b d. [Type (List a), Type b, Var d] ===> f' a b \end{verbatim} then when we find an application of f to matching types, we simply replace it by the matching RHS: \begin{verbatim} f (List Int) Bool dict ===> f' Int Bool \end{verbatim} All the stuff about how many dictionaries to discard, and what types to apply the specialised function to, are handled by the fact that the Rule contains a template for the result of the specialisation. There is one more exciting case, which is dealt with in exactly the same way. If the specialised value is unboxed then it is lifted at its definition site and unlifted at its uses. For example: pi :: forall a. Num a => a might have a specialisation [Int#] ===> (case pi' of Lift pi# -> pi#) where pi' :: Lift Int# is the specialised version of pi. \begin{code} mkLocalRule :: RuleName -> Activation -> Name -> [CoreBndr] -> [CoreExpr] -> CoreExpr -> CoreRule -- ^ Used to make 'CoreRule' for an 'Id' defined in the module being -- compiled. See also 'CoreSyn.CoreRule' mkLocalRule name act fn bndrs args rhs = Rule { ru_name = name, ru_fn = fn, ru_act = act, ru_bndrs = bndrs, ru_args = args, ru_rhs = rhs, ru_rough = roughTopNames args, ru_local = True } -------------- roughTopNames :: [CoreExpr] -> [Maybe Name] -- ^ Find the \"top\" free names of several expressions. -- Such names are either: -- -- 1. The function finally being applied to in an application chain -- (if that name is a GlobalId: see "Var#globalvslocal"), or -- -- 2. The 'TyCon' if the expression is a 'Type' -- -- This is used for the fast-match-check for rules; -- if the top names don't match, the rest can't roughTopNames args = map roughTopName args roughTopName :: CoreExpr -> Maybe Name roughTopName (Type ty) = case tcSplitTyConApp_maybe ty of Just (tc,_) -> Just (getName tc) Nothing -> Nothing roughTopName (App f a) = roughTopName f roughTopName (Var f) | isGlobalId f = Just (idName f) | otherwise = Nothing roughTopName other = Nothing ruleCantMatch :: [Maybe Name] -> [Maybe Name] -> Bool -- ^ @ruleCantMatch tpl actual@ returns True only if @actual@ -- definitely can't match @tpl@ by instantiating @tpl@. -- It's only a one-way match; unlike instance matching we -- don't consider unification. -- -- Notice that [_$_] -- @ruleCantMatch [Nothing] [Just n2] = False@ -- Reason: a template variable can be instantiated by a constant -- Also: -- @ruleCantMatch [Just n1] [Nothing] = False@ -- Reason: a local variable @v@ in the actuals might [_$_] ruleCantMatch (Just n1 : ts) (Just n2 : as) = n1 /= n2 || ruleCantMatch ts as ruleCantMatch (t : ts) (a : as) = ruleCantMatch ts as ruleCantMatch ts as = False \end{code} \begin{code} pprRulesForUser :: [CoreRule] -> SDoc -- (a) tidy the rules -- (b) sort them into order based on the rule name -- (c) suppress uniques (unless -dppr-debug is on) -- This combination makes the output stable so we can use in testing -- It's here rather than in PprCore because it calls tidyRules pprRulesForUser rules = withPprStyle defaultUserStyle $ pprRules $ sortLe le_rule $ tidyRules emptyTidyEnv rules where le_rule r1 r2 = ru_name r1 <= ru_name r2 \end{code} %************************************************************************ %* * SpecInfo: the rules in an IdInfo %* * %************************************************************************ \begin{code} -- | Make a 'SpecInfo' containing a number of 'CoreRule's, suitable -- for putting into an 'IdInfo' mkSpecInfo :: [CoreRule] -> SpecInfo mkSpecInfo rules = SpecInfo rules (rulesFreeVars rules) extendSpecInfo :: SpecInfo -> [CoreRule] -> SpecInfo extendSpecInfo (SpecInfo rs1 fvs1) rs2 = SpecInfo (rs2 ++ rs1) (rulesFreeVars rs2 `unionVarSet` fvs1) addSpecInfo :: SpecInfo -> SpecInfo -> SpecInfo addSpecInfo (SpecInfo rs1 fvs1) (SpecInfo rs2 fvs2) = SpecInfo (rs1 ++ rs2) (fvs1 `unionVarSet` fvs2) addIdSpecialisations :: Id -> [CoreRule] -> Id addIdSpecialisations id [] = id addIdSpecialisations id rules = setIdSpecialisation id $ extendSpecInfo (idSpecialisation id) rules -- | Gather all the rules for locally bound identifiers from the supplied bindings rulesOfBinds :: [CoreBind] -> [CoreRule] rulesOfBinds binds = concatMap (concatMap idCoreRules . bindersOf) binds getRules :: RuleBase -> Id -> [CoreRule] -- The rules for an Id come from two places: -- (a) the ones it is born with (idCoreRules fn) -- (b) rules added in subsequent modules (extra_rules) -- PrimOps, for example, are born with a bunch of rules under (a) getRules rule_base fn | isLocalId fn = idCoreRules fn | otherwise = WARN( not (isPrimOpId fn) && notNull (idCoreRules fn), ppr fn <+> ppr (idCoreRules fn) ) idCoreRules fn ++ (lookupNameEnv rule_base (idName fn) `orElse` []) -- Only PrimOpIds have rules inside themselves, and perhaps more besides \end{code} %************************************************************************ %* * RuleBase %* * %************************************************************************ \begin{code} -- | Gathers a collection of 'CoreRule's. Maps (the name of) an 'Id' to its rules type RuleBase = NameEnv [CoreRule] -- The rules are are unordered; -- we sort out any overlaps on lookup emptyRuleBase = emptyNameEnv mkRuleBase :: [CoreRule] -> RuleBase mkRuleBase rules = extendRuleBaseList emptyRuleBase rules extendRuleBaseList :: RuleBase -> [CoreRule] -> RuleBase extendRuleBaseList rule_base new_guys = foldl extendRuleBase rule_base new_guys unionRuleBase :: RuleBase -> RuleBase -> RuleBase unionRuleBase rb1 rb2 = plusNameEnv_C (++) rb1 rb2 extendRuleBase :: RuleBase -> CoreRule -> RuleBase extendRuleBase rule_base rule = extendNameEnv_Acc (:) singleton rule_base (ruleIdName rule) rule pprRuleBase :: RuleBase -> SDoc pprRuleBase rules = vcat [ pprRules (tidyRules emptyTidyEnv rs) | rs <- nameEnvElts rules ] \end{code} %************************************************************************ %* * \subsection{Matching} %* * %************************************************************************ Note [Extra args in rule matching] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ If we find a matching rule, we return (Just (rule, rhs)), but the rule firing has only consumed as many of the input args as the ruleArity says. It's up to the caller to keep track of any left-over args. E.g. if you call lookupRule ... f [e1, e2, e3] and it returns Just (r, rhs), where r has ruleArity 2 then the real rewrite is f e1 e2 e3 ==> rhs e3 You might think it'd be cleaner for lookupRule to deal with the leftover arguments, by applying 'rhs' to them, but the main call in the Simplifier works better as it is. Reason: the 'args' passed to lookupRule are the result of a lazy substitution \begin{code} -- | The main rule matching function. Attempts to apply all (active) -- supplied rules to this instance of an application in a given -- context, returning the rule applied and the resulting expression if -- successful. lookupRule :: (Activation -> Bool) -> InScopeSet -> Id -> [CoreExpr] -> [CoreRule] -> Maybe (CoreRule, CoreExpr) -- See Note [Extra args in rule matching] -- See comments on matchRule lookupRule is_active in_scope fn args rules = -- pprTrace "matchRules" (ppr fn <+> ppr rules) $ case go [] rules of [] -> Nothing (m:ms) -> Just (findBest (fn,args) m ms) where rough_args = map roughTopName args go :: [(CoreRule,CoreExpr)] -> [CoreRule] -> [(CoreRule,CoreExpr)] go ms [] = ms go ms (r:rs) = case (matchRule is_active in_scope args rough_args r) of Just e -> go ((r,e):ms) rs Nothing -> -- pprTrace "match failed" (ppr r $$ ppr args $$ -- ppr [(arg_id, unfoldingTemplate unf) | Var arg_id <- args, let unf = idUnfolding arg_id, isCheapUnfolding unf] ) go ms rs findBest :: (Id, [CoreExpr]) -> (CoreRule,CoreExpr) -> [(CoreRule,CoreExpr)] -> (CoreRule,CoreExpr) -- All these pairs matched the expression -- Return the pair the the most specific rule -- The (fn,args) is just for overlap reporting findBest target (rule,ans) [] = (rule,ans) findBest target (rule1,ans1) ((rule2,ans2):prs) | rule1 `isMoreSpecific` rule2 = findBest target (rule1,ans1) prs | rule2 `isMoreSpecific` rule1 = findBest target (rule2,ans2) prs | debugIsOn = let pp_rule rule | opt_PprStyle_Debug = ppr rule | otherwise = doubleQuotes (ftext (ru_name rule)) in pprTrace "Rules.findBest: rule overlap (Rule 1 wins)" (vcat [if opt_PprStyle_Debug then ptext (sLit "Expression to match:") <+> ppr fn <+> sep (map ppr args) else empty, ptext (sLit "Rule 1:") <+> pp_rule rule1, ptext (sLit "Rule 2:") <+> pp_rule rule2]) $ findBest target (rule1,ans1) prs | otherwise = findBest target (rule1,ans1) prs where (fn,args) = target isMoreSpecific :: CoreRule -> CoreRule -> Bool isMoreSpecific (BuiltinRule {}) r2 = True isMoreSpecific r1 (BuiltinRule {}) = False isMoreSpecific (Rule { ru_bndrs = bndrs1, ru_args = args1 }) (Rule { ru_bndrs = bndrs2, ru_args = args2 }) = isJust (matchN in_scope bndrs2 args2 args1) where in_scope = mkInScopeSet (mkVarSet bndrs1) -- Actually we should probably include the free vars -- of rule1's args, but I can't be bothered noBlackList :: Activation -> Bool noBlackList act = False -- Nothing is black listed matchRule :: (Activation -> Bool) -> InScopeSet -> [CoreExpr] -> [Maybe Name] -> CoreRule -> Maybe CoreExpr -- If (matchRule rule args) returns Just (name,rhs) -- then (f args) matches the rule, and the corresponding -- rewritten RHS is rhs -- -- The bndrs and rhs is occurrence-analysed -- -- Example -- -- The rule -- forall f g x. map f (map g x) ==> map (f . g) x -- is stored -- CoreRule "map/map" -- [f,g,x] -- tpl_vars -- [f,map g x] -- tpl_args -- map (f.g) x) -- rhs -- -- Then the call: matchRule the_rule [e1,map e2 e3] -- = Just ("map/map", (\f,g,x -> rhs) e1 e2 e3) -- -- Any 'surplus' arguments in the input are simply put on the end -- of the output. matchRule is_active in_scope args rough_args (BuiltinRule { ru_name = name, ru_try = match_fn }) = case match_fn args of Just expr -> Just expr Nothing -> Nothing matchRule is_active in_scope args rough_args (Rule { ru_name = rn, ru_act = act, ru_rough = tpl_tops, ru_bndrs = tpl_vars, ru_args = tpl_args, ru_rhs = rhs }) | not (is_active act) = Nothing | ruleCantMatch tpl_tops rough_args = Nothing | otherwise = case matchN in_scope tpl_vars tpl_args args of Nothing -> Nothing Just (binds, tpl_vals) -> Just (mkLets binds $ rule_fn `mkApps` tpl_vals) where rule_fn = occurAnalyseExpr (mkLams tpl_vars rhs) -- We could do this when putting things into the rulebase, I guess \end{code} \begin{code} -- For a given match template and context, find bindings to wrap around -- the entire result and what should be substituted for each template variable. -- Fail if there are two few actual arguments from the target to match the template matchN :: InScopeSet -- ^ In-scope variables -> [Var] -- ^ Match template type variables -> [CoreExpr] -- ^ Match template -> [CoreExpr] -- ^ Target; can have more elements than the template -> Maybe ([CoreBind], [CoreExpr]) matchN in_scope tmpl_vars tmpl_es target_es = do { (tv_subst, id_subst, binds) <- go init_menv emptySubstEnv tmpl_es target_es ; return (fromOL binds, map (lookup_tmpl tv_subst id_subst) tmpl_vars') } where (init_rn_env, tmpl_vars') = mapAccumL rnBndrL (mkRnEnv2 in_scope) tmpl_vars -- See Note [Template binders] init_menv = ME { me_tmpls = mkVarSet tmpl_vars', me_env = init_rn_env } go menv subst [] es = Just subst go menv subst ts [] = Nothing -- Fail if too few actual args go menv subst (t:ts) (e:es) = do { subst1 <- match menv subst t e ; go menv subst1 ts es } lookup_tmpl :: TvSubstEnv -> IdSubstEnv -> Var -> CoreExpr lookup_tmpl tv_subst id_subst tmpl_var' | isTyVar tmpl_var' = case lookupVarEnv tv_subst tmpl_var' of Just ty -> Type ty Nothing -> unbound tmpl_var' | otherwise = case lookupVarEnv id_subst tmpl_var' of Just e -> e other -> unbound tmpl_var' unbound var = pprPanic "Template variable unbound in rewrite rule" (ppr var $$ ppr tmpl_vars $$ ppr tmpl_vars' $$ ppr tmpl_es $$ ppr target_es) \end{code} Note [Template binders] ~~~~~~~~~~~~~~~~~~~~~~~ Consider the following match: Template: forall x. f x Target: f (x+1) This should succeed, because the template variable 'x' has nothing to do with the 'x' in the target. On reflection, this case probably does just work, but this might not Template: forall x. f (\x.x) Target: f (\y.y) Here we want to clone when we find the \x, but to know that x must be in scope To achive this, we use rnBndrL to rename the template variables if necessary; the renamed ones are the tmpl_vars' --------------------------------------------- The inner workings of matching --------------------------------------------- \begin{code} -- These two definitions are not the same as in Subst, -- but they simple and direct, and purely local to this module -- -- * The domain of the TvSubstEnv and IdSubstEnv are the template -- variables passed into the match. -- -- * The (OrdList CoreBind) in a SubstEnv are the bindings floated out -- from nested matches; see the Let case of match, below -- type SubstEnv = (TvSubstEnv, IdSubstEnv, OrdList CoreBind) type IdSubstEnv = IdEnv CoreExpr emptySubstEnv :: SubstEnv emptySubstEnv = (emptyVarEnv, emptyVarEnv, nilOL) -- At one stage I tried to match even if there are more -- template args than real args. -- I now think this is probably a bad idea. -- Should the template (map f xs) match (map g)? I think not. -- For a start, in general eta expansion wastes work. -- SLPJ July 99 match :: MatchEnv -> SubstEnv -> CoreExpr -- Template -> CoreExpr -- Target -> Maybe SubstEnv -- See the notes with Unify.match, which matches types -- Everything is very similar for terms -- Interesting examples: -- Consider matching -- \x->f against \f->f -- When we meet the lambdas we must remember to rename f to f' in the -- second expresion. The RnEnv2 does that. -- -- Consider matching -- forall a. \b->b against \a->3 -- We must rename the \a. Otherwise when we meet the lambdas we -- might substitute [a/b] in the template, and then erroneously -- succeed in matching what looks like the template variable 'a' against 3. -- The Var case follows closely what happens in Unify.match match menv subst (Var v1) e2 | Just subst <- match_var menv subst v1 e2 = Just subst match menv subst e1 (Note n e2) = match menv subst e1 e2 -- Note [Notes in RULE matching] -- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -- Look through Notes. In particular, we don't want to -- be confused by InlineMe notes. Maybe we should be more -- careful about profiling notes, but for now I'm just -- riding roughshod over them. --- See Note [Notes in call patterns] in SpecConstr -- Here is another important rule: if the term being matched is a -- variable, we expand it so long as its unfolding is a WHNF -- (Its occurrence information is not necessarily up to date, -- so we don't use it.) match menv subst e1 (Var v2) | isCheapUnfolding unfolding = match menv subst e1 (unfoldingTemplate unfolding) where rn_env = me_env menv unfolding = idUnfolding (lookupRnInScope rn_env (rnOccR rn_env v2)) -- Notice that we look up v2 in the in-scope set -- See Note [Lookup in-scope] -- Remember to apply any renaming first (hence rnOccR) -- Note [Matching lets] -- ~~~~~~~~~~~~~~~~~~~~ -- Matching a let-expression. Consider -- RULE forall x. f (g x) = -- and target expression -- f (let { w=R } in g E)) -- Then we'd like the rule to match, to generate -- let { w=R } in (\x. ) E -- In effect, we want to float the let-binding outward, to enable -- the match to happen. This is the WHOLE REASON for accumulating -- bindings in the SubstEnv -- -- We can only do this if -- (a) Widening the scope of w does not capture any variables -- We use a conservative test: w is not already in scope -- If not, we clone the binders, and substitute -- (b) The free variables of R are not bound by the part of the -- target expression outside the let binding; e.g. -- f (\v. let w = v+1 in g E) -- Here we obviously cannot float the let-binding for w. -- -- You may think rule (a) would never apply, because rule matching is -- mostly invoked from the simplifier, when we have just run substExpr -- over the argument, so there will be no shadowing anyway. -- The fly in the ointment is that the forall'd variables of the -- RULE itself are considered in scope. -- -- I though of various cheapo ways to solve this tiresome problem, -- but ended up doing the straightforward thing, which is to -- clone the binders if they are in scope. It's tiresome, and -- potentially inefficient, because of the calls to substExpr, -- but I don't think it'll happen much in pracice. {- Cases to think about (let x=y+1 in \x. (x,x)) --> let x=y+1 in (\x1. (x1,x1)) (\x. let x = y+1 in (x,x)) --> let x1 = y+1 in (\x. (x1,x1) (let x=y+1 in (x,x), let x=y-1 in (x,x)) --> let x=y+1 in let x1=y-1 in ((x,x),(x1,x1)) Watch out! (let x=y+1 in let z=x+1 in (z,z) --> matches (p,p) but watch out that the use of x on z's rhs is OK! I'm removing the cloning because that makes the above case fail, because the inner let looks as if it has locally-bound vars -} match menv subst@(tv_subst, id_subst, binds) e1 (Let bind e2) | all freshly_bound bndrs, not (any locally_bound bind_fvs) = match (menv { me_env = rn_env' }) (tv_subst, id_subst, binds `snocOL` bind') e1 e2' where rn_env = me_env menv bndrs = bindersOf bind bind_fvs = varSetElems (bindFreeVars bind) locally_bound x = inRnEnvR rn_env x freshly_bound x = not (x `rnInScope` rn_env) bind' = bind e2' = e2 rn_env' = extendRnInScopeList rn_env bndrs {- (rn_env', bndrs') = mapAccumL rnBndrR rn_env bndrs s_prs = [(bndr, Var bndr') | (bndr,bndr') <- zip bndrs bndrs', bndr /= bndr'] subst = mkSubst (rnInScopeSet rn_env) emptyVarEnv (mkVarEnv s_prs) (bind', e2') | null s_prs = (bind, e2) | otherwise = (s_bind, substExpr subst e2) s_bind = case bind of NonRec {} -> NonRec (head bndrs') (head rhss) Rec {} -> Rec (bndrs' `zip` map (substExpr subst) rhss) -} match menv subst (Lit lit1) (Lit lit2) | lit1 == lit2 = Just subst match menv subst (App f1 a1) (App f2 a2) = do { subst' <- match menv subst f1 f2 ; match menv subst' a1 a2 } match menv subst (Lam x1 e1) (Lam x2 e2) = match menv' subst e1 e2 where menv' = menv { me_env = rnBndr2 (me_env menv) x1 x2 } -- This rule does eta expansion -- (\x.M) ~ N iff M ~ N x -- It's important that this is *after* the let rule, -- so that (\x.M) ~ (let y = e in \y.N) -- does the let thing, and then gets the lam/lam rule above match menv subst (Lam x1 e1) e2 = match menv' subst e1 (App e2 (varToCoreExpr new_x)) where (rn_env', new_x) = rnBndrL (me_env menv) x1 menv' = menv { me_env = rn_env' } -- Eta expansion the other way -- M ~ (\y.N) iff M y ~ N match menv subst e1 (Lam x2 e2) = match menv' subst (App e1 (varToCoreExpr new_x)) e2 where (rn_env', new_x) = rnBndrR (me_env menv) x2 menv' = menv { me_env = rn_env' } match menv subst (Case e1 x1 ty1 alts1) (Case e2 x2 ty2 alts2) = do { subst1 <- match_ty menv subst ty1 ty2 ; subst2 <- match menv subst1 e1 e2 ; let menv' = menv { me_env = rnBndr2 (me_env menv) x1 x2 } ; match_alts menv' subst2 alts1 alts2 -- Alts are both sorted } match menv subst (Type ty1) (Type ty2) = match_ty menv subst ty1 ty2 match menv subst (Cast e1 co1) (Cast e2 co2) = do { subst1 <- match_ty menv subst co1 co2 ; match menv subst1 e1 e2 } {- REMOVING OLD CODE: I think that the above handling for let is better than the stuff here, which looks pretty suspicious to me. SLPJ Sept 06 -- This is an interesting rule: we simply ignore lets in the -- term being matched against! The unfolding inside it is (by assumption) -- already inside any occurrences of the bound variables, so we'll expand -- them when we encounter them. This gives a chance of matching -- forall x,y. f (g (x,y)) -- against -- f (let v = (a,b) in g v) match menv subst e1 (Let bind e2) = match (menv { me_env = rn_env' }) subst e1 e2 where (rn_env', _bndrs') = mapAccumL rnBndrR (me_env menv) (bindersOf bind) -- It's important to do this renaming, so that the bndrs -- are brought into the local scope. For example: -- Matching -- forall f,x,xs. f (x:xs) -- against -- f (let y = e in (y:[])) -- We must not get success with x->y! So we record that y is -- locally bound (with rnBndrR), and proceed. The Var case -- will fail when trying to bind x->y -} -- Everything else fails match menv subst e1 e2 = -- pprTrace "Failing at" ((text "e1:" <+> ppr e1) $$ (text "e2:" <+> ppr e2)) $ Nothing ------------------------------------------ match_var :: MatchEnv -> SubstEnv -> Var -- Template -> CoreExpr -- Target -> Maybe SubstEnv match_var menv subst@(tv_subst, id_subst, binds) v1 e2 | v1' `elemVarSet` me_tmpls menv = case lookupVarEnv id_subst v1' of Nothing | any (inRnEnvR rn_env) (varSetElems (exprFreeVars e2)) -> Nothing -- Occurs check failure -- e.g. match forall a. (\x-> a x) against (\y. y y) | otherwise -- No renaming to do on e2, because no free var -- of e2 is in the rnEnvR of the envt -- Note [Matching variable types] -- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -- However, we must match the *types*; e.g. -- forall (c::Char->Int) (x::Char). -- f (c x) = "RULE FIRED" -- We must only match on args that have the right type -- It's actually quite difficult to come up with an example that shows -- you need type matching, esp since matching is left-to-right, so type -- args get matched first. But it's possible (e.g. simplrun008) and -- this is the Right Thing to do -> do { tv_subst' <- Unify.ruleMatchTyX menv tv_subst (idType v1') (exprType e2) -- c.f. match_ty below ; return (tv_subst', extendVarEnv id_subst v1' e2, binds) } Just e1' | tcEqExprX (nukeRnEnvL rn_env) e1' e2 -> Just subst | otherwise -> Nothing | otherwise -- v1 is not a template variable; check for an exact match with e2 = case e2 of Var v2 | v1' == rnOccR rn_env v2 -> Just subst other -> Nothing where rn_env = me_env menv v1' = rnOccL rn_env v1 -- If the template is -- forall x. f x (\x -> x) = ... -- Then the x inside the lambda isn't the -- template x, so we must rename first! ------------------------------------------ match_alts :: MatchEnv -> SubstEnv -> [CoreAlt] -- Template -> [CoreAlt] -- Target -> Maybe SubstEnv match_alts menv subst [] [] = return subst match_alts menv subst ((c1,vs1,r1):alts1) ((c2,vs2,r2):alts2) | c1 == c2 = do { subst1 <- match menv' subst r1 r2 ; match_alts menv subst1 alts1 alts2 } where menv' :: MatchEnv menv' = menv { me_env = rnBndrs2 (me_env menv) vs1 vs2 } match_alts menv subst alts1 alts2 = Nothing \end{code} Matching Core types: use the matcher in TcType. Notice that we treat newtypes as opaque. For example, suppose we have a specialised version of a function at a newtype, say newtype T = MkT Int We only want to replace (f T) with f', not (f Int). \begin{code} ------------------------------------------ match_ty :: MatchEnv -> SubstEnv -> Type -- Template -> Type -- Target -> Maybe SubstEnv match_ty menv (tv_subst, id_subst, binds) ty1 ty2 = do { tv_subst' <- Unify.ruleMatchTyX menv tv_subst ty1 ty2 ; return (tv_subst', id_subst, binds) } \end{code} Note [Lookup in-scope] ~~~~~~~~~~~~~~~~~~~~~~ Consider this example foo :: Int -> Maybe Int -> Int foo 0 (Just n) = n foo m (Just n) = foo (m-n) (Just n) SpecConstr sees this fragment: case w_smT of wild_Xf [Just A] { Data.Maybe.Nothing -> lvl_smf; Data.Maybe.Just n_acT [Just S(L)] -> case n_acT of wild1_ams [Just A] { GHC.Base.I# y_amr [Just L] -> \$wfoo_smW (GHC.Prim.-# ds_Xmb y_amr) wild_Xf }}; and correctly generates the rule RULES: "SC:$wfoo1" [0] __forall {y_amr [Just L] :: GHC.Prim.Int# sc_snn :: GHC.Prim.Int#} \$wfoo_smW sc_snn (Data.Maybe.Just @ GHC.Base.Int (GHC.Base.I# y_amr)) = \$s\$wfoo_sno y_amr sc_snn ;] BUT we must ensure that this rule matches in the original function! Note that the call to \$wfoo is \$wfoo_smW (GHC.Prim.-# ds_Xmb y_amr) wild_Xf During matching we expand wild_Xf to (Just n_acT). But then we must also expand n_acT to (I# y_amr). And we can only do that if we look up n_acT in the in-scope set, because in wild_Xf's unfolding it won't have an unfolding at all. That is why the 'lookupRnInScope' call in the (Var v2) case of 'match' is so important. %************************************************************************ %* * \subsection{Checking a program for failing rule applications} %* * %************************************************************************ ----------------------------------------------------- Game plan ----------------------------------------------------- We want to know what sites have rules that could have fired but didn't. This pass runs over the tree (without changing it) and reports such. \begin{code} -- | Report partial matches for rules beginning with the specified -- string for the purposes of error reporting ruleCheckProgram :: (Activation -> Bool) -- ^ Rule activation test -> String -- ^ Rule pattern -> RuleBase -- ^ Database of rules -> [CoreBind] -- ^ Bindings to check in -> SDoc -- ^ Resulting check message ruleCheckProgram is_active rule_pat rule_base binds | isEmptyBag results = text "Rule check results: no rule application sites" | otherwise = vcat [text "Rule check results:", line, vcat [ p $$ line | p <- bagToList results ] ] where results = unionManyBags (map (ruleCheckBind (RuleCheckEnv is_active rule_pat rule_base)) binds) line = text (replicate 20 '-') data RuleCheckEnv = RuleCheckEnv { rc_is_active :: Activation -> Bool, rc_pattern :: String, rc_rule_base :: RuleBase } ruleCheckBind :: RuleCheckEnv -> CoreBind -> Bag SDoc -- The Bag returned has one SDoc for each call site found ruleCheckBind env (NonRec b r) = ruleCheck env r ruleCheckBind env (Rec prs) = unionManyBags [ruleCheck env r | (b,r) <- prs] ruleCheck :: RuleCheckEnv -> CoreExpr -> Bag SDoc ruleCheck env (Var v) = emptyBag ruleCheck env (Lit l) = emptyBag ruleCheck env (Type ty) = emptyBag ruleCheck env (App f a) = ruleCheckApp env (App f a) [] ruleCheck env (Note n e) = ruleCheck env e ruleCheck env (Cast e co) = ruleCheck env e ruleCheck env (Let bd e) = ruleCheckBind env bd `unionBags` ruleCheck env e ruleCheck env (Lam b e) = ruleCheck env e ruleCheck env (Case e _ _ as) = ruleCheck env e `unionBags` unionManyBags [ruleCheck env r | (_,_,r) <- as] ruleCheckApp env (App f a) as = ruleCheck env a `unionBags` ruleCheckApp env f (a:as) ruleCheckApp env (Var f) as = ruleCheckFun env f as ruleCheckApp env other as = ruleCheck env other \end{code} \begin{code} ruleCheckFun :: RuleCheckEnv -> Id -> [CoreExpr] -> Bag SDoc -- Produce a report for all rules matching the predicate -- saying why it doesn't match the specified application ruleCheckFun env fn args | null name_match_rules = emptyBag | otherwise = unitBag (ruleAppCheck_help (rc_is_active env) fn args name_match_rules) where name_match_rules = filter match (getRules (rc_rule_base env) fn) match rule = (rc_pattern env) `isPrefixOf` unpackFS (ruleName rule) ruleAppCheck_help :: (Activation -> Bool) -> Id -> [CoreExpr] -> [CoreRule] -> SDoc ruleAppCheck_help is_active fn args rules = -- The rules match the pattern, so we want to print something vcat [text "Expression:" <+> ppr (mkApps (Var fn) args), vcat (map check_rule rules)] where n_args = length args i_args = args `zip` [1::Int ..] rough_args = map roughTopName args check_rule rule = rule_herald rule <> colon <+> rule_info rule rule_herald (BuiltinRule { ru_name = name }) = ptext (sLit "Builtin rule") <+> doubleQuotes (ftext name) rule_herald (Rule { ru_name = name }) = ptext (sLit "Rule") <+> doubleQuotes (ftext name) rule_info rule | Just _ <- matchRule noBlackList emptyInScopeSet args rough_args rule = text "matches (which is very peculiar!)" rule_info (BuiltinRule {}) = text "does not match" rule_info (Rule { ru_name = name, ru_act = act, ru_bndrs = rule_bndrs, ru_args = rule_args}) | not (is_active act) = text "active only in later phase" | n_args < n_rule_args = text "too few arguments" | n_mismatches == n_rule_args = text "no arguments match" | n_mismatches == 0 = text "all arguments match (considered individually), but rule as a whole does not" | otherwise = text "arguments" <+> ppr mismatches <+> text "do not match (1-indexing)" where n_rule_args = length rule_args n_mismatches = length mismatches mismatches = [i | (rule_arg, (arg,i)) <- rule_args `zip` i_args, not (isJust (match_fn rule_arg arg))] lhs_fvs = exprsFreeVars rule_args -- Includes template tyvars match_fn rule_arg arg = match menv emptySubstEnv rule_arg arg where in_scope = lhs_fvs `unionVarSet` exprFreeVars arg menv = ME { me_env = mkRnEnv2 (mkInScopeSet in_scope) , me_tmpls = mkVarSet rule_bndrs } \end{code} haskell-src-exts-1.23.1/tests/examples/TypeOperatorsTest.hs.parser.golden0000644000000000000000000002355513556712523024736 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 1 4 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 5 1 5 1 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 1 1 68 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 27 1 28 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 45 1 46 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 65 1 68 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 29 1 45 , srcInfoPoints = [] } "FlexibleContexts" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 1 47 1 64 , srcInfoPoints = [] } "FlexibleInstances" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 3 3 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 1 3 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 29 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 20 3 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 20 3 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 20 3 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 20 3 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 6 3 14 , srcInfoPoints = [] } "ArrowXml"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 15 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 15 3 16 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 16 3 18 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 18 3 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 15 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 15 3 16 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 16 3 18 , SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 18 3 19 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 16 3 18 , srcInfoPoints = [] } "~>"))))))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 23 3 29 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 23 3 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 23 3 24 , srcInfoPoints = [] } "a")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 25 3 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 25 3 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 25 3 27 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 28 3 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 3 28 3 29 , srcInfoPoints = [] } "a")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 1 4 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 1 4 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 3 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 3 4 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 5 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 5 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorsTest.hs" 4 5 4 14 , srcInfoPoints = [] } "undefined")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/TensorTests.hs.parser.golden0000644000000000000000000012252613534314633023545 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 1 21 1 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 1 1 1 1 , SrcSpan "tests/examples/TensorTests.hs" 5 1 5 1 , SrcSpan "tests/examples/TensorTests.hs" 5 1 5 1 , SrcSpan "tests/examples/TensorTests.hs" 7 1 7 1 , SrcSpan "tests/examples/TensorTests.hs" 8 1 8 1 , SrcSpan "tests/examples/TensorTests.hs" 9 1 9 1 , SrcSpan "tests/examples/TensorTests.hs" 12 1 12 1 , SrcSpan "tests/examples/TensorTests.hs" 13 1 13 1 , SrcSpan "tests/examples/TensorTests.hs" 14 1 14 1 , SrcSpan "tests/examples/TensorTests.hs" 16 1 16 1 , SrcSpan "tests/examples/TensorTests.hs" 19 1 19 1 , SrcSpan "tests/examples/TensorTests.hs" 21 1 21 1 , SrcSpan "tests/examples/TensorTests.hs" 21 1 21 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 1 5 39 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 5 1 5 7 , SrcSpan "tests/examples/TensorTests.hs" 5 34 5 39 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 8 5 19 , srcInfoPoints = [] } "TensorTests") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 20 5 33 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 5 20 5 21 , SrcSpan "tests/examples/TensorTests.hs" 5 32 5 33 ] } [ EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 21 5 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 21 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 5 21 5 32 , srcInfoPoints = [] } "tensorTests")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 1 3 38 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 1 1 1 13 , SrcSpan "tests/examples/TensorTests.hs" 1 29 1 30 , SrcSpan "tests/examples/TensorTests.hs" 1 47 1 48 , SrcSpan "tests/examples/TensorTests.hs" 1 58 1 59 , SrcSpan "tests/examples/TensorTests.hs" 1 77 1 78 , SrcSpan "tests/examples/TensorTests.hs" 2 30 2 31 , SrcSpan "tests/examples/TensorTests.hs" 2 51 2 52 , SrcSpan "tests/examples/TensorTests.hs" 2 65 2 66 , SrcSpan "tests/examples/TensorTests.hs" 2 80 2 81 , SrcSpan "tests/examples/TensorTests.hs" 3 35 3 38 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 14 1 29 , srcInfoPoints = [] } "ConstraintKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 31 1 47 , srcInfoPoints = [] } "FlexibleContexts" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 49 1 58 , srcInfoPoints = [] } "DataKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 1 60 1 77 , srcInfoPoints = [] } "NoImplicitPrelude" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 2 14 2 30 , srcInfoPoints = [] } "RebindableSyntax" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 2 32 2 51 , srcInfoPoints = [] } "ScopedTypeVariables" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 2 53 2 65 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 2 67 2 80 , srcInfoPoints = [] } "TypeOperators" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 3 14 3 34 , srcInfoPoints = [] } "UndecidableInstances" ] ] [] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 1 7 50 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 1 7 5 , SrcSpan "tests/examples/TensorTests.hs" 7 16 7 17 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 6 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 6 7 15 , srcInfoPoints = [] } "TMRParams")) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 18 7 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 18 7 37 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 18 7 19 , SrcSpan "tests/examples/TensorTests.hs" 7 36 7 37 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 20 7 36 , srcInfoPoints = [] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 20 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 20 7 21 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 20 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 20 7 21 ] } True (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 21 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 21 7 22 , SrcSpan "tests/examples/TensorTests.hs" 7 22 7 23 , SrcSpan "tests/examples/TensorTests.hs" 7 23 7 24 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 21 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 7 21 7 22 , SrcSpan "tests/examples/TensorTests.hs" 7 22 7 23 , SrcSpan "tests/examples/TensorTests.hs" 7 23 7 24 ] } Boxed 2)))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 25 7 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 25 7 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 25 7 28 , srcInfoPoints = [] } "<$>"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 29 7 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 29 7 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 29 7 36 , srcInfoPoints = [] } "Tensors"))))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 38 7 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 38 7 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 38 7 41 , srcInfoPoints = [] } "<*>"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 42 7 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 42 7 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 7 42 7 50 , srcInfoPoints = [] } "MRCombos")))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 1 8 29 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 8 11 8 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 1 8 10 , srcInfoPoints = [] } "tmrParams" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 14 8 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 14 8 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 14 8 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 14 8 19 , srcInfoPoints = [] } "Proxy"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 20 8 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 20 8 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 8 20 8 29 , srcInfoPoints = [] } "TMRParams")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 1 9 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 1 9 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 1 9 10 , srcInfoPoints = [] } "tmrParams")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 11 9 18 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 9 11 9 12 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 13 9 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 13 9 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 9 13 9 18 , srcInfoPoints = [] } "Proxy")))) Nothing , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 1 12 53 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 1 12 5 , SrcSpan "tests/examples/TensorTests.hs" 12 17 12 18 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 6 12 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 6 12 16 , srcInfoPoints = [] } "TrEmParams")) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 19 12 53 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 19 12 38 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 19 12 20 , SrcSpan "tests/examples/TensorTests.hs" 12 37 12 38 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 21 12 37 , srcInfoPoints = [] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 21 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 21 12 22 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 21 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 21 12 22 ] } True (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 22 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 22 12 23 , SrcSpan "tests/examples/TensorTests.hs" 12 23 12 24 , SrcSpan "tests/examples/TensorTests.hs" 12 24 12 25 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 22 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 12 22 12 23 , SrcSpan "tests/examples/TensorTests.hs" 12 23 12 24 , SrcSpan "tests/examples/TensorTests.hs" 12 24 12 25 ] } Boxed 2)))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 26 12 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 26 12 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 26 12 29 , srcInfoPoints = [] } "<$>"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 30 12 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 30 12 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 30 12 37 , srcInfoPoints = [] } "Tensors"))))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 39 12 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 39 12 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 39 12 42 , srcInfoPoints = [] } "<*>"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 43 12 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 43 12 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 12 43 12 53 , srcInfoPoints = [] } "MM'RCombos")))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 1 13 31 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 13 12 13 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 1 13 11 , srcInfoPoints = [] } "tremParams" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 15 13 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 15 13 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 15 13 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 15 13 20 , srcInfoPoints = [] } "Proxy"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 21 13 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 21 13 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 13 21 13 31 , srcInfoPoints = [] } "TrEmParams")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 1 14 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 1 14 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 1 14 11 , srcInfoPoints = [] } "tremParams")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 12 14 19 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 14 12 14 13 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 14 14 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 14 14 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 14 14 14 19 , srcInfoPoints = [] } "Proxy")))) Nothing , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 1 16 67 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 1 16 5 , SrcSpan "tests/examples/TensorTests.hs" 16 17 16 18 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 6 16 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 6 16 16 , srcInfoPoints = [] } "NormParams")) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 19 16 67 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 19 16 36 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 19 16 20 , SrcSpan "tests/examples/TensorTests.hs" 16 35 16 36 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 21 16 35 , srcInfoPoints = [] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 21 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 21 16 22 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 21 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 21 16 22 ] } True (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 22 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 22 16 23 , SrcSpan "tests/examples/TensorTests.hs" 16 23 16 24 , SrcSpan "tests/examples/TensorTests.hs" 16 24 16 25 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 22 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 22 16 23 , SrcSpan "tests/examples/TensorTests.hs" 16 23 16 24 , SrcSpan "tests/examples/TensorTests.hs" 16 24 16 25 ] } Boxed 2)))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 26 16 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 26 16 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 26 16 29 , srcInfoPoints = [] } "<$>"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 30 16 35 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 30 16 31 , SrcSpan "tests/examples/TensorTests.hs" 16 34 16 35 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 30 16 35 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 30 16 31 , SrcSpan "tests/examples/TensorTests.hs" 16 34 16 35 ] } True [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 32 16 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 32 16 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 32 16 34 , srcInfoPoints = [] } "RT")) ])))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 37 16 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 37 16 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 37 16 40 , srcInfoPoints = [] } "<*>"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 41 16 67 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 16 41 16 42 , SrcSpan "tests/examples/TensorTests.hs" 16 66 16 67 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 42 16 66 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 42 16 57 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 42 16 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 42 16 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 42 16 48 , srcInfoPoints = [] } "Filter"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 49 16 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 49 16 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 49 16 57 , srcInfoPoints = [] } "Liftable")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 58 16 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 58 16 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 16 58 16 66 , srcInfoPoints = [] } "MRCombos")))))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 1 19 61 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 19 1 19 5 , SrcSpan "tests/examples/TensorTests.hs" 19 6 19 14 , SrcSpan "tests/examples/TensorTests.hs" 19 38 19 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 15 19 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 15 19 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 15 19 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 15 19 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 15 19 20 , srcInfoPoints = [] } "Apply"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 21 19 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 21 19 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 21 19 29 , srcInfoPoints = [] } "Liftable")))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 30 19 37 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 19 30 19 31 , SrcSpan "tests/examples/TensorTests.hs" 19 33 19 34 , SrcSpan "tests/examples/TensorTests.hs" 19 36 19 37 ] } (PromotedTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 30 19 37 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 19 30 19 31 , SrcSpan "tests/examples/TensorTests.hs" 19 33 19 34 , SrcSpan "tests/examples/TensorTests.hs" 19 36 19 37 ] } [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 32 19 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 32 19 33 , srcInfoPoints = [] } "m") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 34 19 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 34 19 36 , srcInfoPoints = [] } "zq") ]))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 40 19 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 40 19 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 40 19 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 40 19 45 , srcInfoPoints = [] } "Int64"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 46 19 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 46 19 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 46 19 49 , srcInfoPoints = [] } ":=="))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 50 19 61 , srcInfoPoints = [ SrcSpan "tests/examples/TensorTests.hs" 19 50 19 51 , SrcSpan "tests/examples/TensorTests.hs" 19 60 19 61 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 51 19 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 51 19 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 51 19 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 51 19 57 , srcInfoPoints = [] } "LiftOf"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 58 19 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TensorTests.hs" 19 58 19 60 , srcInfoPoints = [] } "zq"))))) ] , [ Comment False (SrcSpan "tests/examples/TensorTests.hs" 11 1 11 55) "type ExtParams = ( '(,) <$> Tensors) <*> MRExtCombos" , Comment False (SrcSpan "tests/examples/TensorTests.hs" 18 1 18 49) "data Liftable :: TyFun (Factored, *) Bool -> *" ] ) haskell-src-exts-1.23.1/tests/examples/ViewPatterns.hs.parser.golden0000644000000000000000000002264713534314633023706 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/ViewPatterns.hs" 4 1 4 1 , SrcSpan "tests/examples/ViewPatterns.hs" 6 1 6 1 , SrcSpan "tests/examples/ViewPatterns.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 1 1 1 13 , SrcSpan "tests/examples/ViewPatterns.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 1 14 1 26 , srcInfoPoints = [] } "ViewPatterns" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 25 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 1 2 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 3 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 2 3 2 4 , SrcSpan "tests/examples/ViewPatterns.hs" 2 16 2 17 ] } (PViewPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 4 2 16 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 2 7 2 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 4 2 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 4 2 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 4 2 6 , srcInfoPoints = [] } "id"))) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 10 2 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 10 2 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 10 2 14 , srcInfoPoints = [] } "Just")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 15 2 16 , srcInfoPoints = [] } ])) , PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 18 2 20 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 18 2 20 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 18 2 20 , srcInfoPoints = [] } "" "") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 21 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 2 21 2 22 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 23 2 25 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 2 23 2 25 , srcInfoPoints = [] } "" ""))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 1 4 23 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 1 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 1 4 2 , srcInfoPoints = [] } "g") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 3 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 4 3 4 4 , SrcSpan "tests/examples/ViewPatterns.hs" 4 14 4 15 ] } (PViewPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 4 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 4 7 4 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 4 4 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 4 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 4 4 6 , srcInfoPoints = [] } "id"))) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 10 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 10 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 10 4 14 , srcInfoPoints = [] } "True")) [])) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 16 4 23 , srcInfoPoints = [ SrcSpan "tests/examples/ViewPatterns.hs" 4 16 4 17 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 18 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 18 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ViewPatterns.hs" 4 18 4 23 , srcInfoPoints = [] } "False")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ImplicitWhereBlocks.hs.parser.golden0000644000000000000000000001753713534314633025160 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 1 1 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 1 1 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 1 1 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 1 5 1 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 7 1 7 1 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 7 1 7 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 9 1 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 1 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 1 1 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 5 1 8 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 5 1 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 7 1 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 7 1 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 7 1 8 , srcInfoPoints = [] } "x")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 15 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 15 1 15 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 15 2 15 , SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 1 5 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 15 1 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 15 1 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 15 1 16 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 17 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 17 1 18 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 19 1 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 1 19 1 20 , srcInfoPoints = [] } 1 "1"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 15 2 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 15 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 15 2 16 , srcInfoPoints = [] } "z")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 17 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 17 2 18 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 19 2 21 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 2 19 2 21 , srcInfoPoints = [] } 19 "19"))) Nothing ])) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 1 5 6 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 1 5 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 1 5 2 , srcInfoPoints = [] } "y")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 3 5 6 , srcInfoPoints = [ SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 3 5 4 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 5 5 6 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ImplicitWhereBlocks.hs" 5 5 5 6 , srcInfoPoints = [] } 2 "2"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/BlockArguments.hs.parser.golden0000644000000000000000000015555413603723515024177 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 1 1 17 1 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 1 1 1 1 , SrcSpan "tests/examples/BlockArguments.hs" 2 1 2 1 , SrcSpan "tests/examples/BlockArguments.hs" 2 1 2 1 , SrcSpan "tests/examples/BlockArguments.hs" 4 1 4 1 , SrcSpan "tests/examples/BlockArguments.hs" 8 1 8 1 , SrcSpan "tests/examples/BlockArguments.hs" 10 1 10 1 , SrcSpan "tests/examples/BlockArguments.hs" 17 1 17 1 , SrcSpan "tests/examples/BlockArguments.hs" 17 1 17 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 2 1 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 2 1 2 7 , SrcSpan "tests/examples/BlockArguments.hs" 2 23 2 28 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 2 8 2 22 , srcInfoPoints = [] } "BlockArguments") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 1 1 1 13 , SrcSpan "tests/examples/BlockArguments.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 1 14 1 28 , srcInfoPoints = [] } "BlockArguments" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 1 6 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 5 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 4 5 4 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 7 6 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 7 4 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 7 4 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 7 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 7 4 11 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 12 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 4 12 4 13 , SrcSpan "tests/examples/BlockArguments.hs" 4 18 4 19 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 13 4 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 13 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 13 4 14 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 15 4 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 15 4 16 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 15 4 16 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 17 4 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 17 4 18 , srcInfoPoints = [] } 0 "0"))))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 4 20 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 4 20 4 22 , SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 3 , SrcSpan "tests/examples/BlockArguments.hs" 6 3 6 3 , SrcSpan "tests/examples/BlockArguments.hs" 8 1 8 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 10 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 10 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 3 5 8 , srcInfoPoints = [] } "print"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 9 5 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 9 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 5 9 5 10 , srcInfoPoints = [] } "x")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 6 3 6 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 6 3 6 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 6 3 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 6 3 6 14 , srcInfoPoints = [] } "exitFailure"))) ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 1 8 56 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 1 8 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 1 8 4 , srcInfoPoints = [] } "bar")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 5 8 56 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 8 5 8 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 7 8 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 7 8 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 7 8 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 7 8 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 7 8 21 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 22 8 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 22 8 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 22 8 26 , srcInfoPoints = [] } "fptr")))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 27 8 56 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 8 27 8 28 , SrcSpan "tests/examples/BlockArguments.hs" 8 32 8 34 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 28 8 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 28 8 31 , srcInfoPoints = [] } "ptr") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 35 8 43 , srcInfoPoints = [] } "c_memcpy"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 44 8 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 44 8 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 44 8 47 , srcInfoPoints = [] } "buf")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 48 8 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 48 8 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 48 8 51 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 52 8 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 52 8 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 8 52 8 56 , srcInfoPoints = [] } "size"))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 1 16 32 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 1 16 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 1 10 4 , srcInfoPoints = [] } "baz") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 5 10 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 5 10 9 , srcInfoPoints = [] } "arg1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 10 10 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 10 10 14 , srcInfoPoints = [] } "arg2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 15 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 15 10 19 , srcInfoPoints = [] } "arg3") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 20 10 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 20 10 24 , srcInfoPoints = [] } "arg4") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 25 16 32 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 10 25 10 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 27 16 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 27 11 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 27 10 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 27 10 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 10 27 10 39 , srcInfoPoints = [] } "initialValue"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 3 11 4 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 3 11 4 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 3 11 4 , srcInfoPoints = [] } "&"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 7 11 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 7 11 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 7 11 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 7 11 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 7 11 19 , srcInfoPoints = [] } "someFunction"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 20 11 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 20 11 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 20 11 24 , srcInfoPoints = [] } "arg1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 25 11 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 25 11 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 11 25 11 29 , srcInfoPoints = [] } "arg2"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 3 12 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 3 12 6 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 3 12 6 , srcInfoPoints = [] } ">>="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 7 16 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 7 12 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 7 12 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 7 12 15 , srcInfoPoints = [] } "traverse"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 16 16 32 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 12 16 12 17 , SrcSpan "tests/examples/BlockArguments.hs" 12 24 12 26 ] } [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 17 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 12 17 12 18 , SrcSpan "tests/examples/BlockArguments.hs" 12 19 12 20 , SrcSpan "tests/examples/BlockArguments.hs" 12 22 12 23 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 18 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 18 12 19 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 21 12 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 21 12 22 , srcInfoPoints = [] } "y") ] ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 27 16 32 , srcInfoPoints = [] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 12 27 15 14 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 12 27 12 29 , SrcSpan "tests/examples/BlockArguments.hs" 13 9 13 9 , SrcSpan "tests/examples/BlockArguments.hs" 14 9 14 9 , SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 9 , SrcSpan "tests/examples/BlockArguments.hs" 16 3 16 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 9 13 17 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 13 11 13 13 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 9 13 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 9 13 10 , srcInfoPoints = [] } "a")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 14 13 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 14 13 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 14 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 14 13 15 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 16 13 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 16 13 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 13 16 13 17 , srcInfoPoints = [] } "x")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 9 14 17 , srcInfoPoints = [ SrcSpan "tests/examples/BlockArguments.hs" 14 11 14 13 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 9 14 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 9 14 10 , srcInfoPoints = [] } "b")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 14 14 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 14 14 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 14 14 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 14 14 15 , srcInfoPoints = [] } "g"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 16 14 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 16 14 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 14 16 14 17 , srcInfoPoints = [] } "y")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 9 15 10 , srcInfoPoints = [] } "h"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 11 15 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 11 15 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 11 15 12 , srcInfoPoints = [] } "a")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 13 15 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 13 15 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 15 13 15 14 , srcInfoPoints = [] } "b")))) ]) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 3 16 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 3 16 6 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 3 16 6 , srcInfoPoints = [] } ">>="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 7 16 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 7 16 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 7 16 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 7 16 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 7 16 22 , srcInfoPoints = [] } "anotherFunction"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 23 16 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 23 16 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 23 16 27 , srcInfoPoints = [] } "arg3")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 28 16 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 28 16 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BlockArguments.hs" 16 28 16 32 , srcInfoPoints = [] } "arg4"))))))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/NPlusK.hs.parser.golden0000644000000000000000000000703613534314633022422 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/NPlusK.hs" 1 1 1 1 , SrcSpan "tests/examples/NPlusK.hs" 3 1 3 1 , SrcSpan "tests/examples/NPlusK.hs" 3 1 3 1 , SrcSpan "tests/examples/NPlusK.hs" 3 1 3 1 , SrcSpan "tests/examples/NPlusK.hs" 4 1 4 1 , SrcSpan "tests/examples/NPlusK.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/NPlusK.hs" 1 1 1 13 , SrcSpan "tests/examples/NPlusK.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 1 14 1 28 , srcInfoPoints = [] } "NPlusKPatterns" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 1 3 12 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 1 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 1 3 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 3 3 8 , srcInfoPoints = [ SrcSpan "tests/examples/NPlusK.hs" 3 3 3 4 , SrcSpan "tests/examples/NPlusK.hs" 3 7 3 8 ] } (PNPlusK SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 4 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/NPlusK.hs" 3 5 3 6 , SrcSpan "tests/examples/NPlusK.hs" 3 6 3 7 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 4 3 5 , srcInfoPoints = [] } "n") 3) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 9 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/NPlusK.hs" 3 9 3 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 11 3 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 11 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NPlusK.hs" 3 11 3 12 , srcInfoPoints = [] } "n")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ClassDeclSrcSpan.hs.parser.golden0000644000000000000000000001724113534314632024373 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 2 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 2 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 2 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 1 5 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 1 6 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 7 1 7 1 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 7 1 7 1 ] } Nothing [] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 1 2 6 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 12 2 17 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 5 3 5 , SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 1 5 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 7 2 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 7 2 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 7 2 9 , srcInfoPoints = [] } "C1")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 10 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 2 10 2 11 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 5 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 14 3 16 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 5 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 14 3 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 5 3 13 , srcInfoPoints = [] } "toString" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 17 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 19 3 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 17 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 17 3 18 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 22 3 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 22 3 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 3 22 3 28 , srcInfoPoints = [] } "String"))))) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 1 5 13 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 4 5 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 1 5 3 , srcInfoPoints = [] } "t1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 7 5 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 7 5 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 5 7 5 13 , srcInfoPoints = [] } "String"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 1 6 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 1 6 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 1 6 3 , srcInfoPoints = [] } "t1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 4 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 4 6 5 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 6 6 13 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassDeclSrcSpan.hs" 6 6 6 13 , srcInfoPoints = [] } "Hello" "Hello"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/IfThenElseLayout.hs.parser.golden0000644000000000000000000013547513534314633024443 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 1 1 13 1 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 1 1 1 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 2 1 2 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 2 1 2 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 4 1 4 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 5 1 5 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 13 1 13 1 , SrcSpan "tests/examples/IfThenElseLayout.hs" 13 1 13 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 2 1 2 30 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 2 1 2 7 , SrcSpan "tests/examples/IfThenElseLayout.hs" 2 25 2 30 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 2 8 2 24 , srcInfoPoints = [] } "IfThenElseLayout") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 1 1 1 13 , SrcSpan "tests/examples/IfThenElseLayout.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 1 14 1 29 , srcInfoPoints = [] } "DoAndIfThenElse" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 1 4 41 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 4 21 4 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 1 4 20 , srcInfoPoints = [] } "askCardsForExchange" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 24 4 41 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 4 29 4 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 24 4 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 24 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 24 4 28 , srcInfoPoints = [] } "Hand"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 32 4 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 32 4 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 32 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 32 4 34 , srcInfoPoints = [] } "IO"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 35 4 41 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 4 35 4 36 , SrcSpan "tests/examples/IfThenElseLayout.hs" 4 40 4 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 36 4 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 36 4 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 4 36 4 40 , srcInfoPoints = [] } "Card")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 1 11 61 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 1 11 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 1 5 20 , srcInfoPoints = [] } "askCardsForExchange") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 21 5 22 , srcInfoPoints = [] } "h") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 23 11 61 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 5 23 5 24 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 5 25 11 61 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 5 25 5 27 , SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 26 , SrcSpan "tests/examples/IfThenElseLayout.hs" 7 26 7 26 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 26 8 26 , SrcSpan "tests/examples/IfThenElseLayout.hs" 13 1 13 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 80 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 26 6 34 , srcInfoPoints = [] } "putStrLn"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 35 6 80 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 6 35 6 80 , srcInfoPoints = [] } "Wich card do you want to exchange? (Max. 3)" "Wich card do you want to exchange? (Max. 3)"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 26 7 45 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 7 35 7 37 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 26 7 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 26 7 34 , srcInfoPoints = [] } "response")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 38 7 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 38 7 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 7 38 7 45 , srcInfoPoints = [] } "getLine"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 26 11 61 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 8 26 8 28 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 90 8 94 , SrcSpan "tests/examples/IfThenElseLayout.hs" 10 26 10 26 , SrcSpan "tests/examples/IfThenElseLayout.hs" 10 26 10 30 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 26 11 61 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 8 26 8 28 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 90 8 94 , SrcSpan "tests/examples/IfThenElseLayout.hs" 10 26 10 26 , SrcSpan "tests/examples/IfThenElseLayout.hs" 10 26 10 30 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 89 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 29 8 35 , srcInfoPoints = [] } "length"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 36 8 56 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 8 36 8 37 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 55 8 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 37 8 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 37 8 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 37 8 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 37 8 46 , srcInfoPoints = [] } "readCards"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 47 8 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 47 8 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 47 8 55 , srcInfoPoints = [] } "response")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 57 8 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 57 8 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 57 8 58 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 59 8 60 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 59 8 60 , srcInfoPoints = [] } 3 "3"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 61 8 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 61 8 63 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 61 8 63 , srcInfoPoints = [] } "||"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 64 8 89 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 64 8 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 64 8 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 64 8 67 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 68 8 89 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 8 68 8 69 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 88 8 89 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 69 8 88 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 69 8 86 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 69 8 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 69 8 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 69 8 72 , srcInfoPoints = [] } "all"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 73 8 86 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 8 73 8 74 , SrcSpan "tests/examples/IfThenElseLayout.hs" 8 85 8 86 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 74 8 85 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 74 8 83 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 74 8 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 74 8 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 74 8 78 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 79 8 83 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 79 8 83 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 79 8 83 , srcInfoPoints = [] } "elem")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 84 8 85 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 84 8 85 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 84 8 85 , srcInfoPoints = [] } "h")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 87 8 88 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 87 8 88 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 8 87 8 88 , srcInfoPoints = [] } "h"))))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 34 9 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 34 9 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 34 9 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 34 9 53 , srcInfoPoints = [] } "askCardsForExchange"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 54 9 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 54 9 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 9 54 9 55 , srcInfoPoints = [] } "h")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 34 11 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 34 11 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 34 11 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 34 11 40 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 41 11 61 , srcInfoPoints = [ SrcSpan "tests/examples/IfThenElseLayout.hs" 11 41 11 42 , SrcSpan "tests/examples/IfThenElseLayout.hs" 11 60 11 61 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 42 11 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 42 11 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 42 11 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 42 11 51 , srcInfoPoints = [] } "readCards"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 52 11 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 52 11 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IfThenElseLayout.hs" 11 52 11 60 , srcInfoPoints = [] } "response"))))))) ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces3.hs.parser.golden0000644000000000000000000001264713534314633025116 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 1 1 1 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 1 3 1 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 1 3 1 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 1 5 1 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 6 1 6 1 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 1 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 1 3 7 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 22 3 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 8 3 11 , srcInfoPoints = [] } "Foo") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 11 3 21 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 11 3 12 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 20 3 21 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 12 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 12 3 16 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 17 3 20 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 12 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 12 3 16 ] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 17 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 3 17 3 20 , srcInfoPoints = [] } "Str")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 1 1 13 , SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 1 14 1 32 , srcInfoPoints = [] } "ExplicitNamespaces" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 1 5 15 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 10 5 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 6 5 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 6 5 9 , srcInfoPoints = [] } "Str")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 12 5 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 12 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces3.hs" 5 12 5 15 , srcInfoPoints = [] } "Str") []) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/LineOptionsPragma.hs.parser.golden0000644000000000000000000000332013534314633024631 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 4 1 4 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 7 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 13 3 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 3 8 3 12 , srcInfoPoints = [] } "Fail") Nothing Nothing)) [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 16 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 13 , SrcSpan "tests/examples/LineOptionsPragma.hs" 1 13 1 16 ] } Nothing "" ] [] [] , [ Comment True (SrcSpan "tests/examples/LineOptionsPragma.hs" 2 1 2 48) "# LINE 49 \"src/Language/C/Parser/Lexer.x\" #" ] ) haskell-src-exts-1.23.1/tests/examples/GadtStrictness.hs.parser.golden0000644000000000000000000001220013534314633024174 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 1 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 13 , SrcSpan "tests/examples/GadtStrictness.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 5 0 , srcInfoPoints = [ SrcSpan "tests/examples/GadtStrictness.hs" 3 8 3 13 , SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 3 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7 , srcInfoPoints = [] } "X")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 17 , srcInfoPoints = [ SrcSpan "tests/examples/GadtStrictness.hs" 4 5 4 7 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 4 , srcInfoPoints = [] } "X") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 17 , srcInfoPoints = [ SrcSpan "tests/examples/GadtStrictness.hs" 4 13 4 15 ] } (TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 12 , srcInfoPoints = [] } (BangedTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 9 , srcInfoPoints = [] }) (NoUnpackPragma SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 , srcInfoPoints = [] } "X")))) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/MultiLinePragma.hs.parser.golden0000644000000000000000000001266213534314633024301 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 1 1 15 1 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 1 1 1 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 1 13 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 1 13 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 1 13 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 14 1 14 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 15 1 15 1 , SrcSpan "tests/examples/MultiLinePragma.hs" 15 1 15 1 ] } Nothing [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 1 1 12 11 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 1 1 12 8 , SrcSpan "tests/examples/MultiLinePragma.hs" 12 8 12 11 ] } (Just GHC) "\n -a\n -a\n -a\n -a\n -a\n -a\n -a\n -a\n -a\n -a\n -a " ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 1 13 14 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 13 6 13 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 1 13 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 9 13 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 9 13 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 9 13 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 9 13 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 14 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 13 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 13 13 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 14 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 13 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 13 13 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 14 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 13 12 13 13 , SrcSpan "tests/examples/MultiLinePragma.hs" 13 13 13 14 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 1 14 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 1 14 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 1 14 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 6 14 11 , srcInfoPoints = [ SrcSpan "tests/examples/MultiLinePragma.hs" 14 6 14 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 8 14 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 8 14 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiLinePragma.hs" 14 8 14 11 , srcInfoPoints = [] } "dat")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/HappyDoAction.hs.parser.golden0000644000000000000000000043751313534314633023757 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 1 31 1 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 1 , SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 1 , SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 1 , SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 1 , SrcSpan "tests/examples/HappyDoAction.hs" 6 1 6 1 , SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 1 , SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 7 , SrcSpan "tests/examples/HappyDoAction.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 2 8 2 21 , srcInfoPoints = [] } "HappyDoAction") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 13 , SrcSpan "tests/examples/HappyDoAction.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 14 1 23 , srcInfoPoints = [] } "MagicHash" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 12 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 4 5 4 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 4 , srcInfoPoints = [] } "foo" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12 , srcInfoPoints = [] } "Int#"))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 30 67 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 9 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 30 67 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 9 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 6 14 , srcInfoPoints = [] } "happyDoAction") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 15 6 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 15 6 16 , srcInfoPoints = [] } "i") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 17 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 17 6 19 , srcInfoPoints = [] } "tk") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 20 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 20 6 22 , srcInfoPoints = [] } "st") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 7 5 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 7 5 7 6 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 10 7 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 10 7 10 11 , SrcSpan "tests/examples/HappyDoAction.hs" 10 19 10 21 , SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 9 , SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 9 , SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 9 , SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 9 , SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18 , srcInfoPoints = [] } "action"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 11 9 12 39 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11 , srcInfoPoints = [] }) (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11 , srcInfoPoints = [] } 0 "0")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 11 19 12 39 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 11 19 11 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 31 , srcInfoPoints = [] } "happyFail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 32 12 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 32 12 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 32 12 33 , srcInfoPoints = [] } "i")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 34 12 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 34 12 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 34 12 36 , srcInfoPoints = [] } "tk")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39 , srcInfoPoints = [] } "st"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 13 9 14 41 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 12 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10 ] }) (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 13 10 13 12 , srcInfoPoints = [] } 1 "1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 13 19 14 41 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 13 19 13 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 33 , srcInfoPoints = [] } "happyAccept"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 34 14 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 34 14 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 34 14 35 , srcInfoPoints = [] } "i")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 36 14 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 36 14 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 36 14 38 , srcInfoPoints = [] } "tk")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41 , srcInfoPoints = [] } "st"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 9 18 76 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 22 18 27 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 10 , srcInfoPoints = [] } "n")) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 11 17 53 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 11 15 12 , SrcSpan "tests/examples/HappyDoAction.hs" 15 33 15 35 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 11 17 53 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 11 15 12 , SrcSpan "tests/examples/HappyDoAction.hs" 15 33 15 35 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 14 , SrcSpan "tests/examples/HappyDoAction.hs" 15 31 15 32 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 14 , SrcSpan "tests/examples/HappyDoAction.hs" 15 31 15 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 14 15 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 14 15 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 14 15 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 14 15 15 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 16 15 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 16 15 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 16 15 18 , srcInfoPoints = [] } "<#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 19 15 31 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 19 15 20 , SrcSpan "tests/examples/HappyDoAction.hs" 15 30 15 31 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 20 15 30 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 15 23 15 25 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 20 15 22 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 20 15 22 , srcInfoPoints = [] } 0 "0")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 26 15 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 26 15 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 15 26 15 30 , srcInfoPoints = [] } "Int#"))))))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 47 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 45 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 23 , SrcSpan "tests/examples/HappyDoAction.hs" 17 44 17 45 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 23 17 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 23 17 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 23 17 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 23 17 37 , srcInfoPoints = [] } "happyReduceArr"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 38 17 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 38 17 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 38 17 39 , srcInfoPoints = [] } "!"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 40 17 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 40 17 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 40 17 44 , srcInfoPoints = [] } "rule"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 46 17 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 46 17 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 46 17 47 , srcInfoPoints = [] } "i")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 48 17 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 48 17 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 48 17 50 , srcInfoPoints = [] } "tk")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 51 17 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 51 17 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 17 51 17 53 , srcInfoPoints = [] } "st")))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 76 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 28 , SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 76 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 32 , srcInfoPoints = [] } "rule")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 33 18 76 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 33 18 34 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 35 18 76 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 35 18 36 , SrcSpan "tests/examples/HappyDoAction.hs" 18 75 18 76 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 36 18 75 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 36 18 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 36 18 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 36 18 38 , srcInfoPoints = [] } "I#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 39 18 75 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 39 18 40 , SrcSpan "tests/examples/HappyDoAction.hs" 18 74 18 75 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 40 18 74 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 40 18 41 , SrcSpan "tests/examples/HappyDoAction.hs" 18 73 18 74 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 41 18 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 41 18 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 41 18 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 41 18 51 , srcInfoPoints = [] } "negateInt#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 52 18 73 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 52 18 53 , SrcSpan "tests/examples/HappyDoAction.hs" 18 72 18 73 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 53 18 72 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 53 18 54 , SrcSpan "tests/examples/HappyDoAction.hs" 18 71 18 72 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 54 18 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 54 18 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 54 18 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 54 18 55 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 56 18 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 56 18 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 56 18 58 , srcInfoPoints = [] } "+#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 59 18 71 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 59 18 60 , SrcSpan "tests/examples/HappyDoAction.hs" 18 70 18 71 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 60 18 70 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 18 63 18 65 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 60 18 62 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 60 18 62 , srcInfoPoints = [] } 1 "1")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 66 18 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 66 18 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 18 66 18 70 , srcInfoPoints = [] } "Int#")))))))))))))) Nothing ])) , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 19 9 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 22 23 27 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 10 , srcInfoPoints = [] } "n")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 19 19 22 50 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 19 19 19 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 32 , srcInfoPoints = [] } "happyShift"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 33 22 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 33 22 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 33 22 42 , srcInfoPoints = [] } "new_state")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 43 22 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 43 22 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 43 22 44 , srcInfoPoints = [] } "i")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 45 22 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 45 22 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 45 22 47 , srcInfoPoints = [] } "tk")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50 , srcInfoPoints = [] } "st"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 28 , SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 59 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 37 , srcInfoPoints = [] } "new_state")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 38 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 38 23 39 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 40 23 59 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 40 23 41 , SrcSpan "tests/examples/HappyDoAction.hs" 23 58 23 59 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 41 23 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 41 23 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 41 23 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 41 23 42 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 43 23 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 43 23 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 43 23 45 , srcInfoPoints = [] } "-#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 46 23 58 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 46 23 47 , SrcSpan "tests/examples/HappyDoAction.hs" 23 57 23 58 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 47 23 57 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 23 50 23 52 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 47 23 49 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 47 23 49 , srcInfoPoints = [] } 1 "1")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 53 23 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 53 23 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 23 53 23 57 , srcInfoPoints = [] } "Int#")))))))) Nothing ])) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 10 30 67 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 10 , SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 10 , SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 10 , SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 10 , SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 55 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 13 , srcInfoPoints = [] } "off")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 17 24 55 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 24 17 24 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 36 , srcInfoPoints = [] } "indexShortOffAddr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 37 24 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 37 24 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 37 24 52 , srcInfoPoints = [] } "happyActOffsets")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55 , srcInfoPoints = [] } "st"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 15 , srcInfoPoints = [] } "off_i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 17 25 29 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 25 17 25 18 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 19 25 29 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 25 19 25 20 , SrcSpan "tests/examples/HappyDoAction.hs" 25 28 25 29 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 23 , srcInfoPoints = [] } "off"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 24 25 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 24 25 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 24 25 26 , srcInfoPoints = [] } "+#"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 27 25 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 27 25 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 25 27 25 28 , srcInfoPoints = [] } "i")))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 10 28 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 15 , srcInfoPoints = [] } "check")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 17 28 30 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 26 17 26 18 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 19 28 30 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 26 19 26 21 , SrcSpan "tests/examples/HappyDoAction.hs" 27 20 27 24 , SrcSpan "tests/examples/HappyDoAction.hs" 28 20 28 24 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 22 26 46 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 26 22 26 23 , SrcSpan "tests/examples/HappyDoAction.hs" 26 45 26 46 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 28 , srcInfoPoints = [] } "off_i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 29 26 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 29 26 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 29 26 32 , srcInfoPoints = [] } ">=#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 33 26 45 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 26 33 26 34 , SrcSpan "tests/examples/HappyDoAction.hs" 26 44 26 45 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 34 26 44 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 26 37 26 39 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 34 26 36 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 34 26 36 , srcInfoPoints = [] } 0 "0")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 40 26 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 40 26 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 26 40 26 44 , srcInfoPoints = [] } "Int#"))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 25 27 68 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 27 25 27 26 , SrcSpan "tests/examples/HappyDoAction.hs" 27 67 27 68 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 43 , srcInfoPoints = [] } "indexShortOffAddr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 44 27 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 44 27 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 44 27 54 , srcInfoPoints = [] } "happyCheck")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 55 27 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 55 27 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 55 27 60 , srcInfoPoints = [] } "off_i")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 61 27 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 61 27 64 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 61 27 64 , srcInfoPoints = [] } "==#"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 66 27 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 66 27 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 27 66 27 67 , srcInfoPoints = [] } "i"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30 , srcInfoPoints = [] } "False"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 10 30 67 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 16 , srcInfoPoints = [] } "action")) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 17 30 67 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 17 29 65 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 29 17 29 18 , SrcSpan "tests/examples/HappyDoAction.hs" 29 29 29 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24 , srcInfoPoints = [] } "check"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 48 , srcInfoPoints = [] } "indexShortOffAddr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 49 29 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 49 29 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 49 29 59 , srcInfoPoints = [] } "happyTable")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 60 29 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 60 29 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 29 60 29 65 , srcInfoPoints = [] } "off_i")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 17 30 67 , srcInfoPoints = [ SrcSpan "tests/examples/HappyDoAction.hs" 30 17 30 18 , SrcSpan "tests/examples/HappyDoAction.hs" 30 29 30 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 48 , srcInfoPoints = [] } "indexShortOffAddr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 49 30 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 49 30 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 49 30 64 , srcInfoPoints = [] } "happyDefActions")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 65 30 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 65 30 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 30 65 30 67 , srcInfoPoints = [] } "st")))) ]) Nothing ])) ] ] , [ Comment True (SrcSpan "tests/examples/HappyDoAction.hs" 7 7 7 20) " nothing " , Comment True (SrcSpan "tests/examples/HappyDoAction.hs" 11 22 11 35) " nothing " , Comment True (SrcSpan "tests/examples/HappyDoAction.hs" 13 22 13 35) " nothing " , Comment True (SrcSpan "tests/examples/HappyDoAction.hs" 15 36 15 49) " nothing " , Comment True (SrcSpan "tests/examples/HappyDoAction.hs" 19 22 19 35) " nothing " ] ) haskell-src-exts-1.23.1/tests/examples/TemplateHaskellQuotedNames.hs.parser.golden0000644000000000000000000002475313534314633026500 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 1 1 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 1 3 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 4 1 4 1 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 1 1 13 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 1 2 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 3 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 3 2 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 5 2 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 5 2 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 5 2 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 5 2 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 5 2 6 , srcInfoPoints = [] } "g"))) (VarQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 7 2 19 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 7 2 8 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 8 2 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 8 2 19 , srcInfoPoints = [] } "Constructor")))) (VarQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 20 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 20 2 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 21 2 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 2 21 2 29 , srcInfoPoints = [] } "function"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 1 3 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 1 3 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 1 3 2 , srcInfoPoints = [] } "h")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 3 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 3 3 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 5 3 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 5 3 10 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 5 3 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 5 3 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 5 3 6 , srcInfoPoints = [] } "g"))) (VarQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 7 3 10 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 7 3 8 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 8 3 10 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 8 3 9 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 9 3 10 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 8 3 10 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 8 3 9 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 9 3 10 ] })))) (VarQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 11 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 11 3 12 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 12 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 12 3 13 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 13 3 14 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 12 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 12 3 13 , SrcSpan "tests/examples/TemplateHaskellQuotedNames.hs" 3 13 3 14 ] }))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/TrailingWhere.hs.parser.golden0000644000000000000000000001431013534314633024003 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 1 6 0 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere.hs" 6 1 6 0 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 1 5 12 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 2 5 2 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 1 1 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 1 1 5 , srcInfoPoints = [] } "fail")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 6 1 9 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 1 6 1 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 8 1 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 8 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 1 8 1 9 , srcInfoPoints = [] } "x")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 5 5 12 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 3 5 3 5 , SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 5 , SrcSpan "tests/examples/TrailingWhere.hs" 6 1 6 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 5 5 5 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 4 9 4 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 5 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 5 3 11 , srcInfoPoints = [] } "broken")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 12 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 3 12 3 13 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 14 3 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 3 14 3 16 , srcInfoPoints = [] } 24 "24"))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 0 5 5 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 5 , SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 5 , SrcSpan "tests/examples/TrailingWhere.hs" 5 0 5 0 ] } [])) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 12 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 5 5 6 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 7 5 12 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere.hs" 5 7 5 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 9 5 12 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere.hs" 5 9 5 12 , srcInfoPoints = [] } 413 "413"))) Nothing ])) ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnindentedPragmaClose.hs.parser.golden0000644000000000000000000000774413534314633025467 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 2 4 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 13 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 4 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 14 1 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 3 3 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 2 , srcInfoPoints = [] } "f" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 6 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 6 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 4 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 , srcInfoPoints = [] } 4 "4"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeErrorMessage.hs.parser.golden0000644000000000000000000000042613534314633024502 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/TypeErrorMessage.hs" 2 1) "At least one of ExplicitForAll or TypeOperators language extensions needs to be enabled. Please add: {-# LANGUAGE ExplicitForAll #-} or {-# LANGUAGE TypeOperators #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/TabWhitespace.hs.parser.golden0000644000000000000000000000105313534314633023762 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TabWhitespace.hs" 2 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/TabWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/TabWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/TabWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/TabWhitespace.hs" 2 1 2 1 ] } Nothing [] [] [] , [ Comment False (SrcSpan "tests/examples/TabWhitespace.hs" 1 9 1 14) " hi" ] ) haskell-src-exts-1.23.1/tests/examples/ArityMismatch.hs.parser.golden0000644000000000000000000000013213534314632024011 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ArityMismatch.hs" 3 1) "arity mismatch for 'foo'" haskell-src-exts-1.23.1/tests/examples/RelaxedDo.hs.parser.golden0000644000000000000000000014421413534314633023115 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 1 1 15 1 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 1 1 1 1 , SrcSpan "tests/examples/RelaxedDo.hs" 2 1 2 1 , SrcSpan "tests/examples/RelaxedDo.hs" 2 1 2 1 , SrcSpan "tests/examples/RelaxedDo.hs" 4 1 4 1 , SrcSpan "tests/examples/RelaxedDo.hs" 6 1 6 1 , SrcSpan "tests/examples/RelaxedDo.hs" 7 1 7 1 , SrcSpan "tests/examples/RelaxedDo.hs" 12 1 12 1 , SrcSpan "tests/examples/RelaxedDo.hs" 15 1 15 1 , SrcSpan "tests/examples/RelaxedDo.hs" 15 1 15 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 2 1 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 2 1 2 7 , SrcSpan "tests/examples/RelaxedDo.hs" 2 13 2 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 2 8 2 12 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 1 1 1 42 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 1 1 1 13 , SrcSpan "tests/examples/RelaxedDo.hs" 1 39 1 42 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 1 14 1 38 , srcInfoPoints = [] } "NondecreasingIndentation" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 4 8 4 21 , srcInfoPoints = [] } "Control.Monad" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 1 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 6 6 6 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 1 6 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 9 6 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 9 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 9 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 9 6 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 13 , SrcSpan "tests/examples/RelaxedDo.hs" 6 13 6 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 13 , SrcSpan "tests/examples/RelaxedDo.hs" 6 13 6 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 6 12 6 13 , SrcSpan "tests/examples/RelaxedDo.hs" 6 13 6 14 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 7 1 10 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 7 1 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 7 1 7 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 7 6 10 15 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 7 6 7 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 7 8 10 15 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 7 8 7 10 , SrcSpan "tests/examples/RelaxedDo.hs" 8 3 8 3 , SrcSpan "tests/examples/RelaxedDo.hs" 12 1 12 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 10 15 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 10 15 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 8 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 8 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 8 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 3 8 7 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 8 8 16 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 8 8 8 9 , SrcSpan "tests/examples/RelaxedDo.hs" 8 15 8 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 10 8 15 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 10 8 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 10 8 11 , srcInfoPoints = [] } 2 "2")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 12 8 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 12 8 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 12 8 13 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 14 8 15 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 14 8 15 , srcInfoPoints = [] } 1 "1"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 17 8 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 17 8 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 17 8 18 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 8 19 10 15 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 8 19 8 21 , SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 3 , SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 3 , SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 3 , SrcSpan "tests/examples/RelaxedDo.hs" 12 1 12 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 15 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 3 9 11 , srcInfoPoints = [] } "putStrLn"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 12 9 15 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 9 12 9 15 , srcInfoPoints = [] } "a" "a"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 15 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 3 10 11 , srcInfoPoints = [] } "putStrLn"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 12 10 15 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 10 12 10 15 , srcInfoPoints = [] } "b" "b"))) ])) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 1 14 58 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 1 12 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 1 12 15 , srcInfoPoints = [] } "nestedDoBlocks")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 16 14 58 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 12 16 12 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 18 14 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 18 12 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 18 12 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 18 12 25 , srcInfoPoints = [] } "getChar"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 26 12 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 26 12 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 26 12 29 , srcInfoPoints = [] } ">>="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 30 14 58 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 12 30 12 31 , SrcSpan "tests/examples/RelaxedDo.hs" 14 57 14 58 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 31 14 57 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 12 31 12 32 , SrcSpan "tests/examples/RelaxedDo.hs" 12 35 12 37 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 32 12 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 32 12 34 , srcInfoPoints = [] } "c1") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 12 38 14 57 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 12 38 12 40 , SrcSpan "tests/examples/RelaxedDo.hs" 13 18 13 18 , SrcSpan "tests/examples/RelaxedDo.hs" 14 57 14 57 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 18 14 57 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 18 14 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 18 13 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 18 13 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 18 13 25 , srcInfoPoints = [] } "getChar"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 26 13 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 26 13 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 26 13 29 , srcInfoPoints = [] } ">>="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 30 14 57 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 13 30 13 31 , SrcSpan "tests/examples/RelaxedDo.hs" 14 56 14 57 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 31 14 56 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 13 31 13 32 , SrcSpan "tests/examples/RelaxedDo.hs" 13 35 13 37 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 32 13 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 32 13 34 , srcInfoPoints = [] } "c2") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 13 38 14 56 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 13 38 13 40 , SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 18 , SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 18 , SrcSpan "tests/examples/RelaxedDo.hs" 14 56 14 56 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 56 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 18 14 25 , srcInfoPoints = [] } "getChar"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 26 14 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 26 14 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 26 14 29 , srcInfoPoints = [] } ">>="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 30 14 56 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 14 30 14 31 , SrcSpan "tests/examples/RelaxedDo.hs" 14 55 14 56 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 31 14 55 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 14 31 14 32 , SrcSpan "tests/examples/RelaxedDo.hs" 14 35 14 37 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 32 14 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 32 14 34 , srcInfoPoints = [] } "c3") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 38 14 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 38 14 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 38 14 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 38 14 44 , srcInfoPoints = [] } "return"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 45 14 55 , srcInfoPoints = [ SrcSpan "tests/examples/RelaxedDo.hs" 14 45 14 46 , SrcSpan "tests/examples/RelaxedDo.hs" 14 48 14 49 , SrcSpan "tests/examples/RelaxedDo.hs" 14 51 14 52 , SrcSpan "tests/examples/RelaxedDo.hs" 14 54 14 55 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 46 14 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 46 14 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 46 14 48 , srcInfoPoints = [] } "c1")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 49 14 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 49 14 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 49 14 51 , srcInfoPoints = [] } "c2")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 52 14 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 52 14 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RelaxedDo.hs" 14 52 14 54 , srcInfoPoints = [] } "c3")) ]))))) ])))) ]))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteOld.hs.parser.golden0000644000000000000000000002465113534314633024007 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 13 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 1 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 8 3 12 , srcInfoPoints = [] } "Here" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 5 5 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 4 , srcInfoPoints = [] } "str" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14 , srcInfoPoints = [] } "String"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 8 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 4 , srcInfoPoints = [] } "str")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 5 8 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 5 6 6 ] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 7 8 13 , srcInfoPoints = [] } "here" "test \ntest \ntest test ")) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 6 11 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 6 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 6 12 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 8 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 8 12 10 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 11 , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19 , srcInfoPoints = [] } "putStrLn"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23 , srcInfoPoints = [] } "str")))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/BracketInstanceHead.hs.parser.golden0000644000000000000000000001541713556712523025076 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 1 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 1 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 1 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 2 1 2 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 2 1 2 1 ] } Nothing [] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 2 0 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 1 1 9 , SrcSpan "tests/examples/BracketInstanceHead.hs" 1 37 1 42 , SrcSpan "tests/examples/BracketInstanceHead.hs" 2 1 2 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 2 1 2 1 , SrcSpan "tests/examples/BracketInstanceHead.hs" 2 0 2 0 ] } Nothing (IParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 10 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 10 1 11 , SrcSpan "tests/examples/BracketInstanceHead.hs" 1 35 1 36 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 35 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 21 1 23 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 21 1 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 21 1 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 21 1 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 11 1 18 , srcInfoPoints = [] } "Bounded"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 19 1 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 19 1 20 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 24 1 35 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 24 1 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 24 1 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 24 1 31 , srcInfoPoints = [] } "Bounded"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 32 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/BracketInstanceHead.hs" 1 32 1 33 , SrcSpan "tests/examples/BracketInstanceHead.hs" 1 34 1 35 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 33 1 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BracketInstanceHead.hs" 1 33 1 34 , srcInfoPoints = [] } "a")))))) (Just []) ] , [] ) haskell-src-exts-1.23.1/tests/examples/TySplice2.hs.parser.golden0000644000000000000000000001171013534314633023056 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 1 1 1 1 , SrcSpan "tests/examples/TySplice2.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice2.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice2.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice2.hs" 3 1 3 1 , SrcSpan "tests/examples/TySplice2.hs" 5 1 5 1 , SrcSpan "tests/examples/TySplice2.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 1 1 1 13 , SrcSpan "tests/examples/TySplice2.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 1 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 2 4 2 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 1 2 3 , srcInfoPoints = [] } "t1" ] (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 7 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 2 7 2 9 , SrcSpan "tests/examples/TySplice2.hs" 2 19 2 20 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 7 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 2 7 2 9 , SrcSpan "tests/examples/TySplice2.hs" 2 19 2 20 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 10 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 2 10 2 13 , SrcSpan "tests/examples/TySplice2.hs" 2 16 2 18 ] } (TypeBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 10 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 2 10 2 13 , SrcSpan "tests/examples/TySplice2.hs" 2 16 2 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 13 2 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 13 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 2 13 2 16 , srcInfoPoints = [] } "Int"))))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 1 3 7 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 1 3 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 1 3 3 , srcInfoPoints = [] } "t1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 4 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice2.hs" 3 4 3 5 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 6 3 7 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice2.hs" 3 6 3 7 , srcInfoPoints = [] } 1 "1"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsGood.hs.parser.golden0000644000000000000000000024047713534314632025012 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 1 24 1 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 1 1 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 2 1 2 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 1 4 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 1 4 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 1 4 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 1 6 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 24 1 24 1 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 24 1 24 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 1 1 13 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 1 14 1 28 , srcInfoPoints = [] } "BinaryLiterals" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 2 1 2 13 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 2 24 2 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 2 14 2 23 , srcInfoPoints = [] } "MagicHash" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 1 4 17 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 4 8 4 17 , srcInfoPoints = [] } "GHC.Types" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 1 23 47 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 1 6 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 1 6 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 6 23 47 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 6 6 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 8 23 47 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 6 8 6 10 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 7 5 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 13 5 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 17 5 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 5 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 24 1 24 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 12 12 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 12 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 7 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 5 7 10 , srcInfoPoints = [] } "print"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 11 12 12 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 11 7 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 20 7 21 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 30 7 31 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 39 7 40 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 11 8 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 11 9 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 11 10 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 28 10 29 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 11 11 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 28 11 29 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 12 11 12 12 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 13 7 20 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 13 7 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 13 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 13 7 15 , srcInfoPoints = [] } "I#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 16 7 20 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 16 7 20 , srcInfoPoints = [] } 0 "0b0")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 22 7 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 22 7 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 22 7 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 22 7 24 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 25 7 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 25 7 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 25 7 26 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 26 7 30 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 26 7 30 , srcInfoPoints = [] } 0 "0b0")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 32 7 39 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 32 7 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 32 7 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 32 7 34 , srcInfoPoints = [] } "I#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 35 7 39 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 35 7 39 , srcInfoPoints = [] } 1 "0b1")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 41 7 49 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 41 7 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 41 7 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 41 7 43 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 44 7 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 44 7 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 44 7 45 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 45 7 49 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 7 45 7 49 , srcInfoPoints = [] } 1 "0b1")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 13 8 96 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 13 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 13 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 13 8 15 , srcInfoPoints = [] } "I#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 16 8 96 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 8 16 8 96 , srcInfoPoints = [] } 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 13 9 97 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 13 9 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 13 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 13 9 15 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 16 9 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 16 9 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 16 9 17 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 17 9 97 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 9 17 9 97 , srcInfoPoints = [] } 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 13 10 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 13 10 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 13 10 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 13 10 15 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 16 10 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 16 10 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 16 10 17 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 17 10 28 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 17 10 28 , srcInfoPoints = [] } 201 "0b11001001")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 30 10 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 30 10 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 30 10 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 30 10 32 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 33 10 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 33 10 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 33 10 34 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 34 10 45 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 10 34 10 45 , srcInfoPoints = [] } 201 "0b11001001")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 13 11 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 13 11 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 13 11 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 13 11 15 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 16 11 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 16 11 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 16 11 17 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 17 11 28 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 17 11 28 , srcInfoPoints = [] } 255 "0b11111111")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 30 11 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 30 11 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 30 11 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 30 11 32 , srcInfoPoints = [] } "I#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 33 11 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 33 11 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 33 11 34 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 34 11 45 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 11 34 11 45 , srcInfoPoints = [] } 255 "0b11111111")) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 15 12 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 15 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 13 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 13 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 5 13 10 , srcInfoPoints = [] } "print"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 11 15 12 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 11 13 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 21 13 22 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 31 13 32 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 48 13 49 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 59 13 60 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 11 14 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 15 11 15 12 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 13 13 21 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 13 13 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 13 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 13 13 15 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 16 13 21 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 16 13 21 , srcInfoPoints = [] } 0 "0b0")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 23 13 31 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 23 13 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 23 13 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 23 13 25 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 26 13 31 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 26 13 31 , srcInfoPoints = [] } 1 "0b1")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 33 13 48 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 33 13 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 33 13 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 33 13 35 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 36 13 48 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 36 13 48 , srcInfoPoints = [] } 201 "0b11001001")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 50 13 59 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 50 13 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 50 13 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 50 13 52 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 53 13 59 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 53 13 59 , srcInfoPoints = [] } 3 "0b11")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 61 13 76 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 61 13 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 61 13 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 61 13 63 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 64 13 76 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 13 64 13 76 , srcInfoPoints = [] } 255 "0b11111111")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 13 14 97 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 13 14 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 13 14 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 13 14 15 , srcInfoPoints = [] } "W#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 16 14 97 , srcInfoPoints = [] } (PrimWord SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 14 16 14 97 , srcInfoPoints = [] } 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001")) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 21 12 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 21 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 17 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 17 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 5 17 10 , srcInfoPoints = [] } "print"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 11 21 12 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 11 17 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 16 17 17 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 21 17 22 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 27 17 28 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 33 17 34 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 40 17 41 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 47 17 48 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 54 17 55 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 11 18 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 17 18 18 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 23 18 24 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 30 18 31 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 37 18 38 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 45 18 46 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 53 18 54 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 61 18 62 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 19 11 19 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 20 11 20 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 21 11 21 12 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 13 17 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 13 17 16 , srcInfoPoints = [] } 0 "0b0") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 18 17 21 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 18 17 21 , srcInfoPoints = [] } 1 "0b1") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 23 17 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 23 17 27 , srcInfoPoints = [] } 2 "0b10") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 29 17 33 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 29 17 33 , srcInfoPoints = [] } 3 "0b11") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 35 17 40 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 35 17 40 , srcInfoPoints = [] } 4 "0b100") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 42 17 47 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 42 17 47 , srcInfoPoints = [] } 5 "0b101") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 49 17 54 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 49 17 54 , srcInfoPoints = [] } 6 "0b110") , ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 56 17 72 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 62 17 64 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 56 17 61 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 56 17 61 , srcInfoPoints = [] } 7 "0b111")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 65 17 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 65 17 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 17 65 17 72 , srcInfoPoints = [] } "Integer"))) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 13 18 17 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 13 18 14 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 14 18 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 14 18 17 , srcInfoPoints = [] } 0 "0b0")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 19 18 23 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 19 18 20 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 20 18 23 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 20 18 23 , srcInfoPoints = [] } 1 "0b1")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 25 18 30 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 25 18 26 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 26 18 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 26 18 30 , srcInfoPoints = [] } 2 "0b10")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 32 18 37 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 32 18 33 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 33 18 37 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 33 18 37 , srcInfoPoints = [] } 3 "0b11")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 39 18 45 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 39 18 40 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 40 18 45 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 40 18 45 , srcInfoPoints = [] } 4 "0b100")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 47 18 53 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 47 18 48 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 48 18 53 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 48 18 53 , srcInfoPoints = [] } 5 "0b101")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 55 18 61 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 55 18 56 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 56 18 61 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 56 18 61 , srcInfoPoints = [] } 6 "0b110")) , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 63 18 69 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 63 18 64 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 64 18 69 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 18 64 18 69 , srcInfoPoints = [] } 7 "0b111")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 19 13 19 143 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 19 13 19 143 , srcInfoPoints = [] } 340282366920938463463374607431768211455 "0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111") , NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 20 13 20 144 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 20 13 20 14 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 20 14 20 144 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 20 14 20 144 , srcInfoPoints = [] } 340282366920938463463374607431768211455 "0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111")) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 5 23 10 , srcInfoPoints = [] } "print"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 11 23 47 , srcInfoPoints = [ SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 11 23 12 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 29 23 30 , SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 46 23 47 ] } [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 13 23 29 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 13 23 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 13 23 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 13 23 16 , srcInfoPoints = [] } "I8#"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 17 23 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 17 23 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 17 23 18 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 18 23 29 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 18 23 29 , srcInfoPoints = [] } 128 "0B10000000")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 31 23 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 31 23 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 31 23 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 31 23 34 , srcInfoPoints = [] } "I8#"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 35 23 45 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BinaryLiteralsGood.hs" 23 35 23 45 , srcInfoPoints = [] } 127 "0B1111111")) ])) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/RCategory3.hs.parser.golden0000644000000000000000000002422513534314633023227 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 1 1 1 1 , SrcSpan "tests/examples/RCategory3.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory3.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory3.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory3.hs" 6 1 6 1 , SrcSpan "tests/examples/RCategory3.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 1 1 1 47 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 1 1 1 13 , SrcSpan "tests/examples/RCategory3.hs" 1 26 1 27 , SrcSpan "tests/examples/RCategory3.hs" 1 44 1 47 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 1 28 1 43 , srcInfoPoints = [] } "ConstraintKinds" ] ] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 1 6 0 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 3 1 3 9 , SrcSpan "tests/examples/RCategory3.hs" 3 25 3 30 , SrcSpan "tests/examples/RCategory3.hs" 4 3 4 3 , SrcSpan "tests/examples/RCategory3.hs" 6 1 6 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 10 3 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 10 3 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 10 3 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 10 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 10 3 19 , srcInfoPoints = [] } "RCategory"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 20 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 3 20 3 21 , SrcSpan "tests/examples/RCategory3.hs" 3 21 3 23 , SrcSpan "tests/examples/RCategory3.hs" 3 23 3 24 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 20 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 3 20 3 21 , SrcSpan "tests/examples/RCategory3.hs" 3 21 3 23 , SrcSpan "tests/examples/RCategory3.hs" 3 23 3 24 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 3 20 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 3 20 3 21 , SrcSpan "tests/examples/RCategory3.hs" 3 21 3 23 , SrcSpan "tests/examples/RCategory3.hs" 3 23 3 24 ] }))))) (Just [ InsType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 3 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 3 4 7 , SrcSpan "tests/examples/RCategory3.hs" 4 31 4 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 8 4 21 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 22 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 22 4 23 , SrcSpan "tests/examples/RCategory3.hs" 4 23 4 25 , SrcSpan "tests/examples/RCategory3.hs" 4 25 4 26 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 22 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 22 4 23 , SrcSpan "tests/examples/RCategory3.hs" 4 23 4 25 , SrcSpan "tests/examples/RCategory3.hs" 4 25 4 26 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 22 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 22 4 23 , SrcSpan "tests/examples/RCategory3.hs" 4 23 4 25 , SrcSpan "tests/examples/RCategory3.hs" 4 25 4 26 ] })))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 27 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 27 4 28 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 29 4 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 29 4 30 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 33 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 33 4 34 , SrcSpan "tests/examples/RCategory3.hs" 4 34 4 35 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 33 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 33 4 34 , SrcSpan "tests/examples/RCategory3.hs" 4 34 4 35 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory3.hs" 4 33 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory3.hs" 4 33 4 34 , SrcSpan "tests/examples/RCategory3.hs" 4 34 4 35 ] }))) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/Bug.hs.parser.golden0000644000000000000000000000241113534314632021752 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bug.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/Bug.hs" 1 1 1 1 , SrcSpan "tests/examples/Bug.hs" 1 1 1 1 , SrcSpan "tests/examples/Bug.hs" 1 1 1 1 , SrcSpan "tests/examples/Bug.hs" 3 1 3 1 , SrcSpan "tests/examples/Bug.hs" 3 1 3 1 ] } Nothing [] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bug.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/Bug.hs" 1 1 1 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bug.hs" 1 8 1 23 , srcInfoPoints = [] } "Test.QuickCheck" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [] , [ Comment False (SrcSpan "tests/examples/Bug.hs" 2 1 2 39) " prop_susShortest = 2 > 1 ==> 1 /= 2" ] ) haskell-src-exts-1.23.1/tests/examples/DoubleHashOp.hs.parser.golden0000644000000000000000000003005513534314633023560 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 13 1 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 13 1 13 1 , SrcSpan "tests/examples/DoubleHashOp.hs" 13 1 13 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 7 , SrcSpan "tests/examples/DoubleHashOp.hs" 2 21 2 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 2 8 2 20 , srcInfoPoints = [] } "DoubleHashOp") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 13 , SrcSpan "tests/examples/DoubleHashOp.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 14 1 27 , srcInfoPoints = [] } "UnboxedTuples" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 4 6 4 8 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 5 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 2 , SrcSpan "tests/examples/DoubleHashOp.hs" 4 2 4 4 , SrcSpan "tests/examples/DoubleHashOp.hs" 4 4 4 5 ] } "##" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 4 11 4 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 10 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 4 16 4 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 15 , srcInfoPoints = [] } "b")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 11 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 2 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 3 5 5 , srcInfoPoints = [] } "##") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 6 5 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 6 5 7 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 8 5 11 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 5 8 5 9 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 10 5 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 10 5 11 , srcInfoPoints = [] } 0 "0"))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 7 6 7 8 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 5 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 2 , SrcSpan "tests/examples/DoubleHashOp.hs" 7 2 7 4 , SrcSpan "tests/examples/DoubleHashOp.hs" 7 4 7 5 ] } "#*" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 7 11 7 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 10 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 7 16 7 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 15 , srcInfoPoints = [] } "b")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 11 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 2 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 3 8 5 , srcInfoPoints = [] } "#*") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 6 8 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 6 8 7 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 8 8 11 , srcInfoPoints = [ SrcSpan "tests/examples/DoubleHashOp.hs" 8 8 8 9 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 10 8 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 10 8 11 , srcInfoPoints = [] } 1 "1"))) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 10 1 10 36) " This still does not work though:" , Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 11 1 11 24) " (#) :: a -> b -> Int" , Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 12 1 12 13) " a # b = 2" ] ) haskell-src-exts-1.23.1/tests/examples/BadStringLineBreak.hs.parser.golden0000644000000000000000000000014413534314632024670 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BadStringLineBreak.hs" 3 27) "Improperly terminated string" haskell-src-exts-1.23.1/tests/examples/Lib.hs.parser.golden0000644000000000000000000006470313534314633021760 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 1 1 18 1 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 1 1 1 1 , SrcSpan "tests/examples/Lib.hs" 3 1 3 1 , SrcSpan "tests/examples/Lib.hs" 3 1 3 1 , SrcSpan "tests/examples/Lib.hs" 5 1 5 1 , SrcSpan "tests/examples/Lib.hs" 6 1 6 1 , SrcSpan "tests/examples/Lib.hs" 8 1 8 1 , SrcSpan "tests/examples/Lib.hs" 9 1 9 1 , SrcSpan "tests/examples/Lib.hs" 10 1 10 1 , SrcSpan "tests/examples/Lib.hs" 11 1 11 1 , SrcSpan "tests/examples/Lib.hs" 13 1 13 1 , SrcSpan "tests/examples/Lib.hs" 14 1 14 1 , SrcSpan "tests/examples/Lib.hs" 15 1 15 1 , SrcSpan "tests/examples/Lib.hs" 16 1 16 1 , SrcSpan "tests/examples/Lib.hs" 18 1 18 1 , SrcSpan "tests/examples/Lib.hs" 18 1 18 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 3 1 3 7 , SrcSpan "tests/examples/Lib.hs" 3 27 3 32 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 8 3 11 , srcInfoPoints = [] } "Lib") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 12 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 3 12 3 13 , SrcSpan "tests/examples/Lib.hs" 3 17 3 18 , SrcSpan "tests/examples/Lib.hs" 3 25 3 26 ] } [ EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 13 3 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 13 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 13 3 17 , srcInfoPoints = [] } "flip")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 19 3 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 19 3 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 3 19 3 25 , srcInfoPoints = [] } "getInt")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 1 1 1 40 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 1 1 1 13 , SrcSpan "tests/examples/Lib.hs" 1 25 1 26 , SrcSpan "tests/examples/Lib.hs" 1 37 1 40 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 1 14 1 25 , srcInfoPoints = [] } "UnboxedSums" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 1 27 1 36 , srcInfoPoints = [] } "MagicHash" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 5 1 5 16 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 5 1 5 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 5 8 5 16 , srcInfoPoints = [] } "GHC.Exts" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 1 6 21 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 6 1 6 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 8 6 15 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 16 6 21 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 6 16 6 17 , SrcSpan "tests/examples/Lib.hs" 6 20 6 21 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 17 6 20 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 17 6 20 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 6 17 6 20 , srcInfoPoints = [] } "Int") ]) } ] [ InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 8 1 8 22 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 8 1 8 13 , SrcSpan "tests/examples/Lib.hs" 8 19 8 22 ] } False Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 8 14 8 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 8 14 8 18 , srcInfoPoints = [] } "flip")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 1 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 9 6 9 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 1 9 5 , srcInfoPoints = [] } "flip" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 9 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 9 26 9 28 ] } (TyUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 9 9 25 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 9 9 9 11 , SrcSpan "tests/examples/Lib.hs" 9 16 9 17 , SrcSpan "tests/examples/Lib.hs" 9 23 9 25 ] } [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 12 9 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 12 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 12 9 15 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 18 9 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 18 9 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 18 9 22 , srcInfoPoints = [] } "Int#")) ]) (TyUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 29 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 9 29 9 31 , SrcSpan "tests/examples/Lib.hs" 9 37 9 38 , SrcSpan "tests/examples/Lib.hs" 9 43 9 45 ] } [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 32 9 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 32 9 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 32 9 36 , srcInfoPoints = [] } "Int#")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 39 9 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 39 9 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 9 39 9 42 , srcInfoPoints = [] } "Int")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 1 11 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 1 10 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 1 10 5 , srcInfoPoints = [] } "flip") [ PUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 6 10 15 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 10 6 10 8 , SrcSpan "tests/examples/Lib.hs" 10 11 10 12 , SrcSpan "tests/examples/Lib.hs" 10 13 10 15 ] } 0 1 (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 9 10 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 9 10 10 , srcInfoPoints = [] } "i")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 16 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 10 16 10 17 ] } (UnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 18 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 10 18 10 20 , SrcSpan "tests/examples/Lib.hs" 10 21 10 22 , SrcSpan "tests/examples/Lib.hs" 10 25 10 27 ] } 1 0 (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 23 10 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 23 10 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 10 23 10 24 , srcInfoPoints = [] } "i"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 1 11 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 1 11 5 , srcInfoPoints = [] } "flip") [ PUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 6 11 15 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 11 6 11 8 , SrcSpan "tests/examples/Lib.hs" 11 9 11 10 , SrcSpan "tests/examples/Lib.hs" 11 13 11 15 ] } 1 0 (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 11 11 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 11 11 12 , srcInfoPoints = [] } "i")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 16 11 27 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 11 16 11 17 ] } (UnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 18 11 27 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 11 18 11 20 , SrcSpan "tests/examples/Lib.hs" 11 23 11 24 , SrcSpan "tests/examples/Lib.hs" 11 25 11 27 ] } 0 1 (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 21 11 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 21 11 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 11 21 11 22 , srcInfoPoints = [] } "i"))))) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 13 1 13 24 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 13 1 13 13 , SrcSpan "tests/examples/Lib.hs" 13 21 13 24 ] } False Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 13 14 13 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 13 14 13 20 , srcInfoPoints = [] } "getInt")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 1 14 34 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 14 8 14 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 1 14 7 , srcInfoPoints = [] } "getInt" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 11 14 34 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 14 28 14 30 ] } (TyUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 11 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 14 11 14 13 , SrcSpan "tests/examples/Lib.hs" 14 19 14 20 , SrcSpan "tests/examples/Lib.hs" 14 25 14 27 ] } [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 14 14 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 14 14 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 14 14 18 , srcInfoPoints = [] } "Int#")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 21 14 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 21 14 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 21 14 24 , srcInfoPoints = [] } "Int")) ]) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 31 14 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 31 14 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 14 31 14 34 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 1 16 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 1 15 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 1 15 7 , srcInfoPoints = [] } "getInt") [ PUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 8 15 17 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 15 8 15 10 , SrcSpan "tests/examples/Lib.hs" 15 13 15 14 , SrcSpan "tests/examples/Lib.hs" 15 15 15 17 ] } 0 1 (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 11 15 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 11 15 12 , srcInfoPoints = [] } "i")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 18 15 24 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 15 18 15 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 20 15 24 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 20 15 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 20 15 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 20 15 22 , srcInfoPoints = [] } "I#"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 23 15 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 23 15 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 15 23 15 24 , srcInfoPoints = [] } "i"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 1 16 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 1 16 7 , srcInfoPoints = [] } "getInt") [ PUnboxedSum SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 8 16 17 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 16 8 16 10 , SrcSpan "tests/examples/Lib.hs" 16 11 16 12 , SrcSpan "tests/examples/Lib.hs" 16 15 16 17 ] } 1 0 (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 13 16 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 13 16 14 , srcInfoPoints = [] } "i")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 18 16 21 , srcInfoPoints = [ SrcSpan "tests/examples/Lib.hs" 16 18 16 19 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 20 16 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 20 16 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Lib.hs" 16 20 16 21 , srcInfoPoints = [] } "i")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSplice.hs.parser.golden0000644000000000000000000002311413534314633024016 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSplice.hs" 2 1 2 1 , SrcSpan "tests/examples/PatternSplice.hs" 2 1 2 1 , SrcSpan "tests/examples/PatternSplice.hs" 4 1 4 1 , SrcSpan "tests/examples/PatternSplice.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSplice.hs" 6 1 6 1 , SrcSpan "tests/examples/PatternSplice.hs" 7 1 7 1 , SrcSpan "tests/examples/PatternSplice.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 2 1 2 7 , SrcSpan "tests/examples/PatternSplice.hs" 2 26 2 31 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 2 8 2 25 , srcInfoPoints = [] } "PatternSpliceTest") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSplice.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 1 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 4 5 4 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 1 4 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 8 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 4 12 4 14 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 8 4 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 8 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 8 4 11 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 15 4 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 15 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 4 15 4 19 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 1 6 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 1 5 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 1 5 4 , srcInfoPoints = [] } "foo") [ PSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 5 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 5 5 5 7 , SrcSpan "tests/examples/PatternSplice.hs" 5 18 5 19 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 5 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 5 5 5 7 , SrcSpan "tests/examples/PatternSplice.hs" 5 18 5 19 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 8 5 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 5 8 5 11 , SrcSpan "tests/examples/PatternSplice.hs" 5 15 5 17 ] } (PatBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 8 5 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 5 8 5 11 , SrcSpan "tests/examples/PatternSplice.hs" 5 15 5 17 ] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 12 5 14 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 12 5 14 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 12 5 14 , srcInfoPoints = [] } 42 "42"))))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 20 5 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 5 20 5 21 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 22 5 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 22 5 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 5 22 5 26 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 1 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 1 6 4 , srcInfoPoints = [] } "foo") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 5 6 6 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 20 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSplice.hs" 6 20 6 21 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 22 6 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 22 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSplice.hs" 6 22 6 27 , srcInfoPoints = [] } "False")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/brackets.hs.parser.golden0000644000000000000000000000011713534314633023035 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/brackets.hs" 17 3) "Parse error: \10631" haskell-src-exts-1.23.1/tests/examples/MagicHashUnboxedTuples.hs.parser.golden0000644000000000000000000003105213534314633025607 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 1 1 1 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 1 2 1 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 1 2 1 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 1 4 1 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 7 1 7 1 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 1 2 36 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 1 2 7 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 31 2 36 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 2 8 2 30 , srcInfoPoints = [] } "MagicHashUnboxedTuples") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 1 1 42 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 1 1 13 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 23 1 24 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 39 1 42 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 14 1 23 , srcInfoPoints = [] } "MagicHash" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 1 25 1 38 , srcInfoPoints = [] } "UnboxedTuples" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 1 6 8 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 27 4 32 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 1 6 8 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 27 4 32 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 1 4 2 , srcInfoPoints = [] } "f") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 3 4 12 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 3 4 5 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 6 4 7 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 10 4 12 ] } Unboxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 5 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 5 4 6 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 8 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 8 4 9 , srcInfoPoints = [] } "y") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 13 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 13 4 14 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 15 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 15 4 17 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 20 4 21 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 24 4 26 ] } Unboxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 18 4 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 18 4 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 18 4 20 , srcInfoPoints = [] } "a#")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 22 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 22 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 4 22 4 23 , srcInfoPoints = [] } "b")) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 3 6 8 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 3 5 3 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 3 6 3 , SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 7 1 7 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 3 5 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 3 5 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 3 5 5 , srcInfoPoints = [] } "a#")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 6 5 10 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 6 5 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 8 5 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 8 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 5 8 5 10 , srcInfoPoints = [] } "a#")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 3 6 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 3 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 3 6 4 , srcInfoPoints = [] } "b")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 5 6 8 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 5 6 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 7 6 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 7 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashUnboxedTuples.hs" 6 7 6 8 , srcInfoPoints = [] } "b")))) Nothing ])) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ConstraintKinds3.hs.parser.golden0000644000000000000000000002547313556712523024457 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 1 1 1 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 2 1 2 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 8 1 8 1 , SrcSpan "tests/examples/ConstraintKinds3.hs" 8 1 8 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 1 1 1 13 , SrcSpan "tests/examples/ConstraintKinds3.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 1 14 1 29 , srcInfoPoints = [] } "ConstraintKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 2 1 2 39 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 2 1 2 13 , SrcSpan "tests/examples/ConstraintKinds3.hs" 2 36 2 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 2 14 2 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 1 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 4 1 4 6 , SrcSpan "tests/examples/ConstraintKinds3.hs" 4 15 4 20 , SrcSpan "tests/examples/ConstraintKinds3.hs" 6 3 6 3 , SrcSpan "tests/examples/ConstraintKinds3.hs" 8 1 8 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 7 4 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 7 4 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 7 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 7 4 10 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 11 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 11 4 12 , srcInfoPoints = [] } "c"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 4 13 4 14 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 3 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 6 7 6 9 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 3 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 6 7 6 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 3 6 6 , srcInfoPoints = [] } "bar" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 10 6 25 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 10 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 6 10 6 11 , SrcSpan "tests/examples/ConstraintKinds3.hs" 6 14 6 15 , SrcSpan "tests/examples/ConstraintKinds3.hs" 6 16 6 18 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 10 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 6 10 6 11 , SrcSpan "tests/examples/ConstraintKinds3.hs" 6 14 6 15 , SrcSpan "tests/examples/ConstraintKinds3.hs" 6 16 6 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 11 6 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 11 6 14 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 11 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 11 6 12 , srcInfoPoints = [] } "c")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 13 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 13 6 14 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 19 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds3.hs" 6 21 6 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 19 6 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 19 6 20 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 24 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds3.hs" 6 24 6 25 , srcInfoPoints = [] } "a"))))) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/ArrowBrackets.hs.parser.golden0000644000000000000000000006564513603723515024031 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 1 1 1 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 2 1 2 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 2 1 2 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 1 4 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 6 1 6 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 9 1 9 1 , SrcSpan "tests/examples/ArrowBrackets.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 2 1 2 7 , SrcSpan "tests/examples/ArrowBrackets.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 2 8 2 21 , srcInfoPoints = [] } "ArrowBrackets") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 1 1 1 24 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 1 1 1 13 , SrcSpan "tests/examples/ArrowBrackets.hs" 1 21 1 24 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 1 14 1 20 , srcInfoPoints = [] } "Arrows" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 1 4 40 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 5 4 40 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 5 4 6 ] } (Proc SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 7 4 40 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 7 4 11 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 19 4 21 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 12 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 12 4 13 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 14 4 15 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 17 4 18 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 13 4 14 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 16 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 16 4 17 , srcInfoPoints = [] } "y") ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 22 4 40 , srcInfoPoints = [] } (ArrOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 22 4 38 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 22 4 24 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 36 4 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 25 4 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 25 4 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 25 4 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 25 4 26 , srcInfoPoints = [] } "f"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 27 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 27 4 28 , SrcSpan "tests/examples/ArrowBrackets.hs" 4 34 4 35 ] } (LeftArrApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 28 4 34 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 4 30 4 32 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 28 4 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 28 4 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 28 4 29 , srcInfoPoints = [] } "g"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 33 4 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 33 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 33 4 34 , srcInfoPoints = [] } "x"))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 39 4 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 39 4 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 4 39 4 40 , srcInfoPoints = [] } "y")))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 1 8 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 1 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 1 6 4 , srcInfoPoints = [] } "bar")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 5 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 6 5 6 6 ] } (Proc SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 7 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 6 7 6 11 , SrcSpan "tests/examples/ArrowBrackets.hs" 6 19 6 21 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 12 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 6 12 6 13 , SrcSpan "tests/examples/ArrowBrackets.hs" 6 14 6 15 , SrcSpan "tests/examples/ArrowBrackets.hs" 6 17 6 18 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 13 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 13 6 14 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 16 6 17 , srcInfoPoints = [] } "y") ]) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 6 22 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 6 22 6 24 , SrcSpan "tests/examples/ArrowBrackets.hs" 7 3 7 3 , SrcSpan "tests/examples/ArrowBrackets.hs" 8 3 8 3 , SrcSpan "tests/examples/ArrowBrackets.hs" 9 1 9 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 3 7 26 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 7 5 7 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 3 7 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 3 7 4 , srcInfoPoints = [] } "z")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 8 7 26 , srcInfoPoints = [] } (ArrOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 8 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 7 8 7 10 , SrcSpan "tests/examples/ArrowBrackets.hs" 7 22 7 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 11 7 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 11 7 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 11 7 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 11 7 12 , srcInfoPoints = [] } "f"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 13 7 21 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 7 13 7 14 , SrcSpan "tests/examples/ArrowBrackets.hs" 7 20 7 21 ] } (LeftArrApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 14 7 20 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 7 16 7 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 14 7 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 14 7 15 , srcInfoPoints = [] } "g"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 19 7 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 19 7 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 19 7 20 , srcInfoPoints = [] } "x"))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 25 7 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 25 7 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 7 25 7 26 , srcInfoPoints = [] } "y")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 3 8 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 3 8 21 , srcInfoPoints = [] } (ArrOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 3 8 19 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 8 3 8 5 , SrcSpan "tests/examples/ArrowBrackets.hs" 8 17 8 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 6 8 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 6 8 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 6 8 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 6 8 7 , srcInfoPoints = [] } "f"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 8 8 16 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 8 8 8 9 , SrcSpan "tests/examples/ArrowBrackets.hs" 8 15 8 16 ] } (LeftArrApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 9 8 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowBrackets.hs" 8 11 8 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 9 8 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 9 8 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 9 8 10 , srcInfoPoints = [] } "h"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 14 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 14 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 14 8 15 , srcInfoPoints = [] } "z"))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 20 8 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 20 8 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowBrackets.hs" 8 20 8 21 , srcInfoPoints = [] } "y")))) ]))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/ReadP.hs.parser.golden0000644000000000000000000002632613534314633022244 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 1 1 1 1 , SrcSpan "tests/examples/ReadP.hs" 2 1 2 1 , SrcSpan "tests/examples/ReadP.hs" 2 1 2 1 , SrcSpan "tests/examples/ReadP.hs" 2 1 2 1 , SrcSpan "tests/examples/ReadP.hs" 3 1 3 1 , SrcSpan "tests/examples/ReadP.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 1 1 1 13 , SrcSpan "tests/examples/ReadP.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 1 2 51 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 2 17 2 18 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 1 2 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 9 2 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 9 2 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 9 2 14 , srcInfoPoints = [] } "ReadP")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 15 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 15 2 16 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 19 2 51 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 19 2 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 19 2 20 , srcInfoPoints = [] } "R") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 21 2 51 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 2 21 2 22 , SrcSpan "tests/examples/ReadP.hs" 2 50 2 51 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 22 2 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 22 2 30 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 22 2 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 22 2 28 , srcInfoPoints = [] } "forall")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 29 2 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 29 2 30 , srcInfoPoints = [] } "b"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 31 2 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 31 2 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 31 2 32 , srcInfoPoints = [] } "."))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 33 2 50 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 2 44 2 46 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 33 2 43 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 2 33 2 34 , SrcSpan "tests/examples/ReadP.hs" 2 42 2 43 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 34 2 42 , srcInfoPoints = [ SrcSpan "tests/examples/ReadP.hs" 2 36 2 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 34 2 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 34 2 35 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 39 2 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 39 2 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 39 2 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 39 2 40 , srcInfoPoints = [] } "P"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 41 2 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 41 2 42 , srcInfoPoints = [] } "b"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 47 2 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 47 2 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 47 2 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 47 2 48 , srcInfoPoints = [] } "P"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 49 2 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ReadP.hs" 2 49 2 50 , srcInfoPoints = [] } "b"))))) ]) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/EqualityConstraints2.hs.parser.golden0000644000000000000000000000040713534314633025350 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/EqualityConstraints2.hs" 1 19) "At least one of TypeFamilies or GADTs language extensions needs to be enabled. Please add: {-# LANGUAGE TypeFamilies #-} or {-# LANGUAGE GADTs #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/ArrowLayout.hs.parser.golden0000644000000000000000000004167313534314632023542 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 1 1 1 1 , SrcSpan "tests/examples/ArrowLayout.hs" 2 1 2 1 , SrcSpan "tests/examples/ArrowLayout.hs" 2 1 2 1 , SrcSpan "tests/examples/ArrowLayout.hs" 4 1 4 1 , SrcSpan "tests/examples/ArrowLayout.hs" 8 1 8 1 , SrcSpan "tests/examples/ArrowLayout.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 2 1 2 7 , SrcSpan "tests/examples/ArrowLayout.hs" 2 20 2 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 2 8 2 19 , srcInfoPoints = [] } "ArrowLayout") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 1 1 1 24 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 1 1 1 13 , SrcSpan "tests/examples/ArrowLayout.hs" 1 21 1 24 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 1 14 1 20 , srcInfoPoints = [] } "Arrows" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 1 7 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 1 4 4 , srcInfoPoints = [] } "exp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 5 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 5 4 6 ] } (Proc SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 7 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 7 4 11 , SrcSpan "tests/examples/ArrowLayout.hs" 4 15 4 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 13 , SrcSpan "tests/examples/ArrowLayout.hs" 4 13 4 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 13 , SrcSpan "tests/examples/ArrowLayout.hs" 4 13 4 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 12 4 13 , SrcSpan "tests/examples/ArrowLayout.hs" 4 13 4 14 ] })) []) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 4 18 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 4 18 4 20 , SrcSpan "tests/examples/ArrowLayout.hs" 5 3 5 3 , SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 3 , SrcSpan "tests/examples/ArrowLayout.hs" 8 1 8 0 ] } [ RecStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 3 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 5 3 5 6 , SrcSpan "tests/examples/ArrowLayout.hs" 5 7 5 7 , SrcSpan "tests/examples/ArrowLayout.hs" 6 7 6 7 , SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 0 ] } [ LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 7 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 5 7 5 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 11 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 5 11 5 11 , SrcSpan "tests/examples/ArrowLayout.hs" 6 7 6 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 11 5 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 11 5 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 11 5 12 , srcInfoPoints = [] } "e")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 13 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 5 13 5 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 15 5 20 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 15 5 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 15 5 16 , srcInfoPoints = [] } 1 "1")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 17 5 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 17 5 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 17 5 18 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 19 5 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 19 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 5 19 5 20 , srcInfoPoints = [] } "i"))))) Nothing ]) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 7 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 6 9 6 11 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 7 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 7 6 8 , srcInfoPoints = [] } "i")) (LeftArrApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 12 6 25 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 6 21 6 23 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 12 6 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 12 6 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 12 6 20 , srcInfoPoints = [] } "integral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 24 6 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 24 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 6 24 6 25 , srcInfoPoints = [] } "e")))) ] , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 7 11 7 13 ] } (LeftArrApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/ArrowLayout.hs" 7 11 7 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 3 7 10 , srcInfoPoints = [] } "returnA"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 14 7 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ArrowLayout.hs" 7 14 7 15 , srcInfoPoints = [] } "e")))) ]))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/QualifiedRecordfieldPuns.hs.parser.golden0000644000000000000000000001354613534314633026165 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 1 1 1 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 4 1 4 1 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 1 1 13 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 1 14 1 28 , srcInfoPoints = [] } "NamedFieldPuns" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 1 2 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 3 2 12 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 3 2 4 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 11 2 12 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 4 2 11 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 6 2 7 , SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 10 2 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 4 2 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 4 2 5 , srcInfoPoints = [] } "C")) [ PFieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 7 2 10 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 7 2 10 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 7 2 10 , srcInfoPoints = [] } "M") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 7 2 10 , srcInfoPoints = [] } "a")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 13 2 16 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 13 2 14 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 15 2 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 15 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedRecordfieldPuns.hs" 2 15 2 16 , srcInfoPoints = [] } "a")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/LambdaCase.hs.parser.golden0000644000000000000000000002517313534314633023224 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 1 1 1 1 , SrcSpan "tests/examples/LambdaCase.hs" 2 1 2 1 , SrcSpan "tests/examples/LambdaCase.hs" 2 1 2 1 , SrcSpan "tests/examples/LambdaCase.hs" 4 1 4 1 , SrcSpan "tests/examples/LambdaCase.hs" 8 1 8 1 , SrcSpan "tests/examples/LambdaCase.hs" 9 1 9 1 , SrcSpan "tests/examples/LambdaCase.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 2 1 2 24 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 2 1 2 7 , SrcSpan "tests/examples/LambdaCase.hs" 2 19 2 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 2 8 2 18 , srcInfoPoints = [] } "LambdaCase") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 1 1 1 13 , SrcSpan "tests/examples/LambdaCase.hs" 1 25 1 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 1 14 1 24 , srcInfoPoints = [] } "LambdaCase" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 4 1 6 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 4 5 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 4 5 4 6 ] } (LCase SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 4 7 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 4 7 4 8 , SrcSpan "tests/examples/LambdaCase.hs" 4 8 4 12 , SrcSpan "tests/examples/LambdaCase.hs" 5 9 5 9 , SrcSpan "tests/examples/LambdaCase.hs" 6 9 6 9 , SrcSpan "tests/examples/LambdaCase.hs" 8 1 8 0 ] } [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 9 5 22 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 9 5 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 9 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 9 5 16 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 17 5 22 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 5 17 5 19 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 20 5 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 20 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 5 20 5 22 , srcInfoPoints = [] } "e1")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 9 6 22 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 9 6 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 9 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 9 6 13 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 14 6 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 14 6 16 , srcInfoPoints = [] } "e2") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 17 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 6 17 6 19 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 20 6 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 20 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 6 20 6 22 , srcInfoPoints = [] } "e2")))) Nothing ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 1 8 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 1 8 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 1 8 4 , srcInfoPoints = [] } "bar")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 5 8 30 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 8 5 8 6 ] } (LCase SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 7 8 30 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 8 7 8 8 , SrcSpan "tests/examples/LambdaCase.hs" 8 12 8 16 , SrcSpan "tests/examples/LambdaCase.hs" 8 17 8 18 , SrcSpan "tests/examples/LambdaCase.hs" 8 29 8 30 ] } [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 19 8 28 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 19 8 20 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 21 8 28 , srcInfoPoints = [ SrcSpan "tests/examples/LambdaCase.hs" 8 21 8 23 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 24 8 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 24 8 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LambdaCase.hs" 8 24 8 28 , srcInfoPoints = [] } "True")))) Nothing ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/PackageImports.hs.parser.golden0000644000000000000000000000702113534314633024151 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/PackageImports.hs" 1 1 1 1 , SrcSpan "tests/examples/PackageImports.hs" 2 1 2 1 , SrcSpan "tests/examples/PackageImports.hs" 2 1 2 1 , SrcSpan "tests/examples/PackageImports.hs" 4 1 4 1 , SrcSpan "tests/examples/PackageImports.hs" 5 1 5 1 , SrcSpan "tests/examples/PackageImports.hs" 6 1 6 1 , SrcSpan "tests/examples/PackageImports.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 2 1 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/PackageImports.hs" 2 1 2 7 , SrcSpan "tests/examples/PackageImports.hs" 2 23 2 28 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 2 8 2 22 , srcInfoPoints = [] } "PackageImports") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/PackageImports.hs" 1 1 1 13 , SrcSpan "tests/examples/PackageImports.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 1 14 1 28 , srcInfoPoints = [] } "PackageImports" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 4 1 4 39 , srcInfoPoints = [ SrcSpan "tests/examples/PackageImports.hs" 4 1 4 7 , SrcSpan "tests/examples/PackageImports.hs" 4 8 4 16 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 4 17 4 39 , srcInfoPoints = [] } "PackageImports.Default" , importQualified = False , importSrc = False , importSafe = False , importPkg = Just "wibble" , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 5 1 5 43 , srcInfoPoints = [ SrcSpan "tests/examples/PackageImports.hs" 5 1 5 7 , SrcSpan "tests/examples/PackageImports.hs" 5 8 5 16 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PackageImports.hs" 5 17 5 43 , srcInfoPoints = [] } "PackageImports.Builtin.All" , importQualified = False , importSrc = False , importSafe = False , importPkg = Just "wibble" , importAs = Nothing , importSpecs = Nothing } ] [] , [] ) haskell-src-exts-1.23.1/tests/examples/HaddockComments.hs.parser.golden0000644000000000000000000011601213534314633024304 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 14 1 57 1 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 14 1 14 1 , SrcSpan "tests/examples/HaddockComments.hs" 14 1 14 1 , SrcSpan "tests/examples/HaddockComments.hs" 17 1 17 1 , SrcSpan "tests/examples/HaddockComments.hs" 21 1 21 1 , SrcSpan "tests/examples/HaddockComments.hs" 25 1 25 1 , SrcSpan "tests/examples/HaddockComments.hs" 27 1 27 1 , SrcSpan "tests/examples/HaddockComments.hs" 29 1 29 1 , SrcSpan "tests/examples/HaddockComments.hs" 35 1 35 1 , SrcSpan "tests/examples/HaddockComments.hs" 36 1 36 1 , SrcSpan "tests/examples/HaddockComments.hs" 38 1 38 1 , SrcSpan "tests/examples/HaddockComments.hs" 46 1 46 1 , SrcSpan "tests/examples/HaddockComments.hs" 57 1 57 1 , SrcSpan "tests/examples/HaddockComments.hs" 57 1 57 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 14 1 14 29 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 14 1 14 7 , SrcSpan "tests/examples/HaddockComments.hs" 14 24 14 29 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 14 8 14 23 , srcInfoPoints = [] } "HaddockComments") Nothing Nothing)) [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 17 1 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 18 4 18 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 17 1 17 5 , srcInfoPoints = [] } "fun1" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 18 7 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 19 4 19 6 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 18 7 18 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 18 7 18 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 18 7 18 10 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 19 7 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 20 4 20 6 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 19 7 19 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 19 7 19 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 19 7 19 12 , srcInfoPoints = [] } "Float"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 7 20 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 7 20 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 7 20 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 7 20 9 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 11 , SrcSpan "tests/examples/HaddockComments.hs" 20 11 20 12 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 11 , SrcSpan "tests/examples/HaddockComments.hs" 20 11 20 12 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 12 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 20 10 20 11 , SrcSpan "tests/examples/HaddockComments.hs" 20 11 20 12 ] })))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 1 21 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 1 21 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 1 21 5 , srcInfoPoints = [] } "fun1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 6 21 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 21 6 21 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 8 21 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 8 21 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 21 8 21 17 , srcInfoPoints = [] } "undefined")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 1 25 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 1 25 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 1 25 5 , srcInfoPoints = [] } "fun2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 6 25 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 25 6 25 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 8 25 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 8 25 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 25 8 25 17 , srcInfoPoints = [] } "undefined")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 1 27 19 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 27 6 27 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 1 27 5 , srcInfoPoints = [] } "fun3" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 9 27 19 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 27 13 27 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 9 27 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 9 27 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 9 27 12 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 16 27 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 16 27 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 27 16 27 19 , srcInfoPoints = [] } "Int")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 1 29 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 1 29 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 1 29 5 , srcInfoPoints = [] } "fun3")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 6 29 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 29 6 29 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 8 29 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 8 29 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 29 8 29 17 , srcInfoPoints = [] } "undefined")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 1 35 21 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 35 8 35 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 1 35 7 , srcInfoPoints = [] } "square" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 11 35 21 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 35 15 35 17 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 11 35 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 11 35 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 11 35 14 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 18 35 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 18 35 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 35 18 35 21 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 1 36 17 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 1 36 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 1 36 7 , srcInfoPoints = [] } "square") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 8 36 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 8 36 9 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 10 36 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 36 10 36 11 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 12 36 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 12 36 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 12 36 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 12 36 13 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 14 36 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 14 36 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 14 36 15 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 16 36 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 16 36 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 36 16 36 17 , srcInfoPoints = [] } "x"))))) Nothing ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 1 42 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 38 1 38 6 , SrcSpan "tests/examples/HaddockComments.hs" 38 11 38 16 , SrcSpan "tests/examples/HaddockComments.hs" 40 4 40 4 , SrcSpan "tests/examples/HaddockComments.hs" 42 4 42 4 , SrcSpan "tests/examples/HaddockComments.hs" 46 1 46 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 7 38 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 7 38 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 7 38 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 9 38 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 38 9 38 10 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 4 40 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 40 6 40 8 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 4 40 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 40 6 40 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 4 40 5 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 9 40 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 40 11 40 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 9 40 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 9 40 10 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 14 40 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 14 40 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 40 14 40 17 , srcInfoPoints = [] } "Int"))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 4 42 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 42 6 42 8 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 4 42 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 42 6 42 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 4 42 5 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 9 42 17 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 42 13 42 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 9 42 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 9 42 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 9 42 12 , srcInfoPoints = [] } "Int"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 16 42 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 42 16 42 17 , srcInfoPoints = [] } "a")))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 46 1 56 10 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 46 13 46 14 , SrcSpan "tests/examples/HaddockComments.hs" 55 3 55 4 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 46 1 46 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 46 6 46 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 46 6 46 12 , srcInfoPoints = [] } "MyData")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 48 3 54 6 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 49 5 49 6 , SrcSpan "tests/examples/HaddockComments.hs" 52 5 52 6 , SrcSpan "tests/examples/HaddockComments.hs" 53 5 53 6 , SrcSpan "tests/examples/HaddockComments.hs" 54 5 54 6 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 48 3 54 6 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 49 5 49 6 , SrcSpan "tests/examples/HaddockComments.hs" 52 5 52 6 , SrcSpan "tests/examples/HaddockComments.hs" 53 5 53 6 , SrcSpan "tests/examples/HaddockComments.hs" 54 5 54 6 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 48 3 48 8 , srcInfoPoints = [] } "Cons1") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 49 7 49 25 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 49 19 49 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 49 7 49 18 , srcInfoPoints = [] } "cons1Field1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 49 22 49 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 49 22 49 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 49 22 49 25 , srcInfoPoints = [] } "Int"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 52 7 52 25 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 52 19 52 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 52 7 52 18 , srcInfoPoints = [] } "cons1Field2" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 52 22 52 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 52 22 52 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 52 22 52 25 , srcInfoPoints = [] } "Int"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 53 7 53 28 , srcInfoPoints = [ SrcSpan "tests/examples/HaddockComments.hs" 53 19 53 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 53 7 53 18 , srcInfoPoints = [] } "cons1Field3" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 53 22 53 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 53 22 53 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 53 22 53 28 , srcInfoPoints = [] } "String"))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 55 5 56 10 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 55 5 56 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 55 5 55 10 , srcInfoPoints = [] } "Cons2") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 56 7 56 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 56 7 56 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaddockComments.hs" 56 7 56 10 , srcInfoPoints = [] } "Int")) ]) ] [] ] , [ Comment True (SrcSpan "tests/examples/HaddockComments.hs" 1 1 13 3) "|\nModule : W\nDescription : Short description\nCopyright : (c) Some Guy, 2013\n Someone Else, 2014\nLicense : GPL-3\nMaintainer : sample@email.com\nStability : experimental\nPortability : POSIX\n\nHere is a longer description of this module, containing some\ncommentary with @some markup@.\n" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 16 1 16 23) " | Function1 comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 18 16 18 39) " ^ The 'Int' argument" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 19 16 19 41) " ^ The 'Float' argument" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 20 16 20 37) " ^ The return value" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 24 1 24 25) " not a haddock comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 28 1 28 23) " ^ Function3 comment" , Comment True (SrcSpan "tests/examples/HaddockComments.hs" 31 1 34 3) "|\n The 'square' function squares an integer.\n It takes one argument, of type 'Int'.\n" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 36 18 36 28) " beware!" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 39 4 39 53) " | This is the documentation for the 'f' method" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 41 4 41 53) " | This is the documentation for the 'g' method" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 44 1 44 23) " | Data type comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 45 1 45 22) " With a second line" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 47 3 47 28) " | Constructor1 comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 49 26 49 60) " ^ Constructor 1 field 1 comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 50 26 50 47) " spanning two lines" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 51 7 51 41) " | Constructor 1 field 2 comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 53 29 53 53) " Not a haddock comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 55 11 55 37) " ^ Constructor 2 comment" , Comment False (SrcSpan "tests/examples/HaddockComments.hs" 56 11 56 20) " ^ Last" ] ) haskell-src-exts-1.23.1/tests/examples/HashOperator.hs.parser.golden0000644000000000000000000002262113534314633023642 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 1 1 1 1 , SrcSpan "tests/examples/HashOperator.hs" 3 1 3 1 , SrcSpan "tests/examples/HashOperator.hs" 3 1 3 1 , SrcSpan "tests/examples/HashOperator.hs" 3 1 3 1 , SrcSpan "tests/examples/HashOperator.hs" 4 1 4 1 , SrcSpan "tests/examples/HashOperator.hs" 6 1 6 1 , SrcSpan "tests/examples/HashOperator.hs" 7 1 7 1 , SrcSpan "tests/examples/HashOperator.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 1 1 1 13 , SrcSpan "tests/examples/HashOperator.hs" 1 31 1 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 1 14 1 30 , srcInfoPoints = [] } "OverloadedLabels" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 1 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 3 6 3 8 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 1 3 5 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 3 1 3 2 , SrcSpan "tests/examples/HashOperator.hs" 3 2 3 4 , SrcSpan "tests/examples/HashOperator.hs" 3 4 3 5 ] } "#." ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 9 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 3 13 3 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 9 3 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 9 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 9 3 12 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 16 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 3 20 3 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 16 3 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 16 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 16 3 19 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 23 3 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 23 3 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 3 23 3 26 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 1 4 15 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 1 4 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 1 4 2 , srcInfoPoints = [] } "x")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 3 4 5 , srcInfoPoints = [] } "#.") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 6 4 7 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 8 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 4 8 4 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 10 4 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 10 4 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 10 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 10 4 11 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 12 4 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 12 4 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 12 4 13 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 14 4 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 14 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 4 14 4 15 , srcInfoPoints = [] } "y"))))) Nothing ] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 6 1 6 12 , srcInfoPoints = [ SrcSpan "tests/examples/HashOperator.hs" 6 8 6 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 6 1 6 7 , srcInfoPoints = [] }) (Just 9) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 6 10 6 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HashOperator.hs" 6 10 6 12 , srcInfoPoints = [] } "#.") ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/EmptyFunDepPremise.hs.parser.golden0000644000000000000000000000773513534314633025001 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 5 1 5 1 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 1 2 32 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 1 2 7 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 27 2 32 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 2 8 2 26 , srcInfoPoints = [] } "EmptyFunDepPremise") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 1 1 40 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 1 1 13 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 37 1 40 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 1 14 1 36 , srcInfoPoints = [] } "FunctionalDependencies" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 1 4 17 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 1 4 6 , SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 11 4 12 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 7 4 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 7 4 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 7 4 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 9 4 10 , srcInfoPoints = [] } "a"))) [ FunDep SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 13 4 17 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 13 4 15 ] } [] [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyFunDepPremise.hs" 4 16 4 17 , srcInfoPoints = [] } "a" ] ] Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/HaskellParser.hs.parser.golden0000644000000000000000000011761013534314633024006 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 1 17 1 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1 , SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1 , SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1 , SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 1 , SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 1 , SrcSpan "tests/examples/HaskellParser.hs" 5 1 5 1 , SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 1 , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 1 , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 1 ] } Nothing [] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 7 , SrcSpan "tests/examples/HaskellParser.hs" 1 8 1 17 , SrcSpan "tests/examples/HaskellParser.hs" 1 50 1 52 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 18 1 49 , srcInfoPoints = [] } "Language.Haskell.Exts.Annotated" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 53 1 59 , srcInfoPoints = [] } "Parser") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 63 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 7 , SrcSpan "tests/examples/HaskellParser.hs" 2 8 2 17 , SrcSpan "tests/examples/HaskellParser.hs" 2 57 2 59 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 18 2 56 , srcInfoPoints = [] } "Language.Haskell.Exts.Annotated.Syntax" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 60 2 63 , srcInfoPoints = [] } "Syn") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 56 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 7 , SrcSpan "tests/examples/HaskellParser.hs" 3 8 3 17 , SrcSpan "tests/examples/HaskellParser.hs" 3 50 3 52 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 18 3 49 , srcInfoPoints = [] } "Language.Haskell.Exts.Extension" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 53 3 56 , srcInfoPoints = [] } "Ext") , importSpecs = Nothing } ] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 12 44 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 6 5 6 10 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 12 44 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 6 5 6 10 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 5 6 , srcInfoPoints = [] } "parse") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 7 5 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 7 5 23 , srcInfoPoints = [] } "originalFileName") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 24 5 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 24 5 29 , srcInfoPoints = [] } "input") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 30 5 74 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 5 30 5 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58 , srcInfoPoints = [] } "Parser") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58 , srcInfoPoints = [] } "parseModuleWithMode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68 , srcInfoPoints = [] } "parseMode")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74 , srcInfoPoints = [] } "input"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 12 44 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 7 , SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 7 , SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 36 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 7 17 7 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 16 , srcInfoPoints = [] } "parseMode" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36 , srcInfoPoints = [] } "Parser") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36 , srcInfoPoints = [] } "ParseMode"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 12 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 16 , srcInfoPoints = [] } "parseMode")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 17 12 44 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 8 17 8 18 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 19 12 44 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 8 43 8 44 , SrcSpan "tests/examples/HaskellParser.hs" 9 43 9 44 , SrcSpan "tests/examples/HaskellParser.hs" 12 43 12 44 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42 , srcInfoPoints = [] } "Parser") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42 , srcInfoPoints = [] } "defaultParseMode"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 8 66 8 67 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65 , srcInfoPoints = [] } "Parser") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65 , srcInfoPoints = [] } "parseFilename")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84 , srcInfoPoints = [] } "originalFileName"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 9 45 11 67 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 9 63 9 64 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62 , srcInfoPoints = [] } "Parser") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62 , srcInfoPoints = [] } "extensions")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 47 11 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 47 10 62 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 47 10 62 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 47 10 62 , srcInfoPoints = [] } "Ext") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 47 10 62 , srcInfoPoints = [] } "glasgowExts"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 63 10 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 63 10 65 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 10 63 10 65 , srcInfoPoints = [] } "++"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 11 47 11 67 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 11 47 11 48 , SrcSpan "tests/examples/HaskellParser.hs" 11 66 11 67 ] } [ Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 11 48 11 66 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 11 48 11 66 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 11 48 11 66 , srcInfoPoints = [] } "Ext") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 11 48 11 66 , srcInfoPoints = [] } "ExplicitForall")) ])) ])) Nothing ])) ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 1 16 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 6 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 13 6 13 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 5 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 14 5 14 7 , SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 8 , SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 8 , SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 8 , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 30 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 14 10 14 12 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 9 , srcInfoPoints = [] } "s")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21 , srcInfoPoints = [] } "readFile"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 22 14 30 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 22 14 30 , srcInfoPoints = [] } "Bug.hs" "Bug.hs"))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 11 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 12 , SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 32 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 13 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 14 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 15 14 15 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 21 , srcInfoPoints = [] } "parse"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 22 15 30 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 22 15 30 , srcInfoPoints = [] } "Bug.hs" "Bug.hs"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 31 15 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 31 15 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 15 31 15 32 , srcInfoPoints = [] } "s"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16 , srcInfoPoints = [] } "putStrLn"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 17 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/HaskellParser.hs" 16 17 16 18 , SrcSpan "tests/examples/HaskellParser.hs" 16 24 16 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22 , srcInfoPoints = [] } "show"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24 , srcInfoPoints = [] } "x")))))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/SafeImports3.hs.parser.golden0000644000000000000000000000434313534314633023563 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports3.hs" 1 1 1 1 , SrcSpan "tests/examples/SafeImports3.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports3.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports3.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports3.hs" 3 1 3 1 , SrcSpan "tests/examples/SafeImports3.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports3.hs" 1 1 1 13 , SrcSpan "tests/examples/SafeImports3.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 1 14 1 25 , srcInfoPoints = [] } "Trustworthy" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports3.hs" 2 1 2 7 , SrcSpan "tests/examples/SafeImports3.hs" 2 8 2 12 , SrcSpan "tests/examples/SafeImports3.hs" 2 21 2 23 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 2 13 2 20 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = True , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports3.hs" 2 24 2 25 , srcInfoPoints = [] } "P") , importSpecs = Nothing } ] [] , [] ) haskell-src-exts-1.23.1/tests/examples/Unicode.hs.parser.golden0000644000000000000000000132736713556712523022655 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 1 1 119 1 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 1 1 1 1 , SrcSpan "tests/examples/Unicode.hs" 2 1 2 1 , SrcSpan "tests/examples/Unicode.hs" 2 1 2 1 , SrcSpan "tests/examples/Unicode.hs" 4 1 4 1 , SrcSpan "tests/examples/Unicode.hs" 6 1 6 1 , SrcSpan "tests/examples/Unicode.hs" 7 1 7 1 , SrcSpan "tests/examples/Unicode.hs" 17 1 17 1 , SrcSpan "tests/examples/Unicode.hs" 18 1 18 1 , SrcSpan "tests/examples/Unicode.hs" 25 1 25 1 , SrcSpan "tests/examples/Unicode.hs" 26 1 26 1 , SrcSpan "tests/examples/Unicode.hs" 33 1 33 1 , SrcSpan "tests/examples/Unicode.hs" 34 1 34 1 , SrcSpan "tests/examples/Unicode.hs" 43 1 43 1 , SrcSpan "tests/examples/Unicode.hs" 44 1 44 1 , SrcSpan "tests/examples/Unicode.hs" 53 1 53 1 , SrcSpan "tests/examples/Unicode.hs" 54 1 54 1 , SrcSpan "tests/examples/Unicode.hs" 63 1 63 1 , SrcSpan "tests/examples/Unicode.hs" 64 1 64 1 , SrcSpan "tests/examples/Unicode.hs" 74 1 74 1 , SrcSpan "tests/examples/Unicode.hs" 75 1 75 1 , SrcSpan "tests/examples/Unicode.hs" 76 1 76 1 , SrcSpan "tests/examples/Unicode.hs" 82 1 82 1 , SrcSpan "tests/examples/Unicode.hs" 83 1 83 1 , SrcSpan "tests/examples/Unicode.hs" 84 1 84 1 , SrcSpan "tests/examples/Unicode.hs" 86 1 86 1 , SrcSpan "tests/examples/Unicode.hs" 87 1 87 1 , SrcSpan "tests/examples/Unicode.hs" 88 1 88 1 , SrcSpan "tests/examples/Unicode.hs" 89 1 89 1 , SrcSpan "tests/examples/Unicode.hs" 90 1 90 1 , SrcSpan "tests/examples/Unicode.hs" 92 1 92 1 , SrcSpan "tests/examples/Unicode.hs" 93 1 93 1 , SrcSpan "tests/examples/Unicode.hs" 94 1 94 1 , SrcSpan "tests/examples/Unicode.hs" 95 1 95 1 , SrcSpan "tests/examples/Unicode.hs" 99 1 99 1 , SrcSpan "tests/examples/Unicode.hs" 100 1 100 1 , SrcSpan "tests/examples/Unicode.hs" 101 1 101 1 , SrcSpan "tests/examples/Unicode.hs" 102 1 102 1 , SrcSpan "tests/examples/Unicode.hs" 103 1 103 1 , SrcSpan "tests/examples/Unicode.hs" 105 1 105 1 , SrcSpan "tests/examples/Unicode.hs" 119 1 119 1 , SrcSpan "tests/examples/Unicode.hs" 119 1 119 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 2 1 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 2 1 2 7 , SrcSpan "tests/examples/Unicode.hs" 2 13 2 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 2 8 2 12 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 1 1 1 13 , SrcSpan "tests/examples/Unicode.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 4 1 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 4 8 4 26 , srcInfoPoints = [] } "System.Environment" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 1 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 6 6 6 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 1 6 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 9 6 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 9 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 9 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 9 6 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 6 12 6 13 , SrcSpan "tests/examples/Unicode.hs" 6 13 6 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 6 12 6 13 , SrcSpan "tests/examples/Unicode.hs" 6 13 6 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 6 12 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 6 12 6 13 , SrcSpan "tests/examples/Unicode.hs" 6 13 6 14 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 7 1 15 32 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 7 1 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 7 1 7 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 7 6 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 7 6 7 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 7 8 15 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 7 8 7 10 , SrcSpan "tests/examples/Unicode.hs" 8 3 8 3 , SrcSpan "tests/examples/Unicode.hs" 9 3 9 3 , SrcSpan "tests/examples/Unicode.hs" 10 3 10 3 , SrcSpan "tests/examples/Unicode.hs" 11 3 11 3 , SrcSpan "tests/examples/Unicode.hs" 12 3 12 3 , SrcSpan "tests/examples/Unicode.hs" 13 3 13 3 , SrcSpan "tests/examples/Unicode.hs" 14 3 14 3 , SrcSpan "tests/examples/Unicode.hs" 15 3 15 3 , SrcSpan "tests/examples/Unicode.hs" 17 1 17 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 3 8 15 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 8 6 8 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 3 8 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 3 8 5 , srcInfoPoints = [] } "as")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 8 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 8 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 8 8 8 15 , srcInfoPoints = [] } "getArgs"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 3 9 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 3 9 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 3 9 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 3 9 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 3 9 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 9 9 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 9 9 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 9 9 10 , srcInfoPoints = [] } "$"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 11 9 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 11 9 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 9 11 9 13 , srcInfoPoints = [] } "as")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 3 10 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 3 10 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 3 10 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 3 10 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 3 10 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 9 10 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 9 10 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 9 10 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 11 10 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 11 10 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 11 10 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 11 10 15 , srcInfoPoints = [] } "test"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 31 10 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 10 31 10 32 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 3 11 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 3 11 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 3 11 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 3 11 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 3 11 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 9 11 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 9 11 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 9 11 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 11 11 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 11 11 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 11 11 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 11 11 16 , srcInfoPoints = [] } "test2"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 31 11 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 11 31 11 32 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 3 12 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 3 12 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 3 12 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 3 12 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 3 12 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 9 12 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 9 12 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 9 12 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 11 12 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 11 12 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 11 12 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 11 12 22 , srcInfoPoints = [] } "testRewrite"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 31 12 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 12 31 12 32 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 3 13 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 3 13 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 3 13 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 3 13 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 3 13 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 9 13 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 9 13 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 9 13 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 11 13 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 11 13 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 11 13 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 11 13 29 , srcInfoPoints = [] } "testRewriteReverse"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 31 13 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 13 31 13 32 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 3 14 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 3 14 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 3 14 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 3 14 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 3 14 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 9 14 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 9 14 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 9 14 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 11 14 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 11 14 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 11 14 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 11 14 23 , srcInfoPoints = [] } "testRewrite2"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 31 14 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 14 31 14 32 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 3 15 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 3 15 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 3 15 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 3 15 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 3 15 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 9 15 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 9 15 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 9 15 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 11 15 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 11 15 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 11 15 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 11 15 30 , srcInfoPoints = [] } "testRewriteReverse2"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 31 15 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 15 31 15 32 , srcInfoPoints = [] } 0 "0")))) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 1 17 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 17 6 17 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 1 17 5 , srcInfoPoints = [] } "test" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 9 17 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 17 11 17 12 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 9 17 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 9 17 10 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 13 17 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 13 17 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 17 13 17 17 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 1 23 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 19 3 19 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 1 23 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 19 3 19 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 1 18 5 , srcInfoPoints = [] } "test") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 6 18 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 6 18 7 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 8 18 12 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 18 8 18 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 10 18 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 10 18 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 18 10 18 12 , srcInfoPoints = [] } "pi")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 5 23 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 20 5 20 5 , SrcSpan "tests/examples/Unicode.hs" 21 5 21 5 , SrcSpan "tests/examples/Unicode.hs" 22 5 22 5 , SrcSpan "tests/examples/Unicode.hs" 23 5 23 5 , SrcSpan "tests/examples/Unicode.hs" 25 1 25 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 5 20 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 5 20 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 5 20 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 8 20 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 20 8 20 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 10 20 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 10 20 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 10 20 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 10 20 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 10 20 19 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 20 20 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 20 20 24 , srcInfoPoints = [] } 2000 "2000"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 25 20 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 25 20 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 20 25 20 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 5 21 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 5 21 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 5 21 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 8 21 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 21 8 21 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 10 21 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 10 21 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 10 21 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 10 21 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 25 21 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 25 21 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 21 25 21 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 5 22 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 5 22 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 5 22 7 , srcInfoPoints = [] } "pf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 8 22 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 22 8 22 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 10 22 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 10 22 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 10 22 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 10 22 11 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 12 22 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 12 22 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 12 22 14 , srcInfoPoints = [] } "|>"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 15 22 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 22 15 22 18 , srcInfoPoints = [] } 300 "300")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 5 23 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 5 23 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 5 23 7 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 8 23 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 23 8 23 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 10 23 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 10 23 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 10 23 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 10 23 11 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 12 23 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 12 23 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 12 23 14 , srcInfoPoints = [] } "|>"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 15 23 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 23 15 23 18 , srcInfoPoints = [] } 300 "300")))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 1 25 25 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 25 7 25 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 1 25 6 , srcInfoPoints = [] } "test2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 10 25 25 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 25 12 25 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 10 25 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 10 25 11 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 14 25 25 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 25 14 25 15 , SrcSpan "tests/examples/Unicode.hs" 25 19 25 20 , SrcSpan "tests/examples/Unicode.hs" 25 24 25 25 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 15 25 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 15 25 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 15 25 19 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 20 25 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 20 25 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 25 20 25 24 , srcInfoPoints = [] } "Bool")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 1 31 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 27 3 27 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 1 31 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 27 3 27 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 1 26 6 , srcInfoPoints = [] } "test2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 7 26 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 7 26 8 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 9 26 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 26 9 26 10 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 11 26 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 26 11 26 12 , SrcSpan "tests/examples/Unicode.hs" 26 14 26 15 , SrcSpan "tests/examples/Unicode.hs" 26 17 26 18 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 12 26 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 12 26 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 12 26 14 , srcInfoPoints = [] } "pf")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 15 26 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 15 26 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 26 15 26 17 , srcInfoPoints = [] } "pi")) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 5 31 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 28 5 28 5 , SrcSpan "tests/examples/Unicode.hs" 29 5 29 5 , SrcSpan "tests/examples/Unicode.hs" 30 5 30 5 , SrcSpan "tests/examples/Unicode.hs" 31 5 31 5 , SrcSpan "tests/examples/Unicode.hs" 33 1 33 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 5 28 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 5 28 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 5 28 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 8 28 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 28 8 28 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 10 28 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 10 28 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 10 28 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 10 28 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 10 28 19 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 20 28 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 20 28 24 , srcInfoPoints = [] } 2000 "2000"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 25 28 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 25 28 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 28 25 28 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 5 29 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 5 29 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 5 29 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 8 29 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 29 8 29 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 10 29 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 10 29 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 10 29 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 10 29 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 25 29 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 25 29 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 29 25 29 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 5 30 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 5 30 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 5 30 7 , srcInfoPoints = [] } "pf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 8 30 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 30 8 30 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 10 30 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 10 30 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 10 30 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 10 30 11 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 12 30 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 12 30 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 12 30 14 , srcInfoPoints = [] } "|>"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 15 30 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 30 15 30 18 , srcInfoPoints = [] } 300 "300")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 5 31 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 5 31 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 5 31 7 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 8 31 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 31 8 31 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 10 31 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 10 31 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 10 31 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 10 31 11 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 12 31 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 12 31 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 12 31 14 , srcInfoPoints = [] } "|>"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 15 31 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 31 15 31 18 , srcInfoPoints = [] } 300 "300")))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 1 33 24 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 33 13 33 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 1 33 12 , srcInfoPoints = [] } "testRewrite" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 16 33 24 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 33 18 33 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 16 33 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 16 33 17 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 20 33 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 20 33 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 33 20 33 24 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 1 41 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 35 3 35 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 1 41 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 35 3 35 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 1 34 12 , srcInfoPoints = [] } "testRewrite") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 13 34 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 13 34 14 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 15 34 19 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 34 15 34 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 17 34 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 17 34 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 34 17 34 19 , srcInfoPoints = [] } "pi")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 5 41 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 36 5 36 5 , SrcSpan "tests/examples/Unicode.hs" 37 5 37 5 , SrcSpan "tests/examples/Unicode.hs" 38 5 38 5 , SrcSpan "tests/examples/Unicode.hs" 39 5 39 5 , SrcSpan "tests/examples/Unicode.hs" 40 5 40 5 , SrcSpan "tests/examples/Unicode.hs" 41 5 41 5 , SrcSpan "tests/examples/Unicode.hs" 43 1 43 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 5 36 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 5 36 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 5 36 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 8 36 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 36 8 36 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 10 36 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 10 36 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 10 36 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 10 36 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 10 36 19 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 20 36 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 20 36 24 , srcInfoPoints = [] } 2000 "2000"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 25 36 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 25 36 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 36 25 36 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 5 37 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 5 37 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 5 37 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 8 37 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 37 8 37 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 10 37 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 10 37 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 10 37 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 10 37 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 25 37 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 25 37 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 37 25 37 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 5 38 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 5 38 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 5 38 7 , srcInfoPoints = [] } "lf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 8 38 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 38 8 38 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 10 38 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 10 38 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 10 38 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 10 38 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 17 38 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 17 38 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 38 17 38 18 , srcInfoPoints = [] } "f"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 5 39 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 5 39 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 5 39 7 , srcInfoPoints = [] } "li")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 8 39 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 39 8 39 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 10 39 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 10 39 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 10 39 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 10 39 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 17 39 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 17 39 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 39 17 39 18 , srcInfoPoints = [] } "i"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 5 40 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 5 40 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 5 40 7 , srcInfoPoints = [] } "pf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 8 40 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 40 8 40 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 10 40 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 10 40 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 10 40 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 10 40 12 , srcInfoPoints = [] } "lf"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 13 40 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 13 40 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 13 40 14 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 15 40 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 40 15 40 18 , srcInfoPoints = [] } 300 "300")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 5 41 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 5 41 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 5 41 7 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 8 41 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 41 8 41 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 10 41 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 10 41 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 10 41 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 10 41 12 , srcInfoPoints = [] } "li"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 13 41 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 13 41 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 13 41 14 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 15 41 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 41 15 41 18 , srcInfoPoints = [] } 300 "300")))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 1 43 31 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 43 20 43 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 1 43 19 , srcInfoPoints = [] } "testRewriteReverse" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 23 43 31 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 43 25 43 26 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 23 43 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 23 43 24 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 27 43 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 27 43 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 43 27 43 31 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 1 51 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 45 3 45 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 1 51 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 45 3 45 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 1 44 19 , srcInfoPoints = [] } "testRewriteReverse") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 20 44 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 20 44 21 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 22 44 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 44 22 44 23 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 24 44 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 24 44 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 44 24 44 26 , srcInfoPoints = [] } "pi")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 5 51 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 46 5 46 5 , SrcSpan "tests/examples/Unicode.hs" 47 5 47 5 , SrcSpan "tests/examples/Unicode.hs" 48 5 48 5 , SrcSpan "tests/examples/Unicode.hs" 49 5 49 5 , SrcSpan "tests/examples/Unicode.hs" 50 5 50 5 , SrcSpan "tests/examples/Unicode.hs" 51 5 51 5 , SrcSpan "tests/examples/Unicode.hs" 53 1 53 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 5 46 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 5 46 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 5 46 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 8 46 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 46 8 46 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 10 46 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 10 46 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 10 46 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 10 46 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 10 46 19 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 20 46 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 20 46 24 , srcInfoPoints = [] } 2000 "2000"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 25 46 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 25 46 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 46 25 46 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 5 47 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 5 47 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 5 47 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 8 47 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 47 8 47 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 10 47 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 10 47 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 10 47 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 10 47 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 25 47 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 25 47 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 47 25 47 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 5 48 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 5 48 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 5 48 7 , srcInfoPoints = [] } "lf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 8 48 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 48 8 48 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 10 48 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 10 48 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 10 48 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 10 48 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 17 48 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 17 48 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 48 17 48 18 , srcInfoPoints = [] } "f"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 5 49 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 5 49 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 5 49 7 , srcInfoPoints = [] } "li")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 8 49 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 49 8 49 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 10 49 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 10 49 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 10 49 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 10 49 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 17 49 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 17 49 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 49 17 49 18 , srcInfoPoints = [] } "i"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 5 50 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 5 50 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 5 50 7 , srcInfoPoints = [] } "pf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 8 50 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 50 8 50 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 10 50 18 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 10 50 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 10 50 13 , srcInfoPoints = [] } 300 "300")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 14 50 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 14 50 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 14 50 15 , srcInfoPoints = [] } "\8804"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 16 50 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 16 50 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 50 16 50 18 , srcInfoPoints = [] } "lf"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 5 51 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 5 51 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 5 51 7 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 8 51 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 51 8 51 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 10 51 18 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 10 51 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 10 51 13 , srcInfoPoints = [] } 300 "300")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 14 51 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 14 51 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 14 51 15 , srcInfoPoints = [] } "\8804"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 16 51 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 16 51 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 51 16 51 18 , srcInfoPoints = [] } "li"))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 1 53 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 53 14 53 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 1 53 13 , srcInfoPoints = [] } "testRewrite2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 17 53 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 53 19 53 20 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 17 53 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 17 53 18 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 21 53 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 53 21 53 22 , SrcSpan "tests/examples/Unicode.hs" 53 26 53 27 , SrcSpan "tests/examples/Unicode.hs" 53 31 53 32 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 22 53 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 22 53 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 22 53 26 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 27 53 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 27 53 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 53 27 53 31 , srcInfoPoints = [] } "Bool")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 1 57 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 55 3 55 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 1 57 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 55 3 55 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 1 54 13 , srcInfoPoints = [] } "testRewrite2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 14 54 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 14 54 15 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 16 54 49 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 54 16 54 17 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 18 54 49 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 54 18 54 19 , SrcSpan "tests/examples/Unicode.hs" 54 33 54 34 , SrcSpan "tests/examples/Unicode.hs" 54 48 54 49 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 19 54 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 19 54 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 19 54 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 19 54 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 19 54 25 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 26 54 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 26 54 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 26 54 27 , srcInfoPoints = [] } "i")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 28 54 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 28 54 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 28 54 29 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 30 54 33 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 30 54 33 , srcInfoPoints = [] } 300 "300")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 34 54 48 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 34 54 37 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 34 54 37 , srcInfoPoints = [] } 300 "300")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 38 54 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 38 54 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 38 54 39 , srcInfoPoints = [] } ">"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 40 54 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 40 54 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 40 54 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 40 54 46 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 47 54 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 47 54 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 54 47 54 48 , srcInfoPoints = [] } "i")))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 5 57 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 57 5 57 5 , SrcSpan "tests/examples/Unicode.hs" 63 1 63 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 5 57 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 5 57 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 5 57 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 8 57 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 57 8 57 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 10 57 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 10 57 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 10 57 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 10 57 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 25 57 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 25 57 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 57 25 57 26 , srcInfoPoints = [] } "x"))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 1 63 39 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 63 21 63 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 1 63 20 , srcInfoPoints = [] } "testRewriteReverse2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 24 63 39 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 63 26 63 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 24 63 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 24 63 25 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 28 63 39 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 63 28 63 29 , SrcSpan "tests/examples/Unicode.hs" 63 33 63 34 , SrcSpan "tests/examples/Unicode.hs" 63 38 63 39 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 29 63 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 29 63 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 29 63 33 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 34 63 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 34 63 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 63 34 63 38 , srcInfoPoints = [] } "Bool")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 1 71 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 65 3 65 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 1 71 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 65 3 65 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 1 64 20 , srcInfoPoints = [] } "testRewriteReverse2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 21 64 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 21 64 22 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 23 64 56 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 64 23 64 24 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 25 64 56 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 64 25 64 26 , SrcSpan "tests/examples/Unicode.hs" 64 41 64 42 , SrcSpan "tests/examples/Unicode.hs" 64 55 64 56 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 26 64 41 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 26 64 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 26 64 30 , srcInfoPoints = [] } 2000 "2000")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 31 64 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 31 64 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 31 64 32 , srcInfoPoints = [] } "<"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 33 64 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 33 64 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 33 64 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 33 64 39 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 40 64 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 40 64 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 40 64 41 , srcInfoPoints = [] } "i")))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 42 64 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 42 64 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 42 64 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 42 64 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 42 64 48 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 49 64 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 49 64 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 49 64 50 , srcInfoPoints = [] } "i")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 51 64 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 51 64 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 51 64 52 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 53 64 55 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 64 53 64 55 , srcInfoPoints = [] } 20 "20")) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 5 71 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 66 5 66 5 , SrcSpan "tests/examples/Unicode.hs" 67 5 67 5 , SrcSpan "tests/examples/Unicode.hs" 68 5 68 5 , SrcSpan "tests/examples/Unicode.hs" 69 5 69 5 , SrcSpan "tests/examples/Unicode.hs" 70 5 70 5 , SrcSpan "tests/examples/Unicode.hs" 71 5 71 5 , SrcSpan "tests/examples/Unicode.hs" 74 1 74 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 5 66 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 5 66 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 5 66 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 8 66 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 66 8 66 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 10 66 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 10 66 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 10 66 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 10 66 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 10 66 19 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 20 66 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 20 66 24 , srcInfoPoints = [] } 2000 "2000"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 25 66 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 25 66 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 66 25 66 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 5 67 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 5 67 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 5 67 6 , srcInfoPoints = [] } "i")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 8 67 26 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 67 8 67 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 10 67 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 10 67 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 10 67 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 10 67 16 , srcInfoPoints = [] } "repeat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 25 67 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 25 67 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 67 25 67 26 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 5 68 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 5 68 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 5 68 7 , srcInfoPoints = [] } "lf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 8 68 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 68 8 68 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 10 68 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 10 68 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 10 68 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 10 68 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 17 68 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 17 68 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 68 17 68 18 , srcInfoPoints = [] } "f"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 5 69 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 5 69 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 5 69 7 , srcInfoPoints = [] } "li")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 8 69 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 69 8 69 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 10 69 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 10 69 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 10 69 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 10 69 16 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 17 69 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 17 69 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 69 17 69 18 , srcInfoPoints = [] } "i"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 5 70 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 5 70 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 5 70 7 , srcInfoPoints = [] } "pf")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 8 70 20 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 70 8 70 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 10 70 20 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 10 70 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 10 70 14 , srcInfoPoints = [] } 2000 "2000")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 15 70 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 15 70 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 15 70 17 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 18 70 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 18 70 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 70 18 70 20 , srcInfoPoints = [] } "lf"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 5 71 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 5 71 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 5 71 7 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 8 71 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 71 8 71 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 10 71 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 10 71 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 10 71 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 10 71 12 , srcInfoPoints = [] } "lf"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 13 71 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 13 71 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 13 71 14 , srcInfoPoints = [] } "\8805"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 15 71 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 15 71 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 71 15 71 17 , srcInfoPoints = [] } "li"))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 1 74 68 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 10 74 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 1 74 9 , srcInfoPoints = [] } "lengthOP" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 13 74 68 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 13 74 29 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 13 74 14 , SrcSpan "tests/examples/Unicode.hs" 74 19 74 20 , SrcSpan "tests/examples/Unicode.hs" 74 26 74 27 , SrcSpan "tests/examples/Unicode.hs" 74 28 74 29 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 14 74 19 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 14 74 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 14 74 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 14 74 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 14 74 17 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 18 74 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 18 74 19 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 21 74 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 21 74 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 21 74 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 21 74 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 21 74 24 , srcInfoPoints = [] } "Ord"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 25 74 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 25 74 26 , srcInfoPoints = [] } "a"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 30 74 68 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 35 74 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 30 74 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 30 74 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 30 74 34 , srcInfoPoints = [] } "Bool"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 37 74 68 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 52 74 53 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 37 74 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 37 74 38 , SrcSpan "tests/examples/Unicode.hs" 74 50 74 51 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 38 74 50 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 40 74 41 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 38 74 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 38 74 39 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 42 74 50 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 44 74 45 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 42 74 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 42 74 43 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 46 74 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 46 74 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 46 74 50 , srcInfoPoints = [] } "Bool")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 54 74 68 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 58 74 59 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 54 74 57 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 54 74 55 , SrcSpan "tests/examples/Unicode.hs" 74 56 74 57 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 55 74 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 55 74 56 , srcInfoPoints = [] } "b"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 60 74 68 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 74 62 74 63 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 60 74 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 60 74 61 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 64 74 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 64 74 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 74 64 74 68 , srcInfoPoints = [] } "Bool")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 1 80 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 1 75 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 1 75 9 , srcInfoPoints = [] } "lengthOP") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 10 75 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 10 75 11 , srcInfoPoints = [] } "v") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 12 75 15 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 75 12 75 13 , SrcSpan "tests/examples/Unicode.hs" 75 13 75 14 , SrcSpan "tests/examples/Unicode.hs" 75 14 75 15 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 13 75 14 , srcInfoPoints = [] } "\8860") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 16 75 18 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 75 16 75 17 , SrcSpan "tests/examples/Unicode.hs" 75 17 75 18 ] } [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 20 75 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 20 75 21 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 22 75 29 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 75 22 75 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 24 75 29 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 24 75 25 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 24 75 25 , srcInfoPoints = [] } 0 "0")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 26 75 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 26 75 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 26 75 27 , srcInfoPoints = [] } "\8860"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 28 75 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 28 75 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 75 28 75 29 , srcInfoPoints = [] } "n"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 1 80 24 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 77 3 77 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 1 76 9 , srcInfoPoints = [] } "lengthOP") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 10 76 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 10 76 11 , srcInfoPoints = [] } "v") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 12 76 15 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 76 12 76 13 , SrcSpan "tests/examples/Unicode.hs" 76 13 76 14 , SrcSpan "tests/examples/Unicode.hs" 76 14 76 15 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 13 76 14 , srcInfoPoints = [] } "\8860") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 16 76 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 16 76 19 , srcInfoPoints = [] } "xxs") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 20 76 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 20 76 21 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 22 76 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 76 22 76 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 24 76 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 24 76 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 24 76 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 24 76 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 24 76 26 , srcInfoPoints = [] } "co"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 27 76 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 27 76 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 27 76 30 , srcInfoPoints = [] } "xxs")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 31 76 32 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 76 31 76 32 , srcInfoPoints = [] } 0 "0")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 5 80 24 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 78 5 78 5 , SrcSpan "tests/examples/Unicode.hs" 80 5 80 5 , SrcSpan "tests/examples/Unicode.hs" 82 1 82 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 5 80 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 5 79 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 5 78 7 , srcInfoPoints = [] } "co") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 8 78 14 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 78 8 78 9 , SrcSpan "tests/examples/Unicode.hs" 78 13 78 14 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 9 78 13 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 9 78 10 , srcInfoPoints = [] }) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 10 78 11 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 10 78 11 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 11 78 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 11 78 13 , srcInfoPoints = [] } "xs"))) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 15 78 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 15 78 16 , srcInfoPoints = [] } "c") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 17 79 32 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 17 78 42 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 78 17 78 18 , SrcSpan "tests/examples/Unicode.hs" 78 29 78 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 19 78 24 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 19 78 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 19 78 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 19 78 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 19 78 20 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 21 78 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 21 78 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 21 78 22 , srcInfoPoints = [] } ">"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 23 78 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 23 78 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 23 78 24 , srcInfoPoints = [] } "c")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 31 78 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 31 78 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 31 78 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 31 78 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 31 78 33 , srcInfoPoints = [] } "co"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 34 78 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 34 78 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 34 78 36 , srcInfoPoints = [] } "xs")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 37 78 42 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 78 37 78 38 , SrcSpan "tests/examples/Unicode.hs" 78 41 78 42 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 38 78 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 38 78 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 38 78 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 38 78 39 , srcInfoPoints = [] } "c"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 39 78 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 39 78 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 39 78 40 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 40 78 41 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 78 40 78 41 , srcInfoPoints = [] } 1 "1"))))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 17 79 32 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 79 17 79 18 , SrcSpan "tests/examples/Unicode.hs" 79 29 79 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 19 79 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 19 79 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 19 79 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 19 79 28 , srcInfoPoints = [] } "otherwise"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 31 79 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 31 79 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 79 31 79 32 , srcInfoPoints = [] } "v"))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 5 80 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 5 80 7 , srcInfoPoints = [] } "co") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 8 80 10 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 80 8 80 9 , SrcSpan "tests/examples/Unicode.hs" 80 9 80 10 ] } [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 15 80 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 15 80 16 , srcInfoPoints = [] } "c") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 17 80 24 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 80 17 80 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 19 80 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 19 80 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 19 80 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 19 80 20 , srcInfoPoints = [] } "c"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 21 80 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 21 80 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 21 80 22 , srcInfoPoints = [] } "\8860"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 23 80 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 23 80 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 80 23 80 24 , srcInfoPoints = [] } "n"))))) Nothing ] ])) ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 1 82 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 1 82 4 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 82 1 82 2 , SrcSpan "tests/examples/Unicode.hs" 82 2 82 3 , SrcSpan "tests/examples/Unicode.hs" 82 3 82 4 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 2 82 3 , srcInfoPoints = [] } "\8803")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 5 82 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 82 5 82 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 7 82 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 82 7 82 8 , SrcSpan "tests/examples/Unicode.hs" 82 8 82 10 , SrcSpan "tests/examples/Unicode.hs" 82 10 82 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 7 82 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 82 7 82 8 , SrcSpan "tests/examples/Unicode.hs" 82 8 82 10 , SrcSpan "tests/examples/Unicode.hs" 82 10 82 11 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 82 8 82 10 , srcInfoPoints = [] } "==")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 1 83 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 1 83 4 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 83 1 83 2 , SrcSpan "tests/examples/Unicode.hs" 83 2 83 3 , SrcSpan "tests/examples/Unicode.hs" 83 3 83 4 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 2 83 3 , srcInfoPoints = [] } "\8804")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 5 83 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 83 5 83 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 7 83 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 83 7 83 8 , SrcSpan "tests/examples/Unicode.hs" 83 8 83 10 , SrcSpan "tests/examples/Unicode.hs" 83 10 83 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 7 83 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 83 7 83 8 , SrcSpan "tests/examples/Unicode.hs" 83 8 83 10 , SrcSpan "tests/examples/Unicode.hs" 83 10 83 11 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 83 8 83 10 , srcInfoPoints = [] } "<=")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 1 84 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 1 84 4 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 84 1 84 2 , SrcSpan "tests/examples/Unicode.hs" 84 2 84 3 , SrcSpan "tests/examples/Unicode.hs" 84 3 84 4 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 2 84 3 , srcInfoPoints = [] } "\8805")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 5 84 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 84 5 84 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 7 84 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 84 7 84 8 , SrcSpan "tests/examples/Unicode.hs" 84 8 84 10 , SrcSpan "tests/examples/Unicode.hs" 84 10 84 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 7 84 11 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 84 7 84 8 , SrcSpan "tests/examples/Unicode.hs" 84 8 84 10 , SrcSpan "tests/examples/Unicode.hs" 84 10 84 11 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 84 8 84 10 , srcInfoPoints = [] } ">=")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 1 86 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 1 86 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 86 1 86 2 , SrcSpan "tests/examples/Unicode.hs" 86 2 86 4 , SrcSpan "tests/examples/Unicode.hs" 86 4 86 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 2 86 4 , srcInfoPoints = [] } "|\8803")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 7 86 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 86 7 86 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 9 86 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 9 86 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 9 86 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 9 86 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 9 86 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 18 86 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 18 86 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 18 86 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 24 86 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 86 24 86 25 , SrcSpan "tests/examples/Unicode.hs" 86 25 86 26 , SrcSpan "tests/examples/Unicode.hs" 86 26 86 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 24 86 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 86 24 86 25 , SrcSpan "tests/examples/Unicode.hs" 86 25 86 26 , SrcSpan "tests/examples/Unicode.hs" 86 26 86 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 86 25 86 26 , srcInfoPoints = [] } "\8803"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 1 87 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 1 87 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 87 1 87 2 , SrcSpan "tests/examples/Unicode.hs" 87 2 87 4 , SrcSpan "tests/examples/Unicode.hs" 87 4 87 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 2 87 4 , srcInfoPoints = [] } "|<")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 7 87 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 87 7 87 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 9 87 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 9 87 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 9 87 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 9 87 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 9 87 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 18 87 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 18 87 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 18 87 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 24 87 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 87 24 87 25 , SrcSpan "tests/examples/Unicode.hs" 87 25 87 26 , SrcSpan "tests/examples/Unicode.hs" 87 26 87 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 24 87 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 87 24 87 25 , SrcSpan "tests/examples/Unicode.hs" 87 25 87 26 , SrcSpan "tests/examples/Unicode.hs" 87 26 87 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 87 25 87 26 , srcInfoPoints = [] } "<"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 1 88 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 1 88 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 88 1 88 2 , SrcSpan "tests/examples/Unicode.hs" 88 2 88 4 , SrcSpan "tests/examples/Unicode.hs" 88 4 88 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 2 88 4 , srcInfoPoints = [] } "|\8804")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 7 88 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 88 7 88 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 9 88 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 9 88 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 9 88 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 9 88 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 9 88 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 18 88 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 18 88 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 18 88 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 24 88 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 88 24 88 25 , SrcSpan "tests/examples/Unicode.hs" 88 25 88 26 , SrcSpan "tests/examples/Unicode.hs" 88 26 88 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 24 88 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 88 24 88 25 , SrcSpan "tests/examples/Unicode.hs" 88 25 88 26 , SrcSpan "tests/examples/Unicode.hs" 88 26 88 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 88 25 88 26 , srcInfoPoints = [] } "\8804"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 1 89 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 1 89 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 89 1 89 2 , SrcSpan "tests/examples/Unicode.hs" 89 2 89 4 , SrcSpan "tests/examples/Unicode.hs" 89 4 89 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 2 89 4 , srcInfoPoints = [] } "|>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 7 89 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 89 7 89 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 9 89 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 9 89 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 9 89 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 9 89 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 9 89 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 18 89 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 18 89 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 18 89 22 , srcInfoPoints = [] } "True")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 24 89 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 89 24 89 25 , SrcSpan "tests/examples/Unicode.hs" 89 25 89 26 , SrcSpan "tests/examples/Unicode.hs" 89 26 89 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 24 89 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 89 24 89 25 , SrcSpan "tests/examples/Unicode.hs" 89 25 89 26 , SrcSpan "tests/examples/Unicode.hs" 89 26 89 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 89 25 89 26 , srcInfoPoints = [] } ">"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 1 90 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 1 90 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 90 1 90 2 , SrcSpan "tests/examples/Unicode.hs" 90 2 90 4 , SrcSpan "tests/examples/Unicode.hs" 90 4 90 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 2 90 4 , srcInfoPoints = [] } "|\8805")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 7 90 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 90 7 90 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 9 90 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 9 90 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 9 90 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 9 90 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 9 90 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 18 90 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 18 90 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 18 90 22 , srcInfoPoints = [] } "True")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 24 90 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 90 24 90 25 , SrcSpan "tests/examples/Unicode.hs" 90 25 90 26 , SrcSpan "tests/examples/Unicode.hs" 90 26 90 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 24 90 27 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 90 24 90 25 , SrcSpan "tests/examples/Unicode.hs" 90 25 90 26 , SrcSpan "tests/examples/Unicode.hs" 90 26 90 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 90 25 90 26 , srcInfoPoints = [] } "\8805"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 1 92 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 1 92 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 92 1 92 2 , SrcSpan "tests/examples/Unicode.hs" 92 2 92 4 , SrcSpan "tests/examples/Unicode.hs" 92 4 92 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 2 92 4 , srcInfoPoints = [] } "|=")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 7 92 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 92 7 92 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 9 92 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 9 92 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 9 92 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 9 92 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 9 92 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 18 92 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 18 92 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 18 92 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 24 92 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 92 24 92 25 , SrcSpan "tests/examples/Unicode.hs" 92 25 92 27 , SrcSpan "tests/examples/Unicode.hs" 92 27 92 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 24 92 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 92 24 92 25 , SrcSpan "tests/examples/Unicode.hs" 92 25 92 27 , SrcSpan "tests/examples/Unicode.hs" 92 27 92 28 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 92 25 92 27 , srcInfoPoints = [] } "=="))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 1 93 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 1 93 6 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 93 1 93 2 , SrcSpan "tests/examples/Unicode.hs" 93 2 93 5 , SrcSpan "tests/examples/Unicode.hs" 93 5 93 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 2 93 5 , srcInfoPoints = [] } "|==")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 7 93 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 93 7 93 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 9 93 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 9 93 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 9 93 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 9 93 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 9 93 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 18 93 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 18 93 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 18 93 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 24 93 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 93 24 93 25 , SrcSpan "tests/examples/Unicode.hs" 93 25 93 27 , SrcSpan "tests/examples/Unicode.hs" 93 27 93 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 24 93 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 93 24 93 25 , SrcSpan "tests/examples/Unicode.hs" 93 25 93 27 , SrcSpan "tests/examples/Unicode.hs" 93 27 93 28 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 93 25 93 27 , srcInfoPoints = [] } "=="))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 1 94 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 1 94 6 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 94 1 94 2 , SrcSpan "tests/examples/Unicode.hs" 94 2 94 5 , SrcSpan "tests/examples/Unicode.hs" 94 5 94 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 2 94 5 , srcInfoPoints = [] } "|<=")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 7 94 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 94 7 94 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 9 94 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 9 94 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 9 94 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 9 94 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 9 94 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 18 94 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 18 94 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 18 94 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 24 94 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 94 24 94 25 , SrcSpan "tests/examples/Unicode.hs" 94 25 94 27 , SrcSpan "tests/examples/Unicode.hs" 94 27 94 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 24 94 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 94 24 94 25 , SrcSpan "tests/examples/Unicode.hs" 94 25 94 27 , SrcSpan "tests/examples/Unicode.hs" 94 27 94 28 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 94 25 94 27 , srcInfoPoints = [] } "<="))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 1 95 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 1 95 6 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 95 1 95 2 , SrcSpan "tests/examples/Unicode.hs" 95 2 95 5 , SrcSpan "tests/examples/Unicode.hs" 95 5 95 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 2 95 5 , srcInfoPoints = [] } "|>=")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 7 95 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 95 7 95 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 9 95 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 9 95 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 9 95 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 9 95 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 9 95 17 , srcInfoPoints = [] } "lengthOP"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 18 95 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 18 95 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 18 95 23 , srcInfoPoints = [] } "False")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 24 95 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 95 24 95 25 , SrcSpan "tests/examples/Unicode.hs" 95 25 95 27 , SrcSpan "tests/examples/Unicode.hs" 95 27 95 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 24 95 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 95 24 95 25 , SrcSpan "tests/examples/Unicode.hs" 95 25 95 27 , SrcSpan "tests/examples/Unicode.hs" 95 27 95 28 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 95 25 95 27 , srcInfoPoints = [] } ">="))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 1 99 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 1 99 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 99 1 99 2 , SrcSpan "tests/examples/Unicode.hs" 99 2 99 4 , SrcSpan "tests/examples/Unicode.hs" 99 4 99 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 2 99 4 , srcInfoPoints = [] } "\8803|")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 6 99 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 99 6 99 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 8 99 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 8 99 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 8 99 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 8 99 12 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 13 99 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 99 13 99 14 , SrcSpan "tests/examples/Unicode.hs" 99 14 99 16 , SrcSpan "tests/examples/Unicode.hs" 99 16 99 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 13 99 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 99 13 99 14 , SrcSpan "tests/examples/Unicode.hs" 99 14 99 16 , SrcSpan "tests/examples/Unicode.hs" 99 16 99 17 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 99 14 99 16 , srcInfoPoints = [] } "|\8803"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 1 100 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 1 100 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 100 1 100 2 , SrcSpan "tests/examples/Unicode.hs" 100 2 100 4 , SrcSpan "tests/examples/Unicode.hs" 100 4 100 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 2 100 4 , srcInfoPoints = [] } "<|")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 6 100 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 100 6 100 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 8 100 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 8 100 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 8 100 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 8 100 12 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 13 100 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 100 13 100 14 , SrcSpan "tests/examples/Unicode.hs" 100 14 100 16 , SrcSpan "tests/examples/Unicode.hs" 100 16 100 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 13 100 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 100 13 100 14 , SrcSpan "tests/examples/Unicode.hs" 100 14 100 16 , SrcSpan "tests/examples/Unicode.hs" 100 16 100 17 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 100 14 100 16 , srcInfoPoints = [] } "|\8805"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 1 101 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 1 101 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 101 1 101 2 , SrcSpan "tests/examples/Unicode.hs" 101 2 101 4 , SrcSpan "tests/examples/Unicode.hs" 101 4 101 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 2 101 4 , srcInfoPoints = [] } "\8804|")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 6 101 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 101 6 101 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 8 101 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 8 101 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 8 101 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 8 101 12 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 13 101 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 101 13 101 14 , SrcSpan "tests/examples/Unicode.hs" 101 14 101 16 , SrcSpan "tests/examples/Unicode.hs" 101 16 101 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 13 101 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 101 13 101 14 , SrcSpan "tests/examples/Unicode.hs" 101 14 101 16 , SrcSpan "tests/examples/Unicode.hs" 101 16 101 17 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 101 14 101 16 , srcInfoPoints = [] } "|>"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 1 102 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 1 102 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 102 1 102 2 , SrcSpan "tests/examples/Unicode.hs" 102 2 102 4 , SrcSpan "tests/examples/Unicode.hs" 102 4 102 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 2 102 4 , srcInfoPoints = [] } ">|")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 6 102 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 102 6 102 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 8 102 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 8 102 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 8 102 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 8 102 12 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 13 102 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 102 13 102 14 , SrcSpan "tests/examples/Unicode.hs" 102 14 102 16 , SrcSpan "tests/examples/Unicode.hs" 102 16 102 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 13 102 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 102 13 102 14 , SrcSpan "tests/examples/Unicode.hs" 102 14 102 16 , SrcSpan "tests/examples/Unicode.hs" 102 16 102 17 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 102 14 102 16 , srcInfoPoints = [] } "|\8804"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 1 103 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 1 103 5 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 103 1 103 2 , SrcSpan "tests/examples/Unicode.hs" 103 2 103 4 , SrcSpan "tests/examples/Unicode.hs" 103 4 103 5 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 2 103 4 , srcInfoPoints = [] } "\8805|")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 6 103 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 103 6 103 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 8 103 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 8 103 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 8 103 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 8 103 12 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 13 103 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 103 13 103 14 , SrcSpan "tests/examples/Unicode.hs" 103 14 103 16 , SrcSpan "tests/examples/Unicode.hs" 103 16 103 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 13 103 17 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 103 13 103 14 , SrcSpan "tests/examples/Unicode.hs" 103 14 103 16 , SrcSpan "tests/examples/Unicode.hs" 103 16 103 17 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 103 14 103 16 , srcInfoPoints = [] } "|<"))))) Nothing , RulePragmaDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 105 1 118 6 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 105 1 105 10 , SrcSpan "tests/examples/Unicode.hs" 118 3 118 6 ] } [ Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 1 107 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 107 1 107 10 , SrcSpan "tests/examples/Unicode.hs" 107 11 107 17 , SrcSpan "tests/examples/Unicode.hs" 107 22 107 23 , SrcSpan "tests/examples/Unicode.hs" 107 42 107 43 ] } "xs |\8803 n" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 18 107 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 18 107 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 21 107 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 21 107 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 25 107 41 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 25 107 36 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 107 25 107 26 , SrcSpan "tests/examples/Unicode.hs" 107 35 107 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 26 107 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 26 107 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 26 107 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 26 107 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 33 107 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 33 107 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 33 107 35 , srcInfoPoints = [] } "xs"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 37 107 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 37 107 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 37 107 39 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 40 107 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 40 107 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 40 107 41 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 44 107 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 44 107 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 44 107 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 44 107 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 47 107 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 47 107 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 47 107 49 , srcInfoPoints = [] } "|\8803"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 50 107 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 50 107 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 107 50 107 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 1 108 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 108 1 108 10 , SrcSpan "tests/examples/Unicode.hs" 108 11 108 17 , SrcSpan "tests/examples/Unicode.hs" 108 22 108 23 , SrcSpan "tests/examples/Unicode.hs" 108 42 108 43 ] } "xs |< n" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 18 108 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 18 108 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 21 108 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 21 108 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 25 108 41 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 25 108 36 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 108 25 108 26 , SrcSpan "tests/examples/Unicode.hs" 108 35 108 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 26 108 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 26 108 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 26 108 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 26 108 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 33 108 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 33 108 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 33 108 35 , srcInfoPoints = [] } "xs"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 37 108 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 37 108 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 37 108 38 , srcInfoPoints = [] } "<"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 40 108 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 40 108 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 40 108 41 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 44 108 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 44 108 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 44 108 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 44 108 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 47 108 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 47 108 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 47 108 49 , srcInfoPoints = [] } "|<"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 50 108 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 50 108 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 108 50 108 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 1 109 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 109 1 109 10 , SrcSpan "tests/examples/Unicode.hs" 109 11 109 17 , SrcSpan "tests/examples/Unicode.hs" 109 22 109 23 , SrcSpan "tests/examples/Unicode.hs" 109 42 109 43 ] } "xs |\8804 n" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 18 109 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 18 109 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 21 109 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 21 109 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 25 109 41 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 25 109 36 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 109 25 109 26 , SrcSpan "tests/examples/Unicode.hs" 109 35 109 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 26 109 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 26 109 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 26 109 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 26 109 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 33 109 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 33 109 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 33 109 35 , srcInfoPoints = [] } "xs"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 37 109 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 37 109 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 37 109 39 , srcInfoPoints = [] } "<="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 40 109 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 40 109 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 40 109 41 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 44 109 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 44 109 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 44 109 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 44 109 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 47 109 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 47 109 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 47 109 49 , srcInfoPoints = [] } "|\8804"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 50 109 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 50 109 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 109 50 109 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 1 110 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 110 1 110 10 , SrcSpan "tests/examples/Unicode.hs" 110 11 110 17 , SrcSpan "tests/examples/Unicode.hs" 110 22 110 23 , SrcSpan "tests/examples/Unicode.hs" 110 42 110 43 ] } "xs |> n" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 18 110 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 18 110 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 21 110 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 21 110 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 25 110 41 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 25 110 36 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 110 25 110 26 , SrcSpan "tests/examples/Unicode.hs" 110 35 110 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 26 110 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 26 110 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 26 110 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 26 110 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 33 110 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 33 110 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 33 110 35 , srcInfoPoints = [] } "xs"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 37 110 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 37 110 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 37 110 38 , srcInfoPoints = [] } ">"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 40 110 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 40 110 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 40 110 41 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 44 110 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 44 110 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 44 110 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 44 110 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 47 110 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 47 110 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 47 110 49 , srcInfoPoints = [] } "|>"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 50 110 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 50 110 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 110 50 110 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 1 111 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 111 1 111 10 , SrcSpan "tests/examples/Unicode.hs" 111 11 111 17 , SrcSpan "tests/examples/Unicode.hs" 111 22 111 23 , SrcSpan "tests/examples/Unicode.hs" 111 42 111 43 ] } "xs |\8805 n" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 18 111 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 18 111 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 21 111 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 21 111 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 25 111 41 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 25 111 36 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 111 25 111 26 , SrcSpan "tests/examples/Unicode.hs" 111 35 111 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 26 111 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 26 111 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 26 111 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 26 111 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 33 111 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 33 111 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 33 111 35 , srcInfoPoints = [] } "xs"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 37 111 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 37 111 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 37 111 39 , srcInfoPoints = [] } ">="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 40 111 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 40 111 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 40 111 41 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 44 111 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 44 111 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 44 111 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 44 111 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 47 111 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 47 111 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 47 111 49 , srcInfoPoints = [] } "|\8805"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 50 111 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 50 111 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 111 50 111 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 1 113 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 113 1 113 10 , SrcSpan "tests/examples/Unicode.hs" 113 11 113 17 , SrcSpan "tests/examples/Unicode.hs" 113 22 113 23 , SrcSpan "tests/examples/Unicode.hs" 113 42 113 43 ] } "n \8803| xs" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 18 113 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 18 113 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 21 113 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 21 113 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 25 113 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 25 113 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 25 113 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 25 113 26 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 27 113 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 27 113 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 27 113 29 , srcInfoPoints = [] } "=="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 30 113 41 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 113 30 113 31 , SrcSpan "tests/examples/Unicode.hs" 113 40 113 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 31 113 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 31 113 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 31 113 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 31 113 37 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 38 113 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 38 113 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 38 113 40 , srcInfoPoints = [] } "xs")))))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 44 113 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 44 113 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 44 113 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 44 113 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 47 113 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 47 113 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 47 113 49 , srcInfoPoints = [] } "|\8803"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 50 113 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 50 113 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 113 50 113 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 1 114 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 114 1 114 10 , SrcSpan "tests/examples/Unicode.hs" 114 11 114 17 , SrcSpan "tests/examples/Unicode.hs" 114 22 114 23 , SrcSpan "tests/examples/Unicode.hs" 114 42 114 43 ] } "n <| xs" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 18 114 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 18 114 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 21 114 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 21 114 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 25 114 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 25 114 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 25 114 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 25 114 26 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 27 114 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 27 114 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 27 114 28 , srcInfoPoints = [] } "<"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 30 114 41 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 114 30 114 31 , SrcSpan "tests/examples/Unicode.hs" 114 40 114 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 31 114 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 31 114 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 31 114 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 31 114 37 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 38 114 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 38 114 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 38 114 40 , srcInfoPoints = [] } "xs")))))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 44 114 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 44 114 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 44 114 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 44 114 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 47 114 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 47 114 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 47 114 49 , srcInfoPoints = [] } "|\8805"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 50 114 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 50 114 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 114 50 114 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 1 115 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 115 1 115 10 , SrcSpan "tests/examples/Unicode.hs" 115 11 115 17 , SrcSpan "tests/examples/Unicode.hs" 115 22 115 23 , SrcSpan "tests/examples/Unicode.hs" 115 42 115 43 ] } "n \8804| xs" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 18 115 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 18 115 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 21 115 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 21 115 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 25 115 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 25 115 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 25 115 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 25 115 26 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 27 115 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 27 115 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 27 115 29 , srcInfoPoints = [] } "<="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 30 115 41 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 115 30 115 31 , SrcSpan "tests/examples/Unicode.hs" 115 40 115 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 31 115 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 31 115 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 31 115 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 31 115 37 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 38 115 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 38 115 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 38 115 40 , srcInfoPoints = [] } "xs")))))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 44 115 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 44 115 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 44 115 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 44 115 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 47 115 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 47 115 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 47 115 49 , srcInfoPoints = [] } "|>"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 50 115 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 50 115 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 115 50 115 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 1 116 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 116 1 116 10 , SrcSpan "tests/examples/Unicode.hs" 116 11 116 17 , SrcSpan "tests/examples/Unicode.hs" 116 22 116 23 , SrcSpan "tests/examples/Unicode.hs" 116 42 116 43 ] } "n >| xs" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 18 116 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 18 116 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 21 116 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 21 116 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 25 116 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 25 116 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 25 116 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 25 116 26 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 27 116 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 27 116 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 27 116 28 , srcInfoPoints = [] } ">"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 30 116 41 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 116 30 116 31 , SrcSpan "tests/examples/Unicode.hs" 116 40 116 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 31 116 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 31 116 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 31 116 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 31 116 37 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 38 116 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 38 116 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 38 116 40 , srcInfoPoints = [] } "xs")))))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 44 116 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 44 116 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 44 116 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 44 116 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 47 116 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 47 116 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 47 116 49 , srcInfoPoints = [] } "|\8804"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 50 116 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 50 116 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 116 50 116 51 , srcInfoPoints = [] } "n")))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 1 117 51 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 117 1 117 10 , SrcSpan "tests/examples/Unicode.hs" 117 11 117 17 , SrcSpan "tests/examples/Unicode.hs" 117 22 117 23 , SrcSpan "tests/examples/Unicode.hs" 117 42 117 43 ] } "n \8805| xs" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 18 117 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 18 117 20 , srcInfoPoints = [] } "xs") , RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 21 117 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 21 117 22 , srcInfoPoints = [] } "n") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 25 117 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 25 117 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 25 117 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 25 117 26 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 27 117 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 27 117 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 27 117 29 , srcInfoPoints = [] } ">="))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 30 117 41 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode.hs" 117 30 117 31 , SrcSpan "tests/examples/Unicode.hs" 117 40 117 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 31 117 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 31 117 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 31 117 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 31 117 37 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 38 117 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 38 117 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 38 117 40 , srcInfoPoints = [] } "xs")))))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 44 117 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 44 117 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 44 117 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 44 117 46 , srcInfoPoints = [] } "xs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 47 117 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 47 117 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 47 117 49 , srcInfoPoints = [] } "|<"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 50 117 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 50 117 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode.hs" 117 50 117 51 , srcInfoPoints = [] } "n")))) ] ] , [ Comment False (SrcSpan "tests/examples/Unicode.hs" 56 1 56 28) " f = replicate 2000 x" , Comment False (SrcSpan "tests/examples/Unicode.hs" 58 1 58 20) " lf = length f" , Comment False (SrcSpan "tests/examples/Unicode.hs" 59 1 59 20) " li = length i" , Comment False (SrcSpan "tests/examples/Unicode.hs" 60 1 60 20) " pf = lf > 300" , Comment False (SrcSpan "tests/examples/Unicode.hs" 61 1 61 20) " pi = li > 300" , Comment False (SrcSpan "tests/examples/Unicode.hs" 98 1 98 7) " \8803\8804\8805" , Comment False (SrcSpan "tests/examples/Unicode.hs" 106 1 106 10) " length" ] ) haskell-src-exts-1.23.1/tests/examples/HexPrec.hs.parser.golden0000644000000000000000000001612313534314633022601 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 1 1 1 1 , SrcSpan "tests/examples/HexPrec.hs" 1 1 1 1 , SrcSpan "tests/examples/HexPrec.hs" 3 1 3 1 , SrcSpan "tests/examples/HexPrec.hs" 4 1 4 1 , SrcSpan "tests/examples/HexPrec.hs" 6 1 6 1 , SrcSpan "tests/examples/HexPrec.hs" 7 1 7 1 , SrcSpan "tests/examples/HexPrec.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 1 1 1 21 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 1 1 1 7 , SrcSpan "tests/examples/HexPrec.hs" 1 16 1 21 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 1 8 1 15 , srcInfoPoints = [] } "HexPrec") Nothing Nothing)) [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 1 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 3 6 3 8 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 1 3 5 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 3 1 3 2 , SrcSpan "tests/examples/HexPrec.hs" 3 2 3 4 , SrcSpan "tests/examples/HexPrec.hs" 3 4 3 5 ] } "%%" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 9 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 3 13 3 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 9 3 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 9 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 9 3 12 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 16 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 3 20 3 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 16 3 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 16 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 16 3 19 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 23 3 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 23 3 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 3 23 3 26 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 1 4 11 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 1 4 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 1 4 2 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 3 4 5 , srcInfoPoints = [] } "%%") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 6 4 7 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 8 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 4 8 4 9 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 10 4 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 4 10 4 11 , srcInfoPoints = [] } 0 "0"))) Nothing ] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 6 1 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/HexPrec.hs" 6 8 6 12 ] } (AssocLeft SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 6 1 6 7 , srcInfoPoints = [] }) (Just 2) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 6 13 6 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/HexPrec.hs" 6 13 6 15 , srcInfoPoints = [] } "%%") ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSynonyms2.hs.parser.golden0000644000000000000000000006532613534314633024533 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 1 1 19 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 2 1 2 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 2 1 2 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 6 1 6 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 10 1 10 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 16 1 16 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 17 1 17 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 18 1 18 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 19 1 19 1 , SrcSpan "tests/examples/PatternSynonyms2.hs" 19 1 19 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 1 2 34 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 2 1 2 7 , SrcSpan "tests/examples/PatternSynonyms2.hs" 2 29 2 34 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 8 2 11 , srcInfoPoints = [] } "Foo") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 12 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 2 12 2 13 , SrcSpan "tests/examples/PatternSynonyms2.hs" 2 27 2 28 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 13 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 2 13 2 20 ] } (PatternNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 13 2 20 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 21 2 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 2 21 2 27 , srcInfoPoints = [] } "Single")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 1 1 1 71 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSynonyms2.hs" 1 29 1 30 , SrcSpan "tests/examples/PatternSynonyms2.hs" 1 50 1 51 , SrcSpan "tests/examples/PatternSynonyms2.hs" 1 68 1 71 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 1 31 1 50 , srcInfoPoints = [] } "ScopedTypeVariables" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 1 52 1 66 , srcInfoPoints = [] } "KindSignatures" ] ] [] [ PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 1 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 6 1 6 8 , SrcSpan "tests/examples/PatternSynonyms2.hs" 6 18 6 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 9 6 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 9 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 9 6 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 16 6 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 21 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 6 21 6 22 , SrcSpan "tests/examples/PatternSynonyms2.hs" 6 23 6 24 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 22 6 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 6 22 6 23 , srcInfoPoints = [] } "x") ]) (ExplicitBidirectional SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 3 10 0 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 7 3 7 8 , SrcSpan "tests/examples/PatternSynonyms2.hs" 7 9 7 9 , SrcSpan "tests/examples/PatternSynonyms2.hs" 8 9 8 9 , SrcSpan "tests/examples/PatternSynonyms2.hs" 10 1 10 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 9 7 23 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 9 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 9 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 9 7 15 , srcInfoPoints = [] } "Single")) [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 16 7 17 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 16 7 17 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 16 7 17 , srcInfoPoints = [] } 4 "4") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 18 7 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 7 18 7 19 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 20 7 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 7 20 7 21 , SrcSpan "tests/examples/PatternSynonyms2.hs" 7 22 7 23 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 21 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 21 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 7 21 7 22 , srcInfoPoints = [] } "x")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 9 8 23 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 9 8 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 9 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 9 8 15 , srcInfoPoints = [] } "Single")) [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 16 8 17 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 16 8 17 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 16 8 17 , srcInfoPoints = [] } 5 "5") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 18 8 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 8 18 8 19 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 20 8 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 8 20 8 21 , SrcSpan "tests/examples/PatternSynonyms2.hs" 8 22 8 23 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 21 8 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 21 8 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 8 21 8 22 , srcInfoPoints = [] } "x")) ])) Nothing ]) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 1 10 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 10 1 10 8 , SrcSpan "tests/examples/PatternSynonyms2.hs" 10 18 10 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 9 10 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 9 10 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 9 10 15 , srcInfoPoints = [] } "Double")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 16 10 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 16 10 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 20 10 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 10 20 10 21 , SrcSpan "tests/examples/PatternSynonyms2.hs" 10 22 10 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 21 10 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 10 21 10 22 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 1 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 16 8 16 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 1 16 7 , srcInfoPoints = [] } "single" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 11 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 16 15 16 17 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 11 16 14 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 16 11 16 12 , SrcSpan "tests/examples/PatternSynonyms2.hs" 16 13 16 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 12 16 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 12 16 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 18 16 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 18 16 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 18 16 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 18 16 23 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 24 16 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 16 24 16 25 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 1 18 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 1 17 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 1 17 7 , srcInfoPoints = [] } "single") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 8 17 18 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 17 8 17 9 , SrcSpan "tests/examples/PatternSynonyms2.hs" 17 17 17 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 9 17 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 9 17 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 9 17 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 16 17 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 16 17 17 , srcInfoPoints = [] } "x") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 19 17 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 17 19 17 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 21 17 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 21 17 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 21 17 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 21 17 25 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 26 17 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 26 17 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 17 26 17 27 , srcInfoPoints = [] } "x"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 1 18 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 1 18 7 , srcInfoPoints = [] } "single") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 8 18 9 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 10 18 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms2.hs" 18 10 18 11 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 12 18 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 12 18 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms2.hs" 18 12 18 19 , srcInfoPoints = [] } "Nothing")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/THTypedSplices.hs.parser.golden0000644000000000000000000001641113546001445024104 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 1 1 1 1 , SrcSpan "tests/examples/THTypedSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTypedSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTypedSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTypedSplices.hs" 4 1 4 1 , SrcSpan "tests/examples/THTypedSplices.hs" 6 1 6 1 , SrcSpan "tests/examples/THTypedSplices.hs" 7 1 7 1 , SrcSpan "tests/examples/THTypedSplices.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 1 1 1 13 , SrcSpan "tests/examples/THTypedSplices.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 2 1 2 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 2 8 2 27 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 4 1 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 4 8 4 27 , srcInfoPoints = [] } "THTypedSplices.Defs" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 1 6 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 1 6 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 1 6 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 6 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 6 6 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 8 6 33 , srcInfoPoints = [] } (SpliceExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 8 6 16 , srcInfoPoints = [] } (TIdSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 8 6 16 , srcInfoPoints = [] } "justTH")) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 17 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 17 6 18 , SrcSpan "tests/examples/THTypedSplices.hs" 6 32 6 33 ] } (SpliceExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 18 6 32 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 18 6 21 , SrcSpan "tests/examples/THTypedSplices.hs" 6 31 6 32 ] } (TParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 18 6 32 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 18 6 21 , SrcSpan "tests/examples/THTypedSplices.hs" 6 31 6 32 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 21 6 31 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 21 6 25 , SrcSpan "tests/examples/THTypedSplices.hs" 6 28 6 31 ] } (TExpBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 21 6 31 , srcInfoPoints = [ SrcSpan "tests/examples/THTypedSplices.hs" 6 21 6 25 , SrcSpan "tests/examples/THTypedSplices.hs" 6 28 6 31 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 26 6 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypedSplices.hs" 6 26 6 27 , srcInfoPoints = [] } 2 "2"))))))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExprHole.hs.parser.golden0000644000000000000000000002476713534314633023006 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 1 11 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 2 1 2 1 , SrcSpan "tests/examples/ExprHole.hs" 2 1 2 1 , SrcSpan "tests/examples/ExprHole.hs" 2 1 2 1 , SrcSpan "tests/examples/ExprHole.hs" 4 1 4 1 , SrcSpan "tests/examples/ExprHole.hs" 6 1 6 1 , SrcSpan "tests/examples/ExprHole.hs" 8 1 8 1 , SrcSpan "tests/examples/ExprHole.hs" 11 1 11 1 , SrcSpan "tests/examples/ExprHole.hs" 11 1 11 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 1 2 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 1 2 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 1 2 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 5 2 8 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 2 5 2 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 7 2 8 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 7 2 8 , srcInfoPoints = [] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 2 7 2 8 , srcInfoPoints = [] })))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 1 4 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 5 4 10 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 4 5 4 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 7 4 10 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 7 4 8 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 7 4 8 , srcInfoPoints = [] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 7 4 8 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 9 4 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 4 9 4 10 , srcInfoPoints = [] } "x"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 1 6 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 1 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 1 6 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 5 6 11 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 6 5 6 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 10 6 11 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 10 6 11 , srcInfoPoints = [] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 6 10 6 11 , srcInfoPoints = [] })))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 1 10 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 9 3 9 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 1 10 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 9 3 9 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 1 8 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 5 8 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 5 8 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 7 8 12 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 8 7 8 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 9 8 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 9 8 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 8 9 8 12 , srcInfoPoints = [] } "baz")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 5 10 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 10 5 10 5 , SrcSpan "tests/examples/ExprHole.hs" 11 1 11 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 5 10 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 5 10 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 5 10 8 , srcInfoPoints = [] } "foo") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 9 10 10 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 11 10 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExprHole.hs" 10 11 10 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 13 10 14 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 13 10 14 , srcInfoPoints = [] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExprHole.hs" 10 13 10 14 , srcInfoPoints = [] })))) Nothing ] ])) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/FFIExtensions.hs.parser.golden0000644000000000000000000002222313534314633023725 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 1 1 1 1 , SrcSpan "tests/examples/FFIExtensions.hs" 2 1 2 1 , SrcSpan "tests/examples/FFIExtensions.hs" 2 1 2 1 , SrcSpan "tests/examples/FFIExtensions.hs" 4 1 4 1 , SrcSpan "tests/examples/FFIExtensions.hs" 7 1 7 1 , SrcSpan "tests/examples/FFIExtensions.hs" 8 1 8 1 , SrcSpan "tests/examples/FFIExtensions.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 2 1 2 7 , SrcSpan "tests/examples/FFIExtensions.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 2 8 2 21 , srcInfoPoints = [] } "FFIExtensions") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 1 1 1 69 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 1 1 1 13 , SrcSpan "tests/examples/FFIExtensions.hs" 1 38 1 39 , SrcSpan "tests/examples/FFIExtensions.hs" 1 56 1 57 , SrcSpan "tests/examples/FFIExtensions.hs" 1 66 1 69 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 1 14 1 38 , srcInfoPoints = [] } "ForeignFunctionInterface" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 1 40 1 56 , srcInfoPoints = [] } "InterruptibleFFI" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 1 58 1 65 , srcInfoPoints = [] } "CApiFFI" ] ] [] [ ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 4 1 5 38 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 4 1 4 8 , SrcSpan "tests/examples/FFIExtensions.hs" 4 9 4 15 , SrcSpan "tests/examples/FFIExtensions.hs" 5 4 5 11 , SrcSpan "tests/examples/FFIExtensions.hs" 5 18 5 20 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 4 16 4 21 , srcInfoPoints = [] }) (Just (PlayInterruptible SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 4 22 4 35 , srcInfoPoints = [] })) (Just "sleep") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 12 5 17 , srcInfoPoints = [] } "sleep") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 21 5 38 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 5 27 5 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 21 5 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 21 5 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 21 5 26 , srcInfoPoints = [] } "CUint"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 30 5 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 30 5 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 30 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 30 5 32 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 33 5 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 33 5 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 5 33 5 38 , srcInfoPoints = [] } "CUint"))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 1 7 54 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 7 1 7 8 , SrcSpan "tests/examples/FFIExtensions.hs" 7 9 7 15 , SrcSpan "tests/examples/FFIExtensions.hs" 7 21 7 33 , SrcSpan "tests/examples/FFIExtensions.hs" 7 36 7 38 ] } (CApi SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 16 7 20 , srcInfoPoints = [] }) Nothing (Just "header.h f") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 34 7 35 , srcInfoPoints = [] } "f") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 39 7 54 , srcInfoPoints = [ SrcSpan "tests/examples/FFIExtensions.hs" 7 44 7 46 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 39 7 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 39 7 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 39 7 43 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 47 7 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 47 7 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 47 7 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 47 7 49 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 50 7 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 50 7 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIExtensions.hs" 7 50 7 54 , srcInfoPoints = [] } "CInt"))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/InstanceSigs.hs.parser.golden0000644000000000000000000006702113534314633023640 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 1 1 1 1 , SrcSpan "tests/examples/InstanceSigs.hs" 2 1 2 1 , SrcSpan "tests/examples/InstanceSigs.hs" 3 1 3 1 , SrcSpan "tests/examples/InstanceSigs.hs" 5 1 5 1 , SrcSpan "tests/examples/InstanceSigs.hs" 5 1 5 1 , SrcSpan "tests/examples/InstanceSigs.hs" 5 1 5 1 , SrcSpan "tests/examples/InstanceSigs.hs" 10 1 10 1 , SrcSpan "tests/examples/InstanceSigs.hs" 10 1 10 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 1 1 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 1 1 1 13 , SrcSpan "tests/examples/InstanceSigs.hs" 1 34 1 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 1 14 1 33 , srcInfoPoints = [] } "ScopedTypeVariables" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 2 1 2 30 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 2 1 2 13 , SrcSpan "tests/examples/InstanceSigs.hs" 2 27 2 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 2 14 2 26 , srcInfoPoints = [] } "InstanceSigs" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 3 1 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 3 1 3 13 , SrcSpan "tests/examples/InstanceSigs.hs" 3 27 3 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 3 14 3 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 1 10 0 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 5 1 5 9 , SrcSpan "tests/examples/InstanceSigs.hs" 5 34 5 39 , SrcSpan "tests/examples/InstanceSigs.hs" 6 3 6 3 , SrcSpan "tests/examples/InstanceSigs.hs" 8 3 8 3 , SrcSpan "tests/examples/InstanceSigs.hs" 9 3 9 3 , SrcSpan "tests/examples/InstanceSigs.hs" 10 1 10 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 10 5 33 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 10 5 33 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 10 5 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 10 5 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 10 5 23 , srcInfoPoints = [] } "SupportsDelta"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 24 5 33 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 5 24 5 25 , SrcSpan "tests/examples/InstanceSigs.hs" 5 32 5 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 25 5 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 25 5 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 25 5 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 25 5 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 25 5 28 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 29 5 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 29 5 30 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 31 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 5 31 5 32 , srcInfoPoints = [] } "v")))))) (Just [ InsType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 3 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 6 3 6 7 , SrcSpan "tests/examples/InstanceSigs.hs" 6 24 6 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 8 6 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 8 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 8 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 8 6 13 , srcInfoPoints = [] } "Delta"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 14 6 23 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 6 14 6 15 , SrcSpan "tests/examples/InstanceSigs.hs" 6 22 6 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 15 6 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 15 6 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 15 6 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 15 6 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 15 6 18 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 19 6 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 19 6 20 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 21 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 21 6 22 , srcInfoPoints = [] } "v"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 26 6 33 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 26 6 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 26 6 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 26 6 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 26 6 29 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 30 6 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 30 6 31 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 32 6 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 6 32 6 33 , srcInfoPoints = [] } "v"))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 3 8 51 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 8 11 8 13 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 3 8 51 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 8 11 8 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 3 8 10 , srcInfoPoints = [] } "mkDelta" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 51 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 8 22 8 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 21 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 14 8 17 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 18 8 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 18 8 19 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 20 8 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 20 8 21 , srcInfoPoints = [] } "v"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 51 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 8 33 8 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 25 8 28 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 29 8 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 29 8 30 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 31 8 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 31 8 32 , srcInfoPoints = [] } "v"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 36 8 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 36 8 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 36 8 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 36 8 41 , srcInfoPoints = [] } "Delta"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 42 8 51 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 8 42 8 43 , SrcSpan "tests/examples/InstanceSigs.hs" 8 50 8 51 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 43 8 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 43 8 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 43 8 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 43 8 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 43 8 46 , srcInfoPoints = [] } "Map"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 47 8 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 47 8 48 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 49 8 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 8 49 8 50 , srcInfoPoints = [] } "v")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 3 9 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 3 9 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 3 9 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 3 9 10 , srcInfoPoints = [] } "mkDelta")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 11 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/InstanceSigs.hs" 9 11 9 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 13 9 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 13 9 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InstanceSigs.hs" 9 13 9 22 , srcInfoPoints = [] } "undefined")))) Nothing) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces2.hs.parser.golden0000644000000000000000000001513713534314633025112 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 1 1 1 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 1 4 1 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 5 1 5 1 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 1 2 50 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 1 2 7 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 45 2 50 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 8 2 27 , srcInfoPoints = [] } "ExplicitNamespaces2") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 28 2 44 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 28 2 29 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 31 2 32 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 43 2 44 ] } [ EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 30 2 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 30 2 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 30 2 31 , srcInfoPoints = [] } "f")) , EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 33 2 42 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 33 2 37 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 38 2 42 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 33 2 37 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 33 2 37 ] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 38 2 42 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 38 2 39 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 39 2 41 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 41 2 42 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 2 39 2 41 , srcInfoPoints = [] } "++")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 1 1 13 , SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 1 14 1 32 , srcInfoPoints = [] } "ExplicitNamespaces" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 1 4 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 1 4 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 3 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 3 4 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 5 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 5 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces2.hs" 4 5 4 14 , srcInfoPoints = [] } "undefined")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/AmbiguousFixities.hs.parser.golden0000644000000000000000000000007713534314632024703 0ustar0000000000000000ParseFailed (SrcLoc "" (-1) (-1)) "Ambiguous infix expression" haskell-src-exts-1.23.1/tests/examples/TupleSections.hs.parser.golden0000644000000000000000000001326513534314633024050 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/TupleSections.hs" 1 1 1 1 , SrcSpan "tests/examples/TupleSections.hs" 3 1 3 1 , SrcSpan "tests/examples/TupleSections.hs" 3 1 3 1 , SrcSpan "tests/examples/TupleSections.hs" 3 1 3 1 , SrcSpan "tests/examples/TupleSections.hs" 4 1 4 1 , SrcSpan "tests/examples/TupleSections.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/TupleSections.hs" 1 1 1 13 , SrcSpan "tests/examples/TupleSections.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 1 14 1 27 , srcInfoPoints = [] } "TupleSections" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 1 3 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 1 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 1 3 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 5 3 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 5 3 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 7 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/TupleSections.hs" 3 7 3 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 9 3 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 9 3 16 , srcInfoPoints = [] } (TupleSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 9 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/TupleSections.hs" 3 9 3 10 , SrcSpan "tests/examples/TupleSections.hs" 3 11 3 12 , SrcSpan "tests/examples/TupleSections.hs" 3 12 3 13 , SrcSpan "tests/examples/TupleSections.hs" 3 13 3 14 ] } Boxed [ Just (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 10 3 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 10 3 11 , srcInfoPoints = [] } 1 "1")) , Nothing , Nothing ]) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 15 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 15 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 15 3 16 , srcInfoPoints = [] } "x")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 17 3 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TupleSections.hs" 3 17 3 18 , srcInfoPoints = [] } 3 "3")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/DerivingVia.hs.parser.golden0000644000000000000000000604637213556712523023475 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 1 1 460 1 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingVia.hs" 2 1 2 1 , SrcSpan "tests/examples/DerivingVia.hs" 3 1 3 1 , SrcSpan "tests/examples/DerivingVia.hs" 4 1 4 1 , SrcSpan "tests/examples/DerivingVia.hs" 5 1 5 1 , SrcSpan "tests/examples/DerivingVia.hs" 6 1 6 1 , SrcSpan "tests/examples/DerivingVia.hs" 7 1 7 1 , SrcSpan "tests/examples/DerivingVia.hs" 8 1 8 1 , SrcSpan "tests/examples/DerivingVia.hs" 9 1 9 1 , SrcSpan "tests/examples/DerivingVia.hs" 10 1 10 1 , SrcSpan "tests/examples/DerivingVia.hs" 11 1 11 1 , SrcSpan "tests/examples/DerivingVia.hs" 12 1 12 1 , SrcSpan "tests/examples/DerivingVia.hs" 13 1 13 1 , SrcSpan "tests/examples/DerivingVia.hs" 14 1 14 1 , SrcSpan "tests/examples/DerivingVia.hs" 15 1 15 1 , SrcSpan "tests/examples/DerivingVia.hs" 16 1 16 1 , SrcSpan "tests/examples/DerivingVia.hs" 17 1 17 1 , SrcSpan "tests/examples/DerivingVia.hs" 18 1 18 1 , SrcSpan "tests/examples/DerivingVia.hs" 19 1 19 1 , SrcSpan "tests/examples/DerivingVia.hs" 20 1 20 1 , SrcSpan "tests/examples/DerivingVia.hs" 20 1 20 1 , SrcSpan "tests/examples/DerivingVia.hs" 22 1 22 1 , SrcSpan "tests/examples/DerivingVia.hs" 23 1 23 1 , SrcSpan "tests/examples/DerivingVia.hs" 24 1 24 1 , SrcSpan "tests/examples/DerivingVia.hs" 25 1 25 1 , SrcSpan "tests/examples/DerivingVia.hs" 26 1 26 1 , SrcSpan "tests/examples/DerivingVia.hs" 27 1 27 1 , SrcSpan "tests/examples/DerivingVia.hs" 28 1 28 1 , SrcSpan "tests/examples/DerivingVia.hs" 29 1 29 1 , SrcSpan "tests/examples/DerivingVia.hs" 30 1 30 1 , SrcSpan "tests/examples/DerivingVia.hs" 32 1 32 1 , SrcSpan "tests/examples/DerivingVia.hs" 33 1 33 1 , SrcSpan "tests/examples/DerivingVia.hs" 34 1 34 1 , SrcSpan "tests/examples/DerivingVia.hs" 36 1 36 1 , SrcSpan "tests/examples/DerivingVia.hs" 42 1 42 1 , SrcSpan "tests/examples/DerivingVia.hs" 50 1 50 1 , SrcSpan "tests/examples/DerivingVia.hs" 52 1 52 1 , SrcSpan "tests/examples/DerivingVia.hs" 55 1 55 1 , SrcSpan "tests/examples/DerivingVia.hs" 58 1 58 1 , SrcSpan "tests/examples/DerivingVia.hs" 66 1 66 1 , SrcSpan "tests/examples/DerivingVia.hs" 69 1 69 1 , SrcSpan "tests/examples/DerivingVia.hs" 72 1 72 1 , SrcSpan "tests/examples/DerivingVia.hs" 74 1 74 1 , SrcSpan "tests/examples/DerivingVia.hs" 75 1 75 1 , SrcSpan "tests/examples/DerivingVia.hs" 76 1 76 1 , SrcSpan "tests/examples/DerivingVia.hs" 84 1 84 1 , SrcSpan "tests/examples/DerivingVia.hs" 87 1 87 1 , SrcSpan "tests/examples/DerivingVia.hs" 91 1 91 1 , SrcSpan "tests/examples/DerivingVia.hs" 95 1 95 1 , SrcSpan "tests/examples/DerivingVia.hs" 99 1 99 1 , SrcSpan "tests/examples/DerivingVia.hs" 112 1 112 1 , SrcSpan "tests/examples/DerivingVia.hs" 115 1 115 1 , SrcSpan "tests/examples/DerivingVia.hs" 119 1 119 1 , SrcSpan "tests/examples/DerivingVia.hs" 123 1 123 1 , SrcSpan "tests/examples/DerivingVia.hs" 127 1 127 1 , SrcSpan "tests/examples/DerivingVia.hs" 128 1 128 1 , SrcSpan "tests/examples/DerivingVia.hs" 132 1 132 1 , SrcSpan "tests/examples/DerivingVia.hs" 137 1 137 1 , SrcSpan "tests/examples/DerivingVia.hs" 146 1 146 1 , SrcSpan "tests/examples/DerivingVia.hs" 157 1 157 1 , SrcSpan "tests/examples/DerivingVia.hs" 160 1 160 1 , SrcSpan "tests/examples/DerivingVia.hs" 162 1 162 1 , SrcSpan "tests/examples/DerivingVia.hs" 165 1 165 1 , SrcSpan "tests/examples/DerivingVia.hs" 171 1 171 1 , SrcSpan "tests/examples/DerivingVia.hs" 172 1 172 1 , SrcSpan "tests/examples/DerivingVia.hs" 173 1 173 1 , SrcSpan "tests/examples/DerivingVia.hs" 174 1 174 1 , SrcSpan "tests/examples/DerivingVia.hs" 175 1 175 1 , SrcSpan "tests/examples/DerivingVia.hs" 176 1 176 1 , SrcSpan "tests/examples/DerivingVia.hs" 177 1 177 1 , SrcSpan "tests/examples/DerivingVia.hs" 178 1 178 1 , SrcSpan "tests/examples/DerivingVia.hs" 179 1 179 1 , SrcSpan "tests/examples/DerivingVia.hs" 181 1 181 1 , SrcSpan "tests/examples/DerivingVia.hs" 190 1 190 1 , SrcSpan "tests/examples/DerivingVia.hs" 193 1 193 1 , SrcSpan "tests/examples/DerivingVia.hs" 201 1 201 1 , SrcSpan "tests/examples/DerivingVia.hs" 205 1 205 1 , SrcSpan "tests/examples/DerivingVia.hs" 221 1 221 1 , SrcSpan "tests/examples/DerivingVia.hs" 224 1 224 1 , SrcSpan "tests/examples/DerivingVia.hs" 230 1 230 1 , SrcSpan "tests/examples/DerivingVia.hs" 233 1 233 1 , SrcSpan "tests/examples/DerivingVia.hs" 236 1 236 1 , SrcSpan "tests/examples/DerivingVia.hs" 239 1 239 1 , SrcSpan "tests/examples/DerivingVia.hs" 244 1 244 1 , SrcSpan "tests/examples/DerivingVia.hs" 251 1 251 1 , SrcSpan "tests/examples/DerivingVia.hs" 258 1 258 1 , SrcSpan "tests/examples/DerivingVia.hs" 265 1 265 1 , SrcSpan "tests/examples/DerivingVia.hs" 268 1 268 1 , SrcSpan "tests/examples/DerivingVia.hs" 269 1 269 1 , SrcSpan "tests/examples/DerivingVia.hs" 270 1 270 1 , SrcSpan "tests/examples/DerivingVia.hs" 272 1 272 1 , SrcSpan "tests/examples/DerivingVia.hs" 276 1 276 1 , SrcSpan "tests/examples/DerivingVia.hs" 280 1 280 1 , SrcSpan "tests/examples/DerivingVia.hs" 284 1 284 1 , SrcSpan "tests/examples/DerivingVia.hs" 288 1 288 1 , SrcSpan "tests/examples/DerivingVia.hs" 293 1 293 1 , SrcSpan "tests/examples/DerivingVia.hs" 303 1 303 1 , SrcSpan "tests/examples/DerivingVia.hs" 309 1 309 1 , SrcSpan "tests/examples/DerivingVia.hs" 312 1 312 1 , SrcSpan "tests/examples/DerivingVia.hs" 321 1 321 1 , SrcSpan "tests/examples/DerivingVia.hs" 327 1 327 1 , SrcSpan "tests/examples/DerivingVia.hs" 330 1 330 1 , SrcSpan "tests/examples/DerivingVia.hs" 332 1 332 1 , SrcSpan "tests/examples/DerivingVia.hs" 336 1 336 1 , SrcSpan "tests/examples/DerivingVia.hs" 337 1 337 1 , SrcSpan "tests/examples/DerivingVia.hs" 338 1 338 1 , SrcSpan "tests/examples/DerivingVia.hs" 345 1 345 1 , SrcSpan "tests/examples/DerivingVia.hs" 350 1 350 1 , SrcSpan "tests/examples/DerivingVia.hs" 353 1 353 1 , SrcSpan "tests/examples/DerivingVia.hs" 358 1 358 1 , SrcSpan "tests/examples/DerivingVia.hs" 359 1 359 1 , SrcSpan "tests/examples/DerivingVia.hs" 361 1 361 1 , SrcSpan "tests/examples/DerivingVia.hs" 363 1 363 1 , SrcSpan "tests/examples/DerivingVia.hs" 365 1 365 1 , SrcSpan "tests/examples/DerivingVia.hs" 367 1 367 1 , SrcSpan "tests/examples/DerivingVia.hs" 369 1 369 1 , SrcSpan "tests/examples/DerivingVia.hs" 371 1 371 1 , SrcSpan "tests/examples/DerivingVia.hs" 373 1 373 1 , SrcSpan "tests/examples/DerivingVia.hs" 380 1 380 1 , SrcSpan "tests/examples/DerivingVia.hs" 388 1 388 1 , SrcSpan "tests/examples/DerivingVia.hs" 395 1 395 1 , SrcSpan "tests/examples/DerivingVia.hs" 401 1 401 1 , SrcSpan "tests/examples/DerivingVia.hs" 405 1 405 1 , SrcSpan "tests/examples/DerivingVia.hs" 406 1 406 1 , SrcSpan "tests/examples/DerivingVia.hs" 407 1 407 1 , SrcSpan "tests/examples/DerivingVia.hs" 409 1 409 1 , SrcSpan "tests/examples/DerivingVia.hs" 413 1 413 1 , SrcSpan "tests/examples/DerivingVia.hs" 425 1 425 1 , SrcSpan "tests/examples/DerivingVia.hs" 427 1 427 1 , SrcSpan "tests/examples/DerivingVia.hs" 435 1 435 1 , SrcSpan "tests/examples/DerivingVia.hs" 437 1 437 1 , SrcSpan "tests/examples/DerivingVia.hs" 439 1 439 1 , SrcSpan "tests/examples/DerivingVia.hs" 441 1 441 1 , SrcSpan "tests/examples/DerivingVia.hs" 443 1 443 1 , SrcSpan "tests/examples/DerivingVia.hs" 445 1 445 1 , SrcSpan "tests/examples/DerivingVia.hs" 451 1 451 1 , SrcSpan "tests/examples/DerivingVia.hs" 454 1 454 1 , SrcSpan "tests/examples/DerivingVia.hs" 457 1 457 1 , SrcSpan "tests/examples/DerivingVia.hs" 460 1 460 1 , SrcSpan "tests/examples/DerivingVia.hs" 460 1 460 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 20 1 20 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 20 1 20 7 , SrcSpan "tests/examples/DerivingVia.hs" 20 20 20 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 20 8 20 19 , srcInfoPoints = [] } "DerivingVia") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 1 1 1 13 , SrcSpan "tests/examples/DerivingVia.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 1 14 1 32 , srcInfoPoints = [] } "DerivingStrategies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 2 1 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 2 1 2 13 , SrcSpan "tests/examples/DerivingVia.hs" 2 26 2 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 2 14 2 25 , srcInfoPoints = [] } "DerivingVia" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 3 1 3 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 3 1 3 13 , SrcSpan "tests/examples/DerivingVia.hs" 3 41 3 44 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 3 14 3 40 , srcInfoPoints = [] } "GeneralizedNewtypeDeriving" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 4 1 4 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 4 1 4 13 , SrcSpan "tests/examples/DerivingVia.hs" 4 29 4 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 4 14 4 28 , srcInfoPoints = [] } "KindSignatures" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 5 1 5 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 5 1 5 13 , SrcSpan "tests/examples/DerivingVia.hs" 5 25 5 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 5 14 5 24 , srcInfoPoints = [] } "RankNTypes" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 6 1 6 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 6 1 6 13 , SrcSpan "tests/examples/DerivingVia.hs" 6 33 6 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 6 14 6 32 , srcInfoPoints = [] } "StandaloneDeriving" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 7 1 7 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 7 1 7 13 , SrcSpan "tests/examples/DerivingVia.hs" 7 27 7 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 7 14 7 26 , srcInfoPoints = [] } "InstanceSigs" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 8 1 8 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 8 1 8 13 , SrcSpan "tests/examples/DerivingVia.hs" 8 25 8 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 8 14 8 24 , srcInfoPoints = [] } "TypeInType" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 9 1 9 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 9 1 9 13 , SrcSpan "tests/examples/DerivingVia.hs" 9 20 9 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 9 14 9 19 , srcInfoPoints = [] } "GADTs" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 10 1 10 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 10 1 10 13 , SrcSpan "tests/examples/DerivingVia.hs" 10 31 10 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 10 14 10 30 , srcInfoPoints = [] } "TypeApplications" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 11 1 11 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 11 1 11 13 , SrcSpan "tests/examples/DerivingVia.hs" 11 30 11 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 11 14 11 29 , srcInfoPoints = [] } "ConstraintKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 12 1 12 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 12 1 12 13 , SrcSpan "tests/examples/DerivingVia.hs" 12 36 12 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 12 14 12 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 13 1 13 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 13 1 13 13 , SrcSpan "tests/examples/DerivingVia.hs" 13 25 13 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 13 14 13 24 , srcInfoPoints = [] } "MultiWayIf" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 14 1 14 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 14 1 14 13 , SrcSpan "tests/examples/DerivingVia.hs" 14 28 14 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 14 14 14 27 , srcInfoPoints = [] } "TypeOperators" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 15 1 15 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 15 1 15 13 , SrcSpan "tests/examples/DerivingVia.hs" 15 34 15 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 15 14 15 33 , srcInfoPoints = [] } "ScopedTypeVariables" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 16 1 16 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 16 1 16 13 , SrcSpan "tests/examples/DerivingVia.hs" 16 32 16 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 16 14 16 31 , srcInfoPoints = [] } "FlexibleInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 17 1 17 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 17 1 17 13 , SrcSpan "tests/examples/DerivingVia.hs" 17 27 17 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 17 14 17 26 , srcInfoPoints = [] } "TypeFamilies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 18 1 18 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 18 1 18 13 , SrcSpan "tests/examples/DerivingVia.hs" 18 31 18 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 18 14 18 30 , srcInfoPoints = [] } "FlexibleContexts" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 19 1 19 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 19 1 19 13 , SrcSpan "tests/examples/DerivingVia.hs" 19 35 19 38 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 19 14 19 34 , srcInfoPoints = [] } "UndecidableInstances" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 22 1 22 17 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 22 1 22 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 22 8 22 17 , srcInfoPoints = [] } "Data.Void" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 23 1 23 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 23 1 23 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 23 8 23 20 , srcInfoPoints = [] } "Data.Complex" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 24 1 24 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 24 1 24 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 24 8 24 26 , srcInfoPoints = [] } "Data.Functor.Const" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 25 1 25 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 25 1 25 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 25 8 25 29 , srcInfoPoints = [] } "Data.Functor.Identity" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 26 1 26 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 26 1 26 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 26 8 26 18 , srcInfoPoints = [] } "Data.Ratio" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 27 1 27 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 27 1 27 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 27 8 27 28 , srcInfoPoints = [] } "Control.Monad.Reader" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 28 1 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 28 1 28 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 28 8 28 27 , srcInfoPoints = [] } "Control.Monad.State" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 29 1 29 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 29 1 29 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 29 8 29 28 , srcInfoPoints = [] } "Control.Monad.Writer" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 30 1 30 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 30 1 30 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 30 8 30 27 , srcInfoPoints = [] } "Control.Applicative" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 30 28 30 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 30 28 30 34 , SrcSpan "tests/examples/DerivingVia.hs" 30 35 30 36 , SrcSpan "tests/examples/DerivingVia.hs" 30 52 30 53 ] } True [ IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 30 36 30 52 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 30 48 30 49 , SrcSpan "tests/examples/DerivingVia.hs" 30 49 30 51 , SrcSpan "tests/examples/DerivingVia.hs" 30 51 30 52 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 30 36 30 48 , srcInfoPoints = [] } "WrappedMonad") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 32 1 32 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 32 1 32 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 32 8 32 22 , srcInfoPoints = [] } "Data.Bifunctor" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 33 1 33 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 33 1 33 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 33 8 33 19 , srcInfoPoints = [] } "Data.Monoid" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 34 1 34 17 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 34 1 34 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 34 8 34 17 , srcInfoPoints = [] } "Data.Kind" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 1 36 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 36 1 36 5 , SrcSpan "tests/examples/DerivingVia.hs" 36 13 36 14 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 6 36 12 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 6 36 12 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 6 36 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 6 36 7 , srcInfoPoints = [] } "f")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 8 36 10 , srcInfoPoints = [] } "~>")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 11 36 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 11 36 12 , srcInfoPoints = [] } "g"))) (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 15 36 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 36 15 36 21 , SrcSpan "tests/examples/DerivingVia.hs" 36 24 36 25 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 22 36 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 22 36 24 , srcInfoPoints = [] } "xx") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 26 36 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 36 31 36 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 26 36 30 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 26 36 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 26 36 27 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 28 36 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 28 36 30 , srcInfoPoints = [] } "xx"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 34 36 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 34 36 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 34 36 35 , srcInfoPoints = [] } "g")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 36 36 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 36 36 36 38 , srcInfoPoints = [] } "xx"))))) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 1 43 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 42 12 42 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 1 42 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 6 42 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 6 42 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 6 42 9 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 10 42 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 10 42 11 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 14 42 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 14 42 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 14 42 19 , srcInfoPoints = [] } "MkFoo") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 20 42 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 20 42 21 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 22 42 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 42 22 42 23 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 43 3 43 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 43 3 43 11 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 8 44 11 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 12 44 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 44 12 44 13 , SrcSpan "tests/examples/DerivingVia.hs" 44 29 44 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 13 44 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 13 44 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 13 44 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 13 44 21 , srcInfoPoints = [] } "Identity"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 22 44 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 44 22 44 23 , SrcSpan "tests/examples/DerivingVia.hs" 44 28 44 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 23 44 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 23 44 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 23 44 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 23 44 26 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 27 44 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 44 27 44 28 , srcInfoPoints = [] } "a")))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 43 12 43 16 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 43 12 43 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 43 12 43 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 43 12 43 16 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 1 50 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 50 20 50 21 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 1 50 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 9 50 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 9 50 17 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 9 50 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 9 50 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 9 50 13 , srcInfoPoints = [] } "Flip")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 14 50 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 14 50 15 , srcInfoPoints = [] } "p"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 16 50 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 16 50 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 18 50 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 18 50 19 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 22 50 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 50 27 50 28 , SrcSpan "tests/examples/DerivingVia.hs" 50 46 50 47 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 22 50 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 50 27 50 28 , SrcSpan "tests/examples/DerivingVia.hs" 50 46 50 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 22 50 26 , srcInfoPoints = [] } "Flip") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 29 50 45 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 50 37 50 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 29 50 36 , srcInfoPoints = [] } "runFlip" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 40 50 45 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 40 50 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 40 50 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 40 50 41 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 42 50 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 42 50 43 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 44 50 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 50 44 50 45 , srcInfoPoints = [] } "a"))) ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 1 55 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 1 52 9 , SrcSpan "tests/examples/DerivingVia.hs" 52 44 52 49 , SrcSpan "tests/examples/DerivingVia.hs" 53 3 53 3 , SrcSpan "tests/examples/DerivingVia.hs" 55 1 55 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 43 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 22 52 24 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 22 52 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 22 52 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 22 52 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 10 52 19 , srcInfoPoints = [] } "Bifunctor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 20 52 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 20 52 21 , srcInfoPoints = [] } "p")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 25 52 43 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 25 52 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 25 52 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 25 52 34 , srcInfoPoints = [] } "Bifunctor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 35 52 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 52 35 52 36 , SrcSpan "tests/examples/DerivingVia.hs" 52 42 52 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 36 52 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 36 52 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 36 52 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 36 52 40 , srcInfoPoints = [] } "Flip"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 41 52 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 52 41 52 42 , srcInfoPoints = [] } "p")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 3 53 41 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 3 53 41 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 3 53 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 3 53 8 , srcInfoPoints = [] } "bimap") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 9 53 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 9 53 10 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 11 53 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 11 53 12 , srcInfoPoints = [] } "g") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 13 53 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 53 13 53 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 15 53 41 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 15 53 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 15 53 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 15 53 19 , srcInfoPoints = [] } "Flip"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 20 53 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 20 53 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 20 53 21 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 22 53 27 , srcInfoPoints = [] } "bimap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 28 53 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 28 53 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 28 53 29 , srcInfoPoints = [] } "g")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 30 53 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 30 53 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 30 53 31 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 32 53 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 32 53 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 32 53 33 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 34 53 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 34 53 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 53 34 53 41 , srcInfoPoints = [] } "runFlip")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 1 58 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 1 55 9 , SrcSpan "tests/examples/DerivingVia.hs" 55 44 55 49 , SrcSpan "tests/examples/DerivingVia.hs" 56 3 56 3 , SrcSpan "tests/examples/DerivingVia.hs" 58 1 58 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 43 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 22 55 24 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 22 55 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 22 55 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 22 55 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 10 55 19 , srcInfoPoints = [] } "Bifunctor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 20 55 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 20 55 21 , srcInfoPoints = [] } "p")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 25 55 43 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 25 55 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 25 55 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 25 55 32 , srcInfoPoints = [] } "Functor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 33 55 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 55 33 55 34 , SrcSpan "tests/examples/DerivingVia.hs" 55 42 55 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 34 55 42 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 34 55 40 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 34 55 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 34 55 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 34 55 38 , srcInfoPoints = [] } "Flip"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 39 55 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 39 55 40 , srcInfoPoints = [] } "p"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 41 55 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 55 41 55 42 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 3 56 36 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 3 56 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 3 56 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 3 56 7 , srcInfoPoints = [] } "fmap") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 8 56 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 8 56 9 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 10 56 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 56 10 56 11 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 12 56 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 12 56 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 12 56 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 12 56 16 , srcInfoPoints = [] } "Flip"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 17 56 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 17 56 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 17 56 18 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 19 56 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 19 56 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 19 56 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 19 56 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 19 56 24 , srcInfoPoints = [] } "first"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 25 56 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 25 56 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 25 56 26 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 27 56 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 27 56 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 27 56 28 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 29 56 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 29 56 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 56 29 56 36 , srcInfoPoints = [] } "runFlip")))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 1 59 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 58 15 58 16 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 1 58 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 9 58 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 9 58 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 9 58 12 , srcInfoPoints = [] } "Bar")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 13 58 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 13 58 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 17 58 37 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 17 58 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 17 58 22 , srcInfoPoints = [] } "MkBar") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 23 58 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 58 23 58 24 , SrcSpan "tests/examples/DerivingVia.hs" 58 36 58 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 24 58 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 24 58 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 24 58 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 24 58 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 24 58 30 , srcInfoPoints = [] } "Either"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 31 58 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 31 58 32 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 33 58 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 33 58 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 58 33 58 36 , srcInfoPoints = [] } "Int")))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 59 3 59 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 59 3 59 11 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 8 60 11 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 12 60 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 60 12 60 13 , SrcSpan "tests/examples/DerivingVia.hs" 60 28 60 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 13 60 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 13 60 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 13 60 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 13 60 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 13 60 17 , srcInfoPoints = [] } "Flip"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 18 60 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 18 60 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 18 60 24 , srcInfoPoints = [] } "Either")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 25 60 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 25 60 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 60 25 60 28 , srcInfoPoints = [] } "Int"))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 59 12 59 19 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 59 12 59 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 59 12 59 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 59 12 59 19 , srcInfoPoints = [] } "Functor"))) ] ] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 1 66 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 1 66 5 , SrcSpan "tests/examples/DerivingVia.hs" 66 13 66 14 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 6 66 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 6 66 12 , srcInfoPoints = [] } "MTrans")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 15 66 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 30 66 32 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 15 66 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 15 66 16 , SrcSpan "tests/examples/DerivingVia.hs" 66 28 66 29 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 16 66 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 21 66 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 16 66 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 16 66 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 16 66 20 , srcInfoPoints = [] } "Type"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 24 66 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 24 66 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 24 66 28 , srcInfoPoints = [] } "Type"))))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 33 66 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 33 66 34 , SrcSpan "tests/examples/DerivingVia.hs" 66 46 66 47 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 34 66 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 66 39 66 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 34 66 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 34 66 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 34 66 38 , srcInfoPoints = [] } "Type"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 42 66 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 42 66 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 66 42 66 46 , srcInfoPoints = [] } "Type")))))) , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 1 72 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 69 13 69 18 , SrcSpan "tests/examples/DerivingVia.hs" 70 3 70 3 , SrcSpan "tests/examples/DerivingVia.hs" 72 1 72 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 1 69 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 6 69 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 6 69 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 6 69 10 , srcInfoPoints = [] } "Dict")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 11 69 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 69 11 69 12 , srcInfoPoints = [] } "c"))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 3 70 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 70 8 70 10 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 3 70 7 , srcInfoPoints = [] } "Dict") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 11 70 22 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 11 70 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 70 13 70 15 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 11 70 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 70 13 70 15 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 11 70 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 70 13 70 15 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 11 70 12 , srcInfoPoints = [] } "c"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 16 70 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 16 70 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 16 70 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 16 70 20 , srcInfoPoints = [] } "Dict"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 21 70 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 70 21 70 22 , srcInfoPoints = [] } "c")))) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 1 72 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 72 16 72 17 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 1 72 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 9 72 15 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 9 72 15 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 9 72 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 9 72 10 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 11 72 13 , srcInfoPoints = [] } ":-")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 14 72 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 14 72 15 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 18 72 35 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 18 72 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 18 72 21 , srcInfoPoints = [] } "Sub") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 22 72 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 72 22 72 23 , SrcSpan "tests/examples/DerivingVia.hs" 72 34 72 35 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 23 72 34 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 23 72 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 72 25 72 27 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 23 72 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 72 25 72 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 23 72 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 72 25 72 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 23 72 24 , srcInfoPoints = [] } "a"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 28 72 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 28 72 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 28 72 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 28 72 32 , srcInfoPoints = [] } "Dict"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 33 72 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 72 33 72 34 , srcInfoPoints = [] } "b")))) ]) ] [] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 74 1 74 12 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 74 8 74 9 ] } (AssocLeft SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 74 1 74 7 , srcInfoPoints = [] }) (Just 1) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 74 10 74 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 74 10 74 12 , srcInfoPoints = [] } "\\\\") ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 1 75 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 6 75 8 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 1 75 5 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 1 75 2 , SrcSpan "tests/examples/DerivingVia.hs" 75 2 75 4 , SrcSpan "tests/examples/DerivingVia.hs" 75 4 75 5 ] } "\\\\" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 9 75 39 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 9 75 13 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 11 75 13 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 9 75 13 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 11 75 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 9 75 13 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 11 75 13 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 9 75 10 , srcInfoPoints = [] } "a"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 14 75 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 23 75 25 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 14 75 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 14 75 15 , SrcSpan "tests/examples/DerivingVia.hs" 75 21 75 22 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 15 75 21 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 15 75 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 17 75 19 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 15 75 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 17 75 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 15 75 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 17 75 19 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 15 75 16 , srcInfoPoints = [] } "b"))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 20 75 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 20 75 21 , srcInfoPoints = [] } "r")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 26 75 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 35 75 37 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 26 75 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 75 26 75 27 , SrcSpan "tests/examples/DerivingVia.hs" 75 33 75 34 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 27 75 33 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 27 75 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 27 75 28 , srcInfoPoints = [] } "a")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 29 75 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 29 75 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 29 75 31 , srcInfoPoints = [] } ":-"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 32 75 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 32 75 33 , srcInfoPoints = [] } "b")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 38 75 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 75 38 75 39 , srcInfoPoints = [] } "r"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 1 76 18 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 1 76 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 1 76 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 1 76 2 , srcInfoPoints = [] } "r")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 3 76 5 , srcInfoPoints = [] } "\\\\") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 6 76 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 6 76 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 6 76 9 , srcInfoPoints = [] } "Sub")) [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 10 76 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 10 76 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 10 76 14 , srcInfoPoints = [] } "Dict")) [] ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 15 76 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 76 15 76 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 17 76 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 17 76 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 76 17 76 18 , srcInfoPoints = [] } "r")))) Nothing ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 1 85 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 84 1 84 6 , SrcSpan "tests/examples/DerivingVia.hs" 84 38 84 43 , SrcSpan "tests/examples/DerivingVia.hs" 85 3 85 3 , SrcSpan "tests/examples/DerivingVia.hs" 87 1 87 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 7 84 37 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 7 84 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 7 84 19 , srcInfoPoints = [] } "LiftingMonad")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 20 84 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 84 20 84 21 , SrcSpan "tests/examples/DerivingVia.hs" 84 27 84 29 , SrcSpan "tests/examples/DerivingVia.hs" 84 36 84 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 21 84 26 , srcInfoPoints = [] } "trans") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 30 84 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 30 84 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 84 30 84 36 , srcInfoPoints = [] } "MTrans"))))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 3 85 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 85 9 85 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 3 85 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 85 9 85 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 3 85 8 , srcInfoPoints = [] } "proof" ] (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 12 85 38 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 12 85 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 12 85 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 12 85 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 12 85 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 18 85 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 18 85 19 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 20 85 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 20 85 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 20 85 22 , srcInfoPoints = [] } ":-"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 23 85 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 23 85 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 23 85 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 23 85 28 , srcInfoPoints = [] } "Monad"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 29 85 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 85 29 85 30 , SrcSpan "tests/examples/DerivingVia.hs" 85 37 85 38 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 30 85 37 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 30 85 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 30 85 35 , srcInfoPoints = [] } "trans")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 36 85 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 85 36 85 37 , srcInfoPoints = [] } "m"))))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 1 91 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 87 1 87 9 , SrcSpan "tests/examples/DerivingVia.hs" 87 44 87 49 , SrcSpan "tests/examples/DerivingVia.hs" 88 3 88 3 , SrcSpan "tests/examples/DerivingVia.hs" 89 3 89 3 , SrcSpan "tests/examples/DerivingVia.hs" 91 1 91 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 10 87 43 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 10 87 43 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 10 87 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 10 87 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 10 87 22 , srcInfoPoints = [] } "LiftingMonad"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 23 87 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 87 23 87 24 , SrcSpan "tests/examples/DerivingVia.hs" 87 33 87 35 , SrcSpan "tests/examples/DerivingVia.hs" 87 42 87 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 24 87 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 24 87 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 24 87 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 24 87 30 , srcInfoPoints = [] } "StateT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 31 87 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 31 87 32 , srcInfoPoints = [] } "s"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 36 87 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 36 87 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 87 36 87 42 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 3 88 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 88 9 88 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 3 88 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 88 9 88 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 3 88 8 , srcInfoPoints = [] } "proof" ] (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 12 88 41 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 12 88 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 12 88 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 12 88 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 12 88 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 18 88 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 18 88 19 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 20 88 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 20 88 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 20 88 22 , srcInfoPoints = [] } ":-"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 23 88 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 23 88 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 23 88 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 23 88 28 , srcInfoPoints = [] } "Monad"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 29 88 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 88 29 88 30 , SrcSpan "tests/examples/DerivingVia.hs" 88 40 88 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 30 88 40 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 30 88 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 30 88 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 30 88 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 30 88 36 , srcInfoPoints = [] } "StateT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 37 88 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 37 88 38 , srcInfoPoints = [] } "s"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 39 88 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 88 39 88 40 , srcInfoPoints = [] } "m"))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 3 89 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 3 89 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 3 89 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 3 89 8 , srcInfoPoints = [] } "proof")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 9 89 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 89 9 89 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 11 89 19 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 11 89 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 11 89 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 11 89 14 , srcInfoPoints = [] } "Sub"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 15 89 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 15 89 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 89 15 89 19 , srcInfoPoints = [] } "Dict"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 1 95 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 1 91 9 , SrcSpan "tests/examples/DerivingVia.hs" 91 57 91 62 , SrcSpan "tests/examples/DerivingVia.hs" 92 3 92 3 , SrcSpan "tests/examples/DerivingVia.hs" 93 3 93 3 , SrcSpan "tests/examples/DerivingVia.hs" 95 1 95 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 56 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 19 91 21 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 19 91 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 19 91 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 19 91 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 10 91 16 , srcInfoPoints = [] } "Monoid"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 17 91 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 17 91 18 , srcInfoPoints = [] } "w")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 22 91 56 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 22 91 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 22 91 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 22 91 34 , srcInfoPoints = [] } "LiftingMonad"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 35 91 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 91 35 91 36 , SrcSpan "tests/examples/DerivingVia.hs" 91 46 91 48 , SrcSpan "tests/examples/DerivingVia.hs" 91 55 91 56 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 36 91 45 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 36 91 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 36 91 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 36 91 43 , srcInfoPoints = [] } "WriterT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 44 91 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 44 91 45 , srcInfoPoints = [] } "w"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 49 91 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 49 91 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 91 49 91 55 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 3 92 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 92 9 92 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 3 92 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 92 9 92 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 3 92 8 , srcInfoPoints = [] } "proof" ] (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 12 92 42 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 12 92 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 12 92 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 12 92 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 12 92 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 18 92 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 18 92 19 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 20 92 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 20 92 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 20 92 22 , srcInfoPoints = [] } ":-"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 23 92 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 23 92 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 23 92 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 23 92 28 , srcInfoPoints = [] } "Monad"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 29 92 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 92 29 92 30 , SrcSpan "tests/examples/DerivingVia.hs" 92 41 92 42 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 30 92 41 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 30 92 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 30 92 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 30 92 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 30 92 37 , srcInfoPoints = [] } "WriterT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 38 92 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 38 92 39 , srcInfoPoints = [] } "w"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 40 92 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 92 40 92 41 , srcInfoPoints = [] } "m"))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 3 93 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 3 93 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 3 93 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 3 93 8 , srcInfoPoints = [] } "proof")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 9 93 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 93 9 93 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 11 93 19 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 11 93 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 11 93 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 11 93 14 , srcInfoPoints = [] } "Sub"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 15 93 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 15 93 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 93 15 93 19 , srcInfoPoints = [] } "Dict"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 1 99 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 95 1 95 9 , SrcSpan "tests/examples/DerivingVia.hs" 95 102 95 107 , SrcSpan "tests/examples/DerivingVia.hs" 96 3 96 3 , SrcSpan "tests/examples/DerivingVia.hs" 97 3 97 3 , SrcSpan "tests/examples/DerivingVia.hs" 99 1 99 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 10 95 101 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 10 95 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 95 10 95 11 , SrcSpan "tests/examples/DerivingVia.hs" 95 29 95 30 , SrcSpan "tests/examples/DerivingVia.hs" 95 50 95 51 , SrcSpan "tests/examples/DerivingVia.hs" 95 52 95 54 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 11 95 29 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 11 95 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 11 95 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 11 95 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 11 95 23 , srcInfoPoints = [] } "LiftingMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 24 95 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 24 95 29 , srcInfoPoints = [] } "trans"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 31 95 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 31 95 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 31 95 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 31 95 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 31 95 43 , srcInfoPoints = [] } "LiftingMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 44 95 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 44 95 50 , srcInfoPoints = [] } "trans'"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 55 95 101 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 55 95 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 55 95 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 55 95 67 , srcInfoPoints = [] } "LiftingMonad"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 68 95 101 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 95 68 95 69 , SrcSpan "tests/examples/DerivingVia.hs" 95 91 95 93 , SrcSpan "tests/examples/DerivingVia.hs" 95 100 95 101 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 69 95 90 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 69 95 83 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 69 95 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 69 95 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 69 95 77 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 78 95 83 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 78 95 83 , srcInfoPoints = [] } "trans"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 84 95 90 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 84 95 90 , srcInfoPoints = [] } "trans'"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 94 95 100 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 94 95 100 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 95 94 95 100 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 3 96 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 96 9 96 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 3 96 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 96 9 96 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 3 96 8 , srcInfoPoints = [] } "proof" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 12 96 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 96 12 96 18 , SrcSpan "tests/examples/DerivingVia.hs" 96 20 96 21 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 19 96 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 19 96 20 , srcInfoPoints = [] } "m") ]) Nothing (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 22 96 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 22 96 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 22 96 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 22 96 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 22 96 27 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 28 96 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 28 96 29 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 30 96 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 30 96 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 30 96 32 , srcInfoPoints = [] } ":-"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 33 96 64 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 33 96 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 33 96 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 33 96 38 , srcInfoPoints = [] } "Monad"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 39 96 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 96 39 96 40 , SrcSpan "tests/examples/DerivingVia.hs" 96 63 96 64 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 63 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 61 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 40 96 48 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 49 96 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 49 96 54 , srcInfoPoints = [] } "trans"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 55 96 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 55 96 61 , srcInfoPoints = [] } "trans'"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 62 96 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 96 62 96 63 , srcInfoPoints = [] } "m")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 3 97 69 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 3 97 69 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 3 97 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 3 97 8 , srcInfoPoints = [] } "proof")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 9 97 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 9 97 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 11 97 69 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 11 97 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 11 97 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 11 97 14 , srcInfoPoints = [] } "Sub"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 15 97 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 15 97 16 , SrcSpan "tests/examples/DerivingVia.hs" 97 68 97 69 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 16 97 68 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 16 97 48 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 16 97 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 16 97 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 16 97 20 , srcInfoPoints = [] } "Dict"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 21 97 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 21 97 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 21 97 23 , srcInfoPoints = [] } "\\\\"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 24 97 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 24 97 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 24 97 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 24 97 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 24 97 29 , srcInfoPoints = [] } "proof"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 30 97 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 30 97 31 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 31 97 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 31 97 36 , srcInfoPoints = [] } "trans")))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 37 97 48 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 37 97 38 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 38 97 48 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 38 97 39 , SrcSpan "tests/examples/DerivingVia.hs" 97 47 97 48 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 39 97 47 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 39 97 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 39 97 45 , srcInfoPoints = [] } "trans'")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 46 97 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 46 97 47 , srcInfoPoints = [] } "m"))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 49 97 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 49 97 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 49 97 51 , srcInfoPoints = [] } "\\\\"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 52 97 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 52 97 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 52 97 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 52 97 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 52 97 57 , srcInfoPoints = [] } "proof"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 58 97 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 58 97 59 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 59 97 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 59 97 65 , srcInfoPoints = [] } "trans'")))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 66 97 68 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 97 66 97 67 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 67 97 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 97 67 97 68 , srcInfoPoints = [] } "m")))))))) Nothing) ]) , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 1 109 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 99 15 99 17 , SrcSpan "tests/examples/DerivingVia.hs" 99 25 99 30 , SrcSpan "tests/examples/DerivingVia.hs" 100 3 100 3 , SrcSpan "tests/examples/DerivingVia.hs" 101 3 101 3 , SrcSpan "tests/examples/DerivingVia.hs" 101 3 101 3 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 1 99 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 9 99 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 9 99 14 , srcInfoPoints = [] } "Stack")) (Just (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 18 99 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 18 99 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 99 18 99 24 , srcInfoPoints = [] } "MTrans")))) [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 3 100 71 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 100 9 100 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 3 100 8 , srcInfoPoints = [] } "Stack") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 71 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 100 59 100 61 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 58 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 56 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 12 100 19 , srcInfoPoints = [] } "ReaderT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 20 100 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 20 100 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 20 100 23 , srcInfoPoints = [] } "Int")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 24 100 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 100 24 100 25 , SrcSpan "tests/examples/DerivingVia.hs" 100 55 100 56 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 25 100 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 25 100 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 25 100 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 25 100 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 25 100 31 , srcInfoPoints = [] } "StateT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 32 100 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 32 100 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 32 100 36 , srcInfoPoints = [] } "Bool")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 37 100 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 100 37 100 38 , SrcSpan "tests/examples/DerivingVia.hs" 100 54 100 55 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 38 100 54 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 38 100 52 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 38 100 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 38 100 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 38 100 45 , srcInfoPoints = [] } "WriterT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 46 100 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 46 100 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 46 100 52 , srcInfoPoints = [] } "String")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 53 100 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 53 100 54 , srcInfoPoints = [] } "m"))))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 57 100 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 57 100 58 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 62 100 71 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 62 100 69 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 62 100 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 62 100 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 62 100 67 , srcInfoPoints = [] } "Stack"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 68 100 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 68 100 69 , srcInfoPoints = [] } "m"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 70 100 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 100 70 100 71 , srcInfoPoints = [] } "a")))) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 101 3 108 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 101 3 101 11 , SrcSpan "tests/examples/DerivingVia.hs" 102 5 102 6 , SrcSpan "tests/examples/DerivingVia.hs" 103 5 103 6 , SrcSpan "tests/examples/DerivingVia.hs" 104 5 104 6 , SrcSpan "tests/examples/DerivingVia.hs" 105 5 105 6 , SrcSpan "tests/examples/DerivingVia.hs" 106 5 106 6 , SrcSpan "tests/examples/DerivingVia.hs" 107 5 107 6 , SrcSpan "tests/examples/DerivingVia.hs" 108 5 108 6 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 101 12 101 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 102 7 102 14 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 102 7 102 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 102 7 102 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 102 7 102 14 , srcInfoPoints = [] } "Functor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 103 7 103 18 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 103 7 103 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 103 7 103 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 103 7 103 18 , srcInfoPoints = [] } "Applicative"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 104 7 104 12 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 104 7 104 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 104 7 104 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 104 7 104 12 , srcInfoPoints = [] } "Monad"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 7 105 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 7 105 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 7 105 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 7 105 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 7 105 18 , srcInfoPoints = [] } "MonadReader"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 19 105 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 19 105 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 105 19 105 22 , srcInfoPoints = [] } "Int")))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 7 106 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 7 106 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 7 106 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 7 106 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 7 106 17 , srcInfoPoints = [] } "MonadState"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 18 106 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 18 106 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 106 18 106 22 , srcInfoPoints = [] } "Bool")))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 7 107 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 7 107 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 7 107 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 7 107 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 7 107 18 , srcInfoPoints = [] } "MonadWriter"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 19 107 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 19 107 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 107 19 107 25 , srcInfoPoints = [] } "String")))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 3 109 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 109 3 109 11 , SrcSpan "tests/examples/DerivingVia.hs" 109 12 109 13 , SrcSpan "tests/examples/DerivingVia.hs" 109 23 109 24 , SrcSpan "tests/examples/DerivingVia.hs" 109 33 109 34 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 8 110 11 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 12 110 74 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 110 12 110 13 , SrcSpan "tests/examples/DerivingVia.hs" 110 73 110 74 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 13 110 73 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 13 110 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 13 110 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 13 110 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 13 110 20 , srcInfoPoints = [] } "ReaderT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 21 110 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 21 110 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 21 110 24 , srcInfoPoints = [] } "Int")))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 25 110 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 110 25 110 26 , SrcSpan "tests/examples/DerivingVia.hs" 110 26 110 34 , SrcSpan "tests/examples/DerivingVia.hs" 110 34 110 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 25 110 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 110 25 110 26 , SrcSpan "tests/examples/DerivingVia.hs" 110 26 110 34 , SrcSpan "tests/examples/DerivingVia.hs" 110 34 110 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 26 110 34 , srcInfoPoints = [] } "ComposeT"))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 36 110 73 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 36 110 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 36 110 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 36 110 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 36 110 42 , srcInfoPoints = [] } "StateT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 43 110 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 43 110 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 43 110 47 , srcInfoPoints = [] } "Bool")))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 48 110 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 110 48 110 49 , SrcSpan "tests/examples/DerivingVia.hs" 110 49 110 57 , SrcSpan "tests/examples/DerivingVia.hs" 110 57 110 58 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 48 110 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 110 48 110 49 , SrcSpan "tests/examples/DerivingVia.hs" 110 49 110 57 , SrcSpan "tests/examples/DerivingVia.hs" 110 57 110 58 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 49 110 57 , srcInfoPoints = [] } "ComposeT"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 59 110 73 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 59 110 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 59 110 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 59 110 66 , srcInfoPoints = [] } "WriterT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 67 110 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 67 110 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 110 67 110 73 , srcInfoPoints = [] } "String"))))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 13 109 23 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 13 109 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 13 109 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 13 109 23 , srcInfoPoints = [] } "MonadTrans"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 25 109 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 25 109 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 25 109 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 109 25 109 33 , srcInfoPoints = [] } "MFunctor"))) ] ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 1 113 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 112 1 112 6 , SrcSpan "tests/examples/DerivingVia.hs" 112 34 112 39 , SrcSpan "tests/examples/DerivingVia.hs" 113 3 113 3 , SrcSpan "tests/examples/DerivingVia.hs" 115 1 115 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 7 112 33 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 7 112 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 7 112 15 , srcInfoPoints = [] } "MFunctor")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 16 112 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 112 16 112 17 , SrcSpan "tests/examples/DerivingVia.hs" 112 23 112 25 , SrcSpan "tests/examples/DerivingVia.hs" 112 32 112 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 17 112 22 , srcInfoPoints = [] } "trans") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 26 112 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 26 112 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 112 26 112 32 , srcInfoPoints = [] } "MTrans"))))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 3 113 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 9 113 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 3 113 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 9 113 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 3 113 8 , srcInfoPoints = [] } "hoist" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 57 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 20 113 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 20 113 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 20 113 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 20 113 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 12 113 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 18 113 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 18 113 19 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 23 113 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 33 113 35 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 23 113 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 23 113 24 , SrcSpan "tests/examples/DerivingVia.hs" 113 31 113 32 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 24 113 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 24 113 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 24 113 25 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 26 113 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 26 113 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 26 113 28 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 29 113 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 29 113 31 , srcInfoPoints = [] } "m'")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 36 113 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 113 36 113 37 , SrcSpan "tests/examples/DerivingVia.hs" 113 56 113 57 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 37 113 56 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 37 113 44 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 37 113 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 37 113 42 , srcInfoPoints = [] } "trans")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 43 113 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 43 113 44 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 45 113 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 45 113 47 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 45 113 47 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 48 113 56 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 48 113 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 48 113 53 , srcInfoPoints = [] } "trans")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 54 113 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 113 54 113 56 , srcInfoPoints = [] } "m'")))))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 1 119 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 115 1 115 9 , SrcSpan "tests/examples/DerivingVia.hs" 115 41 115 46 , SrcSpan "tests/examples/DerivingVia.hs" 116 3 116 3 , SrcSpan "tests/examples/DerivingVia.hs" 117 3 117 3 , SrcSpan "tests/examples/DerivingVia.hs" 119 1 119 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 10 115 40 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 10 115 40 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 10 115 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 10 115 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 10 115 18 , srcInfoPoints = [] } "MFunctor"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 19 115 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 115 19 115 20 , SrcSpan "tests/examples/DerivingVia.hs" 115 30 115 32 , SrcSpan "tests/examples/DerivingVia.hs" 115 39 115 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 20 115 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 20 115 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 20 115 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 20 115 27 , srcInfoPoints = [] } "ReaderT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 28 115 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 28 115 29 , srcInfoPoints = [] } "r"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 33 115 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 33 115 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 115 33 115 39 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 3 116 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 9 116 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 3 116 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 9 116 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 3 116 8 , srcInfoPoints = [] } "hoist" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 65 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 20 116 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 20 116 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 20 116 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 20 116 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 12 116 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 18 116 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 18 116 19 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 23 116 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 33 116 35 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 23 116 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 23 116 24 , SrcSpan "tests/examples/DerivingVia.hs" 116 31 116 32 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 24 116 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 24 116 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 24 116 25 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 26 116 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 26 116 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 26 116 28 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 29 116 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 29 116 31 , srcInfoPoints = [] } "m'")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 36 116 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 116 36 116 37 , SrcSpan "tests/examples/DerivingVia.hs" 116 64 116 65 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 48 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 37 116 44 , srcInfoPoints = [] } "ReaderT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 45 116 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 45 116 46 , srcInfoPoints = [] } "r"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 47 116 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 47 116 48 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 49 116 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 49 116 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 49 116 51 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 52 116 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 52 116 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 52 116 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 52 116 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 52 116 59 , srcInfoPoints = [] } "ReaderT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 60 116 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 60 116 61 , srcInfoPoints = [] } "r"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 62 116 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 116 62 116 64 , srcInfoPoints = [] } "m'")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 3 117 46 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 3 117 46 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 3 117 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 3 117 8 , srcInfoPoints = [] } "hoist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 9 117 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 9 117 12 , srcInfoPoints = [] } "nat") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 13 117 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 117 13 117 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 15 117 46 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 15 117 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 15 117 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 15 117 22 , srcInfoPoints = [] } "ReaderT"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 23 117 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 23 117 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 23 117 24 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 25 117 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 25 117 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 25 117 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 25 117 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 25 117 29 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 30 117 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 30 117 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 30 117 33 , srcInfoPoints = [] } "nat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 34 117 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 34 117 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 34 117 35 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 36 117 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 36 117 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 117 36 117 46 , srcInfoPoints = [] } "runReaderT")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 1 123 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 119 1 119 9 , SrcSpan "tests/examples/DerivingVia.hs" 119 40 119 45 , SrcSpan "tests/examples/DerivingVia.hs" 120 3 120 3 , SrcSpan "tests/examples/DerivingVia.hs" 121 3 121 3 , SrcSpan "tests/examples/DerivingVia.hs" 123 1 123 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 10 119 39 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 10 119 39 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 10 119 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 10 119 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 10 119 18 , srcInfoPoints = [] } "MFunctor"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 19 119 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 119 19 119 20 , SrcSpan "tests/examples/DerivingVia.hs" 119 29 119 31 , SrcSpan "tests/examples/DerivingVia.hs" 119 38 119 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 20 119 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 20 119 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 20 119 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 20 119 26 , srcInfoPoints = [] } "StateT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 27 119 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 27 119 28 , srcInfoPoints = [] } "s"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 32 119 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 32 119 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 119 32 119 38 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 3 120 63 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 9 120 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 3 120 63 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 9 120 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 3 120 8 , srcInfoPoints = [] } "hoist" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 63 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 20 120 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 20 120 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 20 120 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 20 120 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 12 120 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 18 120 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 18 120 19 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 23 120 63 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 33 120 35 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 23 120 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 23 120 24 , SrcSpan "tests/examples/DerivingVia.hs" 120 31 120 32 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 24 120 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 24 120 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 24 120 25 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 26 120 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 26 120 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 26 120 28 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 29 120 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 29 120 31 , srcInfoPoints = [] } "m'")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 36 120 63 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 120 36 120 37 , SrcSpan "tests/examples/DerivingVia.hs" 120 62 120 63 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 62 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 47 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 45 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 37 120 43 , srcInfoPoints = [] } "StateT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 44 120 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 44 120 45 , srcInfoPoints = [] } "s"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 46 120 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 46 120 47 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 48 120 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 48 120 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 48 120 50 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 51 120 62 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 51 120 59 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 51 120 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 51 120 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 51 120 57 , srcInfoPoints = [] } "StateT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 58 120 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 58 120 59 , srcInfoPoints = [] } "s"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 60 120 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 120 60 120 62 , srcInfoPoints = [] } "m'")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 3 121 44 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 3 121 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 3 121 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 3 121 8 , srcInfoPoints = [] } "hoist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 9 121 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 9 121 12 , srcInfoPoints = [] } "nat") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 13 121 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 121 13 121 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 15 121 44 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 15 121 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 15 121 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 15 121 21 , srcInfoPoints = [] } "StateT"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 22 121 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 22 121 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 22 121 23 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 24 121 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 24 121 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 24 121 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 24 121 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 24 121 28 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 29 121 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 29 121 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 29 121 32 , srcInfoPoints = [] } "nat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 33 121 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 33 121 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 33 121 34 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 35 121 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 35 121 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 121 35 121 44 , srcInfoPoints = [] } "runStateT")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 1 127 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 123 1 123 9 , SrcSpan "tests/examples/DerivingVia.hs" 123 41 123 46 , SrcSpan "tests/examples/DerivingVia.hs" 124 3 124 3 , SrcSpan "tests/examples/DerivingVia.hs" 125 3 125 3 , SrcSpan "tests/examples/DerivingVia.hs" 127 1 127 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 10 123 40 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 10 123 40 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 10 123 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 10 123 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 10 123 18 , srcInfoPoints = [] } "MFunctor"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 19 123 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 123 19 123 20 , SrcSpan "tests/examples/DerivingVia.hs" 123 30 123 32 , SrcSpan "tests/examples/DerivingVia.hs" 123 39 123 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 20 123 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 20 123 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 20 123 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 20 123 27 , srcInfoPoints = [] } "WriterT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 28 123 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 28 123 29 , srcInfoPoints = [] } "w"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 33 123 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 33 123 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 123 33 123 39 , srcInfoPoints = [] } "MTrans")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 3 124 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 9 124 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 3 124 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 9 124 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 3 124 8 , srcInfoPoints = [] } "hoist" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 65 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 20 124 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 20 124 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 20 124 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 20 124 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 12 124 17 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 18 124 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 18 124 19 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 23 124 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 33 124 35 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 23 124 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 23 124 24 , SrcSpan "tests/examples/DerivingVia.hs" 124 31 124 32 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 24 124 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 24 124 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 24 124 25 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 26 124 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 26 124 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 26 124 28 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 29 124 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 29 124 31 , srcInfoPoints = [] } "m'")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 36 124 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 124 36 124 37 , SrcSpan "tests/examples/DerivingVia.hs" 124 64 124 65 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 48 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 37 124 44 , srcInfoPoints = [] } "WriterT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 45 124 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 45 124 46 , srcInfoPoints = [] } "w"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 47 124 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 47 124 48 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 49 124 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 49 124 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 49 124 51 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 52 124 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 52 124 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 52 124 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 52 124 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 52 124 59 , srcInfoPoints = [] } "WriterT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 60 124 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 60 124 61 , srcInfoPoints = [] } "w"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 62 124 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 124 62 124 64 , srcInfoPoints = [] } "m'")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 3 125 41 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 3 125 41 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 3 125 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 3 125 8 , srcInfoPoints = [] } "hoist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 9 125 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 9 125 12 , srcInfoPoints = [] } "nat") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 13 125 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 125 13 125 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 15 125 41 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 15 125 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 15 125 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 15 125 22 , srcInfoPoints = [] } "WriterT"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 23 125 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 23 125 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 23 125 24 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 25 125 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 25 125 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 25 125 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 25 125 28 , srcInfoPoints = [] } "nat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 29 125 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 29 125 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 29 125 30 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 31 125 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 31 125 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 125 31 125 41 , srcInfoPoints = [] } "runWriterT")))))) Nothing ]) ]) , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 127 1 127 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 127 8 127 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 127 1 127 7 , srcInfoPoints = [] }) (Just 9) [ ConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 127 10 127 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 127 10 127 11 , SrcSpan "tests/examples/DerivingVia.hs" 127 11 127 19 , SrcSpan "tests/examples/DerivingVia.hs" 127 19 127 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 127 10 127 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 127 10 127 11 , SrcSpan "tests/examples/DerivingVia.hs" 127 11 127 19 , SrcSpan "tests/examples/DerivingVia.hs" 127 19 127 20 ] } "ComposeT") ] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 1 130 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 128 18 128 20 , SrcSpan "tests/examples/DerivingVia.hs" 128 48 128 53 , SrcSpan "tests/examples/DerivingVia.hs" 129 3 129 3 , SrcSpan "tests/examples/DerivingVia.hs" 130 3 130 3 , SrcSpan "tests/examples/DerivingVia.hs" 130 3 130 3 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 1 128 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 9 128 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 9 128 17 , srcInfoPoints = [] } "ComposeT")) (Just (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 21 128 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 128 28 128 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 21 128 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 21 128 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 21 128 27 , srcInfoPoints = [] } "MTrans"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 31 128 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 128 38 128 40 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 31 128 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 31 128 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 31 128 37 , srcInfoPoints = [] } "MTrans"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 41 128 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 41 128 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 128 41 128 47 , srcInfoPoints = [] } "MTrans")))))) [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 3 129 63 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 129 12 129 14 , SrcSpan "tests/examples/DerivingVia.hs" 129 15 129 16 , SrcSpan "tests/examples/DerivingVia.hs" 129 42 129 43 , SrcSpan "tests/examples/DerivingVia.hs" 129 44 129 46 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 3 129 11 , srcInfoPoints = [] } "ComposeT") Nothing Nothing (Just [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 17 129 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 129 29 129 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 17 129 28 , srcInfoPoints = [] } "getComposeT" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 32 129 41 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 32 129 39 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 32 129 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 32 129 33 , srcInfoPoints = [] } "f")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 34 129 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 129 34 129 35 , SrcSpan "tests/examples/DerivingVia.hs" 129 38 129 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 35 129 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 35 129 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 35 129 36 , srcInfoPoints = [] } "g")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 37 129 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 37 129 38 , srcInfoPoints = [] } "m"))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 40 129 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 40 129 41 , srcInfoPoints = [] } "a"))) ]) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 63 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 61 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 59 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 57 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 47 129 55 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 56 129 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 56 129 57 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 58 129 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 58 129 59 , srcInfoPoints = [] } "g"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 60 129 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 60 129 61 , srcInfoPoints = [] } "m"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 62 129 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 129 62 129 63 , srcInfoPoints = [] } "a"))) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 3 130 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 130 3 130 11 , SrcSpan "tests/examples/DerivingVia.hs" 130 20 130 21 , SrcSpan "tests/examples/DerivingVia.hs" 130 28 130 29 , SrcSpan "tests/examples/DerivingVia.hs" 130 41 130 42 , SrcSpan "tests/examples/DerivingVia.hs" 130 48 130 49 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 12 130 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 21 130 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 21 130 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 21 130 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 21 130 28 , srcInfoPoints = [] } "Functor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 30 130 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 30 130 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 30 130 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 30 130 41 , srcInfoPoints = [] } "Applicative"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 43 130 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 43 130 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 43 130 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 130 43 130 48 , srcInfoPoints = [] } "Monad"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 1 137 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 132 1 132 9 , SrcSpan "tests/examples/DerivingVia.hs" 132 84 132 89 , SrcSpan "tests/examples/DerivingVia.hs" 133 3 133 3 , SrcSpan "tests/examples/DerivingVia.hs" 134 3 134 3 , SrcSpan "tests/examples/DerivingVia.hs" 137 1 137 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 10 132 83 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 10 132 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 132 10 132 11 , SrcSpan "tests/examples/DerivingVia.hs" 132 23 132 24 , SrcSpan "tests/examples/DerivingVia.hs" 132 37 132 38 , SrcSpan "tests/examples/DerivingVia.hs" 132 53 132 54 , SrcSpan "tests/examples/DerivingVia.hs" 132 55 132 57 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 11 132 23 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 11 132 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 11 132 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 11 132 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 11 132 21 , srcInfoPoints = [] } "MonadTrans"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 22 132 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 22 132 23 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 25 132 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 25 132 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 25 132 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 25 132 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 25 132 35 , srcInfoPoints = [] } "MonadTrans"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 36 132 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 36 132 37 , srcInfoPoints = [] } "g"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 39 132 53 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 39 132 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 39 132 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 39 132 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 39 132 51 , srcInfoPoints = [] } "LiftingMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 52 132 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 52 132 53 , srcInfoPoints = [] } "g"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 58 132 83 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 58 132 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 58 132 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 58 132 68 , srcInfoPoints = [] } "MonadTrans"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 69 132 83 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 132 69 132 70 , SrcSpan "tests/examples/DerivingVia.hs" 132 82 132 83 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 70 132 82 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 70 132 80 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 70 132 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 70 132 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 70 132 78 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 79 132 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 79 132 80 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 81 132 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 132 81 132 82 , srcInfoPoints = [] } "g")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 3 133 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 8 133 10 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 3 133 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 8 133 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 3 133 7 , srcInfoPoints = [] } "lift" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 11 133 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 11 133 17 , SrcSpan "tests/examples/DerivingVia.hs" 133 19 133 20 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 18 133 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 18 133 19 , srcInfoPoints = [] } "m") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 29 133 31 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 29 133 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 29 133 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 133 29 133 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 21 133 26 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 27 133 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 27 133 28 , srcInfoPoints = [] } "m")))))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 32 133 51 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 32 133 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 32 133 33 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 34 133 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 34 133 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 34 133 36 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 51 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 49 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 37 133 45 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 46 133 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 46 133 47 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 48 133 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 48 133 49 , srcInfoPoints = [] } "g"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 50 133 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 133 50 133 51 , srcInfoPoints = [] } "m")))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 3 135 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 3 135 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 3 134 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 3 134 7 , srcInfoPoints = [] } "lift")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 8 135 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 134 8 134 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 10 135 19 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 10 134 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 10 134 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 10 134 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 10 134 18 , srcInfoPoints = [] } "ComposeT"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 19 134 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 19 134 20 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 19 134 20 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 21 134 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 21 134 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 21 134 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 21 134 25 , srcInfoPoints = [] } "lift"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 26 134 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 26 134 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 26 134 27 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 28 134 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 28 134 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 134 28 134 32 , srcInfoPoints = [] } "lift"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 5 135 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 5 135 7 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 5 135 7 , srcInfoPoints = [] } "\\\\"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 8 135 19 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 8 135 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 8 135 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 8 135 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 8 135 13 , srcInfoPoints = [] } "proof"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 14 135 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 135 14 135 15 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 15 135 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 15 135 16 , srcInfoPoints = [] } "g")))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 17 135 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 135 17 135 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 18 135 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 135 18 135 19 , srcInfoPoints = [] } "m")))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 1 146 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 137 1 137 9 , SrcSpan "tests/examples/DerivingVia.hs" 137 78 137 83 , SrcSpan "tests/examples/DerivingVia.hs" 138 3 138 3 , SrcSpan "tests/examples/DerivingVia.hs" 139 3 139 3 , SrcSpan "tests/examples/DerivingVia.hs" 146 1 146 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 10 137 77 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 10 137 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 137 10 137 11 , SrcSpan "tests/examples/DerivingVia.hs" 137 21 137 22 , SrcSpan "tests/examples/DerivingVia.hs" 137 33 137 34 , SrcSpan "tests/examples/DerivingVia.hs" 137 49 137 50 , SrcSpan "tests/examples/DerivingVia.hs" 137 51 137 53 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 11 137 21 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 11 137 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 11 137 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 11 137 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 11 137 19 , srcInfoPoints = [] } "MFunctor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 20 137 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 20 137 21 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 23 137 33 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 23 137 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 23 137 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 23 137 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 23 137 31 , srcInfoPoints = [] } "MFunctor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 32 137 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 32 137 33 , srcInfoPoints = [] } "g"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 35 137 49 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 35 137 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 35 137 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 35 137 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 35 137 47 , srcInfoPoints = [] } "LiftingMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 48 137 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 48 137 49 , srcInfoPoints = [] } "g"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 54 137 77 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 54 137 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 54 137 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 54 137 62 , srcInfoPoints = [] } "MFunctor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 63 137 77 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 137 63 137 64 , SrcSpan "tests/examples/DerivingVia.hs" 137 76 137 77 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 64 137 76 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 64 137 74 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 64 137 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 64 137 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 64 137 72 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 73 137 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 73 137 74 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 75 137 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 137 75 137 76 , srcInfoPoints = [] } "g")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 3 138 84 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 9 138 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 3 138 84 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 9 138 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 3 138 8 , srcInfoPoints = [] } "hoist" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 12 138 84 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 12 138 18 , SrcSpan "tests/examples/DerivingVia.hs" 138 23 138 24 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 19 138 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 19 138 20 , srcInfoPoints = [] } "m") , UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 21 138 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 21 138 23 , srcInfoPoints = [] } "m'") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 33 138 35 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 33 138 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 33 138 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 33 138 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 25 138 30 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 31 138 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 31 138 32 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 36 138 84 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 46 138 48 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 36 138 45 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 36 138 37 , SrcSpan "tests/examples/DerivingVia.hs" 138 44 138 45 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 37 138 44 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 37 138 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 37 138 38 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 39 138 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 39 138 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 39 138 41 , srcInfoPoints = [] } "~>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 42 138 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 42 138 44 , srcInfoPoints = [] } "m'")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 49 138 84 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 138 49 138 50 , SrcSpan "tests/examples/DerivingVia.hs" 138 83 138 84 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 83 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 62 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 50 138 58 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 59 138 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 59 138 60 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 61 138 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 61 138 62 , srcInfoPoints = [] } "g"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 63 138 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 63 138 64 , srcInfoPoints = [] } "m"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 65 138 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 65 138 67 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 65 138 67 , srcInfoPoints = [] } "~>"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 83 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 80 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 78 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 68 138 76 , srcInfoPoints = [] } "ComposeT"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 77 138 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 77 138 78 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 79 138 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 79 138 80 , srcInfoPoints = [] } "g"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 81 138 83 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 138 81 138 83 , srcInfoPoints = [] } "m'")))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 3 140 19 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 3 140 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 3 140 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 3 139 8 , srcInfoPoints = [] } "hoist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 9 139 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 9 139 10 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 11 140 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 139 11 139 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 13 140 19 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 13 139 53 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 13 139 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 13 139 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 13 139 21 , srcInfoPoints = [] } "ComposeT"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 22 139 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 22 139 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 22 139 23 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 24 139 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 24 139 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 24 139 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 24 139 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 24 139 29 , srcInfoPoints = [] } "hoist"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 30 139 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 139 30 139 31 , SrcSpan "tests/examples/DerivingVia.hs" 139 38 139 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 31 139 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 31 139 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 31 139 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 31 139 36 , srcInfoPoints = [] } "hoist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 37 139 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 37 139 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 37 139 38 , srcInfoPoints = [] } "f")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 40 139 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 40 139 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 40 139 41 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 42 139 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 42 139 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 139 42 139 53 , srcInfoPoints = [] } "getComposeT"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 5 140 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 5 140 7 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 5 140 7 , srcInfoPoints = [] } "\\\\"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 8 140 19 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 8 140 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 8 140 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 8 140 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 8 140 13 , srcInfoPoints = [] } "proof"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 14 140 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 140 14 140 15 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 15 140 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 15 140 16 , srcInfoPoints = [] } "g")))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 17 140 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 140 17 140 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 18 140 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 140 18 140 19 , srcInfoPoints = [] } "m")))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 1 150 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 146 13 146 14 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 1 146 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 9 146 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 9 146 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 9 146 10 , srcInfoPoints = [] } "X")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 11 146 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 11 146 12 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 15 146 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 15 146 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 15 146 16 , srcInfoPoints = [] } "X") [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 17 146 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 146 17 146 18 , SrcSpan "tests/examples/DerivingVia.hs" 146 19 146 20 , SrcSpan "tests/examples/DerivingVia.hs" 146 22 146 23 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 18 146 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 18 146 19 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 21 146 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 146 21 146 22 , srcInfoPoints = [] } "a") ] ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 3 147 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 147 3 147 11 , SrcSpan "tests/examples/DerivingVia.hs" 147 12 147 13 , SrcSpan "tests/examples/DerivingVia.hs" 147 22 147 23 , SrcSpan "tests/examples/DerivingVia.hs" 147 30 147 31 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 8 148 11 , srcInfoPoints = [] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 12 148 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 148 12 148 13 , SrcSpan "tests/examples/DerivingVia.hs" 148 22 148 23 , SrcSpan "tests/examples/DerivingVia.hs" 148 29 148 30 ] } Boxed [ TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 13 148 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 13 148 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 13 148 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 13 148 20 , srcInfoPoints = [] } "Product"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 21 148 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 21 148 22 , srcInfoPoints = [] } "a")) , TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 24 148 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 24 148 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 24 148 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 24 148 27 , srcInfoPoints = [] } "Sum"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 28 148 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 148 28 148 29 , srcInfoPoints = [] } "a")) ]))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 13 147 22 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 13 147 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 13 147 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 13 147 22 , srcInfoPoints = [] } "Semigroup"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 24 147 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 24 147 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 24 147 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 147 24 147 30 , srcInfoPoints = [] } "Monoid"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 3 150 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 150 3 150 11 , SrcSpan "tests/examples/DerivingVia.hs" 150 12 150 13 , SrcSpan "tests/examples/DerivingVia.hs" 150 17 150 18 , SrcSpan "tests/examples/DerivingVia.hs" 150 21 150 22 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 8 151 11 , srcInfoPoints = [] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 12 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 151 12 151 13 , SrcSpan "tests/examples/DerivingVia.hs" 151 14 151 15 , SrcSpan "tests/examples/DerivingVia.hs" 151 17 151 18 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 13 151 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 13 151 14 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 16 151 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 151 16 151 17 , srcInfoPoints = [] } "a") ]))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 13 150 17 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 13 150 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 13 150 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 13 150 17 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 19 150 21 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 19 150 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 19 150 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 150 19 150 21 , srcInfoPoints = [] } "Eq"))) ] ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 1 158 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 157 1 157 6 , SrcSpan "tests/examples/DerivingVia.hs" 157 11 157 16 , SrcSpan "tests/examples/DerivingVia.hs" 158 3 158 3 , SrcSpan "tests/examples/DerivingVia.hs" 160 1 160 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 7 157 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 7 157 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 7 157 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 9 157 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 157 9 157 10 , srcInfoPoints = [] } "f"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 3 158 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 158 5 158 7 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 3 158 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 158 5 158 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 3 158 4 , srcInfoPoints = [] } "c" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 8 158 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 158 12 158 14 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 8 158 11 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 8 158 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 8 158 9 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 10 158 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 10 158 11 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 15 158 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 15 158 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 158 15 158 18 , srcInfoPoints = [] } "Int"))))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 1 160 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 160 16 160 17 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 1 160 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 9 160 15 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 9 160 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 9 160 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 9 160 11 , srcInfoPoints = [] } "X2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 12 160 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 12 160 13 , srcInfoPoints = [] } "f"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 14 160 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 14 160 15 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 18 160 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 18 160 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 18 160 20 , srcInfoPoints = [] } "X2") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 21 160 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 160 21 160 22 , SrcSpan "tests/examples/DerivingVia.hs" 160 25 160 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 22 160 25 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 22 160 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 22 160 23 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 24 160 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 160 24 160 25 , srcInfoPoints = [] } "a"))) ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 1 165 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 162 1 162 9 , SrcSpan "tests/examples/DerivingVia.hs" 162 19 162 24 , SrcSpan "tests/examples/DerivingVia.hs" 163 3 163 3 , SrcSpan "tests/examples/DerivingVia.hs" 165 1 165 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 10 162 18 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 10 162 18 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 10 162 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 10 162 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 10 162 11 , srcInfoPoints = [] } "C"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 12 162 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 162 12 162 13 , SrcSpan "tests/examples/DerivingVia.hs" 162 17 162 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 13 162 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 13 162 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 13 162 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 13 162 15 , srcInfoPoints = [] } "X2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 16 162 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 162 16 162 17 , srcInfoPoints = [] } "f")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 3 163 14 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 3 163 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 3 163 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 3 163 4 , srcInfoPoints = [] } "c")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 5 163 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 163 5 163 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 7 163 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 7 163 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 7 163 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 7 163 12 , srcInfoPoints = [] } "const"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 13 163 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 163 13 163 14 , srcInfoPoints = [] } 0 "0")))) Nothing) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 1 165 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 165 1 165 9 , SrcSpan "tests/examples/DerivingVia.hs" 165 22 165 30 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 10 165 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 14 165 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 165 14 165 15 , SrcSpan "tests/examples/DerivingVia.hs" 165 20 165 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 15 165 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 15 165 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 15 165 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 15 165 17 , srcInfoPoints = [] } "X2"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 18 165 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 18 165 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 18 165 20 , srcInfoPoints = [] } "IO"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 31 165 35 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 31 165 35 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 31 165 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 31 165 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 31 165 32 , srcInfoPoints = [] } "C"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 33 165 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 33 165 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 165 33 165 35 , srcInfoPoints = [] } "IO"))))) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 1 171 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 171 14 171 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 1 171 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 9 171 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 9 171 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 9 171 11 , srcInfoPoints = [] } "P0")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 12 171 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 12 171 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 16 171 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 16 171 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 16 171 18 , srcInfoPoints = [] } "P0") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 19 171 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 19 171 20 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 33 171 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 171 33 171 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 47 171 50 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 51 171 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 51 171 52 , srcInfoPoints = [] } "a")))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 42 171 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 42 171 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 42 171 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 171 42 171 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 1 172 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 172 14 172 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 1 172 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 9 172 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 9 172 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 9 172 11 , srcInfoPoints = [] } "P1")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 12 172 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 12 172 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 16 172 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 16 172 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 16 172 18 , srcInfoPoints = [] } "P1") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 19 172 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 172 19 172 20 , SrcSpan "tests/examples/DerivingVia.hs" 172 21 172 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 20 172 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 20 172 21 , srcInfoPoints = [] } "a")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 33 172 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 172 33 172 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 47 172 50 , srcInfoPoints = [] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 51 172 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 172 51 172 52 , SrcSpan "tests/examples/DerivingVia.hs" 172 53 172 54 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 52 172 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 52 172 53 , srcInfoPoints = [] } "a"))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 42 172 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 42 172 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 42 172 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 172 42 172 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 1 173 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 173 14 173 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 1 173 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 9 173 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 9 173 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 9 173 11 , srcInfoPoints = [] } "P2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 12 173 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 12 173 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 16 173 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 16 173 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 16 173 18 , srcInfoPoints = [] } "P2") [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 19 173 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 173 19 173 20 , SrcSpan "tests/examples/DerivingVia.hs" 173 21 173 22 , SrcSpan "tests/examples/DerivingVia.hs" 173 24 173 25 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 20 173 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 20 173 21 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 23 173 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 23 173 24 , srcInfoPoints = [] } "a") ] ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 33 173 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 173 33 173 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 47 173 50 , srcInfoPoints = [] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 51 173 57 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 173 51 173 52 , SrcSpan "tests/examples/DerivingVia.hs" 173 53 173 54 , SrcSpan "tests/examples/DerivingVia.hs" 173 56 173 57 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 52 173 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 52 173 53 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 55 173 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 55 173 56 , srcInfoPoints = [] } "a") ]))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 42 173 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 42 173 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 42 173 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 173 42 173 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 1 174 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 174 14 174 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 1 174 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 9 174 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 9 174 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 9 174 11 , srcInfoPoints = [] } "P3")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 12 174 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 12 174 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 16 174 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 16 174 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 16 174 18 , srcInfoPoints = [] } "P3") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 19 174 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 174 19 174 20 , SrcSpan "tests/examples/DerivingVia.hs" 174 27 174 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 20 174 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 20 174 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 20 174 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 20 174 25 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 26 174 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 26 174 27 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 33 174 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 174 33 174 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 47 174 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 51 174 60 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 174 51 174 52 , SrcSpan "tests/examples/DerivingVia.hs" 174 59 174 60 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 52 174 59 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 52 174 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 52 174 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 52 174 57 , srcInfoPoints = [] } "First"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 58 174 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 58 174 59 , srcInfoPoints = [] } "a")))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 42 174 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 42 174 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 42 174 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 174 42 174 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 1 175 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 175 14 175 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 1 175 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 9 175 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 9 175 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 9 175 11 , srcInfoPoints = [] } "P4")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 12 175 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 12 175 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 16 175 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 16 175 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 16 175 18 , srcInfoPoints = [] } "P4") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 19 175 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 175 19 175 20 , SrcSpan "tests/examples/DerivingVia.hs" 175 27 175 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 20 175 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 20 175 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 20 175 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 20 175 25 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 26 175 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 26 175 27 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 33 175 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 175 33 175 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 47 175 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 51 175 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 175 51 175 52 , SrcSpan "tests/examples/DerivingVia.hs" 175 61 175 62 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 52 175 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 52 175 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 52 175 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 52 175 57 , srcInfoPoints = [] } "First"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 58 175 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 58 175 59 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 58 175 59 , srcInfoPoints = [] } "$"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 60 175 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 60 175 61 , srcInfoPoints = [] } "a")))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 42 175 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 42 175 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 42 175 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 175 42 175 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 1 176 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 176 14 176 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 1 176 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 9 176 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 9 176 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 9 176 11 , srcInfoPoints = [] } "P5")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 12 176 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 12 176 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 16 176 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 16 176 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 16 176 18 , srcInfoPoints = [] } "P5") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 19 176 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 19 176 20 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 33 176 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 176 33 176 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 47 176 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 51 176 65 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 176 51 176 52 , SrcSpan "tests/examples/DerivingVia.hs" 176 64 176 65 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 52 176 64 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 52 176 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 52 176 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 52 176 60 , srcInfoPoints = [] } "Identity"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 61 176 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 61 176 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 61 176 62 , srcInfoPoints = [] } "$"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 63 176 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 63 176 64 , srcInfoPoints = [] } "a")))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 42 176 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 42 176 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 42 176 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 176 42 176 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 1 177 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 14 177 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 1 177 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 9 177 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 9 177 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 9 177 11 , srcInfoPoints = [] } "P6")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 12 177 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 12 177 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 16 177 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 16 177 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 16 177 18 , srcInfoPoints = [] } "P6") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 19 177 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 19 177 20 , SrcSpan "tests/examples/DerivingVia.hs" 177 21 177 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 20 177 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 20 177 21 , srcInfoPoints = [] } "a")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 33 177 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 33 177 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 47 177 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 51 177 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 51 177 52 , SrcSpan "tests/examples/DerivingVia.hs" 177 58 177 59 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 53 , SrcSpan "tests/examples/DerivingVia.hs" 177 53 177 54 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 53 , SrcSpan "tests/examples/DerivingVia.hs" 177 53 177 54 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 177 52 177 53 , SrcSpan "tests/examples/DerivingVia.hs" 177 53 177 54 ] }))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 55 177 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 55 177 56 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 55 177 56 , srcInfoPoints = [] } "$"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 57 177 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 57 177 58 , srcInfoPoints = [] } "a")))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 42 177 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 42 177 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 42 177 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 177 42 177 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 1 178 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 178 14 178 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 1 178 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 9 178 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 9 178 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 9 178 11 , srcInfoPoints = [] } "P7")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 12 178 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 12 178 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 16 178 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 16 178 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 16 178 18 , srcInfoPoints = [] } "P7") [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 19 178 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 178 19 178 20 , SrcSpan "tests/examples/DerivingVia.hs" 178 21 178 22 , SrcSpan "tests/examples/DerivingVia.hs" 178 24 178 25 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 20 178 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 20 178 21 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 23 178 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 23 178 24 , srcInfoPoints = [] } "a") ] ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 33 178 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 178 33 178 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 47 178 50 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 51 178 70 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 178 51 178 52 , SrcSpan "tests/examples/DerivingVia.hs" 178 69 178 70 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 52 178 69 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 52 178 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 52 178 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 52 178 60 , srcInfoPoints = [] } "Identity"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 61 178 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 61 178 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 61 178 62 , srcInfoPoints = [] } "$"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 63 178 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 178 63 178 64 , SrcSpan "tests/examples/DerivingVia.hs" 178 65 178 66 , SrcSpan "tests/examples/DerivingVia.hs" 178 68 178 69 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 64 178 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 64 178 65 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 67 178 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 67 178 68 , srcInfoPoints = [] } "a") ]))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 42 178 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 42 178 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 42 178 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 178 42 178 46 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 1 179 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 14 179 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 1 179 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 9 179 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 9 179 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 9 179 11 , srcInfoPoints = [] } "P8")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 12 179 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 12 179 13 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 16 179 32 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 16 179 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 16 179 18 , srcInfoPoints = [] } "P8") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 19 179 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 19 179 20 , SrcSpan "tests/examples/DerivingVia.hs" 179 31 179 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 20 179 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 20 179 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 20 179 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 20 179 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 20 179 26 , srcInfoPoints = [] } "Either"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 28 , SrcSpan "tests/examples/DerivingVia.hs" 179 28 179 29 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 28 , SrcSpan "tests/examples/DerivingVia.hs" 179 28 179 29 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 27 179 28 , SrcSpan "tests/examples/DerivingVia.hs" 179 28 179 29 ] })))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 30 179 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 30 179 31 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 33 179 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 33 179 41 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 50 179 53 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 54 179 71 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 54 179 55 , SrcSpan "tests/examples/DerivingVia.hs" 179 70 179 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 55 179 70 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 55 179 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 55 179 56 , SrcSpan "tests/examples/DerivingVia.hs" 179 56 179 57 , SrcSpan "tests/examples/DerivingVia.hs" 179 57 179 58 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 55 179 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 55 179 56 , SrcSpan "tests/examples/DerivingVia.hs" 179 56 179 57 , SrcSpan "tests/examples/DerivingVia.hs" 179 57 179 58 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 56 179 57 , srcInfoPoints = [] } "$"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 59 179 70 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 59 179 60 , SrcSpan "tests/examples/DerivingVia.hs" 179 69 179 70 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 60 179 69 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 60 179 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 60 179 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 60 179 66 , srcInfoPoints = [] } "Either"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 68 , SrcSpan "tests/examples/DerivingVia.hs" 179 68 179 69 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 68 , SrcSpan "tests/examples/DerivingVia.hs" 179 68 179 69 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 69 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 179 67 179 68 , SrcSpan "tests/examples/DerivingVia.hs" 179 68 179 69 ] }))))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 42 179 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 42 179 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 42 179 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 179 42 179 49 , srcInfoPoints = [] } "Functor"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 1 181 73 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 181 15 181 16 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 1 181 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 9 181 14 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 9 181 14 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 9 181 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 9 181 10 , srcInfoPoints = [] } "f")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 11 181 12 , srcInfoPoints = [] } "$")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 13 181 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 13 181 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 17 181 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 17 181 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 17 181 20 , srcInfoPoints = [] } "APP") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 21 181 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 181 21 181 22 , SrcSpan "tests/examples/DerivingVia.hs" 181 25 181 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 22 181 25 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 22 181 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 22 181 23 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 24 181 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 24 181 25 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 27 181 48 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 181 27 181 35 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 36 181 43 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 44 181 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 44 181 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 44 181 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 44 181 48 , srcInfoPoints = [] } "Show"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 49 181 73 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 181 49 181 57 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 58 181 65 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 66 181 73 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 66 181 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 66 181 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 181 66 181 73 , srcInfoPoints = [] } "Functor"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 1 191 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 190 29 190 30 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 1 190 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 9 190 28 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 9 190 26 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 9 190 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 9 190 24 , srcInfoPoints = [] } "WrapApplicative")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 25 190 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 25 190 26 , srcInfoPoints = [] } "f"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 27 190 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 27 190 28 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 31 190 55 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 31 190 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 31 190 49 , srcInfoPoints = [] } "WrappedApplicative") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 50 190 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 190 50 190 51 , SrcSpan "tests/examples/DerivingVia.hs" 190 54 190 55 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 51 190 54 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 51 190 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 51 190 52 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 53 190 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 190 53 190 54 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 3 191 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 191 3 191 11 , SrcSpan "tests/examples/DerivingVia.hs" 191 12 191 13 , SrcSpan "tests/examples/DerivingVia.hs" 191 20 191 21 , SrcSpan "tests/examples/DerivingVia.hs" 191 33 191 34 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 13 191 20 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 13 191 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 13 191 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 13 191 20 , srcInfoPoints = [] } "Functor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 22 191 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 22 191 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 22 191 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 191 22 191 33 , srcInfoPoints = [] } "Applicative"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 1 201 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 193 1 193 9 , SrcSpan "tests/examples/DerivingVia.hs" 193 62 193 67 , SrcSpan "tests/examples/DerivingVia.hs" 194 3 194 3 , SrcSpan "tests/examples/DerivingVia.hs" 195 3 195 3 , SrcSpan "tests/examples/DerivingVia.hs" 196 3 196 3 , SrcSpan "tests/examples/DerivingVia.hs" 197 3 197 3 , SrcSpan "tests/examples/DerivingVia.hs" 198 3 198 3 , SrcSpan "tests/examples/DerivingVia.hs" 199 3 199 3 , SrcSpan "tests/examples/DerivingVia.hs" 201 1 201 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 10 193 61 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 10 193 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 193 10 193 11 , SrcSpan "tests/examples/DerivingVia.hs" 193 24 193 25 , SrcSpan "tests/examples/DerivingVia.hs" 193 31 193 32 , SrcSpan "tests/examples/DerivingVia.hs" 193 33 193 35 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 11 193 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 11 193 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 11 193 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 11 193 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 11 193 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 23 193 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 23 193 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 26 193 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 26 193 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 26 193 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 26 193 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 26 193 29 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 30 193 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 30 193 31 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 36 193 61 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 36 193 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 36 193 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 36 193 39 , srcInfoPoints = [] } "Num"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 40 193 61 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 193 40 193 41 , SrcSpan "tests/examples/DerivingVia.hs" 193 60 193 61 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 41 193 60 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 41 193 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 41 193 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 41 193 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 41 193 56 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 57 193 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 57 193 58 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 59 193 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 193 59 193 60 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 3 194 27 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 3 194 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 3 194 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 194 3 194 4 , SrcSpan "tests/examples/DerivingVia.hs" 194 4 194 5 , SrcSpan "tests/examples/DerivingVia.hs" 194 5 194 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 4 194 5 , srcInfoPoints = [] } "+")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 15 194 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 194 15 194 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 17 194 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 17 194 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 17 194 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 17 194 23 , srcInfoPoints = [] } "liftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 24 194 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 194 24 194 25 , SrcSpan "tests/examples/DerivingVia.hs" 194 25 194 26 , SrcSpan "tests/examples/DerivingVia.hs" 194 26 194 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 24 194 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 194 24 194 25 , SrcSpan "tests/examples/DerivingVia.hs" 194 25 194 26 , SrcSpan "tests/examples/DerivingVia.hs" 194 26 194 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 194 25 194 26 , srcInfoPoints = [] } "+"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 3 195 27 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 3 195 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 3 195 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 195 3 195 4 , SrcSpan "tests/examples/DerivingVia.hs" 195 4 195 5 , SrcSpan "tests/examples/DerivingVia.hs" 195 5 195 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 4 195 5 , srcInfoPoints = [] } "*")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 15 195 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 195 15 195 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 17 195 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 17 195 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 17 195 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 17 195 23 , srcInfoPoints = [] } "liftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 24 195 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 195 24 195 25 , SrcSpan "tests/examples/DerivingVia.hs" 195 25 195 26 , SrcSpan "tests/examples/DerivingVia.hs" 195 26 195 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 24 195 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 195 24 195 25 , SrcSpan "tests/examples/DerivingVia.hs" 195 25 195 26 , SrcSpan "tests/examples/DerivingVia.hs" 195 26 195 27 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 195 25 195 26 , srcInfoPoints = [] } "*"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 3 196 28 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 3 196 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 3 196 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 3 196 9 , srcInfoPoints = [] } "negate")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 15 196 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 196 15 196 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 17 196 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 17 196 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 17 196 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 17 196 21 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 22 196 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 22 196 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 196 22 196 28 , srcInfoPoints = [] } "negate"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 3 197 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 3 197 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 3 197 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 3 197 14 , srcInfoPoints = [] } "fromInteger")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 15 197 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 197 15 197 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 17 197 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 17 197 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 17 197 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 17 197 21 , srcInfoPoints = [] } "pure"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 22 197 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 22 197 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 22 197 23 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 24 197 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 24 197 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 197 24 197 35 , srcInfoPoints = [] } "fromInteger"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 3 198 25 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 3 198 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 3 198 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 3 198 6 , srcInfoPoints = [] } "abs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 15 198 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 198 15 198 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 17 198 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 17 198 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 17 198 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 17 198 21 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 22 198 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 22 198 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 198 22 198 25 , srcInfoPoints = [] } "abs"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 3 199 28 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 3 199 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 3 199 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 3 199 9 , srcInfoPoints = [] } "signum")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 15 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 199 15 199 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 17 199 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 17 199 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 17 199 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 17 199 21 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 22 199 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 22 199 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 199 22 199 28 , srcInfoPoints = [] } "signum"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 1 205 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 201 1 201 9 , SrcSpan "tests/examples/DerivingVia.hs" 201 76 201 81 , SrcSpan "tests/examples/DerivingVia.hs" 202 3 202 3 , SrcSpan "tests/examples/DerivingVia.hs" 203 3 203 3 , SrcSpan "tests/examples/DerivingVia.hs" 205 1 205 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 10 201 75 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 10 201 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 201 10 201 11 , SrcSpan "tests/examples/DerivingVia.hs" 201 24 201 25 , SrcSpan "tests/examples/DerivingVia.hs" 201 38 201 39 , SrcSpan "tests/examples/DerivingVia.hs" 201 40 201 42 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 11 201 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 11 201 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 11 201 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 11 201 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 11 201 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 23 201 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 23 201 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 26 201 38 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 26 201 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 26 201 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 26 201 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 26 201 36 , srcInfoPoints = [] } "Fractional"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 37 201 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 37 201 38 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 43 201 75 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 43 201 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 43 201 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 43 201 53 , srcInfoPoints = [] } "Fractional"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 54 201 75 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 201 54 201 55 , SrcSpan "tests/examples/DerivingVia.hs" 201 74 201 75 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 55 201 74 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 55 201 72 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 55 201 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 55 201 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 55 201 70 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 71 201 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 71 201 72 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 73 201 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 201 73 201 74 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 3 202 28 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 3 202 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 3 202 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 3 202 8 , srcInfoPoints = [] } "recip")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 16 202 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 202 16 202 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 18 202 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 18 202 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 18 202 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 18 202 22 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 23 202 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 23 202 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 202 23 202 28 , srcInfoPoints = [] } "recip"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 3 203 37 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 3 203 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 3 203 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 3 203 15 , srcInfoPoints = [] } "fromRational")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 16 203 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 203 16 203 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 18 203 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 18 203 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 18 203 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 18 203 22 , srcInfoPoints = [] } "pure"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 23 203 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 23 203 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 23 203 24 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 25 203 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 25 203 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 203 25 203 37 , srcInfoPoints = [] } "fromRational"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 1 221 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 205 1 205 9 , SrcSpan "tests/examples/DerivingVia.hs" 205 72 205 77 , SrcSpan "tests/examples/DerivingVia.hs" 206 3 206 3 , SrcSpan "tests/examples/DerivingVia.hs" 207 3 207 3 , SrcSpan "tests/examples/DerivingVia.hs" 208 3 208 3 , SrcSpan "tests/examples/DerivingVia.hs" 209 3 209 3 , SrcSpan "tests/examples/DerivingVia.hs" 210 3 210 3 , SrcSpan "tests/examples/DerivingVia.hs" 211 3 211 3 , SrcSpan "tests/examples/DerivingVia.hs" 212 3 212 3 , SrcSpan "tests/examples/DerivingVia.hs" 213 3 213 3 , SrcSpan "tests/examples/DerivingVia.hs" 214 3 214 3 , SrcSpan "tests/examples/DerivingVia.hs" 215 3 215 3 , SrcSpan "tests/examples/DerivingVia.hs" 216 3 216 3 , SrcSpan "tests/examples/DerivingVia.hs" 217 3 217 3 , SrcSpan "tests/examples/DerivingVia.hs" 218 3 218 3 , SrcSpan "tests/examples/DerivingVia.hs" 219 3 219 3 , SrcSpan "tests/examples/DerivingVia.hs" 221 1 221 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 10 205 71 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 10 205 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 205 10 205 11 , SrcSpan "tests/examples/DerivingVia.hs" 205 24 205 25 , SrcSpan "tests/examples/DerivingVia.hs" 205 36 205 37 , SrcSpan "tests/examples/DerivingVia.hs" 205 38 205 40 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 11 205 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 11 205 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 11 205 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 11 205 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 11 205 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 23 205 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 23 205 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 26 205 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 26 205 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 26 205 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 26 205 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 26 205 34 , srcInfoPoints = [] } "Floating"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 35 205 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 35 205 36 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 41 205 71 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 41 205 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 41 205 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 41 205 49 , srcInfoPoints = [] } "Floating"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 50 205 71 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 205 50 205 51 , SrcSpan "tests/examples/DerivingVia.hs" 205 70 205 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 51 205 70 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 51 205 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 51 205 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 51 205 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 51 205 66 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 67 205 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 67 205 68 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 69 205 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 205 69 205 70 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 3 206 18 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 3 206 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 3 206 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 3 206 5 , srcInfoPoints = [] } "pi")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 9 206 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 206 9 206 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 11 206 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 11 206 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 11 206 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 11 206 15 , srcInfoPoints = [] } "pure"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 16 206 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 16 206 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 206 16 206 18 , srcInfoPoints = [] } "pi"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 3 207 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 3 207 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 3 207 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 3 207 7 , srcInfoPoints = [] } "sqrt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 9 207 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 207 9 207 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 11 207 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 11 207 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 11 207 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 11 207 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 16 207 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 16 207 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 207 16 207 20 , srcInfoPoints = [] } "sqrt"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 3 208 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 3 208 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 3 208 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 3 208 6 , srcInfoPoints = [] } "exp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 9 208 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 208 9 208 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 11 208 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 11 208 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 11 208 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 11 208 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 16 208 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 16 208 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 208 16 208 19 , srcInfoPoints = [] } "exp"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 3 209 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 3 209 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 3 209 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 3 209 6 , srcInfoPoints = [] } "log")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 9 209 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 209 9 209 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 11 209 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 11 209 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 11 209 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 11 209 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 16 209 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 16 209 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 209 16 209 19 , srcInfoPoints = [] } "log"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 3 210 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 3 210 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 3 210 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 3 210 6 , srcInfoPoints = [] } "sin")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 9 210 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 210 9 210 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 11 210 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 11 210 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 11 210 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 11 210 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 16 210 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 16 210 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 210 16 210 19 , srcInfoPoints = [] } "sin"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 3 211 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 3 211 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 3 211 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 3 211 6 , srcInfoPoints = [] } "cos")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 9 211 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 211 9 211 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 11 211 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 11 211 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 11 211 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 11 211 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 16 211 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 16 211 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 211 16 211 19 , srcInfoPoints = [] } "cos"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 3 212 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 3 212 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 3 212 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 3 212 7 , srcInfoPoints = [] } "asin")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 9 212 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 212 9 212 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 11 212 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 11 212 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 11 212 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 11 212 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 16 212 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 16 212 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 212 16 212 20 , srcInfoPoints = [] } "asin"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 3 213 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 3 213 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 3 213 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 3 213 7 , srcInfoPoints = [] } "atan")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 9 213 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 213 9 213 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 11 213 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 11 213 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 11 213 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 11 213 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 16 213 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 16 213 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 213 16 213 20 , srcInfoPoints = [] } "atan"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 3 214 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 3 214 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 3 214 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 3 214 7 , srcInfoPoints = [] } "acos")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 9 214 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 214 9 214 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 11 214 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 11 214 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 11 214 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 11 214 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 16 214 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 16 214 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 214 16 214 20 , srcInfoPoints = [] } "acos"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 3 215 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 3 215 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 3 215 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 3 215 7 , srcInfoPoints = [] } "sinh")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 9 215 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 215 9 215 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 11 215 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 11 215 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 11 215 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 11 215 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 16 215 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 16 215 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 215 16 215 20 , srcInfoPoints = [] } "sinh"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 3 216 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 3 216 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 3 216 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 3 216 7 , srcInfoPoints = [] } "cosh")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 9 216 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 216 9 216 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 11 216 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 11 216 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 11 216 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 11 216 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 16 216 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 16 216 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 216 16 216 20 , srcInfoPoints = [] } "cosh"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 3 217 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 3 217 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 3 217 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 3 217 8 , srcInfoPoints = [] } "asinh")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 9 217 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 217 9 217 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 11 217 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 11 217 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 11 217 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 11 217 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 16 217 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 16 217 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 217 16 217 21 , srcInfoPoints = [] } "asinh"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 3 218 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 3 218 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 3 218 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 3 218 8 , srcInfoPoints = [] } "atanh")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 9 218 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 218 9 218 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 11 218 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 11 218 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 11 218 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 11 218 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 16 218 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 16 218 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 218 16 218 21 , srcInfoPoints = [] } "atanh"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 3 219 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 3 219 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 3 219 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 3 219 8 , srcInfoPoints = [] } "acosh")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 9 219 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 219 9 219 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 11 219 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 11 219 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 11 219 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 11 219 15 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 16 219 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 16 219 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 219 16 219 21 , srcInfoPoints = [] } "acosh"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 1 224 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 221 1 221 9 , SrcSpan "tests/examples/DerivingVia.hs" 221 74 221 79 , SrcSpan "tests/examples/DerivingVia.hs" 222 3 222 3 , SrcSpan "tests/examples/DerivingVia.hs" 224 1 224 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 10 221 73 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 10 221 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 221 10 221 11 , SrcSpan "tests/examples/DerivingVia.hs" 221 24 221 25 , SrcSpan "tests/examples/DerivingVia.hs" 221 37 221 38 , SrcSpan "tests/examples/DerivingVia.hs" 221 39 221 41 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 11 221 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 11 221 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 11 221 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 11 221 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 11 221 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 23 221 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 23 221 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 26 221 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 26 221 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 26 221 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 26 221 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 26 221 35 , srcInfoPoints = [] } "Semigroup"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 36 221 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 36 221 37 , srcInfoPoints = [] } "s"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 42 221 73 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 42 221 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 42 221 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 42 221 51 , srcInfoPoints = [] } "Semigroup"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 52 221 73 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 221 52 221 53 , SrcSpan "tests/examples/DerivingVia.hs" 221 72 221 73 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 53 221 72 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 53 221 70 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 53 221 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 53 221 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 53 221 68 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 69 221 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 69 221 70 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 71 221 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 221 71 221 72 , srcInfoPoints = [] } "s")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 3 222 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 3 222 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 3 222 7 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 222 3 222 4 , SrcSpan "tests/examples/DerivingVia.hs" 222 4 222 6 , SrcSpan "tests/examples/DerivingVia.hs" 222 6 222 7 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 4 222 6 , srcInfoPoints = [] } "<>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 8 222 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 222 8 222 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 10 222 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 10 222 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 10 222 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 10 222 16 , srcInfoPoints = [] } "liftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 17 222 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 222 17 222 18 , SrcSpan "tests/examples/DerivingVia.hs" 222 18 222 20 , SrcSpan "tests/examples/DerivingVia.hs" 222 20 222 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 17 222 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 222 17 222 18 , SrcSpan "tests/examples/DerivingVia.hs" 222 18 222 20 , SrcSpan "tests/examples/DerivingVia.hs" 222 20 222 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 222 18 222 20 , srcInfoPoints = [] } "<>"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 1 230 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 224 1 224 9 , SrcSpan "tests/examples/DerivingVia.hs" 224 68 224 73 , SrcSpan "tests/examples/DerivingVia.hs" 225 3 225 3 , SrcSpan "tests/examples/DerivingVia.hs" 230 1 230 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 10 224 67 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 10 224 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 224 10 224 11 , SrcSpan "tests/examples/DerivingVia.hs" 224 24 224 25 , SrcSpan "tests/examples/DerivingVia.hs" 224 34 224 35 , SrcSpan "tests/examples/DerivingVia.hs" 224 36 224 38 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 11 224 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 11 224 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 11 224 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 11 224 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 11 224 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 23 224 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 23 224 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 26 224 34 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 26 224 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 26 224 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 26 224 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 26 224 32 , srcInfoPoints = [] } "Monoid"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 33 224 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 33 224 34 , srcInfoPoints = [] } "m"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 39 224 67 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 39 224 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 39 224 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 39 224 45 , srcInfoPoints = [] } "Monoid"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 46 224 67 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 224 46 224 47 , SrcSpan "tests/examples/DerivingVia.hs" 224 66 224 67 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 47 224 66 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 47 224 64 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 47 224 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 47 224 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 47 224 62 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 63 224 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 63 224 64 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 65 224 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 224 65 224 66 , srcInfoPoints = [] } "m")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 3 225 23 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 3 225 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 3 225 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 3 225 9 , srcInfoPoints = [] } "mempty")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 10 225 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 225 10 225 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 12 225 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 12 225 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 12 225 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 12 225 16 , srcInfoPoints = [] } "pure"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 17 225 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 17 225 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 225 17 225 23 , srcInfoPoints = [] } "mempty"))))) Nothing) ]) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 1 231 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 230 1 230 6 , SrcSpan "tests/examples/DerivingVia.hs" 230 17 230 22 , SrcSpan "tests/examples/DerivingVia.hs" 231 3 231 3 , SrcSpan "tests/examples/DerivingVia.hs" 233 1 233 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 7 230 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 7 230 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 7 230 14 , srcInfoPoints = [] } "Pointed")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 15 230 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 230 15 230 16 , srcInfoPoints = [] } "p"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 3 231 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 231 11 231 13 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 3 231 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 231 11 231 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 3 231 10 , srcInfoPoints = [] } "pointed" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 14 231 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 231 16 231 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 14 231 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 14 231 15 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 19 231 22 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 19 231 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 19 231 20 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 21 231 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 231 21 231 22 , srcInfoPoints = [] } "a"))))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 1 234 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 233 23 233 24 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 1 233 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 9 233 22 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 9 233 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 9 233 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 9 233 18 , srcInfoPoints = [] } "WrapMonad")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 19 233 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 19 233 20 , srcInfoPoints = [] } "f"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 21 233 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 21 233 22 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 25 233 43 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 25 233 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 25 233 37 , srcInfoPoints = [] } "WrappedMonad") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 38 233 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 233 38 233 39 , SrcSpan "tests/examples/DerivingVia.hs" 233 42 233 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 39 233 42 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 39 233 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 39 233 40 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 41 233 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 233 41 233 42 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 3 234 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 234 3 234 11 , SrcSpan "tests/examples/DerivingVia.hs" 234 20 234 21 , SrcSpan "tests/examples/DerivingVia.hs" 234 28 234 29 , SrcSpan "tests/examples/DerivingVia.hs" 234 35 234 36 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 12 234 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 21 234 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 21 234 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 21 234 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 21 234 28 , srcInfoPoints = [] } "Pointed"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 30 234 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 30 234 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 30 234 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 234 30 234 35 , srcInfoPoints = [] } "Monad"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 1 239 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 236 1 236 9 , SrcSpan "tests/examples/DerivingVia.hs" 236 56 236 61 , SrcSpan "tests/examples/DerivingVia.hs" 237 3 237 3 , SrcSpan "tests/examples/DerivingVia.hs" 239 1 239 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 10 236 55 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 10 236 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 236 10 236 11 , SrcSpan "tests/examples/DerivingVia.hs" 236 18 236 19 , SrcSpan "tests/examples/DerivingVia.hs" 236 29 236 30 , SrcSpan "tests/examples/DerivingVia.hs" 236 31 236 33 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 11 236 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 11 236 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 11 236 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 11 236 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 11 236 16 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 17 236 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 17 236 18 , srcInfoPoints = [] } "m"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 20 236 29 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 20 236 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 20 236 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 20 236 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 20 236 27 , srcInfoPoints = [] } "Pointed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 28 236 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 28 236 29 , srcInfoPoints = [] } "m"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 34 236 55 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 34 236 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 34 236 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 34 236 41 , srcInfoPoints = [] } "Functor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 42 236 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 236 42 236 43 , SrcSpan "tests/examples/DerivingVia.hs" 236 54 236 55 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 43 236 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 43 236 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 43 236 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 43 236 52 , srcInfoPoints = [] } "WrapMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 53 236 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 236 53 236 54 , srcInfoPoints = [] } "m")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 3 237 15 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 3 237 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 3 237 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 3 237 7 , srcInfoPoints = [] } "fmap")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 8 237 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 237 8 237 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 10 237 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 10 237 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 237 10 237 15 , srcInfoPoints = [] } "liftM")))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 1 244 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 239 1 239 9 , SrcSpan "tests/examples/DerivingVia.hs" 239 60 239 65 , SrcSpan "tests/examples/DerivingVia.hs" 240 3 240 3 , SrcSpan "tests/examples/DerivingVia.hs" 241 3 241 3 , SrcSpan "tests/examples/DerivingVia.hs" 244 1 244 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 10 239 59 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 10 239 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 239 10 239 11 , SrcSpan "tests/examples/DerivingVia.hs" 239 18 239 19 , SrcSpan "tests/examples/DerivingVia.hs" 239 29 239 30 , SrcSpan "tests/examples/DerivingVia.hs" 239 31 239 33 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 11 239 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 11 239 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 11 239 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 11 239 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 11 239 16 , srcInfoPoints = [] } "Monad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 17 239 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 17 239 18 , srcInfoPoints = [] } "m"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 20 239 29 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 20 239 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 20 239 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 20 239 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 20 239 27 , srcInfoPoints = [] } "Pointed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 28 239 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 28 239 29 , srcInfoPoints = [] } "m"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 34 239 59 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 34 239 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 34 239 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 34 239 45 , srcInfoPoints = [] } "Applicative"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 46 239 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 239 46 239 47 , SrcSpan "tests/examples/DerivingVia.hs" 239 58 239 59 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 47 239 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 47 239 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 47 239 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 47 239 56 , srcInfoPoints = [] } "WrapMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 57 239 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 239 57 239 58 , srcInfoPoints = [] } "m")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 3 240 18 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 3 240 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 3 240 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 3 240 7 , srcInfoPoints = [] } "pure")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 9 240 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 240 9 240 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 11 240 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 11 240 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 240 11 240 18 , srcInfoPoints = [] } "pointed")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 3 241 13 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 3 241 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 3 241 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 241 3 241 4 , SrcSpan "tests/examples/DerivingVia.hs" 241 4 241 7 , SrcSpan "tests/examples/DerivingVia.hs" 241 7 241 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 4 241 7 , srcInfoPoints = [] } "<*>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 9 241 13 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 241 9 241 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 11 241 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 11 241 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 241 11 241 13 , srcInfoPoints = [] } "ap")))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 1 247 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 244 15 244 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 1 244 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 6 244 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 6 244 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 6 244 12 , srcInfoPoints = [] } "Sorted")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 13 244 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 13 244 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 17 244 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 17 244 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 17 244 23 , srcInfoPoints = [] } "Sorted") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 24 244 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 24 244 25 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 26 244 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 26 244 27 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 28 244 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 244 28 244 29 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 3 245 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 245 3 245 11 , SrcSpan "tests/examples/DerivingVia.hs" 245 12 245 13 , SrcSpan "tests/examples/DerivingVia.hs" 245 20 245 21 , SrcSpan "tests/examples/DerivingVia.hs" 245 33 245 34 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 5 246 8 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 9 246 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 246 9 246 10 , SrcSpan "tests/examples/DerivingVia.hs" 246 26 246 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 10 246 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 10 246 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 10 246 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 10 246 19 , srcInfoPoints = [] } "WrapMonad"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 20 246 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 20 246 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 246 20 246 26 , srcInfoPoints = [] } "Sorted"))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 13 245 20 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 13 245 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 13 245 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 13 245 20 , srcInfoPoints = [] } "Functor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 22 245 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 22 245 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 22 245 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 245 22 245 33 , srcInfoPoints = [] } "Applicative"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 3 247 58 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 247 3 247 11 , SrcSpan "tests/examples/DerivingVia.hs" 247 12 247 13 , SrcSpan "tests/examples/DerivingVia.hs" 247 16 247 17 , SrcSpan "tests/examples/DerivingVia.hs" 247 28 247 29 , SrcSpan "tests/examples/DerivingVia.hs" 247 38 247 39 , SrcSpan "tests/examples/DerivingVia.hs" 247 49 247 50 , SrcSpan "tests/examples/DerivingVia.hs" 247 57 247 58 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 5 248 8 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 9 248 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 248 9 248 10 , SrcSpan "tests/examples/DerivingVia.hs" 248 34 248 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 10 248 34 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 10 248 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 10 248 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 10 248 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 10 248 25 , srcInfoPoints = [] } "WrapApplicative"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 26 248 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 26 248 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 26 248 32 , srcInfoPoints = [] } "Sorted")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 33 248 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 248 33 248 34 , srcInfoPoints = [] } "a")))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 13 247 16 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 13 247 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 13 247 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 13 247 16 , srcInfoPoints = [] } "Num"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 18 247 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 18 247 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 18 247 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 18 247 28 , srcInfoPoints = [] } "Fractional"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 30 247 38 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 30 247 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 30 247 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 30 247 38 , srcInfoPoints = [] } "Floating"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 40 247 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 40 247 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 40 247 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 40 247 49 , srcInfoPoints = [] } "Semigroup"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 51 247 57 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 51 247 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 51 247 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 247 51 247 57 , srcInfoPoints = [] } "Monoid"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 1 258 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 251 1 251 9 , SrcSpan "tests/examples/DerivingVia.hs" 251 23 251 28 , SrcSpan "tests/examples/DerivingVia.hs" 252 3 252 3 , SrcSpan "tests/examples/DerivingVia.hs" 253 3 253 3 , SrcSpan "tests/examples/DerivingVia.hs" 258 1 258 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 10 251 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 10 251 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 10 251 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 10 251 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 10 251 15 , srcInfoPoints = [] } "Monad"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 16 251 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 16 251 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 251 16 251 22 , srcInfoPoints = [] } "Sorted"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 3 252 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 9 252 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 3 252 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 9 252 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 3 252 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 3 252 4 , SrcSpan "tests/examples/DerivingVia.hs" 252 4 252 7 , SrcSpan "tests/examples/DerivingVia.hs" 252 7 252 8 ] } ">>=" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 12 252 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 21 252 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 12 252 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 12 252 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 12 252 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 12 252 18 , srcInfoPoints = [] } "Sorted"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 19 252 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 19 252 20 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 24 252 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 40 252 42 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 24 252 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 24 252 25 , SrcSpan "tests/examples/DerivingVia.hs" 252 38 252 39 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 25 252 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 252 27 252 29 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 25 252 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 25 252 26 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 30 252 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 30 252 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 30 252 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 30 252 36 , srcInfoPoints = [] } "Sorted"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 37 252 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 37 252 38 , srcInfoPoints = [] } "b"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 43 252 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 43 252 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 43 252 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 43 252 49 , srcInfoPoints = [] } "Sorted"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 50 252 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 252 50 252 51 , srcInfoPoints = [] } "b")))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 256 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 253 40 253 45 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 256 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 253 40 253 45 ] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 256 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 253 40 253 45 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 253 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 253 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 3 253 9 , srcInfoPoints = [] } "Sorted")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 10 253 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 10 253 11 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 12 253 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 12 253 13 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 14 253 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 14 253 15 , srcInfoPoints = [] } "c") ]) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 16 253 19 , srcInfoPoints = [] } ">>=") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 20 253 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 20 253 21 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 22 253 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 253 22 253 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 33 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 24 253 30 , srcInfoPoints = [] } "Sorted"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 31 253 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 31 253 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 31 253 33 , srcInfoPoints = [] } "a'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 34 253 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 34 253 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 34 253 36 , srcInfoPoints = [] } "b'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 37 253 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 37 253 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 253 37 253 39 , srcInfoPoints = [] } "c'"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 5 256 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 254 5 254 5 , SrcSpan "tests/examples/DerivingVia.hs" 255 5 255 5 , SrcSpan "tests/examples/DerivingVia.hs" 256 5 256 5 , SrcSpan "tests/examples/DerivingVia.hs" 258 1 258 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 5 254 26 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 5 254 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 5 254 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 5 254 11 , srcInfoPoints = [] } "Sorted")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 12 254 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 12 254 14 , srcInfoPoints = [] } "a'") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 15 254 16 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 18 254 19 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 21 254 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 254 21 254 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 23 254 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 23 254 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 23 254 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 23 254 24 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 25 254 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 25 254 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 254 25 254 26 , srcInfoPoints = [] } "a"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 5 255 26 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 5 255 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 5 255 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 5 255 11 , srcInfoPoints = [] } "Sorted")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 12 255 13 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 15 255 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 15 255 17 , srcInfoPoints = [] } "b'") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 18 255 19 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 21 255 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 255 21 255 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 23 255 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 23 255 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 23 255 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 23 255 24 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 25 255 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 25 255 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 255 25 255 26 , srcInfoPoints = [] } "b"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 5 256 26 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 5 256 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 5 256 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 5 256 11 , srcInfoPoints = [] } "Sorted")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 12 256 13 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 15 256 16 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 18 256 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 18 256 20 , srcInfoPoints = [] } "c'") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 21 256 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 256 21 256 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 23 256 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 23 256 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 23 256 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 23 256 24 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 25 256 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 25 256 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 256 25 256 26 , srcInfoPoints = [] } "c"))))) Nothing ])) ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 1 265 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 258 1 258 9 , SrcSpan "tests/examples/DerivingVia.hs" 258 25 258 30 , SrcSpan "tests/examples/DerivingVia.hs" 259 3 259 3 , SrcSpan "tests/examples/DerivingVia.hs" 260 3 260 3 , SrcSpan "tests/examples/DerivingVia.hs" 265 1 265 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 10 258 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 10 258 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 10 258 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 10 258 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 10 258 17 , srcInfoPoints = [] } "Pointed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 18 258 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 18 258 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 258 18 258 24 , srcInfoPoints = [] } "Sorted"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 3 259 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 259 11 259 13 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 3 259 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 259 11 259 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 3 259 10 , srcInfoPoints = [] } "pointed" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 14 259 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 259 16 259 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 14 259 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 14 259 15 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 19 259 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 19 259 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 19 259 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 19 259 25 , srcInfoPoints = [] } "Sorted"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 26 259 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 259 26 259 27 , srcInfoPoints = [] } "a"))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 3 260 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 3 260 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 3 260 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 3 260 10 , srcInfoPoints = [] } "pointed") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 11 260 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 11 260 12 , srcInfoPoints = [] } "a") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 13 260 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 260 13 260 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 23 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 15 260 21 , srcInfoPoints = [] } "Sorted"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 22 260 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 22 260 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 22 260 23 , srcInfoPoints = [] } "a")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 24 260 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 24 260 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 24 260 25 , srcInfoPoints = [] } "a")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 26 260 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 26 260 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 260 26 260 27 , srcInfoPoints = [] } "a"))))) Nothing ]) ]) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 1 266 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 265 1 265 6 , SrcSpan "tests/examples/DerivingVia.hs" 265 16 265 21 , SrcSpan "tests/examples/DerivingVia.hs" 266 3 266 3 , SrcSpan "tests/examples/DerivingVia.hs" 268 1 268 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 7 265 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 7 265 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 7 265 13 , srcInfoPoints = [] } "IsZero")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 14 265 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 265 14 265 15 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 3 266 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 266 10 266 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 3 266 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 266 10 266 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 3 266 9 , srcInfoPoints = [] } "isZero" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 13 266 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 266 15 266 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 13 266 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 13 266 14 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 18 266 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 18 266 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 266 18 266 22 , srcInfoPoints = [] } "Bool"))))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 1 268 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 268 25 268 26 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 1 268 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 9 268 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 9 268 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 9 268 21 , srcInfoPoints = [] } "WrappedNumEq")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 23 268 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 23 268 24 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 27 268 41 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 27 268 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 27 268 39 , srcInfoPoints = [] } "WrappedNumEq") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 40 268 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 268 40 268 41 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 1 269 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 269 25 269 26 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 1 269 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 9 269 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 9 269 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 9 269 20 , srcInfoPoints = [] } "WrappedShow")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 23 269 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 23 269 24 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 27 269 41 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 27 269 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 27 269 38 , srcInfoPoints = [] } "WrappedShow") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 40 269 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 269 40 269 41 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 1 270 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 270 25 270 26 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 1 270 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 9 270 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 9 270 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 9 270 22 , srcInfoPoints = [] } "WrappedNumEq2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 23 270 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 23 270 24 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 27 270 42 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 27 270 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 27 270 40 , srcInfoPoints = [] } "WrappedNumEq2") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 41 270 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 270 41 270 42 , srcInfoPoints = [] } "a") ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 1 276 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 272 1 272 9 , SrcSpan "tests/examples/DerivingVia.hs" 272 51 272 56 , SrcSpan "tests/examples/DerivingVia.hs" 273 3 273 3 , SrcSpan "tests/examples/DerivingVia.hs" 274 3 274 3 , SrcSpan "tests/examples/DerivingVia.hs" 276 1 276 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 10 272 50 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 10 272 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 272 10 272 11 , SrcSpan "tests/examples/DerivingVia.hs" 272 16 272 17 , SrcSpan "tests/examples/DerivingVia.hs" 272 22 272 23 , SrcSpan "tests/examples/DerivingVia.hs" 272 24 272 26 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 11 272 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 11 272 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 11 272 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 11 272 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 11 272 14 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 15 272 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 15 272 16 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 18 272 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 18 272 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 18 272 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 18 272 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 18 272 20 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 21 272 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 21 272 22 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 27 272 50 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 27 272 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 27 272 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 27 272 33 , srcInfoPoints = [] } "IsZero"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 34 272 50 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 272 34 272 35 , SrcSpan "tests/examples/DerivingVia.hs" 272 49 272 50 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 35 272 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 35 272 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 35 272 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 35 272 47 , srcInfoPoints = [] } "WrappedNumEq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 48 272 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 272 48 272 49 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 3 273 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 273 10 273 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 3 273 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 273 10 273 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 3 273 9 , srcInfoPoints = [] } "isZero" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 13 273 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 273 28 273 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 13 273 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 13 273 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 13 273 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 13 273 25 , srcInfoPoints = [] } "WrappedNumEq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 26 273 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 26 273 27 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 31 273 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 31 273 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 273 31 273 35 , srcInfoPoints = [] } "Bool"))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 3 274 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 3 274 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 3 274 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 3 274 9 , srcInfoPoints = [] } "isZero") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 10 274 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 274 10 274 11 , SrcSpan "tests/examples/DerivingVia.hs" 274 25 274 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 11 274 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 11 274 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 11 274 23 , srcInfoPoints = [] } "WrappedNumEq")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 24 274 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 24 274 25 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 27 274 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 274 27 274 28 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 29 274 35 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 29 274 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 29 274 30 , srcInfoPoints = [] } 0 "0")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 31 274 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 31 274 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 31 274 33 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 34 274 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 34 274 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 274 34 274 35 , srcInfoPoints = [] } "a"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 1 280 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 1 276 9 , SrcSpan "tests/examples/DerivingVia.hs" 276 43 276 48 , SrcSpan "tests/examples/DerivingVia.hs" 277 3 277 3 , SrcSpan "tests/examples/DerivingVia.hs" 278 3 278 3 , SrcSpan "tests/examples/DerivingVia.hs" 280 1 280 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 42 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 17 276 19 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 17 276 19 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 17 276 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 17 276 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 10 276 14 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 15 276 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 15 276 16 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 20 276 42 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 20 276 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 20 276 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 20 276 26 , srcInfoPoints = [] } "IsZero"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 27 276 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 276 27 276 28 , SrcSpan "tests/examples/DerivingVia.hs" 276 41 276 42 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 28 276 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 28 276 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 28 276 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 28 276 39 , srcInfoPoints = [] } "WrappedShow"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 40 276 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 276 40 276 41 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 3 277 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 277 10 277 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 3 277 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 277 10 277 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 3 277 9 , srcInfoPoints = [] } "isZero" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 13 277 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 277 27 277 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 13 277 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 13 277 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 13 277 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 13 277 24 , srcInfoPoints = [] } "WrappedShow"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 25 277 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 25 277 26 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 30 277 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 30 277 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 277 30 277 34 , srcInfoPoints = [] } "Bool"))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 3 278 41 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 3 278 41 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 3 278 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 3 278 9 , srcInfoPoints = [] } "isZero") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 10 278 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 278 10 278 11 , SrcSpan "tests/examples/DerivingVia.hs" 278 24 278 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 11 278 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 11 278 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 11 278 22 , srcInfoPoints = [] } "WrappedShow")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 23 278 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 23 278 24 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 26 278 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 278 26 278 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 28 278 41 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 28 278 31 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 28 278 31 , srcInfoPoints = [] } "0" "0")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 32 278 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 32 278 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 32 278 34 , srcInfoPoints = [] } "=="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 35 278 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 35 278 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 35 278 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 35 278 39 , srcInfoPoints = [] } "show"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 40 278 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 40 278 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 278 40 278 41 , srcInfoPoints = [] } "a")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 1 284 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 280 1 280 9 , SrcSpan "tests/examples/DerivingVia.hs" 280 52 280 57 , SrcSpan "tests/examples/DerivingVia.hs" 281 3 281 3 , SrcSpan "tests/examples/DerivingVia.hs" 282 3 282 3 , SrcSpan "tests/examples/DerivingVia.hs" 284 1 284 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 10 280 51 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 10 280 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 280 10 280 11 , SrcSpan "tests/examples/DerivingVia.hs" 280 16 280 17 , SrcSpan "tests/examples/DerivingVia.hs" 280 22 280 23 , SrcSpan "tests/examples/DerivingVia.hs" 280 24 280 26 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 11 280 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 11 280 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 11 280 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 11 280 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 11 280 14 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 15 280 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 15 280 16 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 18 280 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 18 280 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 18 280 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 18 280 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 18 280 20 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 21 280 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 21 280 22 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 27 280 51 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 27 280 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 27 280 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 27 280 33 , srcInfoPoints = [] } "IsZero"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 34 280 51 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 280 34 280 35 , SrcSpan "tests/examples/DerivingVia.hs" 280 50 280 51 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 35 280 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 35 280 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 35 280 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 35 280 48 , srcInfoPoints = [] } "WrappedNumEq2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 49 280 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 280 49 280 50 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 3 281 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 281 10 281 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 3 281 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 281 10 281 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 3 281 9 , srcInfoPoints = [] } "isZero" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 13 281 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 281 29 281 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 13 281 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 13 281 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 13 281 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 13 281 26 , srcInfoPoints = [] } "WrappedNumEq2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 27 281 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 27 281 28 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 32 281 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 32 281 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 281 32 281 36 , srcInfoPoints = [] } "Bool"))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 3 282 40 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 3 282 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 3 282 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 3 282 9 , srcInfoPoints = [] } "isZero") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 10 282 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 282 10 282 11 , SrcSpan "tests/examples/DerivingVia.hs" 282 26 282 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 11 282 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 11 282 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 11 282 24 , srcInfoPoints = [] } "WrappedNumEq2")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 25 282 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 25 282 26 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 28 282 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 282 28 282 29 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 30 282 40 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 30 282 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 30 282 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 30 282 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 30 282 31 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 32 282 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 32 282 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 32 282 33 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 34 282 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 34 282 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 34 282 35 , srcInfoPoints = [] } "a")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 36 282 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 36 282 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 36 282 38 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 39 282 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 39 282 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 282 39 282 40 , srcInfoPoints = [] } "a"))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 1 286 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 284 13 284 14 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 1 284 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 9 284 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 9 284 12 , srcInfoPoints = [] } "INT")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 15 284 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 15 284 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 15 284 18 , srcInfoPoints = [] } "INT") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 19 284 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 19 284 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 284 19 284 22 , srcInfoPoints = [] } "Int")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 3 285 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 285 3 285 11 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 12 285 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 20 285 24 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 20 285 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 20 285 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 285 20 285 24 , srcInfoPoints = [] } "Show"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 3 286 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 286 3 286 11 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 19 286 22 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 23 286 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 286 23 286 24 , SrcSpan "tests/examples/DerivingVia.hs" 286 40 286 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 24 286 40 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 24 286 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 24 286 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 24 286 36 , srcInfoPoints = [] } "WrappedNumEq"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 37 286 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 37 286 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 37 286 40 , srcInfoPoints = [] } "Int"))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 12 286 18 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 12 286 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 12 286 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 286 12 286 18 , srcInfoPoints = [] } "IsZero"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 1 288 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 288 14 288 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 1 288 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 9 288 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 9 288 13 , srcInfoPoints = [] } "VOID")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 16 288 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 16 288 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 16 288 20 , srcInfoPoints = [] } "VOID") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 21 288 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 21 288 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 21 288 25 , srcInfoPoints = [] } "Void")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 26 288 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 288 26 288 34 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 42 288 45 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 46 288 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 288 46 288 47 , SrcSpan "tests/examples/DerivingVia.hs" 288 63 288 64 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 47 288 63 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 47 288 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 47 288 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 47 288 58 , srcInfoPoints = [] } "WrappedShow"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 59 288 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 59 288 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 59 288 63 , srcInfoPoints = [] } "Void"))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 35 288 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 35 288 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 35 288 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 288 35 288 41 , srcInfoPoints = [] } "IsZero"))) ] ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 1 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 293 1 293 6 , SrcSpan "tests/examples/DerivingVia.hs" 293 38 293 43 , SrcSpan "tests/examples/DerivingVia.hs" 294 3 294 3 , SrcSpan "tests/examples/DerivingVia.hs" 296 3 296 3 , SrcSpan "tests/examples/DerivingVia.hs" 303 1 303 0 ] } (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 293 19 293 21 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 293 19 293 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 293 19 293 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 293 19 293 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 7 293 16 , srcInfoPoints = [] } "Bifunctor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 17 293 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 17 293 18 , srcInfoPoints = [] } "p")))))) (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 22 293 37 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 22 293 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 22 293 35 , srcInfoPoints = [] } "Biapplicative")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 36 293 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 293 36 293 37 , srcInfoPoints = [] } "p"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 3 294 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 294 10 294 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 3 294 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 294 10 294 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 3 294 9 , srcInfoPoints = [] } "bipure" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 13 294 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 294 15 294 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 13 294 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 13 294 14 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 18 294 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 294 20 294 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 18 294 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 18 294 19 , srcInfoPoints = [] } "b")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 23 294 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 23 294 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 23 294 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 23 294 24 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 25 294 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 25 294 26 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 27 294 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 294 27 294 28 , srcInfoPoints = [] } "b")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 296 3 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 297 5 297 7 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 296 3 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 297 5 297 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 296 3 296 11 , srcInfoPoints = [] } "biliftA2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 8 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 298 5 298 7 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 8 297 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 297 8 297 9 , SrcSpan "tests/examples/DerivingVia.hs" 297 22 297 23 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 9 297 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 297 12 297 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 9 297 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 9 297 10 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 15 297 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 297 18 297 20 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 15 297 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 15 297 16 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 21 297 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 297 21 297 22 , srcInfoPoints = [] } "c"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 8 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 299 5 299 7 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 8 298 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 298 8 298 9 , SrcSpan "tests/examples/DerivingVia.hs" 298 23 298 24 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 9 298 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 298 12 298 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 9 298 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 9 298 11 , srcInfoPoints = [] } "a'")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 15 298 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 298 18 298 20 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 15 298 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 15 298 17 , srcInfoPoints = [] } "b'")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 21 298 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 298 21 298 23 , srcInfoPoints = [] } "c'"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 8 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 300 5 300 7 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 8 299 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 8 299 11 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 8 299 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 8 299 9 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 10 299 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 10 299 11 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 12 299 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 299 12 299 14 , srcInfoPoints = [] } "a'"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 8 301 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 301 5 301 7 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 8 300 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 8 300 11 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 8 300 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 8 300 9 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 10 300 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 10 300 11 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 12 300 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 300 12 300 14 , srcInfoPoints = [] } "b'"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 8 301 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 8 301 11 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 8 301 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 8 301 9 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 10 301 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 10 301 11 , srcInfoPoints = [] } "c"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 12 301 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 301 12 301 14 , srcInfoPoints = [] } "c'")))))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 1 309 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 303 1 303 9 , SrcSpan "tests/examples/DerivingVia.hs" 303 28 303 33 , SrcSpan "tests/examples/DerivingVia.hs" 304 3 304 3 , SrcSpan "tests/examples/DerivingVia.hs" 306 3 306 3 , SrcSpan "tests/examples/DerivingVia.hs" 309 1 309 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 10 303 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 10 303 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 10 303 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 10 303 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 10 303 23 , srcInfoPoints = [] } "Biapplicative"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 25 , SrcSpan "tests/examples/DerivingVia.hs" 303 25 303 26 , SrcSpan "tests/examples/DerivingVia.hs" 303 26 303 27 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 25 , SrcSpan "tests/examples/DerivingVia.hs" 303 25 303 26 , SrcSpan "tests/examples/DerivingVia.hs" 303 26 303 27 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 303 24 303 25 , SrcSpan "tests/examples/DerivingVia.hs" 303 25 303 26 , SrcSpan "tests/examples/DerivingVia.hs" 303 26 303 27 ] } Boxed 2))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 3 304 15 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 3 304 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 3 304 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 3 304 9 , srcInfoPoints = [] } "bipure")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 10 304 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 304 10 304 11 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 13 , SrcSpan "tests/examples/DerivingVia.hs" 304 13 304 14 , SrcSpan "tests/examples/DerivingVia.hs" 304 14 304 15 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 13 , SrcSpan "tests/examples/DerivingVia.hs" 304 13 304 14 , SrcSpan "tests/examples/DerivingVia.hs" 304 14 304 15 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 304 12 304 13 , SrcSpan "tests/examples/DerivingVia.hs" 304 13 304 14 , SrcSpan "tests/examples/DerivingVia.hs" 304 14 304 15 ] } Boxed 2)))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 3 307 22 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 3 307 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 3 307 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 3 306 11 , srcInfoPoints = [] } "biliftA2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 12 306 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 12 306 13 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 14 306 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 14 306 16 , srcInfoPoints = [] } "f'") , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 17 306 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 306 17 306 18 , SrcSpan "tests/examples/DerivingVia.hs" 306 19 306 20 , SrcSpan "tests/examples/DerivingVia.hs" 306 23 306 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 18 306 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 18 306 19 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 21 306 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 21 306 23 , srcInfoPoints = [] } "a'") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 25 306 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 306 25 306 26 , SrcSpan "tests/examples/DerivingVia.hs" 306 27 306 28 , SrcSpan "tests/examples/DerivingVia.hs" 306 31 306 32 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 26 306 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 26 306 27 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 29 306 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 29 306 31 , srcInfoPoints = [] } "b'") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 306 33 307 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 306 33 306 34 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 5 307 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 307 5 307 6 , SrcSpan "tests/examples/DerivingVia.hs" 307 11 307 12 , SrcSpan "tests/examples/DerivingVia.hs" 307 21 307 22 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 6 307 11 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 6 307 9 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 6 307 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 6 307 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 6 307 7 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 8 307 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 8 307 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 8 307 9 , srcInfoPoints = [] } "a")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 10 307 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 10 307 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 10 307 11 , srcInfoPoints = [] } "b"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 13 307 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 13 307 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 13 307 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 13 307 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 13 307 15 , srcInfoPoints = [] } "f'"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 16 307 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 16 307 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 16 307 18 , srcInfoPoints = [] } "a'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 19 307 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 19 307 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 307 19 307 21 , srcInfoPoints = [] } "b'"))) ])) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 1 310 50 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 309 25 309 26 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 1 309 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 9 309 24 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 9 309 22 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 9 309 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 9 309 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 9 309 18 , srcInfoPoints = [] } "WrapBiapp")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 19 309 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 19 309 20 , srcInfoPoints = [] } "p"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 21 309 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 21 309 22 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 23 309 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 23 309 24 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 27 309 43 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 27 309 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 27 309 35 , srcInfoPoints = [] } "WrapBiap") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 36 309 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 309 36 309 37 , SrcSpan "tests/examples/DerivingVia.hs" 309 42 309 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 37 309 42 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 37 309 40 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 37 309 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 37 309 38 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 39 309 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 39 309 40 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 41 309 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 309 41 309 42 , srcInfoPoints = [] } "b"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 3 310 50 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 310 3 310 11 , SrcSpan "tests/examples/DerivingVia.hs" 310 20 310 21 , SrcSpan "tests/examples/DerivingVia.hs" 310 30 310 31 , SrcSpan "tests/examples/DerivingVia.hs" 310 45 310 46 , SrcSpan "tests/examples/DerivingVia.hs" 310 49 310 50 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 12 310 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 21 310 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 21 310 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 21 310 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 21 310 30 , srcInfoPoints = [] } "Bifunctor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 32 310 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 32 310 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 32 310 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 32 310 45 , srcInfoPoints = [] } "Biapplicative"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 47 310 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 47 310 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 47 310 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 310 47 310 49 , srcInfoPoints = [] } "Eq"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 1 321 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 312 1 312 9 , SrcSpan "tests/examples/DerivingVia.hs" 312 67 312 72 , SrcSpan "tests/examples/DerivingVia.hs" 313 3 313 3 , SrcSpan "tests/examples/DerivingVia.hs" 314 3 314 3 , SrcSpan "tests/examples/DerivingVia.hs" 315 3 315 3 , SrcSpan "tests/examples/DerivingVia.hs" 316 3 316 3 , SrcSpan "tests/examples/DerivingVia.hs" 317 3 317 3 , SrcSpan "tests/examples/DerivingVia.hs" 318 3 318 3 , SrcSpan "tests/examples/DerivingVia.hs" 319 3 319 3 , SrcSpan "tests/examples/DerivingVia.hs" 321 1 321 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 10 312 66 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 10 312 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 312 10 312 11 , SrcSpan "tests/examples/DerivingVia.hs" 312 26 312 27 , SrcSpan "tests/examples/DerivingVia.hs" 312 33 312 34 , SrcSpan "tests/examples/DerivingVia.hs" 312 40 312 41 , SrcSpan "tests/examples/DerivingVia.hs" 312 42 312 44 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 11 312 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 11 312 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 11 312 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 11 312 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 11 312 24 , srcInfoPoints = [] } "Biapplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 25 312 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 25 312 26 , srcInfoPoints = [] } "p"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 28 312 33 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 28 312 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 28 312 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 28 312 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 28 312 31 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 32 312 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 32 312 33 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 35 312 40 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 35 312 40 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 35 312 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 35 312 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 35 312 38 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 39 312 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 39 312 40 , srcInfoPoints = [] } "b"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 45 312 66 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 45 312 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 45 312 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 45 312 48 , srcInfoPoints = [] } "Num"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 49 312 66 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 312 49 312 50 , SrcSpan "tests/examples/DerivingVia.hs" 312 65 312 66 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 65 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 63 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 50 312 59 , srcInfoPoints = [] } "WrapBiapp"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 60 312 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 60 312 61 , srcInfoPoints = [] } "p"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 62 312 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 62 312 63 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 64 312 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 312 64 312 65 , srcInfoPoints = [] } "b")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 3 313 25 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 3 313 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 3 313 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 3 313 4 , SrcSpan "tests/examples/DerivingVia.hs" 313 4 313 5 , SrcSpan "tests/examples/DerivingVia.hs" 313 5 313 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 4 313 5 , srcInfoPoints = [] } "+")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 7 313 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 7 313 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 9 313 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 9 313 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 9 313 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 9 313 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 9 313 17 , srcInfoPoints = [] } "biliftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 18 313 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 18 313 19 , SrcSpan "tests/examples/DerivingVia.hs" 313 19 313 20 , SrcSpan "tests/examples/DerivingVia.hs" 313 20 313 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 18 313 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 18 313 19 , SrcSpan "tests/examples/DerivingVia.hs" 313 19 313 20 , SrcSpan "tests/examples/DerivingVia.hs" 313 20 313 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 19 313 20 , srcInfoPoints = [] } "+")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 22 313 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 22 313 23 , SrcSpan "tests/examples/DerivingVia.hs" 313 23 313 24 , SrcSpan "tests/examples/DerivingVia.hs" 313 24 313 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 22 313 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 313 22 313 23 , SrcSpan "tests/examples/DerivingVia.hs" 313 23 313 24 , SrcSpan "tests/examples/DerivingVia.hs" 313 24 313 25 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 313 23 313 24 , srcInfoPoints = [] } "+"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 3 314 25 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 3 314 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 3 314 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 3 314 4 , SrcSpan "tests/examples/DerivingVia.hs" 314 4 314 5 , SrcSpan "tests/examples/DerivingVia.hs" 314 5 314 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 4 314 5 , srcInfoPoints = [] } "-")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 7 314 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 7 314 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 9 314 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 9 314 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 9 314 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 9 314 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 9 314 17 , srcInfoPoints = [] } "biliftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 18 314 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 18 314 19 , SrcSpan "tests/examples/DerivingVia.hs" 314 19 314 20 , SrcSpan "tests/examples/DerivingVia.hs" 314 20 314 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 18 314 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 18 314 19 , SrcSpan "tests/examples/DerivingVia.hs" 314 19 314 20 , SrcSpan "tests/examples/DerivingVia.hs" 314 20 314 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 19 314 20 , srcInfoPoints = [] } "*")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 22 314 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 22 314 23 , SrcSpan "tests/examples/DerivingVia.hs" 314 23 314 24 , SrcSpan "tests/examples/DerivingVia.hs" 314 24 314 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 22 314 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 314 22 314 23 , SrcSpan "tests/examples/DerivingVia.hs" 314 23 314 24 , SrcSpan "tests/examples/DerivingVia.hs" 314 24 314 25 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 314 23 314 24 , srcInfoPoints = [] } "*"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 3 315 25 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 3 315 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 3 315 6 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 3 315 4 , SrcSpan "tests/examples/DerivingVia.hs" 315 4 315 5 , SrcSpan "tests/examples/DerivingVia.hs" 315 5 315 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 4 315 5 , srcInfoPoints = [] } "*")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 7 315 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 7 315 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 9 315 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 9 315 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 9 315 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 9 315 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 9 315 17 , srcInfoPoints = [] } "biliftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 18 315 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 18 315 19 , SrcSpan "tests/examples/DerivingVia.hs" 315 19 315 20 , SrcSpan "tests/examples/DerivingVia.hs" 315 20 315 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 18 315 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 18 315 19 , SrcSpan "tests/examples/DerivingVia.hs" 315 19 315 20 , SrcSpan "tests/examples/DerivingVia.hs" 315 20 315 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 19 315 20 , srcInfoPoints = [] } "*")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 22 315 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 22 315 23 , SrcSpan "tests/examples/DerivingVia.hs" 315 23 315 24 , SrcSpan "tests/examples/DerivingVia.hs" 315 24 315 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 22 315 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 315 22 315 23 , SrcSpan "tests/examples/DerivingVia.hs" 315 23 315 24 , SrcSpan "tests/examples/DerivingVia.hs" 315 24 315 25 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 315 23 315 24 , srcInfoPoints = [] } "*"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 3 316 31 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 3 316 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 3 316 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 3 316 9 , srcInfoPoints = [] } "negate")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 10 316 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 316 10 316 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 12 316 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 12 316 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 12 316 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 12 316 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 12 316 17 , srcInfoPoints = [] } "bimap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 18 316 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 18 316 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 18 316 24 , srcInfoPoints = [] } "negate")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 25 316 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 25 316 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 316 25 316 31 , srcInfoPoints = [] } "negate"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 3 317 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 3 317 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 3 317 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 3 317 6 , srcInfoPoints = [] } "abs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 7 317 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 317 7 317 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 9 317 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 9 317 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 9 317 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 9 317 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 9 317 14 , srcInfoPoints = [] } "bimap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 15 317 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 15 317 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 15 317 18 , srcInfoPoints = [] } "abs")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 19 317 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 19 317 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 317 19 317 22 , srcInfoPoints = [] } "abs"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 3 318 31 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 3 318 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 3 318 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 3 318 9 , srcInfoPoints = [] } "signum")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 10 318 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 318 10 318 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 12 318 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 12 318 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 12 318 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 12 318 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 12 318 17 , srcInfoPoints = [] } "bimap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 18 318 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 18 318 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 18 318 24 , srcInfoPoints = [] } "signum")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 25 318 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 25 318 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 318 25 318 31 , srcInfoPoints = [] } "signum"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 3 319 55 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 3 319 55 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 3 319 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 3 319 14 , srcInfoPoints = [] } "fromInteger") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 15 319 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 15 319 16 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 17 319 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 319 17 319 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 19 319 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 19 319 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 19 319 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 19 319 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 19 319 30 , srcInfoPoints = [] } "fromInteger"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 31 319 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 31 319 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 31 319 32 , srcInfoPoints = [] } "n")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 33 319 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 319 33 319 34 , SrcSpan "tests/examples/DerivingVia.hs" 319 34 319 40 , SrcSpan "tests/examples/DerivingVia.hs" 319 40 319 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 33 319 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 319 33 319 34 , SrcSpan "tests/examples/DerivingVia.hs" 319 34 319 40 , SrcSpan "tests/examples/DerivingVia.hs" 319 40 319 41 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 34 319 40 , srcInfoPoints = [] } "bipure"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 42 319 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 42 319 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 42 319 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 42 319 53 , srcInfoPoints = [] } "fromInteger"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 54 319 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 54 319 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 319 54 319 55 , srcInfoPoints = [] } "n")))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 1 322 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 321 14 321 15 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 1 321 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 9 321 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 9 321 13 , srcInfoPoints = [] } "INT2")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 16 321 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 16 321 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 16 321 20 , srcInfoPoints = [] } "INT2") [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 21 321 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 321 21 321 22 , SrcSpan "tests/examples/DerivingVia.hs" 321 25 321 26 , SrcSpan "tests/examples/DerivingVia.hs" 321 30 321 31 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 22 321 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 22 321 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 22 321 25 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 27 321 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 27 321 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 321 27 321 30 , srcInfoPoints = [] } "Int")) ] ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 3 322 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 3 322 11 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 19 322 22 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 23 322 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 23 322 24 , SrcSpan "tests/examples/DerivingVia.hs" 322 61 322 62 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 24 322 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 24 322 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 24 322 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 24 322 37 , srcInfoPoints = [] } "WrappedNumEq2"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 38 322 61 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 38 322 39 , SrcSpan "tests/examples/DerivingVia.hs" 322 60 322 61 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 60 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 56 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 52 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 39 322 48 , srcInfoPoints = [] } "WrapBiapp"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 52 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 50 , SrcSpan "tests/examples/DerivingVia.hs" 322 50 322 51 , SrcSpan "tests/examples/DerivingVia.hs" 322 51 322 52 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 52 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 50 , SrcSpan "tests/examples/DerivingVia.hs" 322 50 322 51 , SrcSpan "tests/examples/DerivingVia.hs" 322 51 322 52 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 52 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 322 49 322 50 , SrcSpan "tests/examples/DerivingVia.hs" 322 50 322 51 , SrcSpan "tests/examples/DerivingVia.hs" 322 51 322 52 ] } Boxed 2)))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 53 322 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 53 322 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 53 322 56 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 57 322 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 57 322 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 57 322 60 , srcInfoPoints = [] } "Int"))))))))) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 12 322 18 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 12 322 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 12 322 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 322 12 322 18 , srcInfoPoints = [] } "IsZero"))) ] ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 1 328 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 327 1 327 6 , SrcSpan "tests/examples/DerivingVia.hs" 327 32 327 37 , SrcSpan "tests/examples/DerivingVia.hs" 328 3 328 3 , SrcSpan "tests/examples/DerivingVia.hs" 330 1 330 0 ] } (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 327 16 327 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 327 16 327 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 327 16 327 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 327 16 327 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 7 327 13 , srcInfoPoints = [] } "Monoid"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 14 327 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 14 327 15 , srcInfoPoints = [] } "a")))))) (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 19 327 31 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 19 327 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 19 327 29 , srcInfoPoints = [] } "MonoidNull")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 30 327 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 327 30 327 31 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 3 328 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 328 8 328 10 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 3 328 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 328 8 328 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 3 328 7 , srcInfoPoints = [] } "null" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 11 328 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 328 13 328 15 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 11 328 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 11 328 12 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 16 328 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 16 328 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 328 16 328 20 , srcInfoPoints = [] } "Bool"))))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 1 330 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 330 22 330 23 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 1 330 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 9 330 21 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 9 330 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 9 330 19 , srcInfoPoints = [] } "WrpMonNull")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 20 330 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 20 330 21 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 24 330 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 24 330 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 24 330 27 , srcInfoPoints = [] } "WRM") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 28 330 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 28 330 29 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 30 330 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 330 30 330 38 , SrcSpan "tests/examples/DerivingVia.hs" 330 39 330 40 , SrcSpan "tests/examples/DerivingVia.hs" 330 42 330 43 , SrcSpan "tests/examples/DerivingVia.hs" 330 53 330 54 , SrcSpan "tests/examples/DerivingVia.hs" 330 61 330 62 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 40 330 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 40 330 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 40 330 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 40 330 42 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 44 330 53 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 44 330 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 44 330 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 44 330 53 , srcInfoPoints = [] } "Semigroup"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 55 330 61 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 55 330 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 55 330 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 330 55 330 61 , srcInfoPoints = [] } "Monoid"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 1 336 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 332 1 332 9 , SrcSpan "tests/examples/DerivingVia.hs" 332 56 332 61 , SrcSpan "tests/examples/DerivingVia.hs" 333 3 333 3 , SrcSpan "tests/examples/DerivingVia.hs" 334 3 334 3 , SrcSpan "tests/examples/DerivingVia.hs" 336 1 336 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 10 332 55 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 10 332 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 332 10 332 11 , SrcSpan "tests/examples/DerivingVia.hs" 332 15 332 16 , SrcSpan "tests/examples/DerivingVia.hs" 332 25 332 26 , SrcSpan "tests/examples/DerivingVia.hs" 332 27 332 29 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 11 332 15 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 11 332 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 11 332 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 11 332 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 11 332 13 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 14 332 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 14 332 15 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 17 332 25 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 17 332 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 17 332 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 17 332 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 17 332 23 , srcInfoPoints = [] } "Monoid"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 24 332 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 24 332 25 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 30 332 55 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 30 332 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 30 332 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 30 332 40 , srcInfoPoints = [] } "MonoidNull"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 41 332 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 332 41 332 42 , SrcSpan "tests/examples/DerivingVia.hs" 332 54 332 55 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 42 332 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 42 332 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 42 332 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 42 332 52 , srcInfoPoints = [] } "WrpMonNull"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 53 332 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 332 53 332 54 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 3 333 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 333 8 333 10 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 3 333 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 333 8 333 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 3 333 7 , srcInfoPoints = [] } "null" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 11 333 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 333 24 333 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 11 333 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 11 333 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 11 333 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 11 333 21 , srcInfoPoints = [] } "WrpMonNull"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 22 333 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 22 333 23 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 27 333 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 27 333 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 333 27 333 31 , srcInfoPoints = [] } "Bool"))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 3 334 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 3 334 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 3 334 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 3 334 7 , srcInfoPoints = [] } "null")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 8 334 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 334 8 334 9 ] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 10 334 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 334 10 334 11 , SrcSpan "tests/examples/DerivingVia.hs" 334 20 334 21 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 11 334 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 11 334 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 11 334 13 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 14 334 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 14 334 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 334 14 334 20 , srcInfoPoints = [] } "mempty"))))) Nothing) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 1 336 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 336 1 336 9 , SrcSpan "tests/examples/DerivingVia.hs" 336 31 336 39 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 10 336 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 14 336 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 336 14 336 15 , SrcSpan "tests/examples/DerivingVia.hs" 336 29 336 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 15 336 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 15 336 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 15 336 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 15 336 25 , srcInfoPoints = [] } "WrpMonNull"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 26 336 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 26 336 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 26 336 29 , srcInfoPoints = [] } "Any"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 40 336 54 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 40 336 54 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 40 336 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 40 336 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 40 336 50 , srcInfoPoints = [] } "MonoidNull"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 51 336 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 51 336 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 336 51 336 54 , srcInfoPoints = [] } "Any"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 1 337 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 1 337 9 , SrcSpan "tests/examples/DerivingVia.hs" 337 31 337 39 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 10 337 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 15 , SrcSpan "tests/examples/DerivingVia.hs" 337 15 337 16 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 15 , SrcSpan "tests/examples/DerivingVia.hs" 337 15 337 16 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 14 337 15 , SrcSpan "tests/examples/DerivingVia.hs" 337 15 337 16 ] }))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 40 337 53 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 40 337 53 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 40 337 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 40 337 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 40 337 50 , srcInfoPoints = [] } "MonoidNull"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 52 , SrcSpan "tests/examples/DerivingVia.hs" 337 52 337 53 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 52 , SrcSpan "tests/examples/DerivingVia.hs" 337 52 337 53 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 53 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 337 51 337 52 , SrcSpan "tests/examples/DerivingVia.hs" 337 52 337 53 ] }))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 1 338 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 338 1 338 9 , SrcSpan "tests/examples/DerivingVia.hs" 338 31 338 39 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 10 338 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 14 338 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 14 338 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 14 338 22 , srcInfoPoints = [] } "Ordering"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 40 338 59 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 40 338 59 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 40 338 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 40 338 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 40 338 50 , srcInfoPoints = [] } "MonoidNull"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 51 338 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 51 338 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 338 51 338 59 , srcInfoPoints = [] } "Ordering"))))) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 1 348 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 345 1 345 6 , SrcSpan "tests/examples/DerivingVia.hs" 345 17 345 22 , SrcSpan "tests/examples/DerivingVia.hs" 346 3 346 3 , SrcSpan "tests/examples/DerivingVia.hs" 347 3 347 3 , SrcSpan "tests/examples/DerivingVia.hs" 348 3 348 3 , SrcSpan "tests/examples/DerivingVia.hs" 350 1 350 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 7 345 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 7 345 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 7 345 14 , srcInfoPoints = [] } "Lattice")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 15 345 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 345 15 345 16 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 3 346 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 346 9 346 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 3 346 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 346 9 346 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 3 346 6 , srcInfoPoints = [] } "sup" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 12 346 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 346 14 346 16 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 12 346 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 12 346 13 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 17 346 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 346 19 346 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 17 346 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 17 346 18 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 22 346 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 346 22 346 23 , srcInfoPoints = [] } "a"))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 3 347 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 347 9 347 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 3 347 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 347 9 347 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 3 347 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 347 3 347 4 , SrcSpan "tests/examples/DerivingVia.hs" 347 4 347 7 , SrcSpan "tests/examples/DerivingVia.hs" 347 7 347 8 ] } ".>=" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 12 347 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 347 14 347 16 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 12 347 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 12 347 13 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 17 347 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 347 19 347 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 17 347 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 17 347 18 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 22 347 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 22 347 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 347 22 347 26 , srcInfoPoints = [] } "Bool")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 3 348 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 348 9 348 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 3 348 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 348 9 348 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 3 348 7 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 348 3 348 4 , SrcSpan "tests/examples/DerivingVia.hs" 348 4 348 6 , SrcSpan "tests/examples/DerivingVia.hs" 348 6 348 7 ] } ".>" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 12 348 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 348 14 348 16 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 12 348 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 12 348 13 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 17 348 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 348 19 348 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 17 348 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 17 348 18 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 22 348 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 22 348 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 348 22 348 26 , srcInfoPoints = [] } "Bool")))))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 1 351 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 350 19 350 20 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 1 350 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 9 350 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 9 350 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 9 350 16 , srcInfoPoints = [] } "WrapOrd")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 17 350 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 17 350 18 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 21 350 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 21 350 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 21 350 31 , srcInfoPoints = [] } "WrappedOrd") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 32 350 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 350 32 350 33 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 3 351 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 351 3 351 11 , SrcSpan "tests/examples/DerivingVia.hs" 351 20 351 21 , SrcSpan "tests/examples/DerivingVia.hs" 351 23 351 24 , SrcSpan "tests/examples/DerivingVia.hs" 351 28 351 29 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 12 351 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 21 351 23 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 21 351 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 21 351 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 21 351 23 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 25 351 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 25 351 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 25 351 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 351 25 351 28 , srcInfoPoints = [] } "Ord"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 1 358 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 1 353 9 , SrcSpan "tests/examples/DerivingVia.hs" 353 39 353 44 , SrcSpan "tests/examples/DerivingVia.hs" 354 3 354 3 , SrcSpan "tests/examples/DerivingVia.hs" 355 3 355 3 , SrcSpan "tests/examples/DerivingVia.hs" 356 3 356 3 , SrcSpan "tests/examples/DerivingVia.hs" 358 1 358 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 38 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 16 353 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 16 353 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 16 353 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 16 353 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 10 353 13 , srcInfoPoints = [] } "Ord"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 14 353 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 14 353 15 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 19 353 38 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 19 353 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 19 353 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 19 353 26 , srcInfoPoints = [] } "Lattice"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 27 353 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 353 27 353 28 , SrcSpan "tests/examples/DerivingVia.hs" 353 37 353 38 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 28 353 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 28 353 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 28 353 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 28 353 35 , srcInfoPoints = [] } "WrapOrd"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 36 353 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 353 36 353 37 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 3 354 14 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 3 354 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 3 354 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 3 354 6 , srcInfoPoints = [] } "sup")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 9 354 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 354 9 354 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 11 354 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 11 354 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 354 11 354 14 , srcInfoPoints = [] } "max")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 3 355 15 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 3 355 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 3 355 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 355 3 355 4 , SrcSpan "tests/examples/DerivingVia.hs" 355 4 355 7 , SrcSpan "tests/examples/DerivingVia.hs" 355 7 355 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 4 355 7 , srcInfoPoints = [] } ".>=")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 9 355 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 355 9 355 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 11 355 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 355 11 355 12 , SrcSpan "tests/examples/DerivingVia.hs" 355 12 355 14 , SrcSpan "tests/examples/DerivingVia.hs" 355 14 355 15 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 11 355 15 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 355 11 355 12 , SrcSpan "tests/examples/DerivingVia.hs" 355 12 355 14 , SrcSpan "tests/examples/DerivingVia.hs" 355 14 355 15 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 355 12 355 14 , srcInfoPoints = [] } ">=")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 3 356 14 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 3 356 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 3 356 7 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 356 3 356 4 , SrcSpan "tests/examples/DerivingVia.hs" 356 4 356 6 , SrcSpan "tests/examples/DerivingVia.hs" 356 6 356 7 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 4 356 6 , srcInfoPoints = [] } ".>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 9 356 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 356 9 356 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 11 356 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 356 11 356 12 , SrcSpan "tests/examples/DerivingVia.hs" 356 12 356 13 , SrcSpan "tests/examples/DerivingVia.hs" 356 13 356 14 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 11 356 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 356 11 356 12 , SrcSpan "tests/examples/DerivingVia.hs" 356 12 356 13 , SrcSpan "tests/examples/DerivingVia.hs" 356 13 356 14 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 356 12 356 13 , srcInfoPoints = [] } ">")))) Nothing) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 1 358 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 1 358 9 , SrcSpan "tests/examples/DerivingVia.hs" 358 21 358 29 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 10 358 13 , srcInfoPoints = [] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 14 358 17 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 14 358 15 , SrcSpan "tests/examples/DerivingVia.hs" 358 16 358 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 15 358 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 15 358 16 , srcInfoPoints = [] } "a"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 59 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 45 358 47 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 45 358 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 45 358 47 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 45 358 47 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 30 358 33 , srcInfoPoints = [] } "Ord"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 34 358 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 34 358 35 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 48 358 59 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 48 358 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 48 358 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 48 358 55 , srcInfoPoints = [] } "Lattice"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 56 358 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 358 56 358 57 , SrcSpan "tests/examples/DerivingVia.hs" 358 58 358 59 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 57 358 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 358 57 358 58 , srcInfoPoints = [] } "a"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 1 359 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 359 1 359 9 , SrcSpan "tests/examples/DerivingVia.hs" 359 21 359 29 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 10 359 13 , srcInfoPoints = [] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 14 359 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 359 14 359 15 , SrcSpan "tests/examples/DerivingVia.hs" 359 16 359 17 , SrcSpan "tests/examples/DerivingVia.hs" 359 19 359 20 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 15 359 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 15 359 16 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 18 359 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 18 359 19 , srcInfoPoints = [] } "b") ]))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 30 359 62 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 30 359 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 359 30 359 31 , SrcSpan "tests/examples/DerivingVia.hs" 359 36 359 37 , SrcSpan "tests/examples/DerivingVia.hs" 359 43 359 44 , SrcSpan "tests/examples/DerivingVia.hs" 359 45 359 47 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 31 359 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 31 359 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 31 359 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 31 359 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 31 359 34 , srcInfoPoints = [] } "Ord"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 35 359 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 35 359 36 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 38 359 43 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 38 359 43 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 38 359 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 38 359 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 38 359 41 , srcInfoPoints = [] } "Ord"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 42 359 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 42 359 43 , srcInfoPoints = [] } "b"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 48 359 62 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 48 359 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 48 359 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 48 359 55 , srcInfoPoints = [] } "Lattice"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 56 359 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 359 56 359 57 , SrcSpan "tests/examples/DerivingVia.hs" 359 58 359 59 , SrcSpan "tests/examples/DerivingVia.hs" 359 61 359 62 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 57 359 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 57 359 58 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 60 359 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 359 60 359 61 , srcInfoPoints = [] } "b") ]))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 1 361 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 361 1 361 9 , SrcSpan "tests/examples/DerivingVia.hs" 361 19 361 27 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 10 361 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 14 361 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 14 361 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 14 361 18 , srcInfoPoints = [] } "Bool"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 28 361 40 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 28 361 40 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 28 361 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 28 361 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 28 361 35 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 36 361 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 36 361 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 361 36 361 40 , srcInfoPoints = [] } "Bool"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 1 363 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 363 1 363 9 , SrcSpan "tests/examples/DerivingVia.hs" 363 19 363 27 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 10 363 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 14 363 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 14 363 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 14 363 18 , srcInfoPoints = [] } "Char"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 28 363 40 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 28 363 40 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 28 363 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 28 363 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 28 363 35 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 36 363 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 36 363 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 363 36 363 40 , srcInfoPoints = [] } "Char"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 1 365 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 365 1 365 9 , SrcSpan "tests/examples/DerivingVia.hs" 365 18 365 26 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 10 365 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 14 365 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 14 365 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 14 365 17 , srcInfoPoints = [] } "Int"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 27 365 38 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 27 365 38 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 27 365 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 27 365 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 27 365 34 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 35 365 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 35 365 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 365 35 365 38 , srcInfoPoints = [] } "Int"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 1 367 46 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 367 1 367 9 , SrcSpan "tests/examples/DerivingVia.hs" 367 22 367 30 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 10 367 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 14 367 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 14 367 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 14 367 21 , srcInfoPoints = [] } "Integer"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 31 367 46 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 31 367 46 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 31 367 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 31 367 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 31 367 38 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 39 367 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 39 367 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 367 39 367 46 , srcInfoPoints = [] } "Integer"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 1 369 42 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 369 1 369 9 , SrcSpan "tests/examples/DerivingVia.hs" 369 20 369 28 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 10 369 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 14 369 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 14 369 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 14 369 19 , srcInfoPoints = [] } "Float"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 29 369 42 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 29 369 42 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 29 369 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 29 369 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 29 369 36 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 37 369 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 37 369 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 369 37 369 42 , srcInfoPoints = [] } "Float"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 1 371 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 371 1 371 9 , SrcSpan "tests/examples/DerivingVia.hs" 371 21 371 29 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 10 371 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 14 371 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 14 371 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 14 371 20 , srcInfoPoints = [] } "Double"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 30 371 44 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 30 371 44 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 30 371 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 30 371 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 30 371 37 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 38 371 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 38 371 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 371 38 371 44 , srcInfoPoints = [] } "Double"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 1 373 48 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 373 1 373 9 , SrcSpan "tests/examples/DerivingVia.hs" 373 23 373 31 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 10 373 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 14 373 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 14 373 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 14 373 22 , srcInfoPoints = [] } "Rational"))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 32 373 48 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 32 373 48 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 32 373 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 32 373 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 32 373 39 , srcInfoPoints = [] } "Lattice"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 40 373 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 40 373 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 373 40 373 48 , srcInfoPoints = [] } "Rational"))))) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 1 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 380 1 380 6 , SrcSpan "tests/examples/DerivingVia.hs" 380 31 380 36 , SrcSpan "tests/examples/DerivingVia.hs" 381 3 381 3 , SrcSpan "tests/examples/DerivingVia.hs" 382 3 382 3 , SrcSpan "tests/examples/DerivingVia.hs" 383 3 383 3 , SrcSpan "tests/examples/DerivingVia.hs" 384 3 384 3 , SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 3 , SrcSpan "tests/examples/DerivingVia.hs" 386 3 386 3 , SrcSpan "tests/examples/DerivingVia.hs" 388 1 388 0 ] } (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 380 17 380 19 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 380 17 380 19 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 380 17 380 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 380 17 380 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 7 380 14 , srcInfoPoints = [] } "Functor"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 15 380 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 15 380 16 , srcInfoPoints = [] } "f")))))) (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 20 380 30 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 20 380 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 20 380 28 , srcInfoPoints = [] } "Additive")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 29 380 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 380 29 380 30 , srcInfoPoints = [] } "f"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 3 381 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 8 381 10 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 3 381 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 8 381 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 3 381 7 , srcInfoPoints = [] } "zero" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 23 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 17 381 19 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 17 381 19 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 17 381 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 381 17 381 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 11 381 14 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 15 381 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 15 381 16 , srcInfoPoints = [] } "a")))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 20 381 23 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 20 381 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 20 381 21 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 22 381 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 381 22 381 23 , srcInfoPoints = [] } "a"))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 3 382 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 9 382 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 3 382 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 9 382 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 3 382 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 3 382 4 , SrcSpan "tests/examples/DerivingVia.hs" 382 4 382 7 , SrcSpan "tests/examples/DerivingVia.hs" 382 7 382 8 ] } "^+^" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 38 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 18 382 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 18 382 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 18 382 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 18 382 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 12 382 15 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 16 382 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 16 382 17 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 21 382 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 25 382 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 21 382 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 21 382 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 21 382 22 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 23 382 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 23 382 24 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 28 382 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 382 32 382 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 28 382 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 28 382 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 28 382 29 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 30 382 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 30 382 31 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 35 382 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 35 382 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 35 382 36 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 37 382 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 382 37 382 38 , srcInfoPoints = [] } "a"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 3 383 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 3 383 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 3 383 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 383 3 383 4 , SrcSpan "tests/examples/DerivingVia.hs" 383 4 383 7 , SrcSpan "tests/examples/DerivingVia.hs" 383 7 383 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 4 383 7 , srcInfoPoints = [] } "^+^")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 9 383 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 383 9 383 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 11 383 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 11 383 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 11 383 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 11 383 17 , srcInfoPoints = [] } "liftU2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 18 383 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 383 18 383 19 , SrcSpan "tests/examples/DerivingVia.hs" 383 19 383 20 , SrcSpan "tests/examples/DerivingVia.hs" 383 20 383 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 18 383 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 383 18 383 19 , SrcSpan "tests/examples/DerivingVia.hs" 383 19 383 20 , SrcSpan "tests/examples/DerivingVia.hs" 383 20 383 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 383 19 383 20 , srcInfoPoints = [] } "+"))))) Nothing) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 3 384 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 9 384 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 3 384 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 9 384 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 3 384 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 3 384 4 , SrcSpan "tests/examples/DerivingVia.hs" 384 4 384 7 , SrcSpan "tests/examples/DerivingVia.hs" 384 7 384 8 ] } "^-^" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 38 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 18 384 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 18 384 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 18 384 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 18 384 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 12 384 15 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 16 384 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 16 384 17 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 21 384 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 25 384 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 21 384 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 21 384 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 21 384 22 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 23 384 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 23 384 24 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 28 384 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 384 32 384 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 28 384 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 28 384 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 28 384 29 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 30 384 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 30 384 31 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 35 384 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 35 384 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 35 384 36 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 37 384 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 384 37 384 38 , srcInfoPoints = [] } "a"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 32 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 32 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 32 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 3 385 4 , srcInfoPoints = [] } "x")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 5 385 8 , srcInfoPoints = [] } "^-^") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 9 385 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 9 385 10 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 11 385 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 385 11 385 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 13 385 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 13 385 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 13 385 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 13 385 14 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 15 385 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 15 385 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 15 385 18 , srcInfoPoints = [] } "^+^"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 19 385 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 19 385 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 19 385 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 19 385 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 19 385 23 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 24 385 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 24 385 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 24 385 30 , srcInfoPoints = [] } "negate")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 31 385 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 31 385 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 385 31 385 32 , srcInfoPoints = [] } "y")))))) Nothing ]) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 3 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 10 386 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 3 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 10 386 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 3 386 9 , srcInfoPoints = [] } "liftU2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 13 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 27 386 29 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 13 386 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 13 386 14 , SrcSpan "tests/examples/DerivingVia.hs" 386 25 386 26 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 14 386 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 16 386 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 14 386 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 14 386 15 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 19 386 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 21 386 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 19 386 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 19 386 20 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 24 386 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 24 386 25 , srcInfoPoints = [] } "a"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 30 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 34 386 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 30 386 33 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 30 386 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 30 386 31 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 32 386 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 32 386 33 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 37 386 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 386 41 386 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 37 386 40 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 37 386 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 37 386 38 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 39 386 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 39 386 40 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 44 386 47 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 44 386 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 44 386 45 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 46 386 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 386 46 386 47 , srcInfoPoints = [] } "a"))))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 1 395 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 388 1 388 9 , SrcSpan "tests/examples/DerivingVia.hs" 388 22 388 27 , SrcSpan "tests/examples/DerivingVia.hs" 389 3 389 3 , SrcSpan "tests/examples/DerivingVia.hs" 390 3 390 3 , SrcSpan "tests/examples/DerivingVia.hs" 395 1 395 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 10 388 21 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 10 388 21 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 10 388 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 10 388 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 10 388 18 , srcInfoPoints = [] } "Additive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 20 , SrcSpan "tests/examples/DerivingVia.hs" 388 20 388 21 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 20 , SrcSpan "tests/examples/DerivingVia.hs" 388 20 388 21 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 388 19 388 20 , SrcSpan "tests/examples/DerivingVia.hs" 388 20 388 21 ] }))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 3 389 12 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 3 389 12 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 3 389 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 3 389 7 , srcInfoPoints = [] } "zero")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 8 389 12 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 389 8 389 9 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 389 10 389 12 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 389 10 389 11 , SrcSpan "tests/examples/DerivingVia.hs" 389 11 389 12 ] } [])) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 3 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 390 17 390 22 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 3 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 390 17 390 22 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 3 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 390 17 390 22 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 3 390 9 , srcInfoPoints = [] } "liftU2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 10 390 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 10 390 11 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 12 390 16 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 390 12 390 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 14 390 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 14 390 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 390 14 390 16 , srcInfoPoints = [] } "go")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 5 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 391 5 391 5 , SrcSpan "tests/examples/DerivingVia.hs" 392 5 392 5 , SrcSpan "tests/examples/DerivingVia.hs" 393 5 393 5 , SrcSpan "tests/examples/DerivingVia.hs" 395 1 395 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 5 393 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 5 391 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 5 391 7 , srcInfoPoints = [] } "go") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 8 391 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 391 8 391 9 , SrcSpan "tests/examples/DerivingVia.hs" 391 13 391 14 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 9 391 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 9 391 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 9 391 10 , srcInfoPoints = [] } "x")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 10 391 11 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 10 391 11 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 11 391 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 11 391 13 , srcInfoPoints = [] } "xs"))) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 15 391 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 391 15 391 16 , SrcSpan "tests/examples/DerivingVia.hs" 391 20 391 21 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 16 391 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 16 391 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 16 391 17 , srcInfoPoints = [] } "y")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 17 391 18 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 17 391 18 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 18 391 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 18 391 20 , srcInfoPoints = [] } "ys"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 22 391 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 391 22 391 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 24 391 25 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 26 391 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 26 391 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 26 391 27 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 28 391 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 28 391 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 28 391 29 , srcInfoPoints = [] } "y")))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 30 391 31 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 30 391 31 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 30 391 31 , srcInfoPoints = [] }))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 32 391 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 32 391 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 32 391 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 32 391 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 32 391 34 , srcInfoPoints = [] } "go"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 35 391 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 35 391 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 35 391 37 , srcInfoPoints = [] } "xs")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 38 391 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 38 391 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 391 38 391 40 , srcInfoPoints = [] } "ys")))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 5 392 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 5 392 7 , srcInfoPoints = [] } "go") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 8 392 10 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 392 8 392 9 , SrcSpan "tests/examples/DerivingVia.hs" 392 9 392 10 ] } [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 11 392 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 11 392 13 , srcInfoPoints = [] } "ys") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 14 392 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 392 14 392 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 16 392 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 16 392 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 392 16 392 18 , srcInfoPoints = [] } "ys")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 5 393 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 5 393 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 8 393 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 8 393 10 , srcInfoPoints = [] } "xs") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 11 393 13 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 393 11 393 12 , SrcSpan "tests/examples/DerivingVia.hs" 393 12 393 13 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 14 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 393 14 393 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 16 393 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 16 393 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 393 16 393 18 , srcInfoPoints = [] } "xs")))) Nothing ] ])) ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 1 401 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 395 1 395 9 , SrcSpan "tests/examples/DerivingVia.hs" 395 25 395 30 , SrcSpan "tests/examples/DerivingVia.hs" 396 3 396 3 , SrcSpan "tests/examples/DerivingVia.hs" 397 3 397 3 , SrcSpan "tests/examples/DerivingVia.hs" 398 3 398 3 , SrcSpan "tests/examples/DerivingVia.hs" 399 3 399 3 , SrcSpan "tests/examples/DerivingVia.hs" 401 1 401 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 10 395 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 10 395 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 10 395 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 10 395 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 10 395 18 , srcInfoPoints = [] } "Additive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 19 395 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 19 395 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 395 19 395 24 , srcInfoPoints = [] } "Maybe"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 3 396 17 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 3 396 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 3 396 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 3 396 7 , srcInfoPoints = [] } "zero")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 8 396 17 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 396 8 396 9 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 10 396 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 10 396 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 396 10 396 17 , srcInfoPoints = [] } "Nothing")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 3 399 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 3 399 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 3 397 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 3 397 9 , srcInfoPoints = [] } "liftU2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 10 397 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 10 397 11 , srcInfoPoints = [] } "f") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 12 397 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 397 12 397 13 , SrcSpan "tests/examples/DerivingVia.hs" 397 19 397 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 13 397 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 13 397 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 13 397 17 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 18 397 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 18 397 19 , srcInfoPoints = [] } "a") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 21 397 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 397 21 397 22 , SrcSpan "tests/examples/DerivingVia.hs" 397 28 397 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 22 397 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 22 397 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 22 397 26 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 27 397 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 27 397 28 , srcInfoPoints = [] } "b") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 30 397 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 397 30 397 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 32 397 44 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 32 397 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 32 397 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 32 397 36 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 37 397 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 397 37 397 38 , SrcSpan "tests/examples/DerivingVia.hs" 397 43 397 44 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 38 397 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 38 397 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 38 397 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 38 397 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 38 397 39 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 40 397 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 40 397 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 40 397 41 , srcInfoPoints = [] } "a")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 42 397 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 42 397 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 397 42 397 43 , srcInfoPoints = [] } "b"))))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 3 398 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 3 398 9 , srcInfoPoints = [] } "liftU2") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 10 398 11 , srcInfoPoints = [] } , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 12 398 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 12 398 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 12 398 19 , srcInfoPoints = [] } "Nothing")) [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 20 398 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 20 398 22 , srcInfoPoints = [] } "ys") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 23 398 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 398 23 398 24 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 25 398 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 25 398 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 398 25 398 27 , srcInfoPoints = [] } "ys")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 3 399 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 3 399 9 , srcInfoPoints = [] } "liftU2") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 10 399 11 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 12 399 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 12 399 14 , srcInfoPoints = [] } "xs") , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 15 399 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 15 399 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 15 399 22 , srcInfoPoints = [] } "Nothing")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 23 399 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 399 23 399 24 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 25 399 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 25 399 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 399 25 399 27 , srcInfoPoints = [] } "xs")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 1 405 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 1 401 9 , SrcSpan "tests/examples/DerivingVia.hs" 401 56 401 61 , SrcSpan "tests/examples/DerivingVia.hs" 402 3 402 3 , SrcSpan "tests/examples/DerivingVia.hs" 403 3 403 3 , SrcSpan "tests/examples/DerivingVia.hs" 405 1 405 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 55 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 24 401 26 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 24 401 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 24 401 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 24 401 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 10 401 21 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 22 401 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 22 401 23 , srcInfoPoints = [] } "f")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 27 401 55 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 27 401 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 27 401 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 27 401 35 , srcInfoPoints = [] } "Additive"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 36 401 55 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 401 36 401 37 , SrcSpan "tests/examples/DerivingVia.hs" 401 54 401 55 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 37 401 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 37 401 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 37 401 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 37 401 52 , srcInfoPoints = [] } "WrapApplicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 53 401 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 401 53 401 54 , srcInfoPoints = [] } "f")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 3 402 18 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 3 402 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 3 402 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 3 402 7 , srcInfoPoints = [] } "zero")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 10 402 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 402 10 402 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 12 402 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 12 402 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 12 402 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 12 402 16 , srcInfoPoints = [] } "pure"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 17 402 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 402 17 402 18 , srcInfoPoints = [] } 0 "0")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 3 403 18 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 3 403 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 3 403 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 3 403 9 , srcInfoPoints = [] } "liftU2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 10 403 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 403 10 403 11 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 12 403 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 12 403 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 403 12 403 18 , srcInfoPoints = [] } "liftA2")))) Nothing) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 1 405 67 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 1 405 9 , SrcSpan "tests/examples/DerivingVia.hs" 405 41 405 49 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 10 405 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 14 405 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 14 405 15 , SrcSpan "tests/examples/DerivingVia.hs" 405 39 405 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 15 405 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 15 405 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 15 405 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 15 405 30 , srcInfoPoints = [] } "WrapApplicative"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 31 405 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 31 405 32 , SrcSpan "tests/examples/DerivingVia.hs" 405 38 405 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 33 , SrcSpan "tests/examples/DerivingVia.hs" 405 33 405 35 , SrcSpan "tests/examples/DerivingVia.hs" 405 35 405 36 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 33 , SrcSpan "tests/examples/DerivingVia.hs" 405 33 405 35 , SrcSpan "tests/examples/DerivingVia.hs" 405 35 405 36 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 32 405 33 , SrcSpan "tests/examples/DerivingVia.hs" 405 33 405 35 , SrcSpan "tests/examples/DerivingVia.hs" 405 35 405 36 ] }))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 37 405 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 37 405 38 , srcInfoPoints = [] } "a")))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 50 405 67 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 50 405 67 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 50 405 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 50 405 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 50 405 58 , srcInfoPoints = [] } "Additive"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 59 405 67 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 59 405 60 , SrcSpan "tests/examples/DerivingVia.hs" 405 66 405 67 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 66 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 61 , SrcSpan "tests/examples/DerivingVia.hs" 405 61 405 63 , SrcSpan "tests/examples/DerivingVia.hs" 405 63 405 64 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 61 , SrcSpan "tests/examples/DerivingVia.hs" 405 61 405 63 , SrcSpan "tests/examples/DerivingVia.hs" 405 63 405 64 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 405 60 405 61 , SrcSpan "tests/examples/DerivingVia.hs" 405 61 405 63 , SrcSpan "tests/examples/DerivingVia.hs" 405 63 405 64 ] }))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 65 405 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 405 65 405 66 , srcInfoPoints = [] } "a")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 1 406 66 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 406 1 406 9 , SrcSpan "tests/examples/DerivingVia.hs" 406 41 406 49 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 10 406 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 14 406 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 406 14 406 15 , SrcSpan "tests/examples/DerivingVia.hs" 406 38 406 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 15 406 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 15 406 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 15 406 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 15 406 30 , srcInfoPoints = [] } "WrapApplicative"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 31 406 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 31 406 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 31 406 38 , srcInfoPoints = [] } "Complex"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 50 406 66 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 50 406 66 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 50 406 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 50 406 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 50 406 58 , srcInfoPoints = [] } "Additive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 59 406 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 59 406 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 406 59 406 66 , srcInfoPoints = [] } "Complex"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 1 407 67 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 407 1 407 9 , SrcSpan "tests/examples/DerivingVia.hs" 407 41 407 49 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 10 407 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 14 407 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 407 14 407 15 , SrcSpan "tests/examples/DerivingVia.hs" 407 39 407 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 15 407 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 15 407 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 15 407 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 15 407 30 , srcInfoPoints = [] } "WrapApplicative"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 31 407 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 31 407 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 31 407 39 , srcInfoPoints = [] } "Identity"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 50 407 67 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 50 407 67 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 50 407 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 50 407 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 50 407 58 , srcInfoPoints = [] } "Additive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 59 407 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 59 407 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 407 59 407 67 , srcInfoPoints = [] } "Identity"))))) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 1 413 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 409 1 409 9 , SrcSpan "tests/examples/DerivingVia.hs" 409 27 409 32 , SrcSpan "tests/examples/DerivingVia.hs" 410 3 410 3 , SrcSpan "tests/examples/DerivingVia.hs" 411 3 411 3 , SrcSpan "tests/examples/DerivingVia.hs" 413 1 413 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 10 409 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 10 409 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 10 409 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 10 409 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 10 409 18 , srcInfoPoints = [] } "Additive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 19 409 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 19 409 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 409 19 409 26 , srcInfoPoints = [] } "ZipList"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 3 410 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 3 410 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 3 410 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 3 410 7 , srcInfoPoints = [] } "zero")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 8 410 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 410 8 410 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 10 410 20 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 10 410 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 10 410 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 10 410 17 , srcInfoPoints = [] } "ZipList"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 410 18 410 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 410 18 410 19 , SrcSpan "tests/examples/DerivingVia.hs" 410 19 410 20 ] } []))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 3 411 64 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 3 411 64 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 3 411 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 3 411 9 , srcInfoPoints = [] } "liftU2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 10 411 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 10 411 11 , srcInfoPoints = [] } "f") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 12 411 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 411 12 411 13 , SrcSpan "tests/examples/DerivingVia.hs" 411 23 411 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 13 411 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 13 411 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 13 411 20 , srcInfoPoints = [] } "ZipList")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 21 411 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 21 411 23 , srcInfoPoints = [] } "xs") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 25 411 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 411 25 411 26 , SrcSpan "tests/examples/DerivingVia.hs" 411 36 411 37 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 26 411 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 26 411 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 26 411 33 , srcInfoPoints = [] } "ZipList")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 34 411 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 34 411 36 , srcInfoPoints = [] } "ys") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 38 411 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 411 38 411 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 40 411 64 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 40 411 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 40 411 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 40 411 47 , srcInfoPoints = [] } "ZipList"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 48 411 64 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 411 48 411 49 , SrcSpan "tests/examples/DerivingVia.hs" 411 63 411 64 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 49 411 55 , srcInfoPoints = [] } "liftU2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 56 411 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 56 411 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 56 411 57 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 58 411 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 58 411 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 58 411 60 , srcInfoPoints = [] } "xs")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 61 411 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 61 411 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 411 61 411 63 , srcInfoPoints = [] } "ys"))))))) Nothing ]) ]) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 1 419 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 1 413 6 , SrcSpan "tests/examples/DerivingVia.hs" 413 37 413 42 , SrcSpan "tests/examples/DerivingVia.hs" 414 3 414 3 , SrcSpan "tests/examples/DerivingVia.hs" 416 3 416 3 , SrcSpan "tests/examples/DerivingVia.hs" 417 3 417 3 , SrcSpan "tests/examples/DerivingVia.hs" 418 3 418 3 , SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 3 , SrcSpan "tests/examples/DerivingVia.hs" 425 1 425 0 ] } (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 25 413 27 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 25 413 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 25 413 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 25 413 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 7 413 15 , srcInfoPoints = [] } "Additive"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 16 413 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 413 16 413 17 , SrcSpan "tests/examples/DerivingVia.hs" 413 23 413 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 17 413 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 17 413 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 17 413 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 17 413 21 , srcInfoPoints = [] } "Diff"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 22 413 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 22 413 23 , srcInfoPoints = [] } "p")))))))) (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 28 413 36 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 28 413 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 28 413 34 , srcInfoPoints = [] } "Affine")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 35 413 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 413 35 413 36 , srcInfoPoints = [] } "p"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 3 414 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 414 3 414 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 8 414 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 8 414 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 8 414 12 , srcInfoPoints = [] } "Diff")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 13 414 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 13 414 14 , srcInfoPoints = [] } "p"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 15 414 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 414 15 414 17 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 18 414 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 414 23 414 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 18 414 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 18 414 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 18 414 22 , srcInfoPoints = [] } "Type"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 26 414 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 26 414 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 414 26 414 30 , srcInfoPoints = [] } "Type")))))) Nothing , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 3 416 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 9 416 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 3 416 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 9 416 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 3 416 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 3 416 4 , SrcSpan "tests/examples/DerivingVia.hs" 416 4 416 7 , SrcSpan "tests/examples/DerivingVia.hs" 416 7 416 8 ] } ".-." ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 43 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 18 416 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 18 416 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 18 416 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 18 416 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 12 416 15 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 16 416 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 16 416 17 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 21 416 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 25 416 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 21 416 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 21 416 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 21 416 22 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 23 416 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 23 416 24 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 28 416 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 416 32 416 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 28 416 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 28 416 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 28 416 29 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 30 416 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 30 416 31 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 35 416 43 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 35 416 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 35 416 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 35 416 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 35 416 39 , srcInfoPoints = [] } "Diff"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 40 416 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 40 416 41 , srcInfoPoints = [] } "p"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 42 416 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 416 42 416 43 , srcInfoPoints = [] } "a"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 3 417 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 9 417 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 3 417 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 9 417 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 3 417 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 3 417 4 , SrcSpan "tests/examples/DerivingVia.hs" 417 4 417 7 , SrcSpan "tests/examples/DerivingVia.hs" 417 7 417 8 ] } ".+^" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 43 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 18 417 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 18 417 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 18 417 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 18 417 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 12 417 15 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 16 417 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 16 417 17 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 21 417 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 25 417 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 21 417 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 21 417 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 21 417 22 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 23 417 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 23 417 24 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 417 37 417 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 28 417 32 , srcInfoPoints = [] } "Diff"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 33 417 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 33 417 34 , srcInfoPoints = [] } "p"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 35 417 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 35 417 36 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 40 417 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 40 417 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 40 417 41 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 42 417 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 417 42 417 43 , srcInfoPoints = [] } "a"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 3 418 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 9 418 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 3 418 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 9 418 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 3 418 8 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 3 418 4 , SrcSpan "tests/examples/DerivingVia.hs" 418 4 418 7 , SrcSpan "tests/examples/DerivingVia.hs" 418 7 418 8 ] } ".-^" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 43 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 18 418 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 18 418 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 18 418 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 18 418 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 12 418 15 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 16 418 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 16 418 17 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 21 418 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 25 418 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 21 418 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 21 418 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 21 418 22 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 23 418 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 23 418 24 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 43 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 418 37 418 39 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 28 418 32 , srcInfoPoints = [] } "Diff"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 33 418 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 33 418 34 , srcInfoPoints = [] } "p"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 35 418 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 35 418 36 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 40 418 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 40 418 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 40 418 41 , srcInfoPoints = [] } "p")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 42 418 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 418 42 418 43 , srcInfoPoints = [] } "a"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 32 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 32 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 32 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 3 419 4 , srcInfoPoints = [] } "p")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 5 419 8 , srcInfoPoints = [] } ".-^") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 9 419 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 9 419 10 , srcInfoPoints = [] } "v") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 11 419 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 419 11 419 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 13 419 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 13 419 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 13 419 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 13 419 14 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 15 419 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 15 419 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 15 419 18 , srcInfoPoints = [] } ".+^"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 19 419 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 19 419 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 19 419 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 19 419 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 19 419 23 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 24 419 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 24 419 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 24 419 30 , srcInfoPoints = [] } "negate")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 31 419 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 31 419 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 419 31 419 32 , srcInfoPoints = [] } "v")))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 1 425 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 425 26 425 27 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 1 425 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 9 425 25 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 9 425 23 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 9 425 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 9 425 21 , srcInfoPoints = [] } "WrapAdditive")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 22 425 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 22 425 23 , srcInfoPoints = [] } "f"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 24 425 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 24 425 25 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 28 425 49 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 28 425 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 28 425 43 , srcInfoPoints = [] } "WrappedAdditive") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 44 425 49 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 425 44 425 45 , SrcSpan "tests/examples/DerivingVia.hs" 425 48 425 49 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 45 425 48 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 45 425 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 45 425 46 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 47 425 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 425 47 425 48 , srcInfoPoints = [] } "a"))) ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 1 435 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 1 427 9 , SrcSpan "tests/examples/DerivingVia.hs" 427 48 427 53 , SrcSpan "tests/examples/DerivingVia.hs" 428 3 428 3 , SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 3 , SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 3 , SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 3 , SrcSpan "tests/examples/DerivingVia.hs" 435 1 435 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 47 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 21 427 23 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 21 427 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 21 427 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 23 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 21 427 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 10 427 18 , srcInfoPoints = [] } "Additive"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 19 427 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 19 427 20 , srcInfoPoints = [] } "f")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 24 427 47 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 24 427 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 24 427 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 24 427 30 , srcInfoPoints = [] } "Affine"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 31 427 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 427 31 427 32 , SrcSpan "tests/examples/DerivingVia.hs" 427 46 427 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 32 427 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 32 427 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 32 427 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 32 427 44 , srcInfoPoints = [] } "WrapAdditive"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 45 427 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 427 45 427 46 , srcInfoPoints = [] } "f")))))) (Just [ InsType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 3 428 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 428 3 428 7 , SrcSpan "tests/examples/DerivingVia.hs" 428 30 428 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 8 428 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 8 428 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 8 428 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 8 428 12 , srcInfoPoints = [] } "Diff"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 13 428 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 428 13 428 14 , SrcSpan "tests/examples/DerivingVia.hs" 428 28 428 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 14 428 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 14 428 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 14 428 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 14 428 26 , srcInfoPoints = [] } "WrapAdditive"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 27 428 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 27 428 28 , srcInfoPoints = [] } "f"))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 32 428 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 428 32 428 33 , srcInfoPoints = [] } "f")) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 52 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 52 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 52 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 3 430 18 , srcInfoPoints = [] } "WrappedAdditive")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 19 430 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 19 430 20 , srcInfoPoints = [] } "a") ]) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 21 430 24 , srcInfoPoints = [] } ".-.") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 25 430 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 25 430 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 25 430 40 , srcInfoPoints = [] } "WrappedAdditive")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 41 430 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 41 430 42 , srcInfoPoints = [] } "b") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 43 430 52 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 430 43 430 44 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 45 430 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 45 430 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 45 430 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 45 430 46 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 47 430 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 47 430 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 47 430 50 , srcInfoPoints = [] } "^-^"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 51 430 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 51 430 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 430 51 430 52 , srcInfoPoints = [] } "b"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 54 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 54 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 54 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 3 431 18 , srcInfoPoints = [] } "WrappedAdditive")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 19 431 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 19 431 20 , srcInfoPoints = [] } "a") ]) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 21 431 24 , srcInfoPoints = [] } ".+^") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 25 431 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 25 431 26 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 27 431 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 431 27 431 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 29 431 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 29 431 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 29 431 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 29 431 44 , srcInfoPoints = [] } "WrappedAdditive"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 45 431 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 431 45 431 46 , SrcSpan "tests/examples/DerivingVia.hs" 431 53 431 54 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 46 431 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 46 431 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 46 431 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 46 431 47 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 48 431 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 48 431 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 48 431 51 , srcInfoPoints = [] } "^+^"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 52 431 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 52 431 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 431 52 431 53 , srcInfoPoints = [] } "b"))))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 54 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 54 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 54 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 3 432 18 , srcInfoPoints = [] } "WrappedAdditive")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 19 432 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 19 432 20 , srcInfoPoints = [] } "a") ]) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 21 432 24 , srcInfoPoints = [] } ".-^") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 25 432 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 25 432 26 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 27 432 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 432 27 432 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 29 432 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 29 432 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 29 432 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 29 432 44 , srcInfoPoints = [] } "WrappedAdditive"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 45 432 54 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 432 45 432 46 , SrcSpan "tests/examples/DerivingVia.hs" 432 53 432 54 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 46 432 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 46 432 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 46 432 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 46 432 47 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 48 432 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 48 432 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 48 432 51 , srcInfoPoints = [] } "^-^"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 52 432 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 52 432 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 432 52 432 53 , srcInfoPoints = [] } "b"))))))) Nothing ]) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 1 435 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 1 435 9 , SrcSpan "tests/examples/DerivingVia.hs" 435 38 435 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 10 435 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 14 435 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 14 435 15 , SrcSpan "tests/examples/DerivingVia.hs" 435 36 435 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 15 435 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 15 435 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 15 435 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 15 435 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 28 435 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 28 435 29 , SrcSpan "tests/examples/DerivingVia.hs" 435 35 435 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 30 , SrcSpan "tests/examples/DerivingVia.hs" 435 30 435 32 , SrcSpan "tests/examples/DerivingVia.hs" 435 32 435 33 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 30 , SrcSpan "tests/examples/DerivingVia.hs" 435 30 435 32 , SrcSpan "tests/examples/DerivingVia.hs" 435 32 435 33 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 29 435 30 , SrcSpan "tests/examples/DerivingVia.hs" 435 30 435 32 , SrcSpan "tests/examples/DerivingVia.hs" 435 32 435 33 ] }))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 34 435 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 34 435 35 , srcInfoPoints = [] } "a")))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 47 435 62 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 47 435 62 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 47 435 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 47 435 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 47 435 53 , srcInfoPoints = [] } "Affine"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 54 435 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 54 435 55 , SrcSpan "tests/examples/DerivingVia.hs" 435 61 435 62 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 56 , SrcSpan "tests/examples/DerivingVia.hs" 435 56 435 58 , SrcSpan "tests/examples/DerivingVia.hs" 435 58 435 59 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 56 , SrcSpan "tests/examples/DerivingVia.hs" 435 56 435 58 , SrcSpan "tests/examples/DerivingVia.hs" 435 58 435 59 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 435 55 435 56 , SrcSpan "tests/examples/DerivingVia.hs" 435 56 435 58 , SrcSpan "tests/examples/DerivingVia.hs" 435 58 435 59 ] }))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 60 435 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 435 60 435 61 , srcInfoPoints = [] } "a")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 1 437 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 1 437 9 , SrcSpan "tests/examples/DerivingVia.hs" 437 38 437 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 10 437 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 14 437 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 14 437 15 , SrcSpan "tests/examples/DerivingVia.hs" 437 30 437 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 15 437 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 15 437 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 15 437 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 15 437 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 29 , SrcSpan "tests/examples/DerivingVia.hs" 437 29 437 30 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 29 , SrcSpan "tests/examples/DerivingVia.hs" 437 29 437 30 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 28 437 29 , SrcSpan "tests/examples/DerivingVia.hs" 437 29 437 30 ] }))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 47 437 56 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 47 437 56 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 47 437 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 47 437 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 47 437 53 , srcInfoPoints = [] } "Affine"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 55 , SrcSpan "tests/examples/DerivingVia.hs" 437 55 437 56 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 55 , SrcSpan "tests/examples/DerivingVia.hs" 437 55 437 56 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 56 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 437 54 437 55 , SrcSpan "tests/examples/DerivingVia.hs" 437 55 437 56 ] }))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 1 439 61 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 439 1 439 9 , SrcSpan "tests/examples/DerivingVia.hs" 439 38 439 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 10 439 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 14 439 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 439 14 439 15 , SrcSpan "tests/examples/DerivingVia.hs" 439 35 439 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 15 439 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 15 439 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 15 439 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 15 439 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 28 439 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 28 439 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 28 439 35 , srcInfoPoints = [] } "Complex"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 47 439 61 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 47 439 61 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 47 439 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 47 439 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 47 439 53 , srcInfoPoints = [] } "Affine"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 54 439 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 54 439 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 439 54 439 61 , srcInfoPoints = [] } "Complex"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 1 441 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 441 1 441 9 , SrcSpan "tests/examples/DerivingVia.hs" 441 38 441 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 10 441 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 14 441 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 441 14 441 15 , SrcSpan "tests/examples/DerivingVia.hs" 441 33 441 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 15 441 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 15 441 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 15 441 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 15 441 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 28 441 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 28 441 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 28 441 33 , srcInfoPoints = [] } "Maybe"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 47 441 59 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 47 441 59 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 47 441 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 47 441 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 47 441 53 , srcInfoPoints = [] } "Affine"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 54 441 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 54 441 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 441 54 441 59 , srcInfoPoints = [] } "Maybe"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 1 443 61 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 443 1 443 9 , SrcSpan "tests/examples/DerivingVia.hs" 443 38 443 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 10 443 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 14 443 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 443 14 443 15 , SrcSpan "tests/examples/DerivingVia.hs" 443 35 443 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 15 443 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 15 443 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 15 443 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 15 443 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 28 443 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 28 443 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 28 443 35 , srcInfoPoints = [] } "ZipList"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 47 443 61 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 47 443 61 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 47 443 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 47 443 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 47 443 53 , srcInfoPoints = [] } "Affine"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 54 443 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 54 443 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 443 54 443 61 , srcInfoPoints = [] } "ZipList"))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 1 445 62 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 445 1 445 9 , SrcSpan "tests/examples/DerivingVia.hs" 445 38 445 46 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 10 445 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 14 445 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 445 14 445 15 , SrcSpan "tests/examples/DerivingVia.hs" 445 36 445 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 15 445 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 15 445 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 15 445 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 15 445 27 , srcInfoPoints = [] } "WrapAdditive"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 28 445 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 28 445 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 28 445 36 , srcInfoPoints = [] } "Identity"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 47 445 62 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 47 445 62 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 47 445 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 47 445 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 47 445 53 , srcInfoPoints = [] } "Affine"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 54 445 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 54 445 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 445 54 445 62 , srcInfoPoints = [] } "Identity"))))) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 1 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 451 1 451 6 , SrcSpan "tests/examples/DerivingVia.hs" 451 16 451 21 , SrcSpan "tests/examples/DerivingVia.hs" 452 3 452 3 , SrcSpan "tests/examples/DerivingVia.hs" 454 1 454 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 7 451 15 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 7 451 13 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 7 451 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 7 451 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 7 451 9 , srcInfoPoints = [] } "C2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 10 451 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 10 451 11 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 12 451 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 12 451 13 , srcInfoPoints = [] } "b"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 14 451 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 451 14 451 15 , srcInfoPoints = [] } "c"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 3 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 452 6 452 8 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 3 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 452 6 452 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 3 452 5 , srcInfoPoints = [] } "c2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 9 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 452 11 452 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 9 452 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 9 452 10 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 14 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 452 16 452 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 14 452 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 14 452 15 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 19 452 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 452 19 452 20 , srcInfoPoints = [] } "c"))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 1 457 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 454 1 454 9 , SrcSpan "tests/examples/DerivingVia.hs" 454 29 454 34 , SrcSpan "tests/examples/DerivingVia.hs" 455 3 455 3 , SrcSpan "tests/examples/DerivingVia.hs" 457 1 457 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 28 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 16 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 14 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 10 454 12 , srcInfoPoints = [] } "C2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 13 454 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 13 454 14 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 15 454 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 15 454 16 , srcInfoPoints = [] } "b"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 17 454 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 454 17 454 18 , SrcSpan "tests/examples/DerivingVia.hs" 454 27 454 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 18 454 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 18 454 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 18 454 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 18 454 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 18 454 23 , srcInfoPoints = [] } "Const"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 24 454 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 24 454 25 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 26 454 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 454 26 454 27 , srcInfoPoints = [] } "b")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 3 455 19 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 3 455 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 3 455 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 3 455 5 , srcInfoPoints = [] } "c2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 6 455 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 6 455 7 , srcInfoPoints = [] } "x") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 8 455 9 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 10 455 19 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 455 10 455 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 12 455 19 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 12 455 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 12 455 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 12 455 17 , srcInfoPoints = [] } "Const"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 18 455 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 18 455 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 455 18 455 19 , srcInfoPoints = [] } "x"))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 1 458 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 457 18 457 19 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 1 457 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 9 457 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 9 457 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 9 457 15 , srcInfoPoints = [] } "Fweemp")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 16 457 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 16 457 17 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 20 457 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 20 457 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 20 457 26 , srcInfoPoints = [] } "Fweemp") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 27 457 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 457 27 457 28 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 3 458 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 458 3 458 11 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 8 459 11 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 12 459 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 459 12 459 13 , SrcSpan "tests/examples/DerivingVia.hs" 459 32 459 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 13 459 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 13 459 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 13 459 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 13 459 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 13 459 18 , srcInfoPoints = [] } "Const"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 19 459 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 19 459 20 , srcInfoPoints = [] } "a"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 21 459 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 459 21 459 22 , SrcSpan "tests/examples/DerivingVia.hs" 459 24 459 26 , SrcSpan "tests/examples/DerivingVia.hs" 459 31 459 32 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 22 459 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 22 459 23 , srcInfoPoints = [] } "b")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 27 459 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 27 459 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 459 27 459 31 , srcInfoPoints = [] } "Type")))))))) [ IParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 12 458 20 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia.hs" 458 12 458 13 , SrcSpan "tests/examples/DerivingVia.hs" 458 19 458 20 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 19 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 19 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 17 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 13 458 15 , srcInfoPoints = [] } "C2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 16 458 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 16 458 17 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 18 458 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia.hs" 458 18 458 19 , srcInfoPoints = [] } "b")))) ] ] ] , [ Comment False (SrcSpan "tests/examples/DerivingVia.hs" 38 1 38 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 39 1 39 18) " Simple example" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 40 1 40 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 46 1 46 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 47 1 47 25) " Eta reduction at work" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 48 1 48 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 62 1 62 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 63 1 63 22) " Monad transformers" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 64 1 64 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 68 1 68 22) " From `constraints'" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 78 1 78 52) " With `-XQuantifiedConstraints' this just becomes" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 79 1 79 3) "" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 80 1 80 68) " type Lifting cls trans = forall mm. cls mm => cls (trans mm)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 81 1 81 3) "" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 82 1 82 52) " type LiftingMonad trans = Lifting Monad trans" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 83 1 83 3) "" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 142 1 142 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 143 1 143 32) " Using tuples in a `via` type" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 144 1 144 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 153 1 153 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 154 1 154 23) " Abstract data types" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 155 1 155 6) "---" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 167 1 167 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 168 1 168 18) " Testing parser" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 169 1 169 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 183 1 183 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 184 1 184 23) " From Baldur's notes" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 185 1 185 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 187 1 187 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 188 1 188 5) " 1" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 189 1 189 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 227 1 227 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 228 1 228 5) " 2" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 229 1 229 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 243 1 243 8) " data" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 262 1 262 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 263 1 263 5) " 3" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 264 1 264 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 290 1 290 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 291 1 291 5) " 4" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 292 1 292 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 324 1 324 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 325 1 325 5) " 5" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 326 1 326 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 340 1 340 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 341 1 341 5) " 6" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 342 1 342 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 343 1 343 116) " https://github.com/mikeizbicki/subhask/blob/f53fd8f465747681c88276c7dabe3646fbdf7d50/src/SubHask/Algebra.hs#L635" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 360 1 360 19) "mkLattice_(Bool)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 362 1 362 19) "mkLattice_(Char)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 364 1 364 18) "mkLattice_(Int)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 366 1 366 22) "mkLattice_(Integer)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 368 1 368 20) "mkLattice_(Float)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 370 1 370 21) "mkLattice_(Double)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 372 1 372 23) "mkLattice_(Rational)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 375 1 375 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 376 1 376 5) " 7" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 377 1 377 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 378 1 378 81) " https://hackage.haskell.org/package/linear-1.20.7/docs/src/Linear-Affine.html" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 421 1 421 79) " #define ADDITIVEC(CTX,T) instance CTX => Affine T where type Diff T = T ; \\" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 422 1 422 85) " (.-.) = (^-^) ; {-# INLINE (.-.) #-} ; (.+^) = (^+^) ; {-# INLINE (.+^) #-} ; \\" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 423 1 423 42) " (.-^) = (^-^) ; {-# INLINE (.-^) #-}" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 424 1 424 40) " #define ADDITIVE(T) ADDITIVEC((), T)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 434 1 434 22) " ADDITIVE(((->) a))" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 436 1 436 16) " ADDITIVE([])" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 438 1 438 21) " ADDITIVE(Complex)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 440 1 440 19) " ADDITIVE(Maybe)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 442 1 442 21) " ADDITIVE(ZipList)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 444 1 444 22) " ADDITIVE(Identity)" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 447 1 447 5) "--" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 448 1 448 5) " 8" , Comment False (SrcSpan "tests/examples/DerivingVia.hs" 449 1 449 5) "--" ] ) haskell-src-exts-1.23.1/tests/examples/IllDataTypeDecl.hs.parser.golden0000644000000000000000000001365313534314633024214 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 1 1 1 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 1 2 1 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 1 2 1 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 1 4 1 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 5 1 5 1 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 1 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 1 2 7 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 24 2 29 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 2 8 2 23 , srcInfoPoints = [] } "IllDataTypeDecl") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 1 1 13 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 18 4 19 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 1 4 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 6 4 17 , srcInfoPoints = [] } (DHParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 6 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 6 4 7 , SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 14 4 15 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 7 4 14 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 7 4 14 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 7 4 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 7 4 8 , srcInfoPoints = [] } "f")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 9 4 12 , srcInfoPoints = [] } ":+:")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 13 4 14 , srcInfoPoints = [] } "g")))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 16 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 16 4 17 , srcInfoPoints = [] } "p"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 20 4 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 20 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IllDataTypeDecl.hs" 4 20 4 21 , srcInfoPoints = [] } "L") []) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/THTypes.hs.parser.golden0000644000000000000000000004041213534314633022601 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 1 1 12 1 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 1 1 1 1 , SrcSpan "tests/examples/THTypes.hs" 2 1 2 1 , SrcSpan "tests/examples/THTypes.hs" 3 1 3 1 , SrcSpan "tests/examples/THTypes.hs" 4 1 4 1 , SrcSpan "tests/examples/THTypes.hs" 4 1 4 1 , SrcSpan "tests/examples/THTypes.hs" 6 1 6 1 , SrcSpan "tests/examples/THTypes.hs" 8 1 8 1 , SrcSpan "tests/examples/THTypes.hs" 9 1 9 1 , SrcSpan "tests/examples/THTypes.hs" 11 1 11 1 , SrcSpan "tests/examples/THTypes.hs" 12 1 12 1 , SrcSpan "tests/examples/THTypes.hs" 12 1 12 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 4 1 4 7 , SrcSpan "tests/examples/THTypes.hs" 4 16 4 21 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 4 8 4 15 , srcInfoPoints = [] } "THTypes") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 1 1 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 1 1 1 13 , SrcSpan "tests/examples/THTypes.hs" 1 32 1 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 1 14 1 31 , srcInfoPoints = [] } "FlexibleInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 2 1 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 2 1 2 13 , SrcSpan "tests/examples/THTypes.hs" 2 30 2 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 2 14 2 29 , srcInfoPoints = [] } "TemplateHaskell" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 3 1 3 13 , SrcSpan "tests/examples/THTypes.hs" 3 26 3 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 3 14 3 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 6 1 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 6 1 6 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 6 8 6 27 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 8 1 8 11 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 8 3 8 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 8 1 8 2 , srcInfoPoints = [] } "x" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 8 6 8 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 8 6 8 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 8 6 8 11 , srcInfoPoints = [] } "DecsQ"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 1 9 48 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 1 9 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 1 9 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 3 9 48 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 3 9 4 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 5 9 48 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 5 9 8 , SrcSpan "tests/examples/THTypes.hs" 9 46 9 48 ] } (DeclBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 5 9 48 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 9 9 9 , SrcSpan "tests/examples/THTypes.hs" 9 46 9 46 , SrcSpan "tests/examples/THTypes.hs" 9 46 9 48 ] } [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 9 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 9 9 17 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 18 9 45 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 18 9 45 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 18 9 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 18 9 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 18 9 22 , srcInfoPoints = [] } "Show"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 23 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 23 9 25 , SrcSpan "tests/examples/THTypes.hs" 9 44 9 45 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 23 9 45 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 23 9 25 , SrcSpan "tests/examples/THTypes.hs" 9 44 9 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 25 9 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 25 9 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 25 9 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 25 9 29 , srcInfoPoints = [] } "conT"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 30 9 44 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 9 30 9 31 , SrcSpan "tests/examples/THTypes.hs" 9 43 9 44 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 31 9 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 31 9 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 31 9 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 31 9 37 , srcInfoPoints = [] } "mkName"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 38 9 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 9 38 9 43 , srcInfoPoints = [] } "Int" "Int"))))))))) Nothing ]))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 1 11 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 1 11 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 1 11 5 , srcInfoPoints = [] } "unit") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 6 11 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 6 11 7 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 8 11 19 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 11 8 11 9 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 10 11 19 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 11 10 11 13 , SrcSpan "tests/examples/THTypes.hs" 11 17 11 19 ] } (TypeBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 10 11 19 , srcInfoPoints = [ SrcSpan "tests/examples/THTypes.hs" 11 10 11 13 , SrcSpan "tests/examples/THTypes.hs" 11 17 11 19 ] } (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 14 11 16 , srcInfoPoints = [] } (IdSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTypes.hs" 11 14 11 16 , srcInfoPoints = [] } "x"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExtraPrettyParentheses.hs.parser.golden0000644000000000000000000004715113534314633025745 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 1 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 1 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 1 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 1 5 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 1 9 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 10 1 10 1 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 10 1 10 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 1 17 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 10 1 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 1 1 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 6 1 9 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 6 1 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 6 1 7 , srcInfoPoints = [] } "Q")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 8 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 8 1 9 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 12 1 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 12 1 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 12 1 13 , srcInfoPoints = [] } "Q") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 14 1 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 14 1 15 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 16 1 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 1 16 1 17 , srcInfoPoints = [] } "a") ]) ] [] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 1 5 19 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 1 5 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 1 5 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 1 5 2 , srcInfoPoints = [] } "x")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 3 5 4 , srcInfoPoints = [] } "*") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 5 5 8 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 5 5 6 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 5 5 6 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 5 5 6 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 7 5 8 , srcInfoPoints = [] } 1 "1") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 9 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 9 5 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 11 5 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 11 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 11 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 11 5 17 , srcInfoPoints = [] } "negate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 18 5 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 18 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 5 18 5 19 , srcInfoPoints = [] } "x"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 27 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 1 8 5 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 6 8 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 6 8 7 , srcInfoPoints = [] } "x") ]) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 8 8 10 , srcInfoPoints = [] } "<>") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 11 8 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 11 8 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 11 8 18 , srcInfoPoints = [] } "Nothing")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 19 8 27 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 19 8 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 21 8 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 21 8 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 21 8 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 21 8 25 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 26 8 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 26 8 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 8 26 8 27 , srcInfoPoints = [] } "x"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 1 9 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 1 9 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 1 9 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 3 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 3 9 4 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 13 9 14 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 4 9 13 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 4 9 7 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 4 9 5 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 4 9 5 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 4 9 5 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 6 9 7 , srcInfoPoints = [] } 1 "1")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 8 9 11 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 8 9 9 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 9 9 10 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 10 9 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 9 9 10 , srcInfoPoints = [] } "Q")) (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 12 9 13 , srcInfoPoints = [] })) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 15 9 19 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 15 9 16 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 19 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 18 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 18 9 19 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 19 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 18 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 18 9 19 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 19 , srcInfoPoints = [ SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 17 9 18 , SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 9 18 9 19 ] })))) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 3 1 3 78) " In this example, the pretty-printer should insert extra parentheses around" , Comment False (SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 4 1 4 33) " the negative literal pattern." , Comment False (SrcSpan "tests/examples/ExtraPrettyParentheses.hs" 7 1 7 78) " In these examples, the pretty-printer should not insert extra parentheses." ] ) haskell-src-exts-1.23.1/tests/examples/StarInType.hs.parser.golden0000644000000000000000000002466113534314633023313 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 1 1 1 1 , SrcSpan "tests/examples/StarInType.hs" 2 1 2 1 , SrcSpan "tests/examples/StarInType.hs" 2 1 2 1 , SrcSpan "tests/examples/StarInType.hs" 2 1 2 1 , SrcSpan "tests/examples/StarInType.hs" 3 1 3 1 , SrcSpan "tests/examples/StarInType.hs" 4 1 4 1 , SrcSpan "tests/examples/StarInType.hs" 5 1 5 1 , SrcSpan "tests/examples/StarInType.hs" 6 1 6 1 , SrcSpan "tests/examples/StarInType.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 1 1 1 47 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 1 1 1 13 , SrcSpan "tests/examples/StarInType.hs" 1 27 1 28 , SrcSpan "tests/examples/StarInType.hs" 1 44 1 47 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 1 29 1 43 , srcInfoPoints = [] } "KindSignatures" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 1 2 11 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 2 8 2 9 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 1 2 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 6 2 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 6 2 7 , srcInfoPoints = [] } "B")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 10 2 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 10 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 2 10 2 11 , srcInfoPoints = [] } "B") []) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 1 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 3 12 3 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 6 3 11 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 6 3 11 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 6 3 7 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 8 3 9 , srcInfoPoints = [] } "*")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 10 3 11 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 14 3 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 14 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 3 14 3 17 , srcInfoPoints = [] } "Foo") []) ] [] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 1 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 4 1 4 5 , SrcSpan "tests/examples/StarInType.hs" 4 8 4 9 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 6 4 7 , srcInfoPoints = [] } "A")) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 10 4 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 10 4 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 10 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 10 4 11 , srcInfoPoints = [] } "B"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 12 4 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 12 4 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 12 4 13 , srcInfoPoints = [] } "*"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 14 4 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 14 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 4 14 4 15 , srcInfoPoints = [] } "B")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 1 5 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 1 5 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 1 5 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 6 5 15 , srcInfoPoints = [ SrcSpan "tests/examples/StarInType.hs" 5 6 5 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 8 5 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 8 5 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 8 5 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 8 5 13 , srcInfoPoints = [] } "print"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 14 5 15 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/StarInType.hs" 5 14 5 15 , srcInfoPoints = [] } 1 "1")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/Vta2.hs.parser.golden0000644000000000000000000014131013534314633022054 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 1 1 15 1 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 1 1 1 1 , SrcSpan "tests/examples/Vta2.hs" 4 1 4 1 , SrcSpan "tests/examples/Vta2.hs" 4 1 4 1 , SrcSpan "tests/examples/Vta2.hs" 6 1 6 1 , SrcSpan "tests/examples/Vta2.hs" 7 1 7 1 , SrcSpan "tests/examples/Vta2.hs" 11 1 11 1 , SrcSpan "tests/examples/Vta2.hs" 12 1 12 1 , SrcSpan "tests/examples/Vta2.hs" 15 1 15 1 , SrcSpan "tests/examples/Vta2.hs" 15 1 15 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 4 1 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 4 1 4 7 , SrcSpan "tests/examples/Vta2.hs" 4 13 4 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 4 8 4 12 , srcInfoPoints = [] } "Vta2") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 1 1 1 46 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 1 1 1 13 , SrcSpan "tests/examples/Vta2.hs" 1 24 1 25 , SrcSpan "tests/examples/Vta2.hs" 1 43 1 46 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 1 14 1 24 , srcInfoPoints = [] } "RankNTypes" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 1 26 1 42 , srcInfoPoints = [] } "TypeApplications" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 1 6 53 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 9 6 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 1 6 8 , srcInfoPoints = [] } "checkIf" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 12 6 53 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 17 6 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 12 6 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 12 6 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 12 6 16 , srcInfoPoints = [] } "Bool"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 20 6 53 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 39 6 41 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 20 6 38 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 20 6 21 , SrcSpan "tests/examples/Vta2.hs" 6 37 6 38 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 21 6 37 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 21 6 27 , SrcSpan "tests/examples/Vta2.hs" 6 29 6 30 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 28 6 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 28 6 29 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 31 6 37 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 33 6 35 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 31 6 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 31 6 32 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 36 6 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 36 6 37 , srcInfoPoints = [] } "a"))))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 42 6 53 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 6 42 6 43 , SrcSpan "tests/examples/Vta2.hs" 6 47 6 48 , SrcSpan "tests/examples/Vta2.hs" 6 52 6 53 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 43 6 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 43 6 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 43 6 47 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 49 6 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 49 6 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 6 49 6 52 , srcInfoPoints = [] } "Int")) ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 1 9 43 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 1 9 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 1 7 8 , srcInfoPoints = [] } "checkIf") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 9 7 10 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 11 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 7 11 7 12 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 13 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 7 13 7 15 , SrcSpan "tests/examples/Vta2.hs" 8 13 8 17 , SrcSpan "tests/examples/Vta2.hs" 9 13 9 17 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 16 7 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 16 7 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 7 16 7 20 , srcInfoPoints = [] } "True"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 18 8 37 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 8 18 8 19 , SrcSpan "tests/examples/Vta2.hs" 8 21 8 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 19 8 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 19 8 20 , srcInfoPoints = [] } "f") ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 24 8 37 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 8 24 8 25 , SrcSpan "tests/examples/Vta2.hs" 8 31 8 32 , SrcSpan "tests/examples/Vta2.hs" 8 36 8 37 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 25 8 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 25 8 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 25 8 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 25 8 26 , srcInfoPoints = [] } "f"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 27 8 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 27 8 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 27 8 31 , srcInfoPoints = [] } "True"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 33 8 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 33 8 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 33 8 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 33 8 34 , srcInfoPoints = [] } "f"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 35 8 36 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 8 35 8 36 , srcInfoPoints = [] } 5 "5")) ])) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 18 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 9 18 9 19 , SrcSpan "tests/examples/Vta2.hs" 9 21 9 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 19 9 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 19 9 20 , srcInfoPoints = [] } "f") ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 24 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 9 24 9 25 , SrcSpan "tests/examples/Vta2.hs" 9 32 9 33 , SrcSpan "tests/examples/Vta2.hs" 9 42 9 43 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 25 9 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 25 9 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 25 9 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 25 9 26 , srcInfoPoints = [] } "f"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 27 9 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 27 9 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 27 9 32 , srcInfoPoints = [] } "False"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 34 9 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 34 9 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 34 9 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 34 9 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 34 9 35 , srcInfoPoints = [] } "f"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 36 9 40 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 9 36 9 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 37 9 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 37 9 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 37 9 40 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 41 9 42 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 9 41 9 42 , srcInfoPoints = [] } 3 "3")) ])))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 1 11 55 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 11 11 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 1 11 10 , srcInfoPoints = [] } "checkCase" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 14 11 55 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 19 11 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 14 11 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 14 11 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 14 11 18 , srcInfoPoints = [] } "Bool"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 22 11 55 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 41 11 43 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 22 11 40 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 22 11 23 , SrcSpan "tests/examples/Vta2.hs" 11 39 11 40 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 23 11 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 23 11 29 , SrcSpan "tests/examples/Vta2.hs" 11 31 11 32 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 30 11 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 30 11 31 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 33 11 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 35 11 37 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 33 11 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 33 11 34 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 38 11 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 38 11 39 , srcInfoPoints = [] } "a"))))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 44 11 55 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 11 44 11 45 , SrcSpan "tests/examples/Vta2.hs" 11 49 11 50 , SrcSpan "tests/examples/Vta2.hs" 11 54 11 55 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 45 11 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 45 11 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 45 11 49 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 51 11 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 51 11 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 11 51 11 54 , srcInfoPoints = [] } "Int")) ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 1 14 51 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 1 14 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 1 12 10 , srcInfoPoints = [] } "checkCase") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 11 12 12 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 13 14 51 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 12 13 12 14 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 15 14 51 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 12 15 12 19 , SrcSpan "tests/examples/Vta2.hs" 12 25 12 27 , SrcSpan "tests/examples/Vta2.hs" 13 17 13 17 , SrcSpan "tests/examples/Vta2.hs" 14 17 14 17 , SrcSpan "tests/examples/Vta2.hs" 15 1 15 0 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 20 12 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 20 12 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 12 20 12 24 , srcInfoPoints = [] } "True"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 17 13 44 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 17 13 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 17 13 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 17 13 21 , srcInfoPoints = [] } "True")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 22 13 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 13 22 13 24 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 25 13 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 13 25 13 26 , SrcSpan "tests/examples/Vta2.hs" 13 28 13 30 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 26 13 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 26 13 27 , srcInfoPoints = [] } "f") ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 31 13 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 13 31 13 32 , SrcSpan "tests/examples/Vta2.hs" 13 38 13 39 , SrcSpan "tests/examples/Vta2.hs" 13 43 13 44 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 32 13 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 32 13 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 32 13 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 32 13 33 , srcInfoPoints = [] } "f"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 34 13 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 34 13 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 34 13 38 , srcInfoPoints = [] } "True"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 40 13 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 40 13 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 40 13 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 40 13 41 , srcInfoPoints = [] } "f"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 42 13 43 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 13 42 13 43 , srcInfoPoints = [] } 5 "5")) ]))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 17 14 51 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 17 14 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 17 14 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 17 14 22 , srcInfoPoints = [] } "False")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 23 14 51 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 14 23 14 25 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 26 14 51 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 14 26 14 27 , SrcSpan "tests/examples/Vta2.hs" 14 29 14 31 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 27 14 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 27 14 28 , srcInfoPoints = [] } "f") ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 32 14 51 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 14 32 14 33 , SrcSpan "tests/examples/Vta2.hs" 14 40 14 41 , SrcSpan "tests/examples/Vta2.hs" 14 50 14 51 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 33 14 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 33 14 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 33 14 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 33 14 34 , srcInfoPoints = [] } "f"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 35 14 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 35 14 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 35 14 40 , srcInfoPoints = [] } "False"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 42 14 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 42 14 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 42 14 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 42 14 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 42 14 43 , srcInfoPoints = [] } "f"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 44 14 48 , srcInfoPoints = [ SrcSpan "tests/examples/Vta2.hs" 14 44 14 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 45 14 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 45 14 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 45 14 48 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 49 14 50 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta2.hs" 14 49 14 50 , srcInfoPoints = [] } 3 "3")) ]))) Nothing ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/InfixFunBind.hs.parser.golden0000644000000000000000000000572513534314633023574 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixFunBind.hs" 2 1 2 1 , SrcSpan "tests/examples/InfixFunBind.hs" 2 1 2 1 ] } Nothing [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 22 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 1 1 5 , srcInfoPoints = [] } "left")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 7 1 12 , srcInfoPoints = [ SrcSpan "tests/examples/InfixFunBind.hs" 1 6 1 7 , SrcSpan "tests/examples/InfixFunBind.hs" 1 7 1 12 , SrcSpan "tests/examples/InfixFunBind.hs" 1 12 1 13 ] } "first") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 14 1 15 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 16 1 22 , srcInfoPoints = [ SrcSpan "tests/examples/InfixFunBind.hs" 1 16 1 17 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 18 1 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 18 1 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixFunBind.hs" 1 18 1 22 , srcInfoPoints = [] } "left")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeIdents.hs.parser.golden0000644000000000000000000001444113551226004023772 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeIdents.hs" 2 1 2 1 , SrcSpan "tests/examples/UnicodeIdents.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeIdents.hs" 3 1 3 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 7 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 1 1 2 , srcInfoPoints = [] } "\29483")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 3 1 7 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 1 3 1 4 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 7 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 6 , SrcSpan "tests/examples/UnicodeIdents.hs" 1 6 1 7 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 7 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 6 , SrcSpan "tests/examples/UnicodeIdents.hs" 1 6 1 7 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 7 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 1 5 1 6 , SrcSpan "tests/examples/UnicodeIdents.hs" 1 6 1 7 ] })))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 1 2 13 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 1 2 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 1 2 3 , srcInfoPoints = [] } "\33258\20055") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 4 2 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 4 2 5 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 6 2 13 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeIdents.hs" 2 6 2 7 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 8 2 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 8 2 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 8 2 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 8 2 9 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 10 2 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 10 2 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 10 2 11 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 12 2 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 12 2 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeIdents.hs" 2 12 2 13 , srcInfoPoints = [] } "x"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/Overlapping.hs.parser.golden0000644000000000000000000007623013534314633023536 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 1 1 26 1 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 1 1 1 1 , SrcSpan "tests/examples/Overlapping.hs" 2 1 2 1 , SrcSpan "tests/examples/Overlapping.hs" 4 1 4 1 , SrcSpan "tests/examples/Overlapping.hs" 4 1 4 1 , SrcSpan "tests/examples/Overlapping.hs" 6 1 6 1 , SrcSpan "tests/examples/Overlapping.hs" 9 1 9 1 , SrcSpan "tests/examples/Overlapping.hs" 12 1 12 1 , SrcSpan "tests/examples/Overlapping.hs" 15 1 15 1 , SrcSpan "tests/examples/Overlapping.hs" 18 1 18 1 , SrcSpan "tests/examples/Overlapping.hs" 26 1 26 1 , SrcSpan "tests/examples/Overlapping.hs" 26 1 26 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 4 1 4 25 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 4 1 4 7 , SrcSpan "tests/examples/Overlapping.hs" 4 20 4 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 4 8 4 19 , srcInfoPoints = [] } "Overlapping") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 1 1 1 39 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 1 1 1 13 , SrcSpan "tests/examples/Overlapping.hs" 1 36 1 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 1 14 1 31 , srcInfoPoints = [] } "FlexibleInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 2 1 2 39 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 2 1 2 13 , SrcSpan "tests/examples/Overlapping.hs" 2 36 2 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 2 14 2 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 1 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 6 1 6 6 , SrcSpan "tests/examples/Overlapping.hs" 6 13 6 18 , SrcSpan "tests/examples/Overlapping.hs" 7 3 7 3 , SrcSpan "tests/examples/Overlapping.hs" 9 1 9 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 7 6 12 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 7 6 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 7 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 7 6 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 9 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 9 6 10 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 11 6 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 6 11 6 12 , srcInfoPoints = [] } "b"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 3 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 7 5 7 7 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 3 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 7 5 7 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 3 7 4 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 8 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 7 10 7 12 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 8 7 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 8 7 9 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 13 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 7 15 7 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 13 7 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 13 7 14 , srcInfoPoints = [] } "b")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 18 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 18 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 7 18 7 22 , srcInfoPoints = [] } "Bool")))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 1 12 0 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 9 1 9 9 , SrcSpan "tests/examples/Overlapping.hs" 9 16 9 21 , SrcSpan "tests/examples/Overlapping.hs" 10 3 10 3 , SrcSpan "tests/examples/Overlapping.hs" 12 1 12 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 15 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 15 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 13 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 10 9 11 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 12 9 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 12 9 13 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 14 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 9 14 9 15 , srcInfoPoints = [] } "b")))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 3 10 16 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 3 10 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 3 10 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 3 10 4 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 5 10 6 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 7 10 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 9 10 16 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 10 9 10 10 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 11 10 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 11 10 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 10 11 10 16 , srcInfoPoints = [] } "False")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 1 15 0 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 12 1 12 9 , SrcSpan "tests/examples/Overlapping.hs" 12 36 12 41 , SrcSpan "tests/examples/Overlapping.hs" 13 3 13 3 , SrcSpan "tests/examples/Overlapping.hs" 15 1 15 0 ] } (Just (Overlapping SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 10 12 25 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 35 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 35 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 33 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 30 12 31 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 32 12 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 32 12 33 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 34 12 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 12 34 12 35 , srcInfoPoints = [] } "a")))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 3 13 15 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 3 13 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 3 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 3 13 4 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 5 13 6 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 7 13 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 9 13 15 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 13 9 13 10 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 11 13 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 11 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 13 11 13 15 , srcInfoPoints = [] } "True")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 1 18 0 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 15 1 15 9 , SrcSpan "tests/examples/Overlapping.hs" 15 33 15 38 , SrcSpan "tests/examples/Overlapping.hs" 16 3 16 3 , SrcSpan "tests/examples/Overlapping.hs" 18 1 18 0 ] } (Just (Overlaps SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 10 15 22 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 32 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 30 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 27 15 28 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 29 15 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 29 15 30 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 31 15 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 15 31 15 32 , srcInfoPoints = [] } "a")))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 3 16 15 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 3 16 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 3 16 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 3 16 4 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 5 16 6 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 7 16 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 9 16 15 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 16 9 16 10 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 11 16 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 11 16 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 16 11 16 15 , srcInfoPoints = [] } "True")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 1 26 0 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 18 1 18 9 , SrcSpan "tests/examples/Overlapping.hs" 18 37 18 42 , SrcSpan "tests/examples/Overlapping.hs" 19 3 19 3 , SrcSpan "tests/examples/Overlapping.hs" 26 1 26 0 ] } (Just (Overlappable SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 10 18 26 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 36 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 36 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 34 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 31 18 32 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 33 18 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 33 18 34 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 35 18 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 18 35 18 36 , srcInfoPoints = [] } "a")))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 3 19 15 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 3 19 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 3 19 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 3 19 4 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 5 19 6 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 7 19 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 9 19 15 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapping.hs" 19 9 19 10 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 11 19 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 11 19 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapping.hs" 19 11 19 15 , srcInfoPoints = [] } "True")))) Nothing ]) ]) ] , [ Comment False (SrcSpan "tests/examples/Overlapping.hs" 21 1 21 17) " >>> f 'a' 'b'" , Comment False (SrcSpan "tests/examples/Overlapping.hs" 22 1 22 8) " True" , Comment False (SrcSpan "tests/examples/Overlapping.hs" 23 1 23 3) "" , Comment False (SrcSpan "tests/examples/Overlapping.hs" 24 1 24 24) " >>> f 'a' \"starfish\"" , Comment False (SrcSpan "tests/examples/Overlapping.hs" 25 1 25 9) " False" ] ) haskell-src-exts-1.23.1/tests/examples/EmptyWhere.hs.parser.golden0000644000000000000000000000433013534314633023331 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyWhere.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyWhere.hs" 2 1 2 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyWhere.hs" 1 9 1 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 1 1 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 1 1 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 5 1 8 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyWhere.hs" 1 5 1 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 7 1 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 1 7 1 8 , srcInfoPoints = [] } 5 "5"))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyWhere.hs" 2 0 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyWhere.hs" 2 0 2 0 ] } [])) ] , [] ) haskell-src-exts-1.23.1/tests/examples/CxtWhitespace.hs.parser.golden0000644000000000000000000002761113556712523024026 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 2 1 , SrcSpan "tests/examples/CxtWhitespace.hs" 5 1 5 1 , SrcSpan "tests/examples/CxtWhitespace.hs" 7 1 7 1 , SrcSpan "tests/examples/CxtWhitespace.hs" 7 1 7 1 ] } Nothing [] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 2 1 2 9 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 10 2 25 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 10 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 2 10 2 11 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 16 2 17 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 18 2 20 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 10 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 2 10 2 11 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 16 2 17 , SrcSpan "tests/examples/CxtWhitespace.hs" 2 18 2 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 12 2 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 12 2 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 12 2 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 12 2 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 12 2 14 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 15 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 15 2 16 , srcInfoPoints = [] } "h"))))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 21 2 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 21 2 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 21 2 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 21 2 23 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 24 2 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 2 24 2 25 , srcInfoPoints = [] } "h")))) Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 1 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 5 1 5 9 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 10 5 31 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 10 5 26 , srcInfoPoints = [ SrcSpan "tests/examples/CxtWhitespace.hs" 5 10 5 11 , SrcSpan "tests/examples/CxtWhitespace.hs" 5 16 5 17 , SrcSpan "tests/examples/CxtWhitespace.hs" 5 22 5 23 , SrcSpan "tests/examples/CxtWhitespace.hs" 5 24 5 26 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 12 5 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 12 5 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 12 5 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 12 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 12 5 14 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 15 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 15 5 16 , srcInfoPoints = [] } "h"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 18 5 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 18 5 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 18 5 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 18 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 18 5 20 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 21 5 22 , srcInfoPoints = [] } "h"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 27 5 31 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 27 5 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 27 5 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 27 5 29 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 30 5 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CxtWhitespace.hs" 5 30 5 31 , srcInfoPoints = [] } "h")))) Nothing ] , [ Comment False (SrcSpan "tests/examples/CxtWhitespace.hs" 1 1 1 13) " is not ok" , Comment False (SrcSpan "tests/examples/CxtWhitespace.hs" 4 1 4 9) " is ok" ] ) haskell-src-exts-1.23.1/tests/examples/ForeignImport.hs.parser.golden0000644000000000000000000002266213534314633024034 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 3 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImport.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImport.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImport.hs" 5 1 5 1 , SrcSpan "tests/examples/ForeignImport.hs" 5 1 5 1 ] } Nothing [] [] [ ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 3 1 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 3 1 3 8 , SrcSpan "tests/examples/ForeignImport.hs" 3 9 3 15 , SrcSpan "tests/examples/ForeignImport.hs" 3 29 3 42 , SrcSpan "tests/examples/ForeignImport.hs" 4 14 4 16 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 3 16 3 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 3 22 3 28 , srcInfoPoints = [] })) (Just "getProgArgv") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 2 4 13 , srcInfoPoints = [] } "getProgArgv") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 17 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 26 4 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 17 4 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 17 4 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 17 4 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 17 4 20 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 21 4 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 21 4 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 21 4 25 , srcInfoPoints = [] } "CInt")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 29 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 47 4 49 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 29 4 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 29 4 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 29 4 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 29 4 32 , srcInfoPoints = [] } "Ptr"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 33 4 46 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 33 4 34 , SrcSpan "tests/examples/ForeignImport.hs" 4 45 4 46 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 34 4 45 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 34 4 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 34 4 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 34 4 37 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 38 4 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 38 4 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 38 4 45 , srcInfoPoints = [] } "CString")))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 50 4 55 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 50 4 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 50 4 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 50 4 52 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 54 , SrcSpan "tests/examples/ForeignImport.hs" 4 54 4 55 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 54 , SrcSpan "tests/examples/ForeignImport.hs" 4 54 4 55 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImport.hs" 4 53 4 54 , SrcSpan "tests/examples/ForeignImport.hs" 4 54 4 55 ] })))))) ] , [ Comment True (SrcSpan "tests/examples/ForeignImport.hs" 1 1 2 67) " If compiled without ForeignFunctionInterface (part of Haskell2010),\n it complains not about FFI but about missing TemplateHaskell " ] ) haskell-src-exts-1.23.1/tests/examples/SCCPragmas.hs.parser.golden0000644000000000000000000000532013534314633023163 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/SCCPragmas.hs" 1 1 1 1 , SrcSpan "tests/examples/SCCPragmas.hs" 1 1 1 1 , SrcSpan "tests/examples/SCCPragmas.hs" 3 1 3 1 , SrcSpan "tests/examples/SCCPragmas.hs" 4 1 4 1 , SrcSpan "tests/examples/SCCPragmas.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 1 1 1 24 , srcInfoPoints = [ SrcSpan "tests/examples/SCCPragmas.hs" 1 1 1 7 , SrcSpan "tests/examples/SCCPragmas.hs" 1 19 1 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 1 8 1 18 , srcInfoPoints = [] } "SCCPragmas") Nothing Nothing)) [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 1 3 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 1 3 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 1 3 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 3 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/SCCPragmas.hs" 3 3 3 4 ] } (SCCPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 5 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/SCCPragmas.hs" 3 13 3 21 , SrcSpan "tests/examples/SCCPragmas.hs" 3 22 3 25 ] } "wibble" (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 26 3 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SCCPragmas.hs" 3 26 3 27 , srcInfoPoints = [] } 3 "3")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/IndentedTopLevelWhere.hs.parser.golden0000644000000000000000000000014013534314633025433 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedTopLevelWhere.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/FamilyKindSig.hs.parser.golden0000644000000000000000000001004313534314633023730 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 1 1 1 1 , SrcSpan "tests/examples/FamilyKindSig.hs" 2 1 2 1 , SrcSpan "tests/examples/FamilyKindSig.hs" 2 1 2 1 , SrcSpan "tests/examples/FamilyKindSig.hs" 4 1 4 1 , SrcSpan "tests/examples/FamilyKindSig.hs" 5 1 5 1 , SrcSpan "tests/examples/FamilyKindSig.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 2 1 2 7 , SrcSpan "tests/examples/FamilyKindSig.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 2 8 2 21 , srcInfoPoints = [] } "FamilyKindSig") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 1 1 1 13 , SrcSpan "tests/examples/FamilyKindSig.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 1 4 38 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 4 1 4 5 , SrcSpan "tests/examples/FamilyKindSig.hs" 4 6 4 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 13 4 38 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 13 4 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 13 4 24 , srcInfoPoints = [] } "WithKindSig")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 25 4 38 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 4 25 4 26 , SrcSpan "tests/examples/FamilyKindSig.hs" 4 28 4 30 , SrcSpan "tests/examples/FamilyKindSig.hs" 4 37 4 38 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 26 4 27 , srcInfoPoints = [] } "a") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 31 4 37 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyKindSig.hs" 4 33 4 35 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 31 4 32 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyKindSig.hs" 4 36 4 37 , srcInfoPoints = [] })))) Nothing Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/NonDecreasing.hs.parser.golden0000644000000000000000000000020113534314633023750 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NonDecreasing.hs" 8 3) "Parse error: Last statement in a do-block must be an expression" haskell-src-exts-1.23.1/tests/examples/DerivingVia2.hs.parser.golden0000644000000000000000000030761613556712523023552 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 1 1 42 1 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingVia2.hs" 2 1 2 1 , SrcSpan "tests/examples/DerivingVia2.hs" 3 1 3 1 , SrcSpan "tests/examples/DerivingVia2.hs" 4 1 4 1 , SrcSpan "tests/examples/DerivingVia2.hs" 5 1 5 1 , SrcSpan "tests/examples/DerivingVia2.hs" 6 1 6 1 , SrcSpan "tests/examples/DerivingVia2.hs" 7 1 7 1 , SrcSpan "tests/examples/DerivingVia2.hs" 8 1 8 1 , SrcSpan "tests/examples/DerivingVia2.hs" 9 1 9 1 , SrcSpan "tests/examples/DerivingVia2.hs" 9 1 9 1 , SrcSpan "tests/examples/DerivingVia2.hs" 11 1 11 1 , SrcSpan "tests/examples/DerivingVia2.hs" 12 1 12 1 , SrcSpan "tests/examples/DerivingVia2.hs" 13 1 13 1 , SrcSpan "tests/examples/DerivingVia2.hs" 14 1 14 1 , SrcSpan "tests/examples/DerivingVia2.hs" 16 1 16 1 , SrcSpan "tests/examples/DerivingVia2.hs" 20 1 20 1 , SrcSpan "tests/examples/DerivingVia2.hs" 23 1 23 1 , SrcSpan "tests/examples/DerivingVia2.hs" 27 1 27 1 , SrcSpan "tests/examples/DerivingVia2.hs" 28 1 28 1 , SrcSpan "tests/examples/DerivingVia2.hs" 30 1 30 1 , SrcSpan "tests/examples/DerivingVia2.hs" 31 1 31 1 , SrcSpan "tests/examples/DerivingVia2.hs" 33 1 33 1 , SrcSpan "tests/examples/DerivingVia2.hs" 34 1 34 1 , SrcSpan "tests/examples/DerivingVia2.hs" 35 1 35 1 , SrcSpan "tests/examples/DerivingVia2.hs" 36 1 36 1 , SrcSpan "tests/examples/DerivingVia2.hs" 37 1 37 1 , SrcSpan "tests/examples/DerivingVia2.hs" 39 1 39 1 , SrcSpan "tests/examples/DerivingVia2.hs" 40 1 40 1 , SrcSpan "tests/examples/DerivingVia2.hs" 41 1 41 1 , SrcSpan "tests/examples/DerivingVia2.hs" 42 1 42 1 , SrcSpan "tests/examples/DerivingVia2.hs" 42 1 42 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 9 1 9 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 9 1 9 7 , SrcSpan "tests/examples/DerivingVia2.hs" 9 21 9 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 9 8 9 20 , srcInfoPoints = [] } "DerivingVia2") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 1 1 1 13 , SrcSpan "tests/examples/DerivingVia2.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 1 14 1 32 , srcInfoPoints = [] } "DerivingStrategies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 2 1 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 2 1 2 13 , SrcSpan "tests/examples/DerivingVia2.hs" 2 26 2 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 2 14 2 25 , srcInfoPoints = [] } "DerivingVia" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 3 1 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 3 1 3 13 , SrcSpan "tests/examples/DerivingVia2.hs" 3 32 3 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 3 14 3 31 , srcInfoPoints = [] } "FlexibleInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 4 1 4 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 4 1 4 13 , SrcSpan "tests/examples/DerivingVia2.hs" 4 41 4 44 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 4 14 4 40 , srcInfoPoints = [] } "GeneralizedNewtypeDeriving" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 5 1 5 39 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 5 1 5 13 , SrcSpan "tests/examples/DerivingVia2.hs" 5 36 5 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 5 14 5 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 6 1 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 6 1 6 13 , SrcSpan "tests/examples/DerivingVia2.hs" 6 24 6 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 6 14 6 23 , srcInfoPoints = [] } "PolyKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 7 1 7 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 7 1 7 13 , SrcSpan "tests/examples/DerivingVia2.hs" 7 25 7 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 7 14 7 24 , srcInfoPoints = [] } "RankNTypes" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 8 1 8 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 8 1 8 13 , SrcSpan "tests/examples/DerivingVia2.hs" 8 33 8 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 8 14 8 32 , srcInfoPoints = [] } "StandaloneDeriving" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 11 1 11 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 11 1 11 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 11 8 11 27 , srcInfoPoints = [] } "Control.Applicative" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 12 1 12 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 12 1 12 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 12 8 12 28 , srcInfoPoints = [] } "Data.Functor.Compose" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 13 1 13 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 13 1 13 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 13 8 13 18 , srcInfoPoints = [] } "Data.Proxy" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 14 1 14 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 14 1 14 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 14 8 14 22 , srcInfoPoints = [] } "Data.Semigroup" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 1 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 16 29 16 30 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 1 16 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 9 16 28 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 9 16 26 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 9 16 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 9 16 12 , srcInfoPoints = [] } "App")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 13 16 26 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 16 13 16 14 , SrcSpan "tests/examples/DerivingVia2.hs" 16 16 16 18 , SrcSpan "tests/examples/DerivingVia2.hs" 16 25 16 26 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 14 16 15 , srcInfoPoints = [] } "f") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 19 16 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 16 21 16 23 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 19 16 20 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 24 16 25 , srcInfoPoints = [] })))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 27 16 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 27 16 28 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 31 16 40 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 31 16 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 31 16 34 , srcInfoPoints = [] } "App") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 35 16 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 16 35 16 36 , SrcSpan "tests/examples/DerivingVia2.hs" 16 39 16 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 36 16 39 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 36 16 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 36 16 37 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 38 16 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 16 38 16 39 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 17 3 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 17 3 17 11 , SrcSpan "tests/examples/DerivingVia2.hs" 18 5 18 6 , SrcSpan "tests/examples/DerivingVia2.hs" 18 13 18 14 , SrcSpan "tests/examples/DerivingVia2.hs" 18 26 18 27 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 17 12 17 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 6 18 13 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 6 18 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 6 18 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 6 18 13 , srcInfoPoints = [] } "Functor"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 15 18 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 15 18 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 15 18 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 18 15 18 26 , srcInfoPoints = [] } "Applicative"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 1 23 0 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 20 1 20 9 , SrcSpan "tests/examples/DerivingVia2.hs" 20 62 20 67 , SrcSpan "tests/examples/DerivingVia2.hs" 21 3 21 3 , SrcSpan "tests/examples/DerivingVia2.hs" 23 1 23 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 10 20 61 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 10 20 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 20 10 20 11 , SrcSpan "tests/examples/DerivingVia2.hs" 20 24 20 25 , SrcSpan "tests/examples/DerivingVia2.hs" 20 37 20 38 , SrcSpan "tests/examples/DerivingVia2.hs" 20 39 20 41 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 11 20 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 11 20 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 11 20 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 11 20 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 11 20 22 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 23 20 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 23 20 24 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 26 20 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 26 20 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 26 20 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 26 20 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 26 20 35 , srcInfoPoints = [] } "Semigroup"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 36 20 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 36 20 37 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 42 20 61 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 42 20 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 42 20 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 42 20 51 , srcInfoPoints = [] } "Semigroup"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 52 20 61 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 20 52 20 53 , SrcSpan "tests/examples/DerivingVia2.hs" 20 60 20 61 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 53 20 60 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 53 20 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 53 20 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 53 20 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 53 20 56 , srcInfoPoints = [] } "App"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 57 20 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 57 20 58 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 59 20 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 20 59 20 60 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 3 21 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 3 21 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 3 21 7 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 21 3 21 4 , SrcSpan "tests/examples/DerivingVia2.hs" 21 4 21 6 , SrcSpan "tests/examples/DerivingVia2.hs" 21 6 21 7 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 4 21 6 , srcInfoPoints = [] } "<>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 8 21 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 21 8 21 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 10 21 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 10 21 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 10 21 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 10 21 16 , srcInfoPoints = [] } "liftA2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 17 21 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 21 17 21 18 , SrcSpan "tests/examples/DerivingVia2.hs" 21 18 21 20 , SrcSpan "tests/examples/DerivingVia2.hs" 21 20 21 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 17 21 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 21 17 21 18 , SrcSpan "tests/examples/DerivingVia2.hs" 21 18 21 20 , SrcSpan "tests/examples/DerivingVia2.hs" 21 20 21 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 21 18 21 20 , srcInfoPoints = [] } "<>"))))) Nothing) ]) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 1 25 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 23 1 23 9 , SrcSpan "tests/examples/DerivingVia2.hs" 24 10 24 18 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 10 23 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 14 23 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 23 14 23 15 , SrcSpan "tests/examples/DerivingVia2.hs" 23 46 23 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 15 23 46 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 15 23 44 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 15 23 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 15 23 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 15 23 18 , srcInfoPoints = [] } "App"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 19 23 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 23 19 23 20 , SrcSpan "tests/examples/DerivingVia2.hs" 23 43 23 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 20 23 43 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 20 23 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 20 23 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 20 23 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 20 23 27 , srcInfoPoints = [] } "Compose"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 28 23 41 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 23 28 23 29 , SrcSpan "tests/examples/DerivingVia2.hs" 23 31 23 33 , SrcSpan "tests/examples/DerivingVia2.hs" 23 40 23 41 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 29 23 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 29 23 30 , srcInfoPoints = [] } "f")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 34 23 40 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 23 36 23 38 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 34 23 35 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 39 23 40 , srcInfoPoints = [] })))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 42 23 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 42 23 43 , srcInfoPoints = [] } "g"))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 45 23 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 23 45 23 46 , srcInfoPoints = [] } "a")))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 19 25 44 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 19 25 18 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 24 19 24 20 , SrcSpan "tests/examples/DerivingVia2.hs" 24 33 24 34 , SrcSpan "tests/examples/DerivingVia2.hs" 24 48 24 49 , SrcSpan "tests/examples/DerivingVia2.hs" 24 61 24 62 , SrcSpan "tests/examples/DerivingVia2.hs" 25 16 25 18 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 20 24 33 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 20 24 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 20 24 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 20 24 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 20 24 31 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 32 24 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 32 24 33 , srcInfoPoints = [] } "f"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 35 24 48 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 35 24 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 35 24 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 35 24 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 35 24 46 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 47 24 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 47 24 48 , srcInfoPoints = [] } "g"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 50 24 61 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 50 24 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 50 24 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 50 24 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 50 24 59 , srcInfoPoints = [] } "Semigroup"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 60 24 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 24 60 24 61 , srcInfoPoints = [] } "a"))) ])) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 19 25 44 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 19 25 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 19 25 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 19 25 28 , srcInfoPoints = [] } "Semigroup"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 29 25 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 25 29 25 30 , SrcSpan "tests/examples/DerivingVia2.hs" 25 43 25 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 43 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 41 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 30 25 37 , srcInfoPoints = [] } "Compose"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 38 25 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 38 25 39 , srcInfoPoints = [] } "f"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 40 25 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 40 25 41 , srcInfoPoints = [] } "g"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 42 25 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 25 42 25 43 , srcInfoPoints = [] } "a")))))) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 1 27 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 27 1 27 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 7 27 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 7 27 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 7 27 8 , srcInfoPoints = [] } "C")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 9 27 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 27 9 27 10 , SrcSpan "tests/examples/DerivingVia2.hs" 27 12 27 14 , SrcSpan "tests/examples/DerivingVia2.hs" 27 21 27 22 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 10 27 11 , srcInfoPoints = [] } "a") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 15 27 21 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 27 17 27 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 15 27 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 15 27 16 , srcInfoPoints = [] } "k")) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 27 20 27 21 , srcInfoPoints = [] })))) [] Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 1 28 17 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 28 1 28 9 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 10 28 17 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 10 28 17 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 10 28 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 10 28 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 10 28 11 , srcInfoPoints = [] } "C"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 12 28 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 12 28 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 28 12 28 17 , srcInfoPoints = [] } "Proxy"))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 1 30 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 30 19 30 20 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 1 30 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 9 30 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 9 30 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 9 30 16 , srcInfoPoints = [] } "MyProxy")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 17 30 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 17 30 18 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 21 30 38 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 21 30 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 21 30 28 , srcInfoPoints = [] } "MyProxy") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 29 30 38 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 30 29 30 30 , SrcSpan "tests/examples/DerivingVia2.hs" 30 37 30 38 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 30 30 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 30 30 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 30 30 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 30 30 35 , srcInfoPoints = [] } "Proxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 36 30 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 30 36 30 37 , srcInfoPoints = [] } "a"))) ]) ] [] , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 1 31 50 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 31 1 31 9 , SrcSpan "tests/examples/DerivingVia2.hs" 31 32 31 40 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 10 31 13 , srcInfoPoints = [] } (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 14 31 31 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 31 14 31 15 , SrcSpan "tests/examples/DerivingVia2.hs" 31 21 31 23 , SrcSpan "tests/examples/DerivingVia2.hs" 31 30 31 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 15 31 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 15 31 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 15 31 20 , srcInfoPoints = [] } "Proxy"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 24 31 30 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 31 26 31 28 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 24 31 25 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 29 31 30 , srcInfoPoints = [] }))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 41 31 50 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 41 31 50 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 41 31 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 41 31 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 41 31 42 , srcInfoPoints = [] } "C"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 43 31 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 43 31 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 31 43 31 50 , srcInfoPoints = [] } "MyProxy"))))) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 1 33 12 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 33 1 33 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 7 33 12 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 7 33 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 7 33 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 7 33 8 , srcInfoPoints = [] } "Z")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 9 33 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 9 33 10 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 11 33 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 33 11 33 12 , srcInfoPoints = [] } "b"))) [] Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 1 34 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 1 34 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 6 34 9 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 6 34 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 6 34 7 , srcInfoPoints = [] } "T")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 8 34 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 34 8 34 9 , srcInfoPoints = [] } "a"))) [] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 1 35 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 1 35 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 6 35 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 6 35 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 6 35 8 , srcInfoPoints = [] } "X1")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 9 35 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 35 9 35 10 , srcInfoPoints = [] } "a"))) [] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 1 36 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 1 36 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 6 36 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 6 36 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 6 36 8 , srcInfoPoints = [] } "X2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 9 36 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 36 9 36 10 , srcInfoPoints = [] } "a"))) [] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 1 37 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 1 37 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 6 37 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 6 37 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 6 37 8 , srcInfoPoints = [] } "X3")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 9 37 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 37 9 37 10 , srcInfoPoints = [] } "a"))) [] [] , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 1 39 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 39 1 39 9 , SrcSpan "tests/examples/DerivingVia2.hs" 39 30 39 38 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 10 39 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 14 39 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 39 14 39 15 , SrcSpan "tests/examples/DerivingVia2.hs" 39 28 39 29 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 15 39 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 39 15 39 21 , SrcSpan "tests/examples/DerivingVia2.hs" 39 23 39 24 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 22 39 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 22 39 23 , srcInfoPoints = [] } "a") ]) Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 25 39 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 25 39 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 25 39 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 25 39 26 , srcInfoPoints = [] } "T"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 27 39 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 27 39 28 , srcInfoPoints = [] } "a"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 59 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 59 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 52 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 49 39 50 , srcInfoPoints = [] } "Z"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 51 39 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 51 39 52 , srcInfoPoints = [] } "a"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 53 39 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 39 53 39 54 , SrcSpan "tests/examples/DerivingVia2.hs" 39 58 39 59 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 54 39 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 54 39 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 54 39 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 54 39 56 , srcInfoPoints = [] } "X1"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 57 39 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 39 57 39 58 , srcInfoPoints = [] } "b")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 1 40 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 40 1 40 9 , SrcSpan "tests/examples/DerivingVia2.hs" 40 30 40 38 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 10 40 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 24 40 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 40 24 40 25 , SrcSpan "tests/examples/DerivingVia2.hs" 40 28 40 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 25 40 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 25 40 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 25 40 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 25 40 26 , srcInfoPoints = [] } "T"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 27 40 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 27 40 28 , srcInfoPoints = [] } "a")))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 39 40 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 40 39 40 45 , SrcSpan "tests/examples/DerivingVia2.hs" 40 47 40 48 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 46 40 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 46 40 47 , srcInfoPoints = [] } "b") ]) Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 49 40 59 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 49 40 52 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 49 40 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 49 40 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 49 40 50 , srcInfoPoints = [] } "Z"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 51 40 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 51 40 52 , srcInfoPoints = [] } "a"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 53 40 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 40 53 40 54 , SrcSpan "tests/examples/DerivingVia2.hs" 40 58 40 59 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 54 40 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 54 40 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 54 40 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 54 40 56 , srcInfoPoints = [] } "X2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 57 40 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 40 57 40 58 , srcInfoPoints = [] } "b")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 1 41 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 41 1 41 9 , SrcSpan "tests/examples/DerivingVia2.hs" 41 30 41 38 ] } (Just (DerivVia SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 10 41 13 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 14 41 29 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 41 14 41 15 , SrcSpan "tests/examples/DerivingVia2.hs" 41 28 41 29 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 15 41 28 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 41 15 41 21 , SrcSpan "tests/examples/DerivingVia2.hs" 41 23 41 24 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 22 41 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 22 41 23 , srcInfoPoints = [] } "a") ]) Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 25 41 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 25 41 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 25 41 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 25 41 26 , srcInfoPoints = [] } "T"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 27 41 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 27 41 28 , srcInfoPoints = [] } "a"))))))) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 39 41 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 41 39 41 45 , SrcSpan "tests/examples/DerivingVia2.hs" 41 47 41 48 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 46 41 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 46 41 47 , srcInfoPoints = [] } "b") ]) Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 49 41 59 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 49 41 52 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 49 41 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 49 41 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 49 41 50 , srcInfoPoints = [] } "Z"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 51 41 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 51 41 52 , srcInfoPoints = [] } "a"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 53 41 59 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingVia2.hs" 41 53 41 54 , SrcSpan "tests/examples/DerivingVia2.hs" 41 58 41 59 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 54 41 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 54 41 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 54 41 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 54 41 56 , srcInfoPoints = [] } "X3"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 57 41 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingVia2.hs" 41 57 41 58 , srcInfoPoints = [] } "b")))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeFunctions.hs.parser.golden0000644000000000000000000002273713534314633024065 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeFunctions.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeFunctions.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeFunctions.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeFunctions.hs" 5 1 5 1 , SrcSpan "tests/examples/TypeFunctions.hs" 7 1 7 1 , SrcSpan "tests/examples/TypeFunctions.hs" 8 1 8 1 , SrcSpan "tests/examples/TypeFunctions.hs" 8 1 8 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 1 1 1 46 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeFunctions.hs" 1 26 1 27 , SrcSpan "tests/examples/TypeFunctions.hs" 1 43 1 46 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 1 28 1 42 , srcInfoPoints = [] } "KindSignatures" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 1 3 13 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 3 9 3 10 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 6 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 6 3 8 , srcInfoPoints = [] } "Id")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 11 3 13 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 11 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 3 11 3 13 , srcInfoPoints = [] } "Id") []) ] [] , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 1 5 32 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 5 1 5 5 , SrcSpan "tests/examples/TypeFunctions.hs" 5 6 5 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 13 5 32 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 13 5 30 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 13 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 13 5 16 , srcInfoPoints = [] } "Rep")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 17 5 30 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 5 17 5 18 , SrcSpan "tests/examples/TypeFunctions.hs" 5 20 5 22 , SrcSpan "tests/examples/TypeFunctions.hs" 5 29 5 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 18 5 19 , srcInfoPoints = [] } "f") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 23 5 29 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 5 25 5 27 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 23 5 24 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 28 5 29 , srcInfoPoints = [] })))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 31 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 31 5 32 , srcInfoPoints = [] } "x"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 33 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 5 33 5 35 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 5 36 5 37 , srcInfoPoints = [] }))) Nothing , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 1 7 27 , srcInfoPoints = [ SrcSpan "tests/examples/TypeFunctions.hs" 7 1 7 5 , SrcSpan "tests/examples/TypeFunctions.hs" 7 6 7 14 , SrcSpan "tests/examples/TypeFunctions.hs" 7 24 7 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 15 7 23 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 15 7 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 15 7 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 15 7 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 15 7 18 , srcInfoPoints = [] } "Rep"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 19 7 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 19 7 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 19 7 21 , srcInfoPoints = [] } "Id")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 22 7 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 22 7 23 , srcInfoPoints = [] } "x"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 26 7 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeFunctions.hs" 7 26 7 27 , srcInfoPoints = [] } "x")) ] , [] ) haskell-src-exts-1.23.1/tests/examples/RCategory.hs.parser.golden0000644000000000000000000036131313556712523023152 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 1 1 46 1 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 1 1 1 1 , SrcSpan "tests/examples/RCategory.hs" 2 1 2 1 , SrcSpan "tests/examples/RCategory.hs" 2 1 2 1 , SrcSpan "tests/examples/RCategory.hs" 5 1 5 1 , SrcSpan "tests/examples/RCategory.hs" 7 1 7 1 , SrcSpan "tests/examples/RCategory.hs" 9 1 9 1 , SrcSpan "tests/examples/RCategory.hs" 10 1 10 1 , SrcSpan "tests/examples/RCategory.hs" 14 1 14 1 , SrcSpan "tests/examples/RCategory.hs" 25 1 25 1 , SrcSpan "tests/examples/RCategory.hs" 32 1 32 1 , SrcSpan "tests/examples/RCategory.hs" 38 1 38 1 , SrcSpan "tests/examples/RCategory.hs" 40 1 40 1 , SrcSpan "tests/examples/RCategory.hs" 43 1 43 1 , SrcSpan "tests/examples/RCategory.hs" 45 1 45 1 , SrcSpan "tests/examples/RCategory.hs" 46 1 46 1 , SrcSpan "tests/examples/RCategory.hs" 46 1 46 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 2 1 2 7 , SrcSpan "tests/examples/RCategory.hs" 2 26 2 31 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 2 8 2 25 , srcInfoPoints = [] } "Control.RCategory") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 1 1 1 70 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 1 1 1 13 , SrcSpan "tests/examples/RCategory.hs" 1 26 1 27 , SrcSpan "tests/examples/RCategory.hs" 1 43 1 44 , SrcSpan "tests/examples/RCategory.hs" 1 67 1 70 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 1 28 1 43 , srcInfoPoints = [] } "ConstraintKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 1 45 1 66 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 5 1 5 25 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 5 1 5 7 , SrcSpan "tests/examples/RCategory.hs" 5 8 5 17 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 5 18 5 25 , srcInfoPoints = [] } "Prelude" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 7 1 7 16 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 7 1 7 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 7 8 7 16 , srcInfoPoints = [] } "GHC.Prim" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 9 1 9 11 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 9 8 9 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 9 1 9 7 , srcInfoPoints = [] }) (Just 9) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 9 10 9 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 9 10 9 11 , srcInfoPoints = [] } ".") ] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 1 10 18 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 10 8 10 9 , SrcSpan "tests/examples/RCategory.hs" 10 13 10 14 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 1 10 7 , srcInfoPoints = [] }) (Just 1) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 10 10 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 10 10 13 , srcInfoPoints = [] } ">>>") , VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 15 10 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 10 15 10 18 , srcInfoPoints = [] } "<<<") ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 1 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 14 1 14 6 , SrcSpan "tests/examples/RCategory.hs" 14 21 14 26 , SrcSpan "tests/examples/RCategory.hs" 15 3 15 3 , SrcSpan "tests/examples/RCategory.hs" 18 3 18 3 , SrcSpan "tests/examples/RCategory.hs" 22 3 22 3 , SrcSpan "tests/examples/RCategory.hs" 25 1 25 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 7 14 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 7 14 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 7 14 16 , srcInfoPoints = [] } "RCategory")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 17 14 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 14 17 14 20 , srcInfoPoints = [] } "cat"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 3 15 43 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 15 3 15 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 8 15 29 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 8 15 27 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 8 15 25 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 8 15 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 8 15 21 , srcInfoPoints = [] } "RCategoryCtxt")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 22 15 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 22 15 25 , srcInfoPoints = [] } "cat"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 26 15 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 26 15 27 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 28 15 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 28 15 29 , srcInfoPoints = [] } "b"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 30 15 43 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 15 30 15 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 33 15 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 33 15 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 15 33 15 43 , srcInfoPoints = [] } "Constraint"))))) Nothing , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 3 19 16 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 18 6 18 8 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 3 19 16 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 18 6 18 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 3 18 5 , srcInfoPoints = [] } "id" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 16 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 19 6 19 8 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 18 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 9 18 22 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 23 18 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 23 18 26 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 27 18 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 27 18 28 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 29 18 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 18 29 18 30 , srcInfoPoints = [] } "a")))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 9 19 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 9 19 14 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 9 19 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 9 19 12 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 13 19 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 13 19 14 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 15 19 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 19 15 19 16 , srcInfoPoints = [] } "a"))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 3 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 22 7 22 9 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 3 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 22 7 22 9 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 3 22 6 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 22 3 22 4 , SrcSpan "tests/examples/RCategory.hs" 22 4 22 5 , SrcSpan "tests/examples/RCategory.hs" 22 5 22 6 ] } "." ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 10 23 39 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 10 23 9 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 22 10 22 11 , SrcSpan "tests/examples/RCategory.hs" 22 32 22 33 , SrcSpan "tests/examples/RCategory.hs" 22 55 22 56 , SrcSpan "tests/examples/RCategory.hs" 22 78 22 79 , SrcSpan "tests/examples/RCategory.hs" 23 7 23 9 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 11 22 24 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 25 22 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 25 22 28 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 29 22 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 29 22 30 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 31 22 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 31 22 32 , srcInfoPoints = [] } "c"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 55 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 34 22 47 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 48 22 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 48 22 51 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 52 22 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 52 22 53 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 54 22 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 54 22 55 , srcInfoPoints = [] } "b"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 78 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 57 22 70 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 71 22 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 71 22 74 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 75 22 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 75 22 76 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 77 22 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 22 77 22 78 , srcInfoPoints = [] } "c"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 10 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 23 18 23 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 10 23 17 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 10 23 15 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 10 23 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 10 23 13 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 14 23 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 14 23 15 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 16 23 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 16 23 17 , srcInfoPoints = [] } "c"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 21 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 23 29 23 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 21 23 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 21 23 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 21 23 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 21 23 24 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 25 23 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 25 23 26 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 27 23 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 27 23 28 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 32 23 39 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 32 23 37 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 32 23 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 32 23 35 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 36 23 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 36 23 37 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 38 23 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 23 38 23 39 , srcInfoPoints = [] } "c"))))))) ]) , RulePragmaDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 25 1 30 5 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 25 1 25 10 , SrcSpan "tests/examples/RCategory.hs" 30 2 30 5 ] } [ Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 26 1 27 27 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 26 1 26 16 , SrcSpan "tests/examples/RCategory.hs" 26 17 26 23 , SrcSpan "tests/examples/RCategory.hs" 26 26 26 27 , SrcSpan "tests/examples/RCategory.hs" 27 24 27 25 ] } "identity/left" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 26 24 26 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 26 24 26 25 , srcInfoPoints = [] } "p") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 17 27 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 17 27 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 17 27 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 17 27 19 , srcInfoPoints = [] } "id"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 20 27 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 20 27 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 20 27 21 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 22 27 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 22 27 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 22 27 23 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 26 27 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 26 27 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 27 26 27 27 , srcInfoPoints = [] } "p"))) , Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 28 1 29 27 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 28 1 28 17 , SrcSpan "tests/examples/RCategory.hs" 28 25 28 31 , SrcSpan "tests/examples/RCategory.hs" 28 34 28 35 , SrcSpan "tests/examples/RCategory.hs" 29 24 29 25 ] } "identity/right" Nothing (Just [ RuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 28 32 28 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 28 32 28 33 , srcInfoPoints = [] } "p") ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 17 29 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 17 29 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 17 29 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 17 29 18 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 19 29 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 19 29 20 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 19 29 20 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 21 29 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 21 29 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 21 29 23 , srcInfoPoints = [] } "id")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 26 29 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 26 29 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 29 26 29 27 , srcInfoPoints = [] } "p"))) ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 1 38 0 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 32 1 32 9 , SrcSpan "tests/examples/RCategory.hs" 32 25 32 30 , SrcSpan "tests/examples/RCategory.hs" 33 3 33 3 , SrcSpan "tests/examples/RCategory.hs" 34 3 34 3 , SrcSpan "tests/examples/RCategory.hs" 35 3 35 3 , SrcSpan "tests/examples/RCategory.hs" 38 1 38 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 10 32 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 10 32 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 10 32 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 10 32 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 10 32 19 , srcInfoPoints = [] } "RCategory"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 20 32 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 32 20 32 21 , SrcSpan "tests/examples/RCategory.hs" 32 21 32 23 , SrcSpan "tests/examples/RCategory.hs" 32 23 32 24 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 20 32 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 32 20 32 21 , SrcSpan "tests/examples/RCategory.hs" 32 21 32 23 , SrcSpan "tests/examples/RCategory.hs" 32 23 32 24 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 32 20 32 24 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 32 20 32 21 , SrcSpan "tests/examples/RCategory.hs" 32 21 32 23 , SrcSpan "tests/examples/RCategory.hs" 32 23 32 24 ] }))))) (Just [ InsType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 3 33 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 3 33 7 , SrcSpan "tests/examples/RCategory.hs" 33 31 33 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 8 33 21 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 22 33 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 22 33 23 , SrcSpan "tests/examples/RCategory.hs" 33 23 33 25 , SrcSpan "tests/examples/RCategory.hs" 33 25 33 26 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 22 33 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 22 33 23 , SrcSpan "tests/examples/RCategory.hs" 33 23 33 25 , SrcSpan "tests/examples/RCategory.hs" 33 25 33 26 ] } (FunCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 22 33 26 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 22 33 23 , SrcSpan "tests/examples/RCategory.hs" 33 23 33 25 , SrcSpan "tests/examples/RCategory.hs" 33 25 33 26 ] })))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 27 33 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 27 33 28 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 29 33 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 29 33 30 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 33 33 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 33 33 34 , SrcSpan "tests/examples/RCategory.hs" 33 34 33 35 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 33 33 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 33 33 34 , SrcSpan "tests/examples/RCategory.hs" 33 34 33 35 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 33 33 33 35 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 33 33 33 34 , SrcSpan "tests/examples/RCategory.hs" 33 34 33 35 ] }))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 3 34 18 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 3 34 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 3 34 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 3 34 5 , srcInfoPoints = [] } "id")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 6 34 18 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 34 6 34 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 8 34 18 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 8 34 18 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 8 34 18 , srcInfoPoints = [] } "Prelude") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 34 8 34 18 , srcInfoPoints = [] } "id")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 3 35 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 3 35 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 3 35 6 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 35 3 35 4 , SrcSpan "tests/examples/RCategory.hs" 35 4 35 5 , SrcSpan "tests/examples/RCategory.hs" 35 5 35 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 4 35 5 , srcInfoPoints = [] } ".")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 7 35 20 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 35 7 35 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 9 35 20 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 35 9 35 10 , SrcSpan "tests/examples/RCategory.hs" 35 10 35 19 , SrcSpan "tests/examples/RCategory.hs" 35 19 35 20 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 9 35 20 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 35 9 35 10 , SrcSpan "tests/examples/RCategory.hs" 35 10 35 19 , SrcSpan "tests/examples/RCategory.hs" 35 19 35 20 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 10 35 19 , srcInfoPoints = [] } "Prelude") (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 35 10 35 19 , srcInfoPoints = [] } ".")))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 1 39 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 38 7 38 9 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 1 38 6 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 38 1 38 2 , SrcSpan "tests/examples/RCategory.hs" 38 2 38 5 , SrcSpan "tests/examples/RCategory.hs" 38 5 38 6 ] } "<<<" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 10 39 39 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 10 39 9 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 38 10 38 11 , SrcSpan "tests/examples/RCategory.hs" 38 32 38 33 , SrcSpan "tests/examples/RCategory.hs" 38 55 38 56 , SrcSpan "tests/examples/RCategory.hs" 38 78 38 79 , SrcSpan "tests/examples/RCategory.hs" 38 93 38 94 , SrcSpan "tests/examples/RCategory.hs" 39 7 39 9 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 11 38 24 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 25 38 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 25 38 28 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 29 38 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 29 38 30 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 31 38 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 31 38 32 , srcInfoPoints = [] } "c"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 55 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 34 38 47 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 48 38 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 48 38 51 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 52 38 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 52 38 53 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 54 38 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 54 38 55 , srcInfoPoints = [] } "b"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 78 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 57 38 70 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 71 38 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 71 38 74 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 75 38 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 75 38 76 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 77 38 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 77 38 78 , srcInfoPoints = [] } "c"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 80 38 93 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 80 38 93 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 80 38 93 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 80 38 89 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 80 38 89 , srcInfoPoints = [] } "RCategory"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 90 38 93 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 38 90 38 93 , srcInfoPoints = [] } "cat"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 10 39 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 39 18 39 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 10 39 17 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 10 39 15 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 10 39 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 10 39 13 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 14 39 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 14 39 15 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 16 39 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 16 39 17 , srcInfoPoints = [] } "c"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 21 39 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 39 29 39 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 21 39 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 21 39 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 21 39 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 21 39 24 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 25 39 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 25 39 26 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 27 39 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 27 39 28 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 32 39 39 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 32 39 37 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 32 39 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 32 39 35 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 36 39 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 36 39 37 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 38 39 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 39 38 39 39 , srcInfoPoints = [] } "c")))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 1 40 12 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 1 40 6 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 40 1 40 2 , SrcSpan "tests/examples/RCategory.hs" 40 2 40 5 , SrcSpan "tests/examples/RCategory.hs" 40 5 40 6 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 2 40 5 , srcInfoPoints = [] } "<<<")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 7 40 12 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 40 7 40 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 9 40 12 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 40 9 40 10 , SrcSpan "tests/examples/RCategory.hs" 40 10 40 11 , SrcSpan "tests/examples/RCategory.hs" 40 11 40 12 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 9 40 12 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 40 9 40 10 , SrcSpan "tests/examples/RCategory.hs" 40 10 40 11 , SrcSpan "tests/examples/RCategory.hs" 40 11 40 12 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 40 10 40 11 , srcInfoPoints = [] } ".")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 1 44 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 43 7 43 9 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 1 43 6 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 43 1 43 2 , SrcSpan "tests/examples/RCategory.hs" 43 2 43 5 , SrcSpan "tests/examples/RCategory.hs" 43 5 43 6 ] } ">>>" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 10 44 39 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 10 44 9 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 43 10 43 11 , SrcSpan "tests/examples/RCategory.hs" 43 32 43 33 , SrcSpan "tests/examples/RCategory.hs" 43 55 43 56 , SrcSpan "tests/examples/RCategory.hs" 43 78 43 79 , SrcSpan "tests/examples/RCategory.hs" 43 93 43 94 , SrcSpan "tests/examples/RCategory.hs" 44 7 44 9 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 11 43 24 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 25 43 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 25 43 28 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 29 43 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 29 43 30 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 31 43 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 31 43 32 , srcInfoPoints = [] } "c"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 55 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 34 43 47 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 48 43 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 48 43 51 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 52 43 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 52 43 53 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 54 43 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 54 43 55 , srcInfoPoints = [] } "b"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 78 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 78 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 57 43 70 , srcInfoPoints = [] } "RCategoryCtxt"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 71 43 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 71 43 74 , srcInfoPoints = [] } "cat"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 75 43 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 75 43 76 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 77 43 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 77 43 78 , srcInfoPoints = [] } "c"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 80 43 93 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 80 43 93 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 80 43 93 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 80 43 89 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 80 43 89 , srcInfoPoints = [] } "RCategory"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 90 43 93 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 43 90 43 93 , srcInfoPoints = [] } "cat"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 10 44 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 44 18 44 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 10 44 17 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 10 44 15 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 10 44 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 10 44 13 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 14 44 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 14 44 15 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 16 44 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 16 44 17 , srcInfoPoints = [] } "b"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 21 44 39 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 44 29 44 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 21 44 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 21 44 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 21 44 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 21 44 24 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 25 44 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 25 44 26 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 27 44 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 27 44 28 , srcInfoPoints = [] } "c"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 32 44 39 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 32 44 37 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 32 44 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 32 44 35 , srcInfoPoints = [] } "cat")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 36 44 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 36 44 37 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 38 44 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 44 38 44 39 , srcInfoPoints = [] } "c")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 1 45 16 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 1 45 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 1 45 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 1 45 2 , srcInfoPoints = [] } "f")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 3 45 6 , srcInfoPoints = [] } ">>>") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 7 45 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 7 45 8 , srcInfoPoints = [] } "g") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 9 45 16 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory.hs" 45 9 45 10 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 11 45 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 11 45 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 11 45 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 11 45 12 , srcInfoPoints = [] } "g"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 13 45 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 13 45 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 13 45 14 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 15 45 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 15 45 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory.hs" 45 15 45 16 , srcInfoPoints = [] } "f"))))) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/RCategory.hs" 12 1 12 29) " | A class for categories." , Comment False (SrcSpan "tests/examples/RCategory.hs" 13 1 13 36) " id and (.) must form a monoid." , Comment False (SrcSpan "tests/examples/RCategory.hs" 17 3 17 29) " | the identity morphism" , Comment False (SrcSpan "tests/examples/RCategory.hs" 21 3 21 28) " | morphism composition" , Comment False (SrcSpan "tests/examples/RCategory.hs" 37 1 37 31) " | Right-to-left composition" , Comment False (SrcSpan "tests/examples/RCategory.hs" 42 1 42 31) " | Left-to-right composition" ] ) haskell-src-exts-1.23.1/tests/examples/FFIInterruptible.hs.parser.golden0000644000000000000000000000551413534314633024422 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 1 , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1 , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1 , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1 , SrcSpan "tests/examples/FFIInterruptible.hs" 4 1 4 1 , SrcSpan "tests/examples/FFIInterruptible.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 13 , SrcSpan "tests/examples/FFIInterruptible.hs" 1 31 1 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 1 14 1 30 , srcInfoPoints = [] } "InterruptibleFFI" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 5 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/FFIInterruptible.hs" 2 5 2 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20 , srcInfoPoints = [] } "interruptible")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/ScopedTypeVariables.hs.parser.golden0000644000000000000000000006557113556712523025172 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 1 13 1 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 1 1 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 1 3 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 1 3 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 1 3 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 1 4 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 1 11 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 1 12 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 13 1 13 1 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 13 1 13 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 1 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 1 1 13 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 34 1 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 1 14 1 33 , srcInfoPoints = [] } "ScopedTypeVariables" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 1 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 6 3 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 1 3 5 , srcInfoPoints = [] } "test" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 9 3 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 9 3 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 9 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 9 3 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 12 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 12 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 3 12 3 16 , srcInfoPoints = [] } "Char")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 1 6 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 1 4 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 1 4 5 , srcInfoPoints = [] } "test")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 6 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 6 4 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 8 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 4 8 4 10 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 5 5 5 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 5 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 5 5 25 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 15 5 17 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 5 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 7 5 9 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 5 5 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 5 5 6 , srcInfoPoints = [] } "x")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 10 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 10 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 10 5 14 , srcInfoPoints = [] } "Char")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 18 5 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 18 5 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 5 18 5 25 , srcInfoPoints = [] } "getChar"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 13 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 5 6 11 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 12 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 12 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 6 12 6 13 , srcInfoPoints = [] } "x")))) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 26 , srcInfoPoints = [] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 16 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 7 9 9 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 1 9 6 , srcInfoPoints = [] } "value")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 10 9 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 10 9 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 10 9 16 , srcInfoPoints = [] } "String")))) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 17 9 26 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 17 9 18 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 19 9 26 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 9 19 9 26 , srcInfoPoints = [] } "Hello" "Hello"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 1 11 40 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 12 11 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 1 11 11 , srcInfoPoints = [] } "forallTest" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 15 11 40 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 15 11 21 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 24 11 25 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 22 11 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 22 11 23 , srcInfoPoints = [] } "x") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 33 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 31 11 33 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 33 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 31 11 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 33 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 31 11 33 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 33 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 31 11 33 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 26 11 28 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 29 11 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 29 11 30 , srcInfoPoints = [] } "x")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 34 11 40 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 36 11 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 34 11 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 34 11 35 , srcInfoPoints = [] } "x")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 39 11 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 11 39 11 40 , srcInfoPoints = [] } "x")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 1 12 54 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 1 12 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 1 12 11 , srcInfoPoints = [] } "forallTest") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 12 12 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 12 12 13 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 14 12 54 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 14 12 15 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 16 12 54 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 16 12 18 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 26 12 30 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 48 12 52 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 19 12 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 19 12 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 19 12 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 19 12 20 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 21 12 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 21 12 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 21 12 23 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 24 12 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 24 12 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 24 12 25 , srcInfoPoints = [] } "x")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 31 12 47 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 31 12 32 , SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 46 12 47 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 32 12 46 , srcInfoPoints = [ SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 42 12 44 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 32 12 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 32 12 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 32 12 41 , srcInfoPoints = [] } "undefined"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 45 12 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 45 12 46 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 53 12 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 53 12 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ScopedTypeVariables.hs" 12 53 12 54 , srcInfoPoints = [] } "x"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ByteStringUtils.hs.parser.golden0000644000000000000000001214371413534314632024367 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 1 1 542 1 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 1 1 1 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 18 1 18 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 18 1 18 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 49 1 49 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 50 1 50 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 51 1 51 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 52 1 52 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 53 1 53 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 54 1 54 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 57 1 57 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 59 1 59 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 60 1 60 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 62 1 62 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 63 1 63 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 64 1 64 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 65 1 65 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 67 1 67 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 68 1 68 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 69 1 69 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 70 1 70 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 71 1 71 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 74 1 74 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 75 1 75 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 77 1 77 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 78 1 78 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 81 1 81 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 82 1 82 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 86 1 86 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 87 1 87 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 89 1 89 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 93 1 93 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 94 1 94 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 95 1 95 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 102 1 102 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 104 1 104 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 106 1 106 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 108 1 108 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 113 1 113 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 122 1 122 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 123 1 123 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 133 1 133 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 134 1 134 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 139 1 139 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 140 1 140 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 153 1 153 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 159 1 159 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 160 1 160 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 161 1 161 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 174 1 174 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 175 1 175 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 180 1 180 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 182 1 182 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 183 1 183 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 188 1 188 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 189 1 189 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 200 1 200 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 201 1 201 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 204 1 204 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 211 1 211 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 212 1 212 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 219 1 219 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 223 1 223 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 224 1 224 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 225 1 225 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 230 1 230 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 248 1 248 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 249 1 249 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 250 1 250 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 256 1 256 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 257 1 257 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 263 1 263 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 264 1 264 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 265 1 265 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 279 1 279 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 280 1 280 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 281 1 281 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 285 1 285 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 286 1 286 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 287 1 287 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 292 1 292 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 293 1 293 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 294 1 294 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 323 1 323 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 324 1 324 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 325 1 325 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 326 1 326 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 342 1 342 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 344 1 344 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 346 1 346 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 348 1 348 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 352 1 352 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 353 1 353 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 395 1 395 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 402 1 402 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 403 1 403 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 405 1 405 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 406 1 406 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 1 417 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 418 1 418 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 442 1 442 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 444 1 444 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 453 1 453 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 459 1 459 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 462 1 462 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 463 1 463 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 471 1 471 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 474 1 474 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 475 1 475 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 486 1 486 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 488 1 488 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 501 1 501 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 503 1 503 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 504 1 504 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 523 1 523 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 524 1 524 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 526 1 526 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 542 1 542 1 , SrcSpan "tests/examples/ByteStringUtils.hs" 542 1 542 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 18 1 47 12 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 18 1 18 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 47 7 47 12 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 18 8 18 23 , srcInfoPoints = [] } "ByteStringUtils") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 18 24 47 6 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 18 24 18 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 20 28 20 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 21 25 21 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 24 21 24 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 25 19 25 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 26 22 26 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 27 23 27 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 30 23 30 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 31 18 31 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 32 19 32 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 33 16 33 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 34 18 34 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 35 15 35 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 36 21 36 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 37 20 37 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 38 17 38 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 39 18 39 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 40 17 40 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 41 19 41 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 42 19 42 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 43 23 43 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 44 32 44 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 45 33 45 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 47 5 47 6 ] } [ EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 20 9 20 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 20 9 20 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 20 9 20 28 , srcInfoPoints = [] } "unsafeWithInternals")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 21 9 21 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 21 9 21 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 21 9 21 25 , srcInfoPoints = [] } "unpackPSfromUTF8")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 24 9 24 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 24 9 24 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 24 9 24 21 , srcInfoPoints = [] } "gzReadFilePS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 25 9 25 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 25 9 25 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 25 9 25 19 , srcInfoPoints = [] } "mmapFilePS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 26 9 26 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 26 9 26 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 26 9 26 22 , srcInfoPoints = [] } "gzWriteFilePS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 27 9 27 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 27 9 27 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 27 9 27 23 , srcInfoPoints = [] } "gzWriteFilePSs")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 30 9 30 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 30 9 30 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 30 9 30 23 , srcInfoPoints = [] } "ifHeadThenTail")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 31 9 31 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 31 9 31 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 31 9 31 18 , srcInfoPoints = [] } "dropSpace")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 32 9 32 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 32 9 32 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 32 9 32 19 , srcInfoPoints = [] } "breakSpace")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 33 9 33 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 33 9 33 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 33 9 33 16 , srcInfoPoints = [] } "linesPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 34 9 34 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 34 9 34 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 34 9 34 18 , srcInfoPoints = [] } "unlinesPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 35 9 35 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 35 9 35 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 35 9 35 15 , srcInfoPoints = [] } "hashPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 36 9 36 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 36 9 36 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 36 9 36 21 , srcInfoPoints = [] } "breakFirstPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 37 9 37 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 37 9 37 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 37 9 37 20 , srcInfoPoints = [] } "breakLastPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 38 9 38 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 38 9 38 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 38 9 38 17 , srcInfoPoints = [] } "substrPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 39 9 39 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 39 9 39 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 39 9 39 18 , srcInfoPoints = [] } "readIntPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 40 9 40 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 40 9 40 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 40 9 40 17 , srcInfoPoints = [] } "is_funky")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 41 9 41 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 41 9 41 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 41 9 41 19 , srcInfoPoints = [] } "fromHex2PS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 42 9 42 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 42 9 42 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 42 9 42 19 , srcInfoPoints = [] } "fromPS2Hex")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 43 9 43 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 43 9 43 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 43 9 43 23 , srcInfoPoints = [] } "betweenLinesPS")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 44 9 44 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 44 9 44 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 44 9 44 32 , srcInfoPoints = [] } "break_after_nth_newline")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 45 9 45 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 45 9 45 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 45 9 45 33 , srcInfoPoints = [] } "break_before_nth_newline")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 46 9 46 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 46 9 46 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 46 9 46 20 , srcInfoPoints = [] } "intercalate")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 1 1 1 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 1 1 1 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 1 26 1 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 1 52 1 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 1 58 1 61 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 1 14 1 26 , srcInfoPoints = [] } "BangPatterns" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 1 28 1 52 , srcInfoPoints = [] } "ForeignFunctionInterface" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 1 54 1 57 , srcInfoPoints = [] } "CPP" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 49 1 49 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 49 1 49 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 49 8 49 15 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 49 16 49 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 49 16 49 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 49 23 49 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 49 31 49 32 ] } True [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 49 25 49 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 49 25 49 30 , srcInfoPoints = [] } "catch") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 50 1 50 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 50 1 50 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 50 8 50 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 50 45 50 47 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 50 18 50 33 , srcInfoPoints = [] } "Data.ByteString" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 50 48 50 49 , srcInfoPoints = [] } "B") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 51 1 51 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 51 1 51 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 51 8 51 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 51 45 51 47 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 51 18 51 39 , srcInfoPoints = [] } "Data.ByteString.Char8" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 51 48 51 50 , srcInfoPoints = [] } "BC") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 52 1 52 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 52 1 52 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 52 8 52 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 52 45 52 47 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 52 18 52 42 , srcInfoPoints = [] } "Data.ByteString.Internal" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 52 48 52 50 , srcInfoPoints = [] } "BI") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 1 53 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 53 1 53 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 8 53 23 , srcInfoPoints = [] } "Data.ByteString" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 24 53 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 53 24 53 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 53 36 53 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 53 44 53 45 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 25 53 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 25 53 36 , srcInfoPoints = [] } "intercalate") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 38 53 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 53 38 53 44 , srcInfoPoints = [] } "uncons") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 54 1 54 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 54 1 54 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 54 8 54 32 , srcInfoPoints = [] } "Data.ByteString.Internal" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 54 33 54 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 54 33 54 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 54 48 54 49 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 54 34 54 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 54 34 54 48 , srcInfoPoints = [] } "fromForeignPtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 57 1 57 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 57 1 57 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 57 8 57 25 , srcInfoPoints = [] } "Control.Exception" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 57 33 57 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 57 33 57 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 57 41 57 42 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 57 35 57 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 57 35 57 40 , srcInfoPoints = [] } "catch") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 59 1 59 17 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 59 1 59 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 59 8 59 17 , srcInfoPoints = [] } "System.IO" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 60 1 60 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 60 1 60 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 60 8 60 24 , srcInfoPoints = [] } "System.IO.Unsafe" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 60 33 60 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 60 33 60 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 60 51 60 52 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 60 35 60 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 60 35 60 50 , srcInfoPoints = [] } "unsafePerformIO") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 1 62 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 62 1 62 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 8 62 24 , srcInfoPoints = [] } "Foreign.Storable" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 33 62 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 62 33 62 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 62 46 62 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 62 53 62 54 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 35 62 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 35 62 46 , srcInfoPoints = [] } "peekElemOff") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 48 62 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 62 48 62 52 , srcInfoPoints = [] } "peek") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 63 1 63 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 63 1 63 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 63 8 63 29 , srcInfoPoints = [] } "Foreign.Marshal.Alloc" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 63 33 63 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 63 33 63 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 63 40 63 41 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 63 35 63 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 63 35 63 39 , srcInfoPoints = [] } "free") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 1 64 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 64 1 64 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 8 64 29 , srcInfoPoints = [] } "Foreign.Marshal.Array" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 33 64 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 64 33 64 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 64 46 64 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 64 57 64 58 , SrcSpan "tests/examples/ByteStringUtils.hs" 64 70 64 71 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 35 64 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 35 64 46 , srcInfoPoints = [] } "mallocArray") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 48 64 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 48 64 57 , srcInfoPoints = [] } "peekArray") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 59 64 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 64 59 64 69 , srcInfoPoints = [] } "advancePtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 1 65 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 65 1 65 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 8 65 23 , srcInfoPoints = [] } "Foreign.C.Types" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 33 65 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 65 33 65 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 65 40 65 41 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 35 65 39 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 35 65 39 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 65 35 65 39 , srcInfoPoints = [] } "CInt") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 67 1 67 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 67 1 67 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 67 8 67 17 , srcInfoPoints = [] } "Data.Bits" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 67 33 67 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 67 33 67 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 67 43 67 44 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 67 35 67 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 67 35 67 42 , srcInfoPoints = [] } "rotateL") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 1 68 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 68 1 68 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 8 68 17 , srcInfoPoints = [] } "Data.Char" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 33 68 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 68 33 68 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 68 38 68 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 68 43 68 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 68 53 68 54 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 35 68 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 35 68 38 , srcInfoPoints = [] } "chr") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 40 68 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 40 68 43 , srcInfoPoints = [] } "ord") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 45 68 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 68 45 68 52 , srcInfoPoints = [] } "isSpace") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 1 69 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 69 1 69 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 8 69 17 , srcInfoPoints = [] } "Data.Word" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 33 69 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 69 33 69 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 69 41 69 42 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 35 69 40 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 35 69 40 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 69 35 69 40 , srcInfoPoints = [] } "Word8") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 1 70 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 70 1 70 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 8 70 16 , srcInfoPoints = [] } "Data.Int" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 33 70 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 70 33 70 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 70 41 70 42 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 35 70 40 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 35 70 40 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 70 35 70 40 , srcInfoPoints = [] } "Int32") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 71 1 71 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 71 1 71 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 71 8 71 21 , srcInfoPoints = [] } "Control.Monad" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 71 33 71 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 71 33 71 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 71 40 71 41 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 71 35 71 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 71 35 71 39 , srcInfoPoints = [] } "when") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 74 1 74 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 74 1 74 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 74 8 74 19 , srcInfoPoints = [] } "Foreign.Ptr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 74 33 74 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 74 33 74 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 74 43 74 44 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 74 35 74 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 74 35 74 42 , srcInfoPoints = [] } "nullPtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 1 75 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 75 1 75 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 8 75 26 , srcInfoPoints = [] } "Foreign.ForeignPtr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 33 75 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 75 33 75 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 75 46 75 47 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 35 75 45 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 35 75 45 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 75 35 75 45 , srcInfoPoints = [] } "ForeignPtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 1 77 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 77 1 77 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 8 77 19 , srcInfoPoints = [] } "Foreign.Ptr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 33 77 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 77 33 77 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 77 42 77 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 77 48 77 49 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 35 77 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 35 77 42 , srcInfoPoints = [] } "plusPtr") , IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 44 77 47 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 44 77 47 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 77 44 77 47 , srcInfoPoints = [] } "Ptr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 78 1 78 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 78 1 78 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 78 8 78 26 , srcInfoPoints = [] } "Foreign.ForeignPtr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 78 33 78 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 78 33 78 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 78 50 78 51 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 78 35 78 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 78 35 78 49 , srcInfoPoints = [] } "withForeignPtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 81 1 81 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 81 1 81 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 81 8 81 26 , srcInfoPoints = [] } "Foreign.ForeignPtr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 81 33 81 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 81 33 81 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 81 58 81 59 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 81 35 81 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 81 35 81 57 , srcInfoPoints = [] } "addForeignPtrFinalizer") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 1 82 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 82 1 82 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 8 82 19 , srcInfoPoints = [] } "Foreign.Ptr" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 33 82 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 82 33 82 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 82 42 82 43 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 35 82 41 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 35 82 41 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 82 35 82 41 , srcInfoPoints = [] } "FunPtr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 86 1 86 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 86 1 86 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 86 8 86 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 86 39 86 41 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 86 18 86 38 , srcInfoPoints = [] } "Data.ByteString.Lazy" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 86 42 86 44 , srcInfoPoints = [] } "BL") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 87 1 87 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 87 1 87 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 87 8 87 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 87 41 87 43 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 87 18 87 40 , srcInfoPoints = [] } "Codec.Compression.GZip" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 87 44 87 46 , srcInfoPoints = [] } "GZ") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 1 89 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 89 1 89 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 8 89 24 , srcInfoPoints = [] } "Foreign.C.String" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 25 89 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 89 25 89 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 89 34 89 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 89 48 89 49 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 27 89 34 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 27 89 34 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 27 89 34 , srcInfoPoints = [] } "CString") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 36 89 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 89 36 89 47 , srcInfoPoints = [] } "withCString") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 93 1 93 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 93 1 93 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 93 8 93 22 , srcInfoPoints = [] } "System.IO.MMap" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 93 22 93 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 93 22 93 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 93 43 93 44 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 93 24 93 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 93 24 93 42 , srcInfoPoints = [] } "mmapFileByteString") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 94 1 94 31 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 94 1 94 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 94 8 94 18 , srcInfoPoints = [] } "System.Mem" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 94 18 94 31 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 94 18 94 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 94 30 94 31 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 94 20 94 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 94 20 94 29 , srcInfoPoints = [] } "performGC") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 1 95 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 95 1 95 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 8 95 26 , srcInfoPoints = [] } "System.Posix.Files" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 26 95 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 95 26 95 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 95 36 95 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 95 60 95 61 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 28 95 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 28 95 36 , srcInfoPoints = [] } "fileSize") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 38 95 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 95 38 95 59 , srcInfoPoints = [] } "getSymbolicLinkStatus") ]) } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 1 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 17 102 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 1 102 16 , srcInfoPoints = [] } "debugForeignPtr" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 20 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 33 102 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 20 102 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 20 102 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 20 102 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 20 102 30 , srcInfoPoints = [] } "ForeignPtr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 31 102 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 31 102 32 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 36 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 43 102 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 36 102 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 36 102 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 36 102 42 , srcInfoPoints = [] } "String"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 46 102 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 46 102 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 46 102 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 46 102 48 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 102 50 102 51 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 102 50 102 51 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 102 49 102 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 102 50 102 51 ] })))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 104 1 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 104 1 104 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 104 9 104 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 104 29 104 60 , SrcSpan "tests/examples/ByteStringUtils.hs" 105 5 105 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 104 16 104 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 104 22 104 28 , srcInfoPoints = [] })) (Just "static fpstring.h debug_alloc") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 104 61 104 72 , srcInfoPoints = [] } "debug_alloc") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 8 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 105 14 105 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 8 105 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 8 105 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 8 105 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 8 105 11 , srcInfoPoints = [] } "Ptr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 12 105 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 12 105 13 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 17 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 105 25 105 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 17 105 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 17 105 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 17 105 24 , srcInfoPoints = [] } "CString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 28 105 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 28 105 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 28 105 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 28 105 30 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 105 32 105 33 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 105 32 105 33 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 105 31 105 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 105 32 105 33 ] })))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 106 1 107 31 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 106 1 106 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 106 9 106 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 106 29 106 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 107 5 107 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 106 16 106 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 106 22 106 28 , srcInfoPoints = [] })) (Just "static fpstring.h & debug_free") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 106 62 106 72 , srcInfoPoints = [] } "debug_free") (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 8 107 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 8 107 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 8 107 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 8 107 14 , srcInfoPoints = [] } "FunPtr"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 15 107 31 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 107 15 107 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 107 30 107 31 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 16 107 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 107 22 107 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 16 107 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 16 107 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 16 107 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 16 107 19 , srcInfoPoints = [] } "Ptr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 20 107 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 20 107 21 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 25 107 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 25 107 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 25 107 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 25 107 27 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 107 29 107 30 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 107 29 107 30 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 107 28 107 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 107 29 107 30 ] }))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 1 113 32 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 1 111 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 1 108 16 , srcInfoPoints = [] } "debugForeignPtr") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 17 108 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 17 108 19 , srcInfoPoints = [] } "fp") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 20 108 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 20 108 21 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 108 22 111 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 108 22 108 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 5 111 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 5 109 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 5 109 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 5 109 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 5 109 16 , srcInfoPoints = [] } "withCString"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 17 109 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 17 109 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 17 109 18 , srcInfoPoints = [] } "n")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 19 109 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 19 109 20 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 19 109 20 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 21 111 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 109 21 109 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 109 27 109 29 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 22 109 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 22 109 27 , srcInfoPoints = [] } "cname") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 30 111 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 30 109 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 30 109 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 30 109 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 30 109 44 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 45 109 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 45 109 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 45 109 47 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 48 109 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 48 109 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 48 109 49 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 50 111 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 109 50 109 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 109 52 109 54 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 51 109 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 109 51 109 52 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 5 111 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 110 5 110 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 113 1 113 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 8 110 19 , srcInfoPoints = [] } "debug_alloc"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 20 110 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 20 110 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 20 110 21 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 22 110 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 22 110 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 110 22 110 27 , srcInfoPoints = [] } "cname")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 8 111 30 , srcInfoPoints = [] } "addForeignPtrFinalizer"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 31 111 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 31 111 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 31 111 41 , srcInfoPoints = [] } "debug_free")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 42 111 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 42 111 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 111 42 111 44 , srcInfoPoints = [] } "fp")))) ])))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 1 113 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 1 113 16 , srcInfoPoints = [] } "debugForeignPtr") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 17 113 18 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 19 113 20 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 21 113 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 113 21 113 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 23 113 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 23 113 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 23 113 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 23 113 29 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 113 31 113 32 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 113 31 113 32 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 113 30 113 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 113 31 113 32 ] }))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 1 122 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 21 122 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 1 122 20 , srcInfoPoints = [] } "unsafeWithInternals" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 24 122 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 37 122 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 24 122 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 24 122 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 24 122 36 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 24 122 36 , srcInfoPoints = [] } "ByteString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 40 122 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 67 122 69 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 40 122 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 40 122 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 122 65 122 66 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 41 122 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 51 122 53 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 41 122 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 41 122 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 41 122 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 41 122 44 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 45 122 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 45 122 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 45 122 50 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 54 122 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 122 58 122 60 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 54 122 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 54 122 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 54 122 57 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 61 122 65 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 61 122 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 61 122 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 61 122 63 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 64 122 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 64 122 65 , srcInfoPoints = [] } "a")))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 70 122 74 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 70 122 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 70 122 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 70 122 72 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 73 122 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 122 73 122 74 , srcInfoPoints = [] } "a"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 1 125 61 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 1 125 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 1 123 20 , srcInfoPoints = [] } "unsafeWithInternals") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 21 123 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 21 123 23 , srcInfoPoints = [] } "ps") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 24 123 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 123 24 123 25 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 2 125 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 124 2 124 3 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 4 125 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 124 4 124 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 124 28 124 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 4 125 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 133 1 133 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 9 124 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 9 124 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 9 124 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 9 124 24 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 9 124 24 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 25 124 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 25 124 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 124 25 124 27 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 4 125 61 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 4 125 12 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 4 125 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 7 125 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 9 125 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 11 125 12 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 5 125 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 5 125 7 , srcInfoPoints = [] } "fp") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 8 125 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 8 125 9 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 10 125 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 10 125 11 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 13 125 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 13 125 15 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 16 125 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 16 125 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 16 125 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 16 125 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 16 125 30 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 31 125 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 31 125 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 31 125 33 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 34 125 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 34 125 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 34 125 35 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 36 125 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 36 125 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 39 125 41 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 37 125 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 37 125 38 , srcInfoPoints = [] } "p") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 42 125 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 42 125 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 42 125 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 42 125 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 42 125 43 , srcInfoPoints = [] } "f"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 44 125 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 44 125 45 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 58 125 59 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 45 125 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 45 125 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 45 125 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 45 125 46 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 47 125 56 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 47 125 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 48 125 55 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 55 125 56 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 47 125 56 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 125 47 125 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 48 125 55 , SrcSpan "tests/examples/ByteStringUtils.hs" 125 55 125 56 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 48 125 55 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 57 125 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 57 125 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 57 125 58 , srcInfoPoints = [] } "s")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 60 125 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 60 125 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 125 60 125 61 , srcInfoPoints = [] } "l"))))))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 1 133 55 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 133 11 133 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 1 133 10 , srcInfoPoints = [] } "readIntPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 14 133 55 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 133 27 133 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 14 133 26 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 14 133 26 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 14 133 26 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 14 133 26 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 30 133 55 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 30 133 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 30 133 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 30 133 35 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 36 133 55 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 133 36 133 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 133 40 133 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 133 54 133 55 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 37 133 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 37 133 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 37 133 40 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 42 133 54 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 42 133 54 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 42 133 54 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 133 42 133 54 , srcInfoPoints = [] } "ByteString")) ]))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 1 134 46 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 1 134 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 1 134 10 , srcInfoPoints = [] } "readIntPS")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 11 134 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 134 11 134 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 13 134 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 13 134 23 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 13 134 23 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 13 134 23 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 13 134 23 , srcInfoPoints = [] } "readInt"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 24 134 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 24 134 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 24 134 25 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 26 134 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 26 134 38 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 26 134 38 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 26 134 38 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 26 134 38 , srcInfoPoints = [] } "dropWhile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 39 134 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 39 134 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 134 39 134 46 , srcInfoPoints = [] } "isSpace")))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 1 139 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 139 18 139 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 1 139 17 , srcInfoPoints = [] } "unpackPSfromUTF8" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 21 139 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 139 34 139 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 21 139 33 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 21 139 33 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 21 139 33 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 21 139 33 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 37 139 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 37 139 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 139 37 139 43 , srcInfoPoints = [] } "String")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 1 151 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 1 151 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 1 140 17 , srcInfoPoints = [] } "unpackPSfromUTF8") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 18 140 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 18 140 20 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 140 21 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 140 21 140 22 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 2 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 141 2 141 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 141 26 141 28 , SrcSpan "tests/examples/ByteStringUtils.hs" 142 4 142 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 143 4 143 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 153 1 153 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 7 141 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 7 141 22 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 7 141 22 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 7 141 22 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 7 141 22 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 23 141 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 23 141 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 141 23 141 25 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 4 142 18 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 4 142 12 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 142 4 142 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 142 6 142 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 142 8 142 9 , SrcSpan "tests/examples/ByteStringUtils.hs" 142 11 142 12 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 5 142 6 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 7 142 8 , srcInfoPoints = [] } , PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 10 142 11 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 10 142 11 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 10 142 11 , srcInfoPoints = [] } 0 "0") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 13 142 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 142 13 142 15 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 16 142 18 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 142 16 142 18 , srcInfoPoints = [] } "" ""))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 4 151 18 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 4 143 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 143 4 143 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 143 6 143 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 143 8 143 9 , SrcSpan "tests/examples/ByteStringUtils.hs" 143 10 143 11 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 5 143 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 5 143 6 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 7 143 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 7 143 8 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 9 143 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 9 143 10 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 143 13 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 143 13 143 15 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 5 151 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 5 144 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 5 144 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 5 144 20 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 21 144 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 21 144 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 21 144 22 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 23 151 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 23 144 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 23 144 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 23 144 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 23 144 37 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 38 144 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 38 144 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 38 144 39 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 40 144 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 40 144 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 40 144 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 42 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 144 42 144 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 144 44 144 46 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 43 144 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 144 43 144 44 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 5 151 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 145 5 145 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 145 8 145 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 146 8 146 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 8 149 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 153 1 153 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 8 145 31 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 145 15 145 17 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 8 145 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 8 145 14 , srcInfoPoints = [] } "outbuf")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 18 145 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 18 145 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 18 145 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 18 145 29 , srcInfoPoints = [] } "mallocArray"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 30 145 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 30 145 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 145 30 145 31 , srcInfoPoints = [] } "l")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 8 147 68 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 146 13 146 15 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 8 146 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 8 146 12 , srcInfoPoints = [] } "lout")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 16 147 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 16 146 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 16 146 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 16 146 28 , srcInfoPoints = [] } "fromIntegral"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 29 146 35 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 146 29 146 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 146 30 146 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 146 34 146 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 29 146 35 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 146 29 146 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 146 30 146 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 146 34 146 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 146 30 146 34 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 16 147 28 , srcInfoPoints = [] } "utf8_to_ints"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 29 147 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 29 147 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 29 147 35 , srcInfoPoints = [] } "outbuf")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 36 147 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 147 36 147 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 50 147 51 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 37 147 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 37 147 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 37 147 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 37 147 38 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 39 147 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 147 39 147 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 40 147 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 47 147 48 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 39 147 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 147 39 147 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 40 147 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 47 147 48 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 40 147 47 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 49 147 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 49 147 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 49 147 50 , srcInfoPoints = [] } "s")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 52 147 68 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 147 52 147 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 147 67 147 68 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 53 147 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 53 147 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 53 147 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 53 147 65 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 66 147 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 66 147 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 147 66 147 67 , srcInfoPoints = [] } "l"))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 43 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 8 148 12 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 13 148 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 148 13 148 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 148 22 148 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 14 148 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 14 148 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 14 148 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 14 148 18 , srcInfoPoints = [] } "lout"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 19 148 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 19 148 20 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 19 148 20 , srcInfoPoints = [] } "<"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 21 148 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 21 148 22 , srcInfoPoints = [] } 0 "0"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 24 148 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 24 148 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 24 148 25 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 26 148 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 26 148 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 26 148 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 26 148 31 , srcInfoPoints = [] } "error"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 32 148 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 148 32 148 43 , srcInfoPoints = [] } "Bad UTF8!" "Bad UTF8!")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 8 149 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 149 12 149 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 8 149 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 8 149 11 , srcInfoPoints = [] } "str")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 15 149 70 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 15 149 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 149 15 149 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 40 149 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 16 149 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 16 149 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 16 149 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 16 149 19 , srcInfoPoints = [] } "map"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 20 149 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 149 20 149 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 39 149 40 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 21 149 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 21 149 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 21 149 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 21 149 24 , srcInfoPoints = [] } "chr"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 25 149 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 25 149 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 25 149 26 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 27 149 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 27 149 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 27 149 39 , srcInfoPoints = [] } "fromIntegral"))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 42 149 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 149 42 149 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 43 149 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 47 149 48 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 42 149 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 149 42 149 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 43 149 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 149 47 149 48 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 43 149 47 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 49 149 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 49 149 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 49 149 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 49 149 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 49 149 58 , srcInfoPoints = [] } "peekArray"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 59 149 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 59 149 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 59 149 63 , srcInfoPoints = [] } "lout")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 64 149 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 64 149 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 149 64 149 70 , srcInfoPoints = [] } "outbuf"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 19 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 8 150 12 , srcInfoPoints = [] } "free"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 13 150 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 13 150 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 150 13 150 19 , srcInfoPoints = [] } "outbuf")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 8 151 14 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 15 151 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 15 151 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 151 15 151 18 , srcInfoPoints = [] } "str")))) ]))))) Nothing ])) Nothing ] , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 153 1 154 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 153 1 153 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 153 9 153 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 153 29 153 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 154 5 154 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 153 16 153 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 153 22 153 28 , srcInfoPoints = [] })) (Just "static fpstring.h utf8_to_ints") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 153 62 153 74 , srcInfoPoints = [] } "utf8_to_ints") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 8 154 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 154 16 154 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 8 154 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 8 154 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 8 154 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 8 154 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 12 154 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 12 154 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 12 154 15 , srcInfoPoints = [] } "Int")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 19 154 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 154 29 154 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 19 154 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 19 154 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 19 154 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 19 154 22 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 23 154 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 23 154 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 23 154 28 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 32 154 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 154 37 154 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 32 154 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 32 154 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 32 154 36 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 40 154 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 40 154 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 40 154 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 40 154 42 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 43 154 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 43 154 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 154 43 154 47 , srcInfoPoints = [] } "CInt"))))))) , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 159 1 159 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 159 1 159 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 159 27 159 30 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 159 12 159 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 159 12 159 26 , srcInfoPoints = [] } "ifHeadThenTail")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 1 160 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 160 16 160 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 1 160 15 , srcInfoPoints = [] } "ifHeadThenTail" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 19 160 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 160 25 160 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 19 160 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 19 160 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 19 160 24 , srcInfoPoints = [] } "Word8"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 28 160 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 160 41 160 43 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 28 160 40 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 28 160 40 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 28 160 40 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 28 160 40 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 44 160 62 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 44 160 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 44 160 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 44 160 49 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 50 160 62 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 50 160 62 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 50 160 62 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 160 50 160 62 , srcInfoPoints = [] } "ByteString")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 1 163 39 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 1 163 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 1 161 15 , srcInfoPoints = [] } "ifHeadThenTail") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 16 161 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 16 161 17 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 18 161 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 18 161 19 , srcInfoPoints = [] } "s") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 20 163 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 161 20 161 21 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 22 163 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 161 22 161 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 161 36 161 38 , SrcSpan "tests/examples/ByteStringUtils.hs" 162 5 162 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 163 5 163 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 174 1 174 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 27 161 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 27 161 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 27 161 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 27 161 33 , srcInfoPoints = [] } "uncons"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 34 161 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 34 161 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 161 34 161 35 , srcInfoPoints = [] } "s")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 5 162 38 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 5 162 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 5 162 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 5 162 9 , srcInfoPoints = [] } "Just")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 10 162 16 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 162 10 162 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 162 12 162 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 162 15 162 16 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 11 162 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 11 162 12 , srcInfoPoints = [] } "w") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 14 162 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 14 162 15 , srcInfoPoints = [] } "t") ] ]) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 17 162 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 162 17 162 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 162 29 162 31 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 17 162 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 162 17 162 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 162 29 162 31 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 19 162 25 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 19 162 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 19 162 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 19 162 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 19 162 20 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 21 162 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 21 162 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 21 162 23 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 24 162 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 24 162 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 24 162 25 , srcInfoPoints = [] } "c")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 32 162 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 32 162 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 32 162 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 32 162 36 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 37 162 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 37 162 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 162 37 162 38 , srcInfoPoints = [] } "t")))) ]) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 5 163 39 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 5 163 6 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 29 163 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 163 29 163 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 32 163 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 32 163 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 163 32 163 39 , srcInfoPoints = [] } "Nothing")))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 1 174 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 174 14 174 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 1 174 13 , srcInfoPoints = [] } "isSpaceWord8" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 17 174 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 174 23 174 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 17 174 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 17 174 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 17 174 22 , srcInfoPoints = [] } "Word8"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 26 174 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 26 174 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 174 26 174 30 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 1 179 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 1 179 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 1 175 13 , srcInfoPoints = [] } "isSpaceWord8") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 14 175 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 14 175 15 , srcInfoPoints = [] } "w") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 175 16 179 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 175 16 175 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 5 179 14 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 5 176 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 5 176 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 5 176 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 5 176 6 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 7 176 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 7 176 9 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 7 176 9 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 10 176 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 10 176 14 , srcInfoPoints = [] } 32 "0x20"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 15 176 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 15 176 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 176 15 176 17 , srcInfoPoints = [] } "||"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 5 179 14 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 5 177 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 5 177 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 5 177 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 5 177 6 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 7 177 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 7 177 9 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 7 177 9 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 10 177 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 10 177 14 , srcInfoPoints = [] } 9 "0x09"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 15 177 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 15 177 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 177 15 177 17 , srcInfoPoints = [] } "||"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 5 179 14 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 5 178 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 5 178 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 5 178 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 5 178 6 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 7 178 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 7 178 9 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 7 178 9 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 10 178 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 10 178 14 , srcInfoPoints = [] } 10 "0x0A"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 15 178 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 15 178 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 178 15 178 17 , srcInfoPoints = [] } "||"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 5 179 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 5 179 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 5 179 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 5 179 6 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 7 179 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 7 179 9 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 7 179 9 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 10 179 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 179 10 179 14 , srcInfoPoints = [] } 13 "0x0D"))))))) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 180 1 180 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 180 1 180 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 180 25 180 28 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 180 12 180 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 180 12 180 24 , srcInfoPoints = [] } "isSpaceWord8")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 1 182 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 182 15 182 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 1 182 14 , srcInfoPoints = [] } "firstnonspace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 18 182 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 182 28 182 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 18 182 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 18 182 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 18 182 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 18 182 21 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 22 182 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 22 182 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 22 182 27 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 31 182 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 182 35 182 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 31 182 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 31 182 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 31 182 34 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 38 182 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 182 42 182 44 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 38 182 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 38 182 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 38 182 41 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 45 182 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 45 182 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 45 182 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 45 182 47 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 48 182 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 48 182 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 182 48 182 51 , srcInfoPoints = [] } "Int"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 1 186 84 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 1 186 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 1 183 14 , srcInfoPoints = [] } "firstnonspace") [ PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 15 183 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 16 183 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 16 183 19 , srcInfoPoints = [] } "ptr")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 20 183 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 21 183 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 21 183 22 , srcInfoPoints = [] } "n")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 23 183 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 24 183 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 183 24 183 25 , srcInfoPoints = [] } "m")) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 5 186 84 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 5 184 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 184 5 184 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 184 17 184 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 7 184 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 7 184 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 7 184 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 7 184 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 7 184 8 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 9 184 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 9 184 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 9 184 11 , srcInfoPoints = [] } ">="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 12 184 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 12 184 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 12 184 13 , srcInfoPoints = [] } "m")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 19 184 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 19 184 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 19 184 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 19 184 25 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 26 184 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 26 184 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 184 26 184 27 , srcInfoPoints = [] } "n")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 5 186 84 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 185 5 185 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 185 17 185 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 7 185 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 7 185 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 7 185 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 7 185 16 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 19 186 84 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 185 19 185 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 185 22 185 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 22 186 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 188 1 188 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 22 185 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 185 24 185 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 22 185 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 22 185 23 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 27 185 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 27 185 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 27 185 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 27 185 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 27 185 38 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 39 185 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 39 185 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 39 185 42 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 43 185 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 43 185 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 185 43 185 44 , srcInfoPoints = [] } "n")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 22 186 84 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 186 22 186 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 40 186 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 71 186 75 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 22 186 84 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 186 22 186 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 40 186 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 71 186 75 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 25 186 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 25 186 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 25 186 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 25 186 37 , srcInfoPoints = [] } "isSpaceWord8"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 38 186 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 38 186 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 38 186 39 , srcInfoPoints = [] } "w")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 45 186 58 , srcInfoPoints = [] } "firstnonspace"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 59 186 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 59 186 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 59 186 62 , srcInfoPoints = [] } "ptr")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 63 186 68 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 186 63 186 64 , SrcSpan "tests/examples/ByteStringUtils.hs" 186 67 186 68 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 64 186 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 64 186 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 64 186 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 64 186 65 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 65 186 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 65 186 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 65 186 66 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 66 186 67 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 66 186 67 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 69 186 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 69 186 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 69 186 70 , srcInfoPoints = [] } "m")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 76 186 84 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 76 186 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 76 186 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 76 186 82 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 83 186 84 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 83 186 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 186 83 186 84 , srcInfoPoints = [] } "n"))))) ]) ]) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 1 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 188 12 188 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 1 188 11 , srcInfoPoints = [] } "firstspace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 15 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 188 25 188 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 15 188 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 15 188 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 15 188 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 15 188 18 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 19 188 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 19 188 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 19 188 24 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 28 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 188 32 188 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 28 188 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 28 188 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 28 188 31 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 35 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 188 39 188 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 35 188 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 35 188 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 35 188 38 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 42 188 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 42 188 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 42 188 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 42 188 44 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 45 188 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 45 188 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 188 45 188 48 , srcInfoPoints = [] } "Int"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 1 192 89 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 1 192 89 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 1 189 11 , srcInfoPoints = [] } "firstspace") [ PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 12 189 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 13 189 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 13 189 16 , srcInfoPoints = [] } "ptr")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 17 189 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 18 189 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 18 189 19 , srcInfoPoints = [] } "n")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 20 189 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 21 189 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 189 21 189 22 , srcInfoPoints = [] } "m")) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 5 192 89 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 5 190 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 190 5 190 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 190 17 190 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 7 190 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 7 190 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 7 190 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 7 190 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 7 190 8 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 9 190 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 9 190 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 9 190 11 , srcInfoPoints = [] } ">="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 12 190 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 12 190 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 12 190 13 , srcInfoPoints = [] } "m")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 19 190 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 19 190 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 19 190 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 19 190 25 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 26 190 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 26 190 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 190 26 190 27 , srcInfoPoints = [] } "n")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 5 192 89 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 191 5 191 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 191 17 191 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 7 191 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 7 191 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 7 191 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 7 191 16 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 19 192 89 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 191 19 191 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 191 22 191 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 22 192 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 200 1 200 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 22 191 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 191 24 191 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 22 191 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 22 191 23 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 27 191 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 27 191 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 27 191 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 27 191 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 27 191 38 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 39 191 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 39 191 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 39 191 42 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 43 191 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 43 191 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 191 43 191 44 , srcInfoPoints = [] } "n")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 22 192 89 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 192 22 192 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 48 192 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 76 192 80 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 22 192 89 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 192 22 192 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 48 192 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 76 192 80 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 25 192 47 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 25 192 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 192 25 192 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 44 192 45 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 26 192 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 26 192 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 26 192 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 26 192 29 , srcInfoPoints = [] } "not"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 30 192 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 30 192 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 30 192 31 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 32 192 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 32 192 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 32 192 44 , srcInfoPoints = [] } "isSpaceWord8"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 46 192 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 46 192 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 46 192 47 , srcInfoPoints = [] } "w")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 53 192 63 , srcInfoPoints = [] } "firstspace"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 64 192 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 64 192 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 64 192 67 , srcInfoPoints = [] } "ptr")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 68 192 73 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 192 68 192 69 , SrcSpan "tests/examples/ByteStringUtils.hs" 192 72 192 73 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 69 192 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 69 192 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 69 192 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 69 192 70 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 70 192 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 70 192 71 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 70 192 71 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 71 192 72 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 71 192 72 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 74 192 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 74 192 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 74 192 75 , srcInfoPoints = [] } "m")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 81 192 89 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 81 192 87 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 81 192 87 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 81 192 87 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 88 192 89 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 88 192 89 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 192 88 192 89 , srcInfoPoints = [] } "n"))))) ]) ]) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 1 200 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 200 11 200 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 1 200 10 , srcInfoPoints = [] } "dropSpace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 14 200 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 200 27 200 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 14 200 26 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 14 200 26 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 14 200 26 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 14 200 26 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 30 200 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 30 200 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 30 200 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 200 30 200 42 , srcInfoPoints = [] } "ByteString")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 1 203 62 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 1 203 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 1 201 10 , srcInfoPoints = [] } "dropSpace") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 11 201 24 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 201 11 201 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 201 23 201 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 12 201 23 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 12 201 17 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 12 201 17 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 12 201 17 , srcInfoPoints = [] } "PS")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 18 201 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 18 201 19 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 20 201 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 20 201 21 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 22 201 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 22 201 23 , srcInfoPoints = [] } "l") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 25 203 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 201 25 201 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 27 203 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 27 201 45 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 27 201 45 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 27 201 45 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 27 201 45 , srcInfoPoints = [] } "inlinePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 46 201 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 46 201 47 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 46 201 47 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 48 203 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 48 201 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 48 201 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 48 201 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 48 201 62 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 63 201 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 63 201 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 63 201 64 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 65 201 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 65 201 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 65 201 66 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 67 203 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 201 67 201 68 , SrcSpan "tests/examples/ByteStringUtils.hs" 201 70 201 72 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 68 201 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 68 201 69 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 201 73 203 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 201 73 201 75 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 5 202 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 204 1 204 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 5 202 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 202 7 202 9 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 5 202 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 5 202 6 , srcInfoPoints = [] } "i")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 10 202 23 , srcInfoPoints = [] } "firstnonspace"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 24 202 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 202 24 202 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 38 202 39 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 25 202 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 25 202 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 25 202 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 25 202 26 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 27 202 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 202 27 202 28 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 28 202 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 35 202 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 27 202 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 202 27 202 28 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 28 202 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 202 35 202 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 28 202 35 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 37 202 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 37 202 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 37 202 38 , srcInfoPoints = [] } "s")))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 40 202 41 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 40 202 41 , srcInfoPoints = [] } 0 "0"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 42 202 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 42 202 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 202 42 202 43 , srcInfoPoints = [] } "l")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 62 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 5 203 11 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 12 203 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 12 203 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 12 203 14 , srcInfoPoints = [] } "$!"))) (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 15 203 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 203 15 203 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 203 25 203 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 203 38 203 42 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 18 203 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 18 203 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 18 203 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 18 203 19 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 20 203 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 20 203 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 20 203 22 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 23 203 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 23 203 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 23 203 24 , srcInfoPoints = [] } "l")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 30 203 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 30 203 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 30 203 37 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 30 203 37 , srcInfoPoints = [] } "empty"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 50 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 48 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 48 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 48 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 43 203 48 , srcInfoPoints = [] } "PS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 49 203 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 49 203 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 49 203 50 , srcInfoPoints = [] } "x")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 51 203 56 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 203 51 203 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 203 55 203 56 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 52 203 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 52 203 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 52 203 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 52 203 53 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 53 203 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 53 203 54 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 53 203 54 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 54 203 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 54 203 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 54 203 55 , srcInfoPoints = [] } "i")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 57 203 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 203 57 203 58 , SrcSpan "tests/examples/ByteStringUtils.hs" 203 61 203 62 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 58 203 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 58 203 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 58 203 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 58 203 59 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 59 203 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 59 203 60 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 59 203 60 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 60 203 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 60 203 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 203 60 203 61 , srcInfoPoints = [] } "i")))))))) ]))))) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 204 1 204 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 204 1 204 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 204 22 204 25 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 204 12 204 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 204 12 204 21 , srcInfoPoints = [] } "dropSpace")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 1 211 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 211 12 211 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 1 211 11 , srcInfoPoints = [] } "breakSpace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 15 211 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 211 28 211 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 15 211 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 15 211 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 15 211 27 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 15 211 27 , srcInfoPoints = [] } "ByteString"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 31 211 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 211 31 211 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 211 44 211 45 , SrcSpan "tests/examples/ByteStringUtils.hs" 211 57 211 58 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 32 211 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 32 211 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 32 211 44 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 32 211 44 , srcInfoPoints = [] } "ByteString")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 45 211 57 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 45 211 57 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 45 211 57 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 211 45 211 57 , srcInfoPoints = [] } "ByteString")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 1 218 6 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 1 218 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 1 212 11 , srcInfoPoints = [] } "breakSpace") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 12 212 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 212 12 212 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 212 24 212 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 13 212 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 13 212 18 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 13 212 18 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 13 212 18 , srcInfoPoints = [] } "PS")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 19 212 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 19 212 20 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 21 212 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 21 212 22 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 23 212 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 23 212 24 , srcInfoPoints = [] } "l") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 26 218 6 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 212 26 212 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 28 218 6 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 28 212 46 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 28 212 46 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 28 212 46 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 28 212 46 , srcInfoPoints = [] } "inlinePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 47 212 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 47 212 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 47 212 48 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 49 218 6 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 49 212 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 49 212 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 49 212 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 49 212 63 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 64 212 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 64 212 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 64 212 65 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 66 212 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 66 212 67 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 66 212 67 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 68 218 6 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 212 68 212 69 , SrcSpan "tests/examples/ByteStringUtils.hs" 212 71 212 73 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 69 212 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 69 212 70 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 212 74 218 6 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 212 74 212 76 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 5 213 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 214 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 219 1 219 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 5 213 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 213 7 213 9 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 5 213 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 5 213 6 , srcInfoPoints = [] } "i")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 10 213 20 , srcInfoPoints = [] } "firstspace"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 21 213 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 213 21 213 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 35 213 36 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 22 213 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 22 213 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 22 213 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 22 213 23 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 24 213 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 213 24 213 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 25 213 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 32 213 33 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 24 213 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 213 24 213 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 25 213 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 213 32 213 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 25 213 32 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 34 213 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 34 213 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 34 213 35 , srcInfoPoints = [] } "s")))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 37 213 38 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 37 213 38 , srcInfoPoints = [] } 0 "0"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 39 213 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 39 213 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 213 39 213 40 , srcInfoPoints = [] } "l")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 218 6 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 218 6 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 214 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 214 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 5 214 11 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 12 214 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 12 214 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 12 214 14 , srcInfoPoints = [] } "$!"))) (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 15 218 6 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 214 15 214 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 23 214 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 26 214 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 218 5 218 6 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 21 214 22 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 21 214 22 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 214 20 214 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 214 21 214 22 ] }))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 27 217 58 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 214 27 214 28 , srcInfoPoints = [] }) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 9 217 58 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 9 215 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 215 9 215 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 215 21 215 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 11 215 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 11 215 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 11 215 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 11 215 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 11 215 12 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 13 215 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 13 215 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 13 215 15 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 16 215 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 16 215 17 , srcInfoPoints = [] } 0 "0"))) ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 24 215 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 215 24 215 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 215 32 215 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 215 45 215 46 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 25 215 32 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 25 215 32 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 25 215 32 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 25 215 32 , srcInfoPoints = [] } "empty")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 41 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 39 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 34 215 39 , srcInfoPoints = [] } "PS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 40 215 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 40 215 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 40 215 41 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 42 215 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 42 215 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 42 215 43 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 44 215 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 44 215 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 215 44 215 45 , srcInfoPoints = [] } "l"))) ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 9 216 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 216 9 216 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 216 21 216 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 11 216 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 11 216 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 11 216 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 11 216 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 11 216 12 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 13 216 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 13 216 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 13 216 15 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 16 216 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 16 216 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 16 216 17 , srcInfoPoints = [] } "l")))) ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 24 216 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 216 24 216 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 216 36 216 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 216 45 216 46 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 30 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 30 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 30 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 25 216 30 , srcInfoPoints = [] } "PS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 31 216 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 31 216 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 31 216 32 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 33 216 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 33 216 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 33 216 34 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 35 216 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 35 216 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 35 216 36 , srcInfoPoints = [] } "l"))) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 38 216 45 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 38 216 45 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 38 216 45 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 216 38 216 45 , srcInfoPoints = [] } "empty")) ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 9 217 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 217 9 217 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 217 21 217 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 11 217 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 11 217 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 11 217 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 11 217 20 , srcInfoPoints = [] } "otherwise"))) ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 24 217 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 217 24 217 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 217 36 217 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 217 57 217 58 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 30 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 30 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 30 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 25 217 30 , srcInfoPoints = [] } "PS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 31 217 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 31 217 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 31 217 32 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 33 217 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 33 217 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 33 217 34 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 35 217 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 35 217 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 35 217 36 , srcInfoPoints = [] } "i"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 43 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 38 217 43 , srcInfoPoints = [] } "PS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 44 217 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 44 217 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 44 217 45 , srcInfoPoints = [] } "x")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 46 217 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 217 46 217 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 217 50 217 51 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 47 217 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 47 217 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 47 217 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 47 217 48 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 48 217 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 48 217 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 48 217 49 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 49 217 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 49 217 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 49 217 50 , srcInfoPoints = [] } "i")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 52 217 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 217 52 217 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 217 56 217 57 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 53 217 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 53 217 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 53 217 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 53 217 54 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 54 217 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 54 217 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 54 217 55 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 55 217 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 55 217 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 217 55 217 56 , srcInfoPoints = [] } "i"))))) ]) ]) Nothing ])) ]))))) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 219 1 219 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 219 1 219 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 219 23 219 26 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 219 12 219 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 219 12 219 22 , srcInfoPoints = [] } "breakSpace")) , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 223 1 223 24 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 223 1 223 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 223 21 223 24 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 223 12 223 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 223 12 223 20 , srcInfoPoints = [] } "is_funky")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 1 224 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 224 10 224 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 1 224 9 , srcInfoPoints = [] } "is_funky" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 13 224 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 224 26 224 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 13 224 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 13 224 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 13 224 25 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 13 224 25 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 29 224 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 29 224 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 224 29 224 33 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 1 228 65 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 1 228 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 1 225 9 , srcInfoPoints = [] } "is_funky") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 10 225 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 10 225 12 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 13 228 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 225 13 225 14 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 15 228 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 225 15 225 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 225 39 225 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 226 4 226 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 230 1 230 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 20 225 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 20 225 35 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 20 225 35 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 20 225 35 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 20 225 35 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 36 225 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 36 225 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 225 36 225 38 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 4 228 65 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 4 226 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 226 4 226 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 226 6 226 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 226 8 226 9 , SrcSpan "tests/examples/ByteStringUtils.hs" 226 10 226 11 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 5 226 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 5 226 6 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 7 226 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 7 226 8 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 9 226 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 9 226 10 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 226 12 228 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 226 12 226 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 5 228 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 5 227 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 5 227 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 5 227 20 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 21 227 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 21 227 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 21 227 22 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 23 228 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 23 227 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 23 227 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 23 227 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 23 227 37 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 38 227 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 38 227 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 38 227 39 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 40 227 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 40 227 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 40 227 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 42 228 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 227 42 227 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 227 44 227 46 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 43 227 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 227 43 227 44 , srcInfoPoints = [] } "p") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 5 228 65 , srcInfoPoints = [] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 5 228 10 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 5 228 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 9 228 10 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 6 228 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 6 228 8 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 6 228 8 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 8 228 9 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 8 228 9 , srcInfoPoints = [] } 0 "0"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 11 228 17 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 11 228 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 12 228 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 16 228 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 11 228 17 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 11 228 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 12 228 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 16 228 17 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 12 228 16 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 18 228 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 18 228 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 18 228 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 18 228 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 18 228 32 , srcInfoPoints = [] } "has_funky_char"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 33 228 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 33 228 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 47 228 48 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 34 228 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 34 228 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 34 228 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 34 228 35 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 36 228 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 36 228 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 37 228 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 44 228 45 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 36 228 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 36 228 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 37 228 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 44 228 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 37 228 44 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 46 228 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 46 228 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 46 228 47 , srcInfoPoints = [] } "s")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 49 228 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 228 49 228 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 228 64 228 65 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 50 228 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 50 228 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 50 228 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 50 228 62 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 63 228 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 63 228 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 228 63 228 64 , srcInfoPoints = [] } "l"))))))))))) Nothing ])) Nothing ] , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 230 1 231 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 230 1 230 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 230 9 230 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 230 29 230 56 , SrcSpan "tests/examples/ByteStringUtils.hs" 231 5 231 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 230 16 230 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 230 22 230 28 , srcInfoPoints = [] })) (Just "fpstring.h has_funky_char") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 230 57 230 71 , srcInfoPoints = [] } "has_funky_char") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 8 231 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 231 18 231 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 8 231 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 8 231 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 8 231 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 8 231 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 12 231 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 12 231 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 12 231 17 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 21 231 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 231 26 231 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 21 231 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 21 231 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 21 231 25 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 29 231 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 29 231 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 29 231 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 29 231 31 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 32 231 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 32 231 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 231 32 231 36 , srcInfoPoints = [] } "CInt")))))) , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 248 1 248 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 248 1 248 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 248 19 248 22 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 248 12 248 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 248 12 248 18 , srcInfoPoints = [] } "hashPS")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 1 249 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 249 8 249 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 1 249 7 , srcInfoPoints = [] } "hashPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 11 249 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 249 24 249 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 11 249 23 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 11 249 23 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 11 249 23 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 11 249 23 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 27 249 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 27 249 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 249 27 249 32 , srcInfoPoints = [] } "Int32")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 1 254 30 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 1 254 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 1 250 7 , srcInfoPoints = [] } "hashPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 8 250 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 8 250 10 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 250 11 254 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 250 11 250 12 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 4 254 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 251 4 251 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 251 28 251 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 252 4 252 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 256 1 256 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 9 251 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 9 251 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 9 251 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 9 251 24 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 9 251 24 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 25 251 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 25 251 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 251 25 251 27 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 4 254 30 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 4 252 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 252 4 252 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 252 6 252 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 252 8 252 9 , SrcSpan "tests/examples/ByteStringUtils.hs" 252 10 252 11 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 5 252 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 5 252 6 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 7 252 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 7 252 8 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 9 252 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 9 252 10 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 252 12 254 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 252 12 252 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 5 254 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 5 253 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 5 253 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 5 253 20 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 21 253 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 21 253 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 21 253 22 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 23 254 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 23 253 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 23 253 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 23 253 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 23 253 37 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 38 253 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 38 253 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 38 253 39 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 40 253 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 40 253 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 40 253 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 42 254 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 253 42 253 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 253 44 253 46 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 43 253 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 253 43 253 44 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 5 254 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 254 5 254 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 256 1 256 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 8 254 12 , srcInfoPoints = [] } "hash"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 13 254 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 254 13 254 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 27 254 28 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 14 254 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 14 254 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 14 254 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 14 254 15 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 16 254 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 254 16 254 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 17 254 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 24 254 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 16 254 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 254 16 254 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 17 254 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 254 24 254 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 17 254 24 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 26 254 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 26 254 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 26 254 27 , srcInfoPoints = [] } "s")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 29 254 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 29 254 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 254 29 254 30 , srcInfoPoints = [] } "l")))) ]))))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 1 256 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 256 6 256 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 1 256 5 , srcInfoPoints = [] } "hash" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 9 256 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 256 19 256 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 9 256 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 9 256 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 9 256 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 9 256 12 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 13 256 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 13 256 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 13 256 18 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 22 256 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 256 26 256 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 22 256 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 22 256 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 22 256 25 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 29 256 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 29 256 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 29 256 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 29 256 31 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 32 256 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 32 256 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 256 32 256 37 , srcInfoPoints = [] } "Int32")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 1 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 258 2 258 7 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 1 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 258 2 258 7 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 1 257 5 , srcInfoPoints = [] } "hash") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 6 257 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 6 257 9 , srcInfoPoints = [] } "ptr") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 10 257 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 10 257 13 , srcInfoPoints = [] } "len") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 14 257 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 257 14 257 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 16 257 17 , srcInfoPoints = [] } "f"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 18 257 30 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 257 18 257 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 257 29 257 30 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 19 257 29 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 257 21 257 23 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 19 257 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 19 257 20 , srcInfoPoints = [] } 0 "0")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 24 257 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 24 257 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 24 257 29 , srcInfoPoints = [] } "Int32")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 31 257 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 31 257 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 31 257 34 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 35 257 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 35 257 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 257 35 257 38 , srcInfoPoints = [] } "len"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 8 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 258 8 258 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 259 8 259 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 263 1 263 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 8 261 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 8 258 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 8 258 9 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 10 258 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 10 258 11 , srcInfoPoints = [] } "h") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 12 258 13 , srcInfoPoints = [] } , PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 14 258 15 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 14 258 15 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 14 258 15 , srcInfoPoints = [] } 0 "0") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 16 258 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 258 16 258 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 18 258 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 18 258 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 18 258 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 18 258 24 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 25 258 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 25 258 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 258 25 258 26 , srcInfoPoints = [] } "h"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 8 261 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 8 259 9 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 10 259 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 10 259 11 , srcInfoPoints = [] } "h") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 12 259 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 12 259 13 , srcInfoPoints = [] } "p") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 14 259 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 14 259 15 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 16 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 259 16 259 17 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 18 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 259 18 259 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 259 21 259 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 260 21 260 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 263 1 263 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 21 259 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 259 23 259 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 21 259 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 21 259 22 , srcInfoPoints = [] } "x")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 26 259 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 26 259 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 26 259 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 26 259 30 , srcInfoPoints = [] } "peek"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 31 259 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 31 259 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 259 31 259 32 , srcInfoPoints = [] } "p")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 21 260 64 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 21 260 24 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 25 260 64 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 25 260 25 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 25 260 64 , srcInfoPoints = [] } (PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 25 260 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 25 260 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 26 260 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 26 260 28 , srcInfoPoints = [] } "h'"))) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 29 260 64 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 29 260 30 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 32 260 64 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 32 260 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 32 260 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 260 47 260 48 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 33 260 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 33 260 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 33 260 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 33 260 45 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 46 260 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 46 260 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 46 260 47 , srcInfoPoints = [] } "x"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 49 260 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 49 260 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 49 260 50 , srcInfoPoints = [] } "+"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 51 260 64 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 260 51 260 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 260 63 260 64 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 52 260 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 52 260 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 52 260 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 52 260 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 52 260 59 , srcInfoPoints = [] } "rotateL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 60 260 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 60 260 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 60 260 61 , srcInfoPoints = [] } "h")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 62 260 63 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 260 62 260 63 , srcInfoPoints = [] } 8 "8")))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 21 261 22 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 23 261 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 23 261 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 23 261 25 , srcInfoPoints = [] } "h'")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 26 261 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 261 26 261 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 43 261 44 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 27 261 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 27 261 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 27 261 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 27 261 28 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 29 261 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 261 29 261 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 30 261 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 40 261 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 29 261 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 261 29 261 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 30 261 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 40 261 41 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 30 261 40 , srcInfoPoints = [] } "advancePtr"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 42 261 43 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 42 261 43 , srcInfoPoints = [] } 1 "1"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 45 261 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 261 45 261 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 261 49 261 50 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 46 261 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 46 261 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 46 261 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 46 261 47 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 47 261 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 47 261 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 47 261 48 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 48 261 49 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 261 48 261 49 , srcInfoPoints = [] } 1 "1"))))) ])) Nothing ] ])) ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 263 1 263 24 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 263 1 263 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 263 21 263 24 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 263 12 263 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 263 12 263 20 , srcInfoPoints = [] } "substrPS")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 1 264 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 264 10 264 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 1 264 9 , srcInfoPoints = [] } "substrPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 13 264 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 264 26 264 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 13 264 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 13 264 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 13 264 25 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 13 264 25 , srcInfoPoints = [] } "ByteString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 29 264 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 264 42 264 44 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 29 264 41 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 29 264 41 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 29 264 41 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 29 264 41 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 45 264 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 45 264 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 45 264 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 45 264 50 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 51 264 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 51 264 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 264 51 264 54 , srcInfoPoints = [] } "Int")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 1 273 66 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 1 273 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 1 265 9 , srcInfoPoints = [] } "substrPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 10 265 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 10 265 13 , srcInfoPoints = [] } "tok") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 14 265 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 265 14 265 17 , srcInfoPoints = [] } "str") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 5 273 66 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 5 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 266 5 266 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 266 18 266 19 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 13 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 13 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 13 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 7 266 13 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 14 266 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 14 266 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 14 266 17 , srcInfoPoints = [] } "tok")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 20 266 26 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 20 266 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 20 266 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 20 266 24 , srcInfoPoints = [] } "Just"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 25 266 26 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 266 25 266 26 , srcInfoPoints = [] } 0 "0"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 5 267 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 267 5 267 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 267 35 267 36 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 34 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 15 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 15 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 15 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 7 267 15 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 16 267 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 16 267 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 16 267 19 , srcInfoPoints = [] } "tok")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 20 267 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 20 267 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 20 267 21 , srcInfoPoints = [] } ">"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 22 267 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 22 267 30 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 22 267 30 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 22 267 30 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 22 267 30 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 31 267 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 31 267 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 31 267 34 , srcInfoPoints = [] } "str"))))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 37 267 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 37 267 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 267 37 267 44 , srcInfoPoints = [] } "Nothing"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 5 273 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 268 5 268 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 268 17 268 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 7 268 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 7 268 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 7 268 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 7 268 16 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 19 273 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 268 19 268 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 268 22 268 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 269 22 269 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 271 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 279 1 279 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 22 268 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 268 24 268 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 22 268 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 22 268 23 , srcInfoPoints = [] } "n")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 39 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 27 268 39 , srcInfoPoints = [] } "elemIndex"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 40 268 53 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 268 40 268 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 268 52 268 53 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 41 268 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 41 268 48 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 41 268 48 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 41 268 48 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 41 268 48 , srcInfoPoints = [] } "head"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 49 268 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 49 268 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 49 268 52 , srcInfoPoints = [] } "tok")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 54 268 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 54 268 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 268 54 268 57 , srcInfoPoints = [] } "str")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 22 270 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 269 22 269 25 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 26 270 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 269 26 269 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 270 26 270 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 271 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 26 269 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 26 269 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 26 269 30 , srcInfoPoints = [] } "ttok")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 31 269 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 269 31 269 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 33 269 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 33 269 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 33 269 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 33 269 39 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 33 269 39 , srcInfoPoints = [] } "tail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 40 269 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 40 269 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 269 40 269 43 , srcInfoPoints = [] } "tok"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 26 270 52 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 26 270 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 26 270 33 , srcInfoPoints = [] } "reststr")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 34 270 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 270 34 270 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 36 270 42 , srcInfoPoints = [] } "drop"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 43 270 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 270 43 270 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 270 47 270 48 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 44 270 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 44 270 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 44 270 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 44 270 45 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 45 270 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 45 270 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 45 270 46 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 46 270 47 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 46 270 47 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 49 270 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 49 270 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 270 49 270 52 , srcInfoPoints = [] } "str"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 273 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 271 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 272 25 272 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 25 273 29 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 273 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 271 22 271 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 272 25 272 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 25 273 29 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 25 271 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 25 271 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 25 271 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 25 271 29 , srcInfoPoints = [] } "ttok"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 30 271 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 30 271 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 30 271 32 , srcInfoPoints = [] } "=="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 39 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 33 271 39 , srcInfoPoints = [] } "take"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 40 271 55 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 271 40 271 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 271 54 271 55 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 41 271 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 41 271 49 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 41 271 49 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 41 271 49 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 41 271 49 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 50 271 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 50 271 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 50 271 54 , srcInfoPoints = [] } "ttok")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 56 271 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 56 271 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 271 56 271 63 , srcInfoPoints = [] } "reststr"))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 30 272 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 30 272 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 30 272 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 30 272 34 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 35 272 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 35 272 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 272 35 272 36 , srcInfoPoints = [] } "n")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 30 273 66 , srcInfoPoints = [] } (LeftSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 30 273 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 273 30 273 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 37 273 38 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 31 273 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 273 31 273 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 35 273 36 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 32 273 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 32 273 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 32 273 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 32 273 33 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 33 273 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 33 273 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 33 273 34 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 34 273 35 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 34 273 35 , srcInfoPoints = [] } 1 "1")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 36 273 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 36 273 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 36 273 37 , srcInfoPoints = [] } "+")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 39 273 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 273 39 273 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 40 273 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 44 273 45 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 39 273 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 273 39 273 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 40 273 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 273 44 273 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 40 273 44 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 46 273 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 46 273 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 46 273 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 46 273 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 46 273 54 , srcInfoPoints = [] } "substrPS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 55 273 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 55 273 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 55 273 58 , srcInfoPoints = [] } "tok")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 59 273 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 59 273 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 273 59 273 66 , srcInfoPoints = [] } "reststr")))))) ]) ]) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 279 1 279 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 279 1 279 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 279 25 279 28 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 279 12 279 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 279 12 279 24 , srcInfoPoints = [] } "breakFirstPS")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 1 280 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 280 14 280 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 1 280 13 , srcInfoPoints = [] } "breakFirstPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 17 280 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 280 22 280 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 17 280 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 17 280 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 17 280 21 , srcInfoPoints = [] } "Char"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 25 280 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 280 38 280 40 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 25 280 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 25 280 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 25 280 37 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 25 280 37 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 41 280 74 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 41 280 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 41 280 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 41 280 46 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 47 280 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 280 47 280 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 280 60 280 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 280 73 280 74 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 48 280 60 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 48 280 60 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 48 280 60 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 48 280 60 , srcInfoPoints = [] } "ByteString")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 61 280 73 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 61 280 73 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 61 280 73 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 280 61 280 73 , srcInfoPoints = [] } "ByteString")) ])))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 1 283 63 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 1 283 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 1 281 13 , srcInfoPoints = [] } "breakFirstPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 14 281 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 14 281 15 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 16 281 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 16 281 17 , srcInfoPoints = [] } "p") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 18 283 63 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 281 18 281 19 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 20 283 63 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 281 20 281 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 281 42 281 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 282 20 282 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 283 20 283 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 285 1 285 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 37 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 25 281 37 , srcInfoPoints = [] } "elemIndex"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 38 281 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 38 281 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 38 281 39 , srcInfoPoints = [] } "c")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 40 281 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 40 281 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 281 40 281 41 , srcInfoPoints = [] } "p")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 20 282 38 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 20 282 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 20 282 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 20 282 27 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 28 282 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 282 28 282 30 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 31 282 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 31 282 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 282 31 282 38 , srcInfoPoints = [] } "Nothing")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 20 283 63 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 20 283 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 20 283 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 20 283 24 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 25 283 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 25 283 26 , srcInfoPoints = [] } "n") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 27 283 63 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 283 27 283 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 30 283 63 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 30 283 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 30 283 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 30 283 34 , srcInfoPoints = [] } "Just"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 35 283 63 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 283 35 283 36 , SrcSpan "tests/examples/ByteStringUtils.hs" 283 46 283 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 283 62 283 63 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 36 283 42 , srcInfoPoints = [] } "take"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 43 283 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 43 283 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 43 283 44 , srcInfoPoints = [] } "n")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 45 283 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 45 283 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 45 283 46 , srcInfoPoints = [] } "p"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 54 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 54 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 54 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 48 283 54 , srcInfoPoints = [] } "drop"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 55 283 60 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 283 55 283 56 , SrcSpan "tests/examples/ByteStringUtils.hs" 283 59 283 60 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 56 283 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 56 283 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 56 283 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 56 283 57 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 57 283 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 57 283 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 57 283 58 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 58 283 59 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 58 283 59 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 61 283 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 61 283 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 283 61 283 62 , srcInfoPoints = [] } "p"))) ]))) Nothing ])) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 285 1 285 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 285 1 285 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 285 24 285 27 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 285 12 285 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 285 12 285 23 , srcInfoPoints = [] } "breakLastPS")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 1 286 73 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 286 13 286 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 1 286 12 , srcInfoPoints = [] } "breakLastPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 16 286 73 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 286 21 286 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 16 286 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 16 286 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 16 286 20 , srcInfoPoints = [] } "Char"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 24 286 73 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 286 37 286 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 24 286 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 24 286 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 24 286 36 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 24 286 36 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 40 286 73 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 40 286 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 40 286 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 40 286 45 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 46 286 73 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 286 46 286 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 286 59 286 60 , SrcSpan "tests/examples/ByteStringUtils.hs" 286 72 286 73 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 47 286 59 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 47 286 59 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 47 286 59 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 47 286 59 , srcInfoPoints = [] } "ByteString")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 60 286 72 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 60 286 72 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 60 286 72 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 286 60 286 72 , srcInfoPoints = [] } "ByteString")) ])))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 1 289 62 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 1 289 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 1 287 12 , srcInfoPoints = [] } "breakLastPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 13 287 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 13 287 14 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 15 287 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 15 287 16 , srcInfoPoints = [] } "p") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 17 289 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 287 17 287 18 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 19 289 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 287 19 287 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 287 44 287 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 288 19 288 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 289 19 289 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 292 1 292 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 39 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 24 287 39 , srcInfoPoints = [] } "elemIndexEnd"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 40 287 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 40 287 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 40 287 41 , srcInfoPoints = [] } "c")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 42 287 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 42 287 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 287 42 287 43 , srcInfoPoints = [] } "p")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 19 288 37 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 19 288 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 19 288 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 19 288 26 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 27 288 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 288 27 288 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 30 288 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 30 288 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 288 30 288 37 , srcInfoPoints = [] } "Nothing")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 19 289 62 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 19 289 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 19 289 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 19 289 23 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 24 289 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 24 289 25 , srcInfoPoints = [] } "n") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 26 289 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 289 26 289 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 29 289 62 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 29 289 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 29 289 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 29 289 33 , srcInfoPoints = [] } "Just"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 34 289 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 289 34 289 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 289 45 289 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 289 61 289 62 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 41 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 41 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 41 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 35 289 41 , srcInfoPoints = [] } "take"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 42 289 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 42 289 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 42 289 43 , srcInfoPoints = [] } "n")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 44 289 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 44 289 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 44 289 45 , srcInfoPoints = [] } "p"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 53 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 53 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 53 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 47 289 53 , srcInfoPoints = [] } "drop"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 54 289 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 289 54 289 55 , SrcSpan "tests/examples/ByteStringUtils.hs" 289 58 289 59 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 55 289 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 55 289 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 55 289 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 55 289 56 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 56 289 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 56 289 57 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 56 289 57 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 57 289 58 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 57 289 58 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 60 289 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 60 289 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 289 60 289 61 , srcInfoPoints = [] } "p"))) ]))) Nothing ])) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 292 1 292 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 292 1 292 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 292 20 292 23 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 292 12 292 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 292 12 292 19 , srcInfoPoints = [] } "linesPS")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 1 293 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 293 9 293 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 1 293 8 , srcInfoPoints = [] } "linesPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 12 293 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 293 25 293 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 12 293 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 12 293 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 12 293 24 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 12 293 24 , srcInfoPoints = [] } "ByteString"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 28 293 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 293 28 293 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 293 41 293 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 29 293 41 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 29 293 41 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 29 293 41 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 293 29 293 41 , srcInfoPoints = [] } "ByteString"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 294 1 296 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 294 1 296 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 294 1 294 8 , srcInfoPoints = [] } "linesPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 294 9 294 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 294 9 294 11 , srcInfoPoints = [] } "ps") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 6 296 36 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 6 295 29 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 295 6 295 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 295 18 295 19 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 14 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 14 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 14 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 8 295 14 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 15 295 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 15 295 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 15 295 17 , srcInfoPoints = [] } "ps")))) ] (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 20 295 29 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 295 20 295 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 295 28 295 29 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 21 295 28 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 21 295 28 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 21 295 28 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 295 21 295 28 , srcInfoPoints = [] } "empty")) ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 6 296 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 296 6 296 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 296 18 296 19 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 8 296 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 8 296 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 8 296 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 8 296 17 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 28 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 28 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 28 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 20 296 28 , srcInfoPoints = [] } "split"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 29 296 33 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 29 296 33 , srcInfoPoints = [] } '\n' "\\n"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 34 296 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 34 296 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 296 34 296 36 , srcInfoPoints = [] } "ps")))) ]) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 1 323 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 323 11 323 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 1 323 10 , srcInfoPoints = [] } "unlinesPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 14 323 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 323 29 323 31 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 14 323 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 323 14 323 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 323 27 323 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 15 323 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 15 323 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 15 323 27 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 15 323 27 , srcInfoPoints = [] } "ByteString")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 32 323 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 32 323 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 32 323 44 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 323 32 323 44 , srcInfoPoints = [] } "ByteString")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 1 325 38 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 1 324 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 1 324 10 , srcInfoPoints = [] } "unlinesPS") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 11 324 13 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 324 11 324 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 324 12 324 13 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 14 324 24 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 324 14 324 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 16 324 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 16 324 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 16 324 24 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 324 16 324 24 , srcInfoPoints = [] } "empty")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 1 325 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 1 325 10 , srcInfoPoints = [] } "unlinesPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 11 325 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 11 325 12 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 14 325 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 325 14 325 15 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 16 325 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 16 325 23 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 16 325 23 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 16 325 23 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 16 325 23 , srcInfoPoints = [] } "init"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 24 325 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 24 325 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 24 325 25 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 26 325 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 26 325 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 26 325 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 26 325 36 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 26 325 36 , srcInfoPoints = [] } "unlines"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 37 325 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 37 325 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 325 37 325 38 , srcInfoPoints = [] } "x")))))) Nothing ] , InlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 326 1 326 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 326 1 326 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 326 22 326 25 ] } True Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 326 12 326 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 326 12 326 21 , srcInfoPoints = [] } "unlinesPS")) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 342 1 343 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 342 1 342 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 342 9 342 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 342 29 342 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 343 5 343 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 342 16 342 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 342 22 342 28 , srcInfoPoints = [] })) (Just "static zlib.h gzopen") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 342 52 342 60 , srcInfoPoints = [] } "c_gzopen") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 8 343 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 16 343 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 8 343 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 8 343 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 8 343 15 , srcInfoPoints = [] } "CString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 19 343 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 27 343 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 19 343 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 19 343 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 19 343 26 , srcInfoPoints = [] } "CString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 30 343 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 30 343 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 30 343 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 30 343 32 , srcInfoPoints = [] } "IO"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 33 343 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 33 343 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 343 40 343 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 34 343 40 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 34 343 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 34 343 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 34 343 37 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 343 39 343 40 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 343 39 343 40 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 343 38 343 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 343 39 343 40 ] })))))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 344 1 345 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 344 1 344 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 344 9 344 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 344 29 344 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 5 345 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 344 16 344 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 344 22 344 28 , srcInfoPoints = [] })) (Just "static zlib.h gzclose") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 344 53 344 62 , srcInfoPoints = [] } "c_gzclose") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 8 345 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 15 345 17 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 8 345 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 8 345 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 8 345 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 8 345 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 13 345 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 13 345 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 12 345 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 13 345 14 ] })))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 18 345 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 18 345 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 18 345 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 18 345 20 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 22 345 23 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 22 345 23 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 345 21 345 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 345 22 345 23 ] }))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 346 1 347 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 346 1 346 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 346 9 346 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 346 29 346 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 347 5 347 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 346 16 346 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 346 22 346 28 , srcInfoPoints = [] })) (Just "static zlib.h gzread") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 346 52 346 60 , srcInfoPoints = [] } "c_gzread") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 8 347 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 15 347 17 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 8 347 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 8 347 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 8 347 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 8 347 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 347 13 347 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 347 13 347 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 12 347 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 347 13 347 14 ] })))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 18 347 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 28 347 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 18 347 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 18 347 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 18 347 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 18 347 21 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 22 347 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 22 347 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 22 347 27 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 31 347 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 347 36 347 38 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 31 347 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 31 347 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 31 347 35 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 39 347 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 39 347 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 39 347 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 39 347 41 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 42 347 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 42 347 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 347 42 347 46 , srcInfoPoints = [] } "CInt"))))))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 348 1 349 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 348 1 348 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 348 9 348 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 348 29 348 52 , SrcSpan "tests/examples/ByteStringUtils.hs" 349 5 349 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 348 16 348 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 348 22 348 28 , srcInfoPoints = [] })) (Just "static zlib.h gzwrite") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 348 53 348 62 , srcInfoPoints = [] } "c_gzwrite") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 8 349 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 15 349 17 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 8 349 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 8 349 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 8 349 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 8 349 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 349 13 349 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 349 13 349 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 12 349 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 349 13 349 14 ] })))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 18 349 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 28 349 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 18 349 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 18 349 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 18 349 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 18 349 21 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 22 349 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 22 349 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 22 349 27 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 31 349 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 349 36 349 38 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 31 349 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 31 349 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 31 349 35 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 39 349 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 39 349 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 39 349 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 39 349 41 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 42 349 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 42 349 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 349 42 349 46 , srcInfoPoints = [] } "CInt"))))))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 1 352 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 352 14 352 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 1 352 13 , srcInfoPoints = [] } "gzReadFilePS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 17 352 44 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 352 26 352 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 17 352 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 17 352 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 17 352 25 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 29 352 44 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 29 352 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 29 352 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 29 352 31 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 32 352 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 32 352 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 32 352 44 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 352 32 352 44 , srcInfoPoints = [] } "ByteString"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 1 391 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 1 391 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 1 353 13 , srcInfoPoints = [] } "gzReadFilePS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 14 353 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 14 353 15 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 16 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 353 16 353 17 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 353 18 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 353 18 353 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 354 5 354 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 355 5 355 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 356 5 356 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 5 354 35 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 354 7 354 9 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 5 354 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 5 354 6 , srcInfoPoints = [] } "h")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 10 354 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 10 354 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 10 354 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 10 354 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 10 354 24 , srcInfoPoints = [] } "openBinaryFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 25 354 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 25 354 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 25 354 26 , srcInfoPoints = [] } "f")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 27 354 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 27 354 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 354 27 354 35 , srcInfoPoints = [] } "ReadMode")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 5 355 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 355 12 355 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 5 355 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 5 355 11 , srcInfoPoints = [] } "header")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 21 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 21 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 21 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 15 355 21 , srcInfoPoints = [] } "hGet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 22 355 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 22 355 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 22 355 23 , srcInfoPoints = [] } "h")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 24 355 25 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 355 24 355 25 , srcInfoPoints = [] } 2 "2"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 5 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 356 5 356 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 357 8 357 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 359 8 359 12 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 5 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 356 5 356 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 357 8 357 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 359 8 359 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 8 356 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 8 356 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 8 356 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 8 356 14 , srcInfoPoints = [] } "header"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 15 356 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 15 356 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 15 356 17 , srcInfoPoints = [] } "/="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 18 356 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 18 356 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 18 356 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 18 356 25 , srcInfoPoints = [] } "BC") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 18 356 25 , srcInfoPoints = [] } "pack"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 26 356 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 356 26 356 35 , srcInfoPoints = [] } "\US\139" "\\31\\139")))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 13 358 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 357 13 357 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 359 8 359 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 16 357 22 , srcInfoPoints = [] } "hClose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 23 357 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 23 357 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 357 23 357 24 , srcInfoPoints = [] } "h")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 16 358 26 , srcInfoPoints = [] } "mmapFilePS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 27 358 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 27 358 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 358 27 358 28 , srcInfoPoints = [] } "f")))) ]) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 13 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 359 13 359 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 360 16 360 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 367 16 367 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 381 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 16 359 21 , srcInfoPoints = [] } "hSeek"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 22 359 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 22 359 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 22 359 23 , srcInfoPoints = [] } "h")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 24 359 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 24 359 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 24 359 35 , srcInfoPoints = [] } "SeekFromEnd")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 36 359 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 359 36 359 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 359 39 359 40 ] } (NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 37 359 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 359 37 359 38 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 38 359 39 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 359 38 359 39 , srcInfoPoints = [] } 4 "4"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 16 360 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 360 20 360 22 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 16 360 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 16 360 19 , srcInfoPoints = [] } "len")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 23 360 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 23 360 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 23 360 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 23 360 39 , srcInfoPoints = [] } "hGetLittleEndInt"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 40 360 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 40 360 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 360 40 360 41 , srcInfoPoints = [] } "h")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 16 361 22 , srcInfoPoints = [] } "hClose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 23 361 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 23 361 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 361 23 361 24 , srcInfoPoints = [] } "h")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 16 369 34 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 367 16 367 19 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 20 369 34 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 367 20 367 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 20 369 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 20 367 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 20 367 30 , srcInfoPoints = [] } "decompress")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 31 369 34 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 367 31 367 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 33 369 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 33 367 50 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 33 367 50 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 33 367 50 , srcInfoPoints = [] } "GZ") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 33 367 50 , srcInfoPoints = [] } "decompressWith"))) (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 51 369 34 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 367 78 367 79 , SrcSpan "tests/examples/ByteStringUtils.hs" 369 33 369 34 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 51 367 77 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 51 367 77 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 51 367 77 , srcInfoPoints = [] } "GZ") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 367 51 367 77 , srcInfoPoints = [] } "defaultDecompressParams"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 35 368 64 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 368 59 368 60 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 35 368 58 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 35 368 58 , srcInfoPoints = [] } "GZ") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 35 368 58 , srcInfoPoints = [] } "decompressBufferSize")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 61 368 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 61 368 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 368 61 368 64 , srcInfoPoints = [] } "len"))) ]))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 378 38 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 378 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 16 370 20 , srcInfoPoints = [] } "fmap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 21 370 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 370 21 370 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 370 57 370 58 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 22 370 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 22 370 30 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 22 370 30 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 22 370 30 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 22 370 30 , srcInfoPoints = [] } "concat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 31 370 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 31 370 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 31 370 32 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 33 370 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 33 370 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 33 370 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 33 370 44 , srcInfoPoints = [] } "BL") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 33 370 44 , srcInfoPoints = [] } "toChunks"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 45 370 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 45 370 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 45 370 46 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 47 370 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 47 370 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 47 370 57 , srcInfoPoints = [] } "decompress"))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 59 370 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 59 370 60 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 370 59 370 60 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 25 378 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 25 375 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 25 375 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 25 375 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 25 375 29 , srcInfoPoints = [] } "fmap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 30 375 53 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 375 30 375 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 375 52 375 53 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 31 375 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 31 375 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 31 375 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 31 375 44 , srcInfoPoints = [] } "BL") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 31 375 44 , srcInfoPoints = [] } "fromChunks"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 45 375 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 45 375 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 45 375 46 , srcInfoPoints = [] } "."))) (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 47 375 52 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 375 47 375 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 375 51 375 52 ] } (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 48 375 49 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 48 375 49 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 48 375 49 , srcInfoPoints = [] }))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 49 375 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 375 49 375 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 375 50 375 51 ] } []))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 54 375 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 54 375 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 375 54 375 55 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 378 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 378 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 376 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 376 35 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 376 35 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 376 35 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 25 376 35 , srcInfoPoints = [] } "readFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 36 376 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 36 376 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 376 36 376 37 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 25 378 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 25 378 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 25 378 36 , srcInfoPoints = [] } "BL") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 25 378 36 , srcInfoPoints = [] } "readFile")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 37 378 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 37 378 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 378 37 378 38 , srcInfoPoints = [] } "f")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 391 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 391 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 381 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 381 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 381 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 16 381 27 , srcInfoPoints = [] } "withCString"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 28 381 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 28 381 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 28 381 29 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 30 381 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 30 381 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 30 381 31 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 32 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 381 32 381 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 381 37 381 39 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 33 381 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 33 381 37 , srcInfoPoints = [] } "fstr") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 40 391 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 40 381 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 40 381 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 40 381 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 40 381 51 , srcInfoPoints = [] } "withCString"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 52 381 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 52 381 56 , srcInfoPoints = [] } "rb" "rb"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 57 381 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 57 381 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 57 381 58 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 59 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 381 59 381 60 , SrcSpan "tests/examples/ByteStringUtils.hs" 381 62 381 64 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 60 381 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 60 381 62 , srcInfoPoints = [] } "rb") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 381 65 391 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 381 65 381 67 , SrcSpan "tests/examples/ByteStringUtils.hs" 382 18 382 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 384 18 384 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 386 18 386 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 389 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 18 382 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 382 22 382 24 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 18 382 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 18 382 21 , srcInfoPoints = [] } "gzf")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 25 382 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 25 382 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 25 382 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 25 382 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 25 382 33 , srcInfoPoints = [] } "c_gzopen"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 34 382 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 34 382 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 34 382 38 , srcInfoPoints = [] } "fstr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 39 382 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 39 382 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 382 39 382 41 , srcInfoPoints = [] } "rb")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 75 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 18 383 22 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 23 383 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 383 23 383 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 383 38 383 39 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 24 383 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 24 383 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 24 383 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 24 383 27 , srcInfoPoints = [] } "gzf"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 28 383 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 28 383 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 28 383 30 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 31 383 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 31 383 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 31 383 38 , srcInfoPoints = [] } "nullPtr")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 40 383 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 40 383 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 40 383 41 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 42 383 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 42 383 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 42 383 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 42 383 46 , srcInfoPoints = [] } "fail"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 47 383 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 47 383 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 47 383 48 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 49 383 75 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 49 383 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 49 383 72 , srcInfoPoints = [] } "problem opening file " "problem opening file ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 72 383 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 72 383 74 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 72 383 74 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 74 383 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 74 383 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 383 74 383 75 , srcInfoPoints = [] } "f")))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 18 384 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 384 21 384 23 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 18 384 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 18 384 20 , srcInfoPoints = [] } "fp")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 24 384 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 24 384 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 24 384 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 24 384 43 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 24 384 43 , srcInfoPoints = [] } "mallocByteString"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 44 384 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 44 384 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 384 44 384 47 , srcInfoPoints = [] } "len")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 57 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 18 385 33 , srcInfoPoints = [] } "debugForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 34 385 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 34 385 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 34 385 36 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 37 385 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 37 385 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 37 385 38 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 39 385 57 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 39 385 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 39 385 54 , srcInfoPoints = [] } "gzReadFilePS " "gzReadFilePS ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 54 385 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 54 385 56 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 54 385 56 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 56 385 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 56 385 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 385 56 385 57 , srcInfoPoints = [] } "f"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 18 387 60 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 386 24 386 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 18 386 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 18 386 23 , srcInfoPoints = [] } "lread")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 27 387 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 27 386 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 27 386 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 27 386 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 27 386 41 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 42 386 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 42 386 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 42 386 44 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 45 386 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 45 386 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 45 386 46 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 47 387 60 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 386 47 386 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 386 50 386 52 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 48 386 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 386 48 386 49 , srcInfoPoints = [] } "p") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 27 387 35 , srcInfoPoints = [] } "c_gzread"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 36 387 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 36 387 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 36 387 39 , srcInfoPoints = [] } "gzf")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 40 387 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 40 387 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 40 387 41 , srcInfoPoints = [] } "p")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 42 387 60 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 387 42 387 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 387 59 387 60 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 43 387 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 43 387 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 43 387 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 43 387 55 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 56 387 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 56 387 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 387 56 387 59 , srcInfoPoints = [] } "len")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 18 388 27 , srcInfoPoints = [] } "c_gzclose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 28 388 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 28 388 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 388 28 388 31 , srcInfoPoints = [] } "gzf")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 390 58 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 390 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 389 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 389 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 389 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 18 389 22 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 23 389 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 389 23 389 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 389 49 389 50 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 24 389 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 24 389 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 24 389 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 24 389 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 24 389 36 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 37 389 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 37 389 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 37 389 42 , srcInfoPoints = [] } "lread")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 43 389 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 43 389 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 43 389 45 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 46 389 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 46 389 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 46 389 49 , srcInfoPoints = [] } "len")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 51 389 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 51 389 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 389 51 389 52 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 23 390 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 23 390 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 23 390 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 23 390 27 , srcInfoPoints = [] } "fail"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 28 390 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 28 390 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 28 390 29 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 30 390 58 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 30 390 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 30 390 55 , srcInfoPoints = [] } "problem gzreading file " "problem gzreading file ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 55 390 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 55 390 57 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 55 390 57 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 57 390 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 57 390 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 390 57 390 58 , srcInfoPoints = [] } "f")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 18 391 24 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 25 391 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 25 391 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 25 391 26 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 27 391 41 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 42 391 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 42 391 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 42 391 44 , srcInfoPoints = [] } "fp")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 45 391 46 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 45 391 46 , srcInfoPoints = [] } 0 "0"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 47 391 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 47 391 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 391 47 391 50 , srcInfoPoints = [] } "len"))))) ]))))) ])) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 394 18 394 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 1 394 17 , srcInfoPoints = [] } "hGetLittleEndInt" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 21 394 37 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 394 28 394 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 21 394 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 21 394 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 21 394 27 , srcInfoPoints = [] } "Handle"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 31 394 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 31 394 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 31 394 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 31 394 33 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 34 394 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 34 394 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 394 34 394 37 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 1 400 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 1 400 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 1 395 17 , srcInfoPoints = [] } "hGetLittleEndInt") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 18 395 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 18 395 19 , srcInfoPoints = [] } "h") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 20 400 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 395 20 395 21 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 395 22 400 50 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 395 22 395 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 396 5 396 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 397 5 397 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 398 5 398 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 399 5 399 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 402 1 402 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 5 396 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 396 8 396 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 5 396 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 5 396 7 , srcInfoPoints = [] } "b1")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 11 396 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 11 396 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 11 396 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 11 396 14 , srcInfoPoints = [] } "ord"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 15 396 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 396 15 396 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 396 16 396 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 396 20 396 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 15 396 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 396 15 396 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 396 16 396 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 396 20 396 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 16 396 20 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 22 396 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 22 396 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 22 396 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 22 396 30 , srcInfoPoints = [] } "hGetChar"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 31 396 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 31 396 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 396 31 396 32 , srcInfoPoints = [] } "h"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 5 397 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 397 8 397 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 5 397 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 5 397 7 , srcInfoPoints = [] } "b2")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 11 397 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 11 397 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 11 397 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 11 397 14 , srcInfoPoints = [] } "ord"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 15 397 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 397 15 397 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 397 16 397 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 397 20 397 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 15 397 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 397 15 397 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 397 16 397 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 397 20 397 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 16 397 20 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 22 397 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 22 397 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 22 397 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 22 397 30 , srcInfoPoints = [] } "hGetChar"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 31 397 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 31 397 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 397 31 397 32 , srcInfoPoints = [] } "h"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 5 398 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 398 8 398 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 5 398 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 5 398 7 , srcInfoPoints = [] } "b3")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 11 398 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 11 398 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 11 398 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 11 398 14 , srcInfoPoints = [] } "ord"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 15 398 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 398 15 398 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 398 16 398 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 398 20 398 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 15 398 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 398 15 398 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 398 16 398 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 398 20 398 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 16 398 20 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 22 398 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 22 398 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 22 398 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 22 398 30 , srcInfoPoints = [] } "hGetChar"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 31 398 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 31 398 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 398 31 398 32 , srcInfoPoints = [] } "h"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 5 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 399 8 399 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 5 399 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 5 399 7 , srcInfoPoints = [] } "b4")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 11 399 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 11 399 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 11 399 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 11 399 14 , srcInfoPoints = [] } "ord"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 15 399 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 399 15 399 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 399 16 399 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 399 20 399 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 15 399 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 399 15 399 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 399 16 399 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 399 20 399 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 16 399 20 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 22 399 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 22 399 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 22 399 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 22 399 30 , srcInfoPoints = [] } "hGetChar"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 31 399 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 31 399 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 399 31 399 32 , srcInfoPoints = [] } "h"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 5 400 11 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 12 400 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 12 400 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 12 400 13 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 36 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 14 400 16 , srcInfoPoints = [] } "b1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 17 400 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 17 400 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 17 400 18 , srcInfoPoints = [] } "+"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 19 400 25 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 19 400 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 19 400 22 , srcInfoPoints = [] } 256 "256")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 22 400 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 22 400 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 22 400 23 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 23 400 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 23 400 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 23 400 25 , srcInfoPoints = [] } "b2"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 26 400 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 26 400 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 26 400 27 , srcInfoPoints = [] } "+"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 28 400 36 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 28 400 33 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 28 400 33 , srcInfoPoints = [] } 65536 "65536")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 33 400 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 33 400 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 33 400 34 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 34 400 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 34 400 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 34 400 36 , srcInfoPoints = [] } "b3"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 37 400 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 37 400 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 37 400 38 , srcInfoPoints = [] } "+"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 39 400 50 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 39 400 47 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 39 400 47 , srcInfoPoints = [] } 16777216 "16777216")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 47 400 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 47 400 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 47 400 48 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 48 400 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 48 400 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 400 48 400 50 , srcInfoPoints = [] } "b4")))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 1 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 15 402 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 1 402 14 , srcInfoPoints = [] } "gzWriteFilePS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 18 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 27 402 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 18 402 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 18 402 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 18 402 26 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 30 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 43 402 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 30 402 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 30 402 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 30 402 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 30 402 42 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 46 402 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 46 402 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 46 402 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 46 402 48 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 402 50 402 51 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 402 50 402 51 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 402 49 402 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 402 50 402 51 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 1 403 43 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 1 403 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 1 403 14 , srcInfoPoints = [] } "gzWriteFilePS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 15 403 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 15 403 16 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 17 403 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 17 403 19 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 20 403 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 403 20 403 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 22 403 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 22 403 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 22 403 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 22 403 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 22 403 36 , srcInfoPoints = [] } "gzWriteFilePSs"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 37 403 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 37 403 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 37 403 38 , srcInfoPoints = [] } "f")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 39 403 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 403 39 403 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 403 42 403 43 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 40 403 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 40 403 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 403 40 403 42 , srcInfoPoints = [] } "ps")) ]))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 1 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 16 405 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 1 405 15 , srcInfoPoints = [] } "gzWriteFilePSs" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 19 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 28 405 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 19 405 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 19 405 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 19 405 27 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 31 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 46 405 48 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 31 405 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 31 405 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 405 44 405 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 32 405 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 32 405 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 32 405 44 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 32 405 44 , srcInfoPoints = [] } "ByteString")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 49 405 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 49 405 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 49 405 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 49 405 51 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 405 53 405 54 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 405 53 405 54 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 54 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 405 52 405 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 405 53 405 54 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 1 415 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 1 415 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 1 406 15 , srcInfoPoints = [] } "gzWriteFilePSs") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 16 406 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 16 406 17 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 18 406 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 18 406 21 , srcInfoPoints = [] } "pss") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 406 23 415 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 406 23 406 24 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 415 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 408 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 408 17 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 408 17 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 408 17 , srcInfoPoints = [] } "BL") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 5 408 17 , srcInfoPoints = [] } "writeFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 18 408 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 18 408 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 18 408 19 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 20 408 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 20 408 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 20 408 21 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 22 415 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 22 408 33 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 22 408 33 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 22 408 33 , srcInfoPoints = [] } "GZ") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 22 408 33 , srcInfoPoints = [] } "compress"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 34 408 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 34 408 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 34 408 35 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 415 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 410 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 410 16 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 408 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 408 49 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 408 49 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 408 49 , srcInfoPoints = [] } "BL") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 36 408 49 , srcInfoPoints = [] } "fromChunks"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 50 408 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 50 408 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 408 50 408 53 , srcInfoPoints = [] } "pss")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 5 410 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 5 410 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 5 410 16 , srcInfoPoints = [] } "withCString")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 17 410 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 17 410 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 17 410 18 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 19 410 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 19 410 20 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 19 410 20 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 21 415 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 410 21 410 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 410 27 410 29 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 22 410 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 22 410 26 , srcInfoPoints = [] } "fstr") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 30 415 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 30 410 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 30 410 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 30 410 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 30 410 41 , srcInfoPoints = [] } "withCString"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 42 410 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 42 410 46 , srcInfoPoints = [] } "wb" "wb"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 47 410 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 47 410 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 47 410 48 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 49 415 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 410 49 410 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 410 53 410 55 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 50 410 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 50 410 52 , srcInfoPoints = [] } "wb") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 410 56 415 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 410 56 410 58 , SrcSpan "tests/examples/ByteStringUtils.hs" 411 5 411 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 1 417 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 5 411 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 411 9 411 11 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 5 411 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 5 411 8 , srcInfoPoints = [] } "gzf")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 12 411 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 12 411 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 12 411 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 12 411 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 12 411 20 , srcInfoPoints = [] } "c_gzopen"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 21 411 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 21 411 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 21 411 25 , srcInfoPoints = [] } "fstr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 26 411 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 26 411 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 411 26 411 28 , srcInfoPoints = [] } "wb")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 75 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 5 412 9 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 10 412 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 412 10 412 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 412 25 412 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 11 412 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 11 412 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 11 412 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 11 412 14 , srcInfoPoints = [] } "gzf"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 15 412 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 15 412 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 15 412 17 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 18 412 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 18 412 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 18 412 25 , srcInfoPoints = [] } "nullPtr")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 27 412 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 27 412 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 27 412 28 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 29 412 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 29 412 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 29 412 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 29 412 33 , srcInfoPoints = [] } "fail"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 34 412 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 34 412 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 34 412 35 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 36 412 75 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 36 412 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 36 412 72 , srcInfoPoints = [] } "problem gzopening file for write: " "problem gzopening file for write: ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 72 412 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 72 412 74 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 72 412 74 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 74 412 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 74 412 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 412 74 412 75 , srcInfoPoints = [] } "f")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 414 57 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 414 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 5 413 10 , srcInfoPoints = [] } "mapM_"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 11 413 29 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 413 11 413 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 28 413 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 12 413 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 12 413 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 12 413 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 12 413 24 , srcInfoPoints = [] } "gzWriteToGzf"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 25 413 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 25 413 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 25 413 28 , srcInfoPoints = [] } "gzf")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 30 413 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 30 413 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 30 413 33 , srcInfoPoints = [] } "pss")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 34 413 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 413 34 413 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 35 413 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 40 413 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 34 413 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 413 34 413 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 35 413 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 413 40 413 41 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 413 35 413 40 , srcInfoPoints = [] } "catch"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 15 414 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 414 15 414 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 414 18 414 20 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 16 414 17 , srcInfoPoints = [] } ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 21 414 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 21 414 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 21 414 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 21 414 25 , srcInfoPoints = [] } "fail"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 26 414 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 26 414 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 26 414 27 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 28 414 57 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 28 414 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 28 414 54 , srcInfoPoints = [] } "problem gzwriting file: " "problem gzwriting file: ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 54 414 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 54 414 56 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 54 414 56 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 56 414 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 56 414 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 414 56 414 57 , srcInfoPoints = [] } "f"))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 5 415 14 , srcInfoPoints = [] } "c_gzclose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 15 415 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 15 415 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 415 15 415 18 , srcInfoPoints = [] } "gzf")))) ])))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 1 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 14 417 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 1 417 13 , srcInfoPoints = [] } "gzWriteToGzf" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 17 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 24 417 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 17 417 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 17 417 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 17 417 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 17 417 20 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 22 417 23 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 22 417 23 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 21 417 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 22 417 23 ] })))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 27 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 40 417 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 27 417 39 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 27 417 39 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 27 417 39 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 27 417 39 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 43 417 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 43 417 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 43 417 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 43 417 45 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 47 417 48 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 47 417 48 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 417 46 417 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 417 47 417 48 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 1 425 67 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 1 425 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 1 418 13 , srcInfoPoints = [] } "gzWriteToGzf") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 14 418 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 14 418 17 , srcInfoPoints = [] } "gzf") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 18 418 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 18 418 20 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 21 425 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 418 21 418 22 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 23 425 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 418 23 418 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 418 47 418 49 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 2 419 2 , SrcSpan "tests/examples/ByteStringUtils.hs" 422 2 422 2 , SrcSpan "tests/examples/ByteStringUtils.hs" 442 1 442 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 28 418 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 28 418 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 28 418 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 28 418 43 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 28 418 43 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 44 418 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 44 418 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 418 44 418 46 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 2 419 22 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 2 419 9 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 419 2 419 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 4 419 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 6 419 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 8 419 9 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 3 419 4 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 5 419 6 , srcInfoPoints = [] } , PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 7 419 8 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 7 419 8 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 7 419 8 , srcInfoPoints = [] } 0 "0") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 10 419 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 419 10 419 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 13 419 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 13 419 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 13 419 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 13 419 19 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 21 419 22 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 21 419 22 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 22 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 419 20 419 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 419 21 419 22 ] }))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 2 425 67 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 2 422 9 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 422 2 422 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 422 4 422 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 422 6 422 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 422 8 422 9 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 3 422 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 3 422 4 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 5 422 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 5 422 6 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 7 422 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 7 422 8 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 10 425 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 422 10 422 12 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 422 13 425 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 422 13 422 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 5 423 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 442 1 442 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 5 424 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 423 8 423 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 5 423 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 5 423 7 , srcInfoPoints = [] } "lw")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 11 424 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 11 423 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 11 423 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 11 423 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 11 423 25 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 26 423 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 26 423 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 26 423 27 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 28 423 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 28 423 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 28 423 29 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 30 424 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 423 30 423 31 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 33 423 35 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 31 423 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 31 423 32 , srcInfoPoints = [] } "p") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 424 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 423 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 423 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 423 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 423 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 36 423 45 , srcInfoPoints = [] } "c_gzwrite"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 46 423 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 46 423 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 46 423 49 , srcInfoPoints = [] } "gzf")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 50 423 65 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 423 50 423 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 64 423 65 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 51 423 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 51 423 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 51 423 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 51 423 52 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 53 423 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 423 53 423 54 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 54 423 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 61 423 62 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 53 423 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 423 53 423 54 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 54 423 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 423 61 423 62 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 54 423 61 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 63 423 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 63 423 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 423 63 423 64 , srcInfoPoints = [] } "s")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 50 424 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 424 50 424 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 424 65 424 66 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 51 424 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 51 424 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 51 424 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 51 424 63 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 64 424 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 64 424 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 424 64 424 65 , srcInfoPoints = [] } "l")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 67 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 5 425 9 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 10 425 32 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 425 10 425 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 425 31 425 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 11 425 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 11 425 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 11 425 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 11 425 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 11 425 23 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 24 425 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 24 425 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 24 425 26 , srcInfoPoints = [] } "lw")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 27 425 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 27 425 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 27 425 29 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 30 425 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 30 425 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 30 425 31 , srcInfoPoints = [] } "l")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 33 425 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 33 425 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 33 425 34 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 35 425 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 35 425 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 35 425 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 35 425 39 , srcInfoPoints = [] } "fail"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 40 425 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 40 425 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 40 425 41 , srcInfoPoints = [] } "$"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 42 425 67 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 425 42 425 67 , srcInfoPoints = [] } "problem in gzWriteToGzf" "problem in gzWriteToGzf")))) ])) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 1 442 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 442 12 442 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 1 442 11 , srcInfoPoints = [] } "mmapFilePS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 15 442 42 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 442 24 442 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 15 442 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 15 442 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 15 442 23 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 27 442 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 27 442 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 27 442 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 27 442 29 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 30 442 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 30 442 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 30 442 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 442 30 442 42 , srcInfoPoints = [] } "ByteString"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 1 451 11 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 1 451 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 1 444 11 , srcInfoPoints = [] } "mmapFilePS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 12 444 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 12 444 13 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 14 451 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 444 14 444 15 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 444 16 451 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 444 16 444 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 445 3 445 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 453 1 453 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 3 450 72 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 445 5 445 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 3 445 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 3 445 4 , srcInfoPoints = [] } "x")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 450 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 445 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 445 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 445 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 445 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 8 445 26 , srcInfoPoints = [] } "mmapFileByteString"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 27 445 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 27 445 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 27 445 28 , srcInfoPoints = [] } "f")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 29 445 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 29 445 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 445 29 445 36 , srcInfoPoints = [] } "Nothing")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 4 446 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 446 4 446 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 446 5 446 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 446 10 446 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 4 446 11 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 446 4 446 5 , SrcSpan "tests/examples/ByteStringUtils.hs" 446 5 446 10 , SrcSpan "tests/examples/ByteStringUtils.hs" 446 10 446 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 5 446 10 , srcInfoPoints = [] } "catch"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 12 450 72 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 446 12 446 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 450 71 450 72 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 13 450 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 446 13 446 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 446 16 446 18 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 14 446 15 , srcInfoPoints = [] } ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 446 19 450 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 446 19 446 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 447 22 447 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 448 22 448 22 , SrcSpan "tests/examples/ByteStringUtils.hs" 450 71 450 71 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 22 447 69 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 447 27 447 29 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 22 447 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 22 447 26 , srcInfoPoints = [] } "size")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 30 447 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 30 447 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 30 447 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 30 447 38 , srcInfoPoints = [] } "fileSize"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 39 447 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 447 39 447 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 447 40 447 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 447 44 447 45 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 39 447 45 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 447 39 447 40 , SrcSpan "tests/examples/ByteStringUtils.hs" 447 40 447 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 447 44 447 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 40 447 44 , srcInfoPoints = [] } "fmap"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 46 447 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 46 447 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 46 447 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 46 447 67 , srcInfoPoints = [] } "getSymbolicLinkStatus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 68 447 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 68 447 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 447 68 447 69 , srcInfoPoints = [] } "f"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 22 450 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 448 22 448 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 449 25 449 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 450 25 450 29 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 22 450 71 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 448 22 448 24 , SrcSpan "tests/examples/ByteStringUtils.hs" 449 25 449 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 450 25 450 29 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 25 448 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 25 448 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 25 448 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 25 448 29 , srcInfoPoints = [] } "size"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 30 448 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 30 448 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 30 448 32 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 33 448 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 448 33 448 34 , srcInfoPoints = [] } 0 "0"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 30 449 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 30 449 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 30 449 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 30 449 36 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 37 449 44 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 37 449 44 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 37 449 44 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 449 37 449 44 , srcInfoPoints = [] } "empty")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 30 450 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 30 450 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 30 450 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 30 450 39 , srcInfoPoints = [] } "performGC"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 40 450 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 40 450 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 40 450 42 , srcInfoPoints = [] } ">>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 43 450 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 43 450 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 43 450 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 43 450 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 43 450 61 , srcInfoPoints = [] } "mmapFileByteString"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 62 450 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 62 450 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 62 450 63 , srcInfoPoints = [] } "f")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 64 450 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 64 450 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 450 64 450 71 , srcInfoPoints = [] } "Nothing")))))) ])))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 11 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 11 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 3 451 9 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 10 451 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 10 451 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 451 10 451 11 , srcInfoPoints = [] } "x")))) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 1 453 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 1 453 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 1 453 11 , srcInfoPoints = [] } "mmapFilePS")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 12 453 24 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 453 12 453 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 14 453 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 14 453 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 14 453 24 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 453 14 453 24 , srcInfoPoints = [] } "readFile")))) Nothing , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 459 1 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 459 1 459 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 459 9 459 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 459 29 459 60 , SrcSpan "tests/examples/ByteStringUtils.hs" 460 5 460 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 459 16 459 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 459 22 459 28 , srcInfoPoints = [] })) (Just "static fpstring.h conv_to_hex") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 459 61 459 72 , srcInfoPoints = [] } "conv_to_hex") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 8 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 18 460 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 8 460 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 8 460 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 8 460 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 8 460 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 12 460 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 12 460 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 12 460 17 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 21 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 31 460 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 21 460 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 21 460 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 21 460 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 21 460 24 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 25 460 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 25 460 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 25 460 30 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 34 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 39 460 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 34 460 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 34 460 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 34 460 38 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 42 460 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 42 460 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 42 460 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 42 460 44 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 460 46 460 47 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 460 46 460 47 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 460 45 460 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 460 46 460 47 ] }))))))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 1 462 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 462 12 462 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 1 462 11 , srcInfoPoints = [] } "fromPS2Hex" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 15 462 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 462 28 462 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 15 462 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 15 462 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 15 462 27 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 15 462 27 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 31 462 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 31 462 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 31 462 43 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 462 31 462 43 , srcInfoPoints = [] } "ByteString")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 1 466 58 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 1 466 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 1 463 11 , srcInfoPoints = [] } "fromPS2Hex") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 12 463 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 12 463 14 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 15 466 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 463 15 463 16 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 17 466 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 463 17 463 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 463 41 463 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 464 11 464 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 471 1 471 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 22 463 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 22 463 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 22 463 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 22 463 37 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 22 463 37 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 38 463 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 38 463 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 463 38 463 40 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 11 466 58 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 11 464 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 464 11 464 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 464 13 464 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 464 15 464 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 464 17 464 18 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 12 464 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 12 464 13 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 14 464 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 14 464 15 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 16 464 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 16 464 17 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 464 19 466 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 464 19 464 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 466 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 465 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 465 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 465 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 465 27 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 12 465 27 , srcInfoPoints = [] } "unsafeCreate"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 28 465 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 465 28 465 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 465 32 465 33 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 29 465 32 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 29 465 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 29 465 30 , srcInfoPoints = [] } 2 "2")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 30 465 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 30 465 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 30 465 31 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 31 465 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 31 465 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 31 465 32 , srcInfoPoints = [] } "l")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 34 465 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 34 465 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 34 465 35 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 36 466 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 465 36 465 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 465 39 465 41 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 37 465 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 37 465 38 , srcInfoPoints = [] } "p") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 42 466 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 42 465 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 42 465 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 42 465 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 42 465 56 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 57 465 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 57 465 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 57 465 58 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 59 465 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 59 465 60 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 59 465 60 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 61 466 58 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 465 61 465 62 , SrcSpan "tests/examples/ByteStringUtils.hs" 465 64 465 66 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 62 465 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 465 62 465 63 , srcInfoPoints = [] } "f") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 12 466 23 , srcInfoPoints = [] } "conv_to_hex"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 24 466 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 24 466 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 24 466 25 , srcInfoPoints = [] } "p")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 26 466 41 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 466 26 466 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 466 40 466 41 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 27 466 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 27 466 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 27 466 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 27 466 28 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 29 466 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 466 29 466 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 466 30 466 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 466 37 466 38 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 29 466 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 466 29 466 30 , SrcSpan "tests/examples/ByteStringUtils.hs" 466 30 466 37 , SrcSpan "tests/examples/ByteStringUtils.hs" 466 37 466 38 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 30 466 37 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 39 466 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 39 466 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 39 466 40 , srcInfoPoints = [] } "s")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 42 466 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 42 466 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 42 466 43 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 44 466 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 44 466 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 44 466 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 44 466 56 , srcInfoPoints = [] } "fromIntegral"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 57 466 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 57 466 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 466 57 466 58 , srcInfoPoints = [] } "l")))))))))) Nothing ])) Nothing ] , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 471 1 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 471 1 471 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 471 9 471 15 , SrcSpan "tests/examples/ByteStringUtils.hs" 471 29 471 62 , SrcSpan "tests/examples/ByteStringUtils.hs" 472 5 472 7 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 471 16 471 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 471 22 471 28 , srcInfoPoints = [] })) (Just "static fpstring.h conv_from_hex") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 471 63 471 76 , srcInfoPoints = [] } "conv_from_hex") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 8 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 18 472 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 8 472 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 8 472 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 8 472 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 8 472 11 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 12 472 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 12 472 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 12 472 17 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 21 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 31 472 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 21 472 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 21 472 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 21 472 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 21 472 24 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 25 472 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 25 472 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 25 472 30 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 34 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 39 472 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 34 472 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 34 472 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 34 472 38 , srcInfoPoints = [] } "CInt"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 42 472 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 42 472 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 42 472 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 42 472 44 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 472 46 472 47 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 472 46 472 47 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 472 45 472 46 , SrcSpan "tests/examples/ByteStringUtils.hs" 472 46 472 47 ] }))))))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 1 474 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 474 12 474 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 1 474 11 , srcInfoPoints = [] } "fromHex2PS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 15 474 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 474 28 474 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 15 474 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 15 474 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 15 474 27 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 15 474 27 , srcInfoPoints = [] } "ByteString"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 31 474 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 31 474 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 31 474 43 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 474 31 474 43 , srcInfoPoints = [] } "ByteString")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 1 478 70 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 1 478 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 1 475 11 , srcInfoPoints = [] } "fromHex2PS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 12 475 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 12 475 14 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 15 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 475 15 475 16 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 17 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 475 17 475 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 475 41 475 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 476 11 476 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 486 1 486 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 22 475 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 22 475 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 22 475 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 22 475 37 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 22 475 37 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 38 475 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 38 475 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 475 38 475 40 , srcInfoPoints = [] } "ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 11 478 70 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 11 476 18 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 476 11 476 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 476 13 476 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 476 15 476 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 476 17 476 18 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 12 476 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 12 476 13 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 14 476 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 14 476 15 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 16 476 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 16 476 17 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 476 19 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 476 19 476 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 478 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 477 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 477 27 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 477 27 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 477 27 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 12 477 27 , srcInfoPoints = [] } "unsafeCreate"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 28 477 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 477 28 477 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 38 477 39 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 29 477 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 29 477 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 29 477 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 29 477 30 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 31 477 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 477 31 477 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 32 477 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 35 477 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 31 477 36 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 477 31 477 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 32 477 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 35 477 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 32 477 35 , srcInfoPoints = [] } "div"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 37 477 38 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 37 477 38 , srcInfoPoints = [] } 2 "2"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 40 477 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 40 477 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 40 477 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 42 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 477 42 477 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 45 477 47 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 43 477 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 43 477 44 , srcInfoPoints = [] } "p") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 48 478 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 48 477 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 48 477 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 48 477 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 48 477 62 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 63 477 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 63 477 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 63 477 64 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 65 477 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 65 477 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 65 477 66 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 67 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 477 67 477 68 , SrcSpan "tests/examples/ByteStringUtils.hs" 477 70 477 72 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 68 477 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 477 68 477 69 , srcInfoPoints = [] } "f") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 12 478 25 , srcInfoPoints = [] } "conv_from_hex"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 26 478 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 26 478 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 26 478 27 , srcInfoPoints = [] } "p")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 28 478 43 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 28 478 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 42 478 43 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 29 478 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 29 478 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 29 478 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 29 478 30 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 31 478 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 31 478 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 32 478 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 39 478 40 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 31 478 40 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 31 478 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 32 478 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 39 478 40 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 32 478 39 , srcInfoPoints = [] } "plusPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 41 478 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 41 478 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 41 478 42 , srcInfoPoints = [] } "s")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 44 478 70 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 44 478 45 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 69 478 70 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 45 478 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 45 478 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 45 478 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 45 478 57 , srcInfoPoints = [] } "fromIntegral"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 58 478 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 58 478 59 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 58 478 59 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 60 478 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 60 478 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 60 478 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 60 478 61 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 62 478 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 62 478 63 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 63 478 66 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 66 478 67 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 62 478 67 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 478 62 478 63 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 63 478 66 , SrcSpan "tests/examples/ByteStringUtils.hs" 478 66 478 67 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 63 478 66 , srcInfoPoints = [] } "div"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 68 478 69 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 478 68 478 69 , srcInfoPoints = [] } 2 "2"))))))))))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 1 487 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 486 16 486 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 1 486 15 , srcInfoPoints = [] } "betweenLinesPS" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 19 487 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 486 32 486 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 19 486 31 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 19 486 31 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 19 486 31 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 19 486 31 , srcInfoPoints = [] } "ByteString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 35 487 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 486 48 486 50 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 35 486 47 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 35 486 47 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 35 486 47 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 35 486 47 , srcInfoPoints = [] } "ByteString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 51 487 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 487 16 487 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 51 486 63 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 51 486 63 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 51 486 63 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 486 51 486 63 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 19 487 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 19 487 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 19 487 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 19 487 24 , srcInfoPoints = [] } "Maybe"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 25 487 39 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 487 25 487 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 487 38 487 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 26 487 38 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 26 487 38 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 26 487 38 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 487 26 487 38 , srcInfoPoints = [] } "ByteString")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 1 496 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 1 496 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 1 488 15 , srcInfoPoints = [] } "betweenLinesPS") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 16 488 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 16 488 21 , srcInfoPoints = [] } "start") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 22 488 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 22 488 25 , srcInfoPoints = [] } "end") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 26 488 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 488 26 488 28 , srcInfoPoints = [] } "ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 2 496 20 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 489 2 489 3 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 4 496 20 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 489 4 489 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 489 39 489 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 490 8 490 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 496 8 496 8 , SrcSpan "tests/examples/ByteStringUtils.hs" 501 1 501 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 9 489 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 9 489 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 9 489 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 9 489 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 9 489 14 , srcInfoPoints = [] } "break"))) (LeftSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 15 489 25 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 489 15 489 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 489 24 489 25 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 16 489 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 16 489 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 16 489 21 , srcInfoPoints = [] } "start"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 22 489 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 22 489 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 22 489 24 , srcInfoPoints = [] } "=="))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 26 489 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 489 26 489 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 489 37 489 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 27 489 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 27 489 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 27 489 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 27 489 34 , srcInfoPoints = [] } "linesPS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 35 489 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 35 489 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 489 35 489 37 , srcInfoPoints = [] } "ps")))))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 8 495 28 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 8 490 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 490 8 490 9 , SrcSpan "tests/examples/ByteStringUtils.hs" 490 10 490 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 490 26 490 27 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 9 490 10 , srcInfoPoints = [] } , PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 12 490 26 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 12 490 13 , srcInfoPoints = [] }) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 13 490 14 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 13 490 14 , srcInfoPoints = [] })) (PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 14 490 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 490 18 490 19 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 14 490 18 , srcInfoPoints = [] } "rest") (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 19 490 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 490 19 490 20 , SrcSpan "tests/examples/ByteStringUtils.hs" 490 25 490 26 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 20 490 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 20 490 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 20 490 23 , srcInfoPoints = [] } "bs1")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 23 490 24 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 23 490 24 , srcInfoPoints = [] })) (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 24 490 25 , srcInfoPoints = [] })))) ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 490 28 495 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 490 28 490 30 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 12 495 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 491 12 491 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 491 37 491 39 , SrcSpan "tests/examples/ByteStringUtils.hs" 492 13 492 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 496 8 496 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 17 491 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 17 491 32 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 17 491 32 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 17 491 32 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 17 491 32 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 33 491 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 33 491 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 491 33 491 36 , srcInfoPoints = [] } "bs1")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 13 495 28 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 13 492 23 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 492 13 492 14 , SrcSpan "tests/examples/ByteStringUtils.hs" 492 17 492 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 492 20 492 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 492 22 492 23 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 14 492 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 14 492 17 , srcInfoPoints = [] } "ps1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 18 492 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 18 492 20 , srcInfoPoints = [] } "s1") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 21 492 22 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 492 24 495 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 492 24 492 26 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 14 495 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 493 14 493 18 , SrcSpan "tests/examples/ByteStringUtils.hs" 493 39 493 41 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 16 494 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 495 16 495 16 , SrcSpan "tests/examples/ByteStringUtils.hs" 496 8 496 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 19 493 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 19 493 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 19 493 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 19 493 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 19 493 24 , srcInfoPoints = [] } "break"))) (LeftSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 25 493 33 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 493 25 493 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 493 32 493 33 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 26 493 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 26 493 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 26 493 29 , srcInfoPoints = [] } "end"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 30 493 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 30 493 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 30 493 32 , srcInfoPoints = [] } "=="))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 34 493 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 34 493 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 493 34 493 38 , srcInfoPoints = [] } "rest")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 16 494 108 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 16 494 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 16 494 17 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 18 494 19 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 25 494 26 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 17 494 18 , srcInfoPoints = [] } , PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 20 494 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 20 494 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 20 494 23 , srcInfoPoints = [] } "bs2")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 23 494 24 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 23 494 24 , srcInfoPoints = [] })) (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 24 494 25 , srcInfoPoints = [] }) ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 27 494 108 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 27 494 29 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 30 494 108 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 30 494 34 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 55 494 57 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 58 494 58 , SrcSpan "tests/examples/ByteStringUtils.hs" 495 16 495 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 35 494 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 35 494 50 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 35 494 50 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 35 494 50 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 35 494 50 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 51 494 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 51 494 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 51 494 54 , srcInfoPoints = [] } "bs2")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 58 494 108 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 58 494 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 58 494 59 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 60 494 61 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 63 494 64 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 65 494 66 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 59 494 60 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 61 494 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 61 494 63 , srcInfoPoints = [] } "s2") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 64 494 65 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 67 494 108 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 67 494 69 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 70 494 108 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 70 494 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 70 494 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 70 494 74 , srcInfoPoints = [] } "Just"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 75 494 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 75 494 76 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 75 494 76 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 108 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 98 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 95 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 91 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 91 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 77 494 91 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 92 494 95 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 92 494 95 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 92 494 95 , srcInfoPoints = [] } "ps1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 96 494 98 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 96 494 98 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 96 494 98 , srcInfoPoints = [] } "s1")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 99 494 108 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 494 99 494 100 , SrcSpan "tests/examples/ByteStringUtils.hs" 494 107 494 108 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 100 494 107 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 100 494 102 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 100 494 102 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 100 494 102 , srcInfoPoints = [] } "s2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 103 494 104 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 103 494 104 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 103 494 104 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 105 494 107 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 105 494 107 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 494 105 494 107 , srcInfoPoints = [] } "s1")))))))) Nothing ])) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 16 495 28 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 16 495 17 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 18 495 28 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 495 18 495 20 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 21 495 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 21 495 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 495 21 495 28 , srcInfoPoints = [] } "Nothing")))) Nothing ])) Nothing ])) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 8 496 20 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 8 496 9 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 10 496 20 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 496 10 496 12 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 13 496 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 13 496 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 496 13 496 20 , srcInfoPoints = [] } "Nothing")))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 1 502 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 501 25 501 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 1 501 24 , srcInfoPoints = [] } "break_after_nth_newline" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 28 502 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 501 32 501 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 28 501 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 28 501 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 28 501 31 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 35 502 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 502 25 502 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 35 501 47 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 35 501 47 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 35 501 47 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 501 35 501 47 , srcInfoPoints = [] } "ByteString"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 28 502 62 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 28 502 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 28 502 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 28 502 33 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 34 502 62 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 502 34 502 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 502 47 502 48 , SrcSpan "tests/examples/ByteStringUtils.hs" 502 61 502 62 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 35 502 47 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 35 502 47 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 35 502 47 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 35 502 47 , srcInfoPoints = [] } "ByteString")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 49 502 61 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 49 502 61 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 49 502 61 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 502 49 502 61 , srcInfoPoints = [] } "ByteString")) ])))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 1 518 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 1 503 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 1 503 24 , srcInfoPoints = [] } "break_after_nth_newline") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 25 503 26 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 25 503 26 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 25 503 26 , srcInfoPoints = [] } 0 "0") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 27 503 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 27 503 33 , srcInfoPoints = [] } "the_ps") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 34 503 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 503 34 503 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 503 50 503 51 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 34 503 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 503 34 503 35 , SrcSpan "tests/examples/ByteStringUtils.hs" 503 50 503 51 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 42 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 36 503 42 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 43 503 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 43 503 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 43 503 49 , srcInfoPoints = [] } "the_ps")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 52 503 75 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 52 503 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 52 503 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 52 503 56 , srcInfoPoints = [] } "Just"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 57 503 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 503 57 503 58 , SrcSpan "tests/examples/ByteStringUtils.hs" 503 65 503 66 , SrcSpan "tests/examples/ByteStringUtils.hs" 503 74 503 75 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 58 503 65 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 58 503 65 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 58 503 65 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 58 503 65 , srcInfoPoints = [] } "empty")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 67 503 74 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 67 503 74 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 67 503 74 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 503 67 503 74 , srcInfoPoints = [] } "empty")) ])) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 1 518 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 1 504 24 , srcInfoPoints = [] } "break_after_nth_newline") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 25 504 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 25 504 26 , srcInfoPoints = [] } "n") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 27 504 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 27 504 33 , srcInfoPoints = [] } "the_ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 504 34 518 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 504 34 504 35 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 3 518 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 505 3 505 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 505 31 505 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 506 3 506 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 523 1 523 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 8 505 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 8 505 23 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 8 505 23 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 8 505 23 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 8 505 23 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 24 505 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 24 505 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 505 24 505 30 , srcInfoPoints = [] } "the_ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 3 518 21 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 3 506 15 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 506 3 506 4 , SrcSpan "tests/examples/ByteStringUtils.hs" 506 6 506 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 506 12 506 13 , SrcSpan "tests/examples/ByteStringUtils.hs" 506 14 506 15 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 4 506 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 4 506 6 , srcInfoPoints = [] } "fp") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 7 506 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 7 506 12 , srcInfoPoints = [] } "the_s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 13 506 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 13 506 14 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 506 16 518 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 506 16 506 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 4 518 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 4 507 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 4 507 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 4 507 19 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 20 507 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 20 507 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 20 507 21 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 22 518 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 22 507 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 22 507 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 22 507 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 22 507 36 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 37 507 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 37 507 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 37 507 39 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 40 507 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 40 507 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 40 507 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 42 518 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 507 42 507 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 507 45 507 47 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 43 507 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 507 43 507 44 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 4 518 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 4 508 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 508 7 508 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 523 1 523 0 ] } [ LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 7 517 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 7 508 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 11 517 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 11 508 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 509 11 509 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 510 11 510 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 513 11 513 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 516 11 516 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 517 11 517 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 11 515 57 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 11 508 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 11 508 17 , srcInfoPoints = [] } "findit") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 18 508 19 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 18 508 19 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 18 508 19 , srcInfoPoints = [] } 0 "0") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 20 508 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 20 508 21 , srcInfoPoints = [] } "s") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 22 508 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 22 508 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 508 33 508 34 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 22 508 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 22 508 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 508 33 508 34 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 24 508 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 24 508 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 24 508 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 24 508 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 24 508 25 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 26 508 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 26 508 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 26 508 28 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 29 508 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 29 508 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 29 508 32 , srcInfoPoints = [] } "end")))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 35 508 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 35 508 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 35 508 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 35 508 41 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 42 508 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 42 508 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 42 508 43 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 44 508 66 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 44 508 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 44 508 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 44 508 48 , srcInfoPoints = [] } "Just"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 49 508 66 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 508 49 508 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 508 56 508 57 , SrcSpan "tests/examples/ByteStringUtils.hs" 508 65 508 66 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 50 508 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 50 508 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 50 508 56 , srcInfoPoints = [] } "the_ps")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 58 508 65 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 58 508 65 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 58 508 65 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 508 58 508 65 , srcInfoPoints = [] } "empty")) ]))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 11 509 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 11 509 17 , srcInfoPoints = [] } "findit") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 18 509 19 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 20 509 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 20 509 21 , srcInfoPoints = [] } "s") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 22 509 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 509 22 509 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 509 33 509 34 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 22 509 49 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 509 22 509 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 509 33 509 34 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 24 509 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 24 509 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 24 509 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 24 509 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 24 509 25 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 26 509 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 26 509 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 26 509 28 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 29 509 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 29 509 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 29 509 32 , srcInfoPoints = [] } "end")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 35 509 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 35 509 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 35 509 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 35 509 41 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 42 509 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 42 509 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 509 42 509 49 , srcInfoPoints = [] } "Nothing")))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 11 512 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 11 510 17 , srcInfoPoints = [] } "findit") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 18 510 19 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 18 510 19 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 18 510 19 , srcInfoPoints = [] } 0 "0") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 20 510 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 20 510 21 , srcInfoPoints = [] } "s") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 22 512 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 510 22 510 23 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 24 512 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 510 24 510 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 511 24 511 26 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 28 510 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 510 28 510 28 , SrcSpan "tests/examples/ByteStringUtils.hs" 511 24 511 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 28 510 46 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 28 510 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 28 510 34 , srcInfoPoints = [] } "left_l")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 35 510 46 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 510 35 510 36 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 37 510 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 37 510 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 37 510 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 37 510 38 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 39 510 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 39 510 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 39 510 40 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 41 510 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 41 510 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 510 41 510 46 , srcInfoPoints = [] } "the_s"))))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 27 512 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 27 511 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 27 511 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 27 511 33 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 34 511 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 34 511 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 34 511 35 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 36 512 75 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 36 511 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 36 511 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 36 511 40 , srcInfoPoints = [] } "Just"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 41 512 75 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 511 41 511 42 , SrcSpan "tests/examples/ByteStringUtils.hs" 511 72 511 73 , SrcSpan "tests/examples/ByteStringUtils.hs" 512 74 512 75 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 42 511 56 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 57 511 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 57 511 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 57 511 59 , srcInfoPoints = [] } "fp")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 60 511 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 60 511 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 60 511 65 , srcInfoPoints = [] } "the_s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 66 511 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 66 511 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 511 66 511 72 , srcInfoPoints = [] } "left_l"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 42 512 56 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 57 512 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 57 512 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 57 512 59 , srcInfoPoints = [] } "fp")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 60 512 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 60 512 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 60 512 61 , srcInfoPoints = [] } "s")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 62 512 74 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 512 62 512 63 , SrcSpan "tests/examples/ByteStringUtils.hs" 512 73 512 74 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 63 512 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 63 512 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 63 512 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 63 512 64 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 65 512 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 65 512 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 65 512 66 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 67 512 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 67 512 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 512 67 512 73 , srcInfoPoints = [] } "left_l"))))) ]))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 11 515 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 11 513 17 , srcInfoPoints = [] } "findit") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 18 513 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 18 513 19 , srcInfoPoints = [] } "i") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 20 513 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 20 513 21 , srcInfoPoints = [] } "s") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 22 515 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 513 22 513 23 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 24 515 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 513 24 513 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 513 27 513 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 514 27 514 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 516 11 516 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 27 513 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 513 29 513 31 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 27 513 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 27 513 28 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 32 513 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 32 513 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 32 513 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 32 513 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 32 513 43 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 44 513 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 44 513 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 44 513 45 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 46 513 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 46 513 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 513 46 513 47 , srcInfoPoints = [] } "s")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 27 515 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 514 27 514 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 514 38 514 42 , SrcSpan "tests/examples/ByteStringUtils.hs" 515 38 515 42 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 27 515 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 514 27 514 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 514 38 514 42 , SrcSpan "tests/examples/ByteStringUtils.hs" 515 38 515 42 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 30 514 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 30 514 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 30 514 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 30 514 31 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 32 514 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 32 514 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 32 514 34 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 35 514 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 35 514 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 35 514 37 , srcInfoPoints = [] } "nl")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 43 514 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 43 514 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 43 514 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 43 514 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 43 514 49 , srcInfoPoints = [] } "findit"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 50 514 55 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 514 50 514 51 , SrcSpan "tests/examples/ByteStringUtils.hs" 514 54 514 55 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 51 514 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 51 514 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 51 514 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 51 514 52 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 52 514 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 52 514 53 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 52 514 53 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 53 514 54 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 53 514 54 , srcInfoPoints = [] } 1 "1"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 56 514 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 514 56 514 57 , SrcSpan "tests/examples/ByteStringUtils.hs" 514 60 514 61 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 57 514 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 57 514 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 57 514 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 57 514 58 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 58 514 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 58 514 59 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 58 514 59 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 59 514 60 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 514 59 514 60 , srcInfoPoints = [] } 1 "1"))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 43 515 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 43 515 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 43 515 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 43 515 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 43 515 49 , srcInfoPoints = [] } "findit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 50 515 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 50 515 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 50 515 51 , srcInfoPoints = [] } "i")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 52 515 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 515 52 515 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 515 56 515 57 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 53 515 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 53 515 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 53 515 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 53 515 54 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 54 515 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 54 515 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 54 515 55 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 55 515 56 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 515 55 515 56 , srcInfoPoints = [] } 1 "1")))))) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 11 516 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 11 516 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 11 516 13 , srcInfoPoints = [] } "nl")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 14 516 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 516 14 516 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 16 516 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 16 516 22 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 16 516 22 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 16 516 22 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 16 516 22 , srcInfoPoints = [] } "c2w"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 23 516 27 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 516 23 516 27 , srcInfoPoints = [] } '\n' "\\n")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 11 517 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 11 517 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 11 517 14 , srcInfoPoints = [] } "end")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 15 517 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 517 15 517 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 17 517 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 17 517 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 17 517 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 17 517 22 , srcInfoPoints = [] } "the_s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 23 517 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 23 517 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 23 517 24 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 25 517 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 25 517 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 517 25 517 26 , srcInfoPoints = [] } "l"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 7 518 13 , srcInfoPoints = [] } "findit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 14 518 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 14 518 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 14 518 15 , srcInfoPoints = [] } "n")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 16 518 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 16 518 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 518 16 518 21 , srcInfoPoints = [] } "the_s")))) ]))))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 1 523 80 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 523 26 523 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 1 523 25 , srcInfoPoints = [] } "break_before_nth_newline" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 29 523 80 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 523 33 523 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 29 523 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 29 523 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 29 523 32 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 36 523 80 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 523 49 523 51 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 36 523 48 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 36 523 48 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 36 523 48 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 36 523 48 , srcInfoPoints = [] } "ByteString"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 52 523 80 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 523 52 523 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 523 65 523 66 , SrcSpan "tests/examples/ByteStringUtils.hs" 523 79 523 80 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 53 523 65 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 53 523 65 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 53 523 65 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 53 523 65 , srcInfoPoints = [] } "ByteString")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 67 523 79 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 67 523 79 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 67 523 79 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 523 67 523 79 , srcInfoPoints = [] } "ByteString")) ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 1 541 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 1 525 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 1 524 25 , srcInfoPoints = [] } "break_before_nth_newline") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 26 524 27 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 26 524 27 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 26 524 27 , srcInfoPoints = [] } 0 "0") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 28 524 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 524 28 524 34 , srcInfoPoints = [] } "the_ps") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 2 525 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 525 2 525 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 525 18 525 19 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 2 525 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 525 2 525 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 525 18 525 19 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 10 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 10 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 10 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 4 525 10 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 11 525 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 11 525 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 11 525 17 , srcInfoPoints = [] } "the_ps")))) ] (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 20 525 38 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 525 20 525 21 , SrcSpan "tests/examples/ByteStringUtils.hs" 525 28 525 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 525 37 525 38 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 21 525 28 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 21 525 28 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 21 525 28 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 21 525 28 , srcInfoPoints = [] } "empty")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 30 525 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 30 525 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 30 525 37 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 525 30 525 37 , srcInfoPoints = [] } "empty")) ]) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 1 541 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 1 526 25 , srcInfoPoints = [] } "break_before_nth_newline") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 26 526 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 26 526 27 , srcInfoPoints = [] } "n") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 28 526 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 28 526 34 , srcInfoPoints = [] } "the_ps") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 526 35 541 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 526 35 526 36 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 2 541 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 527 2 527 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 527 30 527 32 , SrcSpan "tests/examples/ByteStringUtils.hs" 528 2 528 2 , SrcSpan "tests/examples/ByteStringUtils.hs" 542 1 542 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 7 527 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 7 527 22 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 7 527 22 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 7 527 22 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 7 527 22 , srcInfoPoints = [] } "toForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 23 527 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 23 527 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 527 23 527 29 , srcInfoPoints = [] } "the_ps")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 2 541 21 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 2 528 14 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 528 2 528 3 , SrcSpan "tests/examples/ByteStringUtils.hs" 528 5 528 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 528 11 528 12 , SrcSpan "tests/examples/ByteStringUtils.hs" 528 13 528 14 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 3 528 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 3 528 5 , srcInfoPoints = [] } "fp") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 6 528 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 6 528 11 , srcInfoPoints = [] } "the_s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 12 528 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 12 528 13 , srcInfoPoints = [] } "l") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 528 15 541 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 528 15 528 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 4 541 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 4 529 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 4 529 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 4 529 19 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 20 529 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 20 529 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 20 529 21 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 22 541 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 22 529 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 22 529 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 22 529 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 22 529 36 , srcInfoPoints = [] } "withForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 37 529 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 37 529 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 37 529 39 , srcInfoPoints = [] } "fp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 40 529 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 40 529 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 40 529 41 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 42 541 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 529 42 529 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 529 45 529 47 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 43 529 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 529 43 529 44 , srcInfoPoints = [] } "p") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 4 541 21 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 4 530 6 , SrcSpan "tests/examples/ByteStringUtils.hs" 530 7 530 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 7 , SrcSpan "tests/examples/ByteStringUtils.hs" 542 1 542 0 ] } [ LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 7 540 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 7 530 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 11 540 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 11 530 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 531 11 531 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 539 11 539 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 540 11 540 11 , SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 11 538 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 11 530 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 11 530 17 , srcInfoPoints = [] } "findit") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 18 530 19 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 20 530 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 20 530 21 , srcInfoPoints = [] } "s") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 22 530 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 22 530 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 530 33 530 34 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 22 530 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 22 530 23 , SrcSpan "tests/examples/ByteStringUtils.hs" 530 33 530 34 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 24 530 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 24 530 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 24 530 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 24 530 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 24 530 25 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 26 530 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 26 530 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 26 530 28 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 29 530 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 29 530 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 29 530 32 , srcInfoPoints = [] } "end")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 35 530 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 35 530 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 35 530 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 35 530 41 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 42 530 59 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 530 42 530 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 530 49 530 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 530 58 530 59 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 43 530 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 43 530 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 43 530 49 , srcInfoPoints = [] } "the_ps")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 51 530 58 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 51 530 58 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 51 530 58 , srcInfoPoints = [] } "B") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 530 51 530 58 , srcInfoPoints = [] } "empty")) ])) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 11 538 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 11 531 17 , srcInfoPoints = [] } "findit") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 18 531 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 18 531 19 , srcInfoPoints = [] } "i") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 20 531 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 20 531 21 , srcInfoPoints = [] } "s") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 22 538 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 531 22 531 23 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 24 538 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 531 24 531 26 , SrcSpan "tests/examples/ByteStringUtils.hs" 531 27 531 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 532 27 532 27 , SrcSpan "tests/examples/ByteStringUtils.hs" 539 11 539 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 27 531 47 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 531 29 531 31 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 27 531 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 27 531 28 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 32 531 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 32 531 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 32 531 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 32 531 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 32 531 43 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 44 531 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 44 531 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 44 531 45 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 46 531 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 46 531 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 531 46 531 47 , srcInfoPoints = [] } "s")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 27 538 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 532 27 532 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 533 29 533 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 538 29 538 33 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 27 538 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 532 27 532 29 , SrcSpan "tests/examples/ByteStringUtils.hs" 533 29 533 33 , SrcSpan "tests/examples/ByteStringUtils.hs" 538 29 538 33 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 30 532 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 30 532 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 30 532 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 30 532 31 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 32 532 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 32 532 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 32 532 34 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 35 532 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 35 532 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 532 35 532 37 , srcInfoPoints = [] } "nl")))) (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 34 537 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 533 34 533 36 , SrcSpan "tests/examples/ByteStringUtils.hs" 534 34 534 38 , SrcSpan "tests/examples/ByteStringUtils.hs" 537 34 537 38 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 37 533 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 37 533 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 37 533 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 37 533 38 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 39 533 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 39 533 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 39 533 41 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 42 533 43 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 533 42 533 43 , srcInfoPoints = [] } 0 "0"))) (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 39 536 83 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 534 39 534 42 , SrcSpan "tests/examples/ByteStringUtils.hs" 535 39 535 41 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 43 534 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 534 43 534 43 , SrcSpan "tests/examples/ByteStringUtils.hs" 535 39 535 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 43 534 61 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 43 534 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 43 534 49 , srcInfoPoints = [] } "left_l")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 50 534 61 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 534 50 534 51 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 52 534 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 52 534 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 52 534 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 52 534 53 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 54 534 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 54 534 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 54 534 55 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 56 534 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 56 534 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 534 56 534 61 , srcInfoPoints = [] } "the_s"))))) Nothing ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 42 536 83 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 42 535 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 42 535 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 42 535 48 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 49 536 83 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 535 49 535 50 , SrcSpan "tests/examples/ByteStringUtils.hs" 535 80 535 81 , SrcSpan "tests/examples/ByteStringUtils.hs" 536 82 536 83 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 50 535 64 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 65 535 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 65 535 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 65 535 67 , srcInfoPoints = [] } "fp")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 68 535 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 68 535 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 68 535 73 , srcInfoPoints = [] } "the_s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 74 535 80 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 74 535 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 535 74 535 80 , srcInfoPoints = [] } "left_l"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 82 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 50 536 64 , srcInfoPoints = [] } "fromForeignPtr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 65 536 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 65 536 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 65 536 67 , srcInfoPoints = [] } "fp")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 68 536 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 68 536 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 68 536 69 , srcInfoPoints = [] } "s")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 70 536 82 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 536 70 536 71 , SrcSpan "tests/examples/ByteStringUtils.hs" 536 81 536 82 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 71 536 81 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 71 536 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 71 536 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 71 536 72 , srcInfoPoints = [] } "l"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 73 536 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 73 536 74 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 73 536 74 , srcInfoPoints = [] } "-"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 75 536 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 75 536 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 536 75 536 81 , srcInfoPoints = [] } "left_l"))))) ]))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 39 537 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 39 537 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 39 537 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 39 537 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 39 537 45 , srcInfoPoints = [] } "findit"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 46 537 51 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 537 46 537 47 , SrcSpan "tests/examples/ByteStringUtils.hs" 537 50 537 51 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 47 537 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 47 537 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 47 537 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 47 537 48 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 48 537 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 48 537 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 48 537 49 , srcInfoPoints = [] } "-"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 49 537 50 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 49 537 50 , srcInfoPoints = [] } 1 "1"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 52 537 57 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 537 52 537 53 , SrcSpan "tests/examples/ByteStringUtils.hs" 537 56 537 57 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 53 537 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 53 537 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 53 537 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 53 537 54 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 54 537 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 54 537 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 54 537 55 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 55 537 56 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 537 55 537 56 , srcInfoPoints = [] } 1 "1")))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 34 538 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 34 538 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 34 538 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 34 538 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 34 538 40 , srcInfoPoints = [] } "findit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 41 538 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 41 538 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 41 538 42 , srcInfoPoints = [] } "i")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 43 538 48 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 538 43 538 44 , SrcSpan "tests/examples/ByteStringUtils.hs" 538 47 538 48 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 44 538 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 44 538 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 44 538 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 44 538 45 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 45 538 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 45 538 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 45 538 46 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 46 538 47 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 538 46 538 47 , srcInfoPoints = [] } 1 "1")))))) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 11 539 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 11 539 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 11 539 13 , srcInfoPoints = [] } "nl")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 14 539 27 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 539 14 539 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 16 539 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 16 539 22 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 16 539 22 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 16 539 22 , srcInfoPoints = [] } "BI") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 16 539 22 , srcInfoPoints = [] } "c2w"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 23 539 27 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 539 23 539 27 , srcInfoPoints = [] } '\n' "\\n")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 11 540 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 11 540 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 11 540 14 , srcInfoPoints = [] } "end")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 15 540 26 , srcInfoPoints = [ SrcSpan "tests/examples/ByteStringUtils.hs" 540 15 540 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 17 540 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 17 540 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 17 540 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 17 540 22 , srcInfoPoints = [] } "the_s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 23 540 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 23 540 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 23 540 24 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 25 540 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 25 540 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 540 25 540 26 , srcInfoPoints = [] } "l"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 7 541 13 , srcInfoPoints = [] } "findit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 14 541 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 14 541 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 14 541 15 , srcInfoPoints = [] } "n")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 16 541 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 16 541 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ByteStringUtils.hs" 541 16 541 21 , srcInfoPoints = [] } "the_s")))) ]))))) Nothing ])) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 3 1 3 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 4 1 4 5) " |" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 5 1 5 34) " Module : ByteStringUtils" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 6 1 6 54) " Copyright : (c) The University of Glasgow 2001," , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 7 1 7 45) " David Roundy 2003-2005" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 8 1 8 74) " License : GPL (I'm happy to also license this file BSD style but don't" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 9 1 9 71) " want to bother distributing two license files with darcs." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 10 1 10 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 11 1 11 42) " Maintainer : droundy@abridgegame.org" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 12 1 12 31) " Stability : experimental" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 13 1 13 27) " Portability : portable" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 14 1 14 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 15 1 15 85) " GZIp and MMap IO for ByteStrings, and miscellaneous functions for Data.ByteString" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 16 1 16 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 23 9 23 32) " IO with mmap or gzip" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 29 9 29 26) " list utilities" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 56 1 56 60) " #if defined (HAVE_MMAP) || ! defined (HAVE_HASKELL_ZLIB)" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 58 1 58 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 73 1 73 29) " #ifndef HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 76 1 76 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 80 1 80 19) " #ifdef DEBUG_PS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 83 1 83 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 85 1 85 25) " #if HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 88 1 88 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 90 1 90 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 92 1 92 20) " #ifdef HAVE_MMAP" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 96 1 96 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 98 1 98 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 99 1 99 27) " obsolete debugging code" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 101 1 101 30) " # ifndef HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 103 1 103 19) " #ifdef DEBUG_PS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 112 1 112 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 114 1 114 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 115 1 115 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 117 1 117 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 118 1 118 23) " unsafeWithInternals" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 120 1 120 66) " | Do something with the internals of a PackedString. Beware of" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 121 1 121 26) " altering the contents!" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 127 1 127 74) " | readIntPS skips any whitespace at the beginning of its argument, and" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 128 1 128 72) " reads an Int from the beginning of the PackedString. If there is no" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 129 1 129 76) " integer at the beginning of the string, it returns Nothing, otherwise it" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 130 1 130 71) " just returns the int read, along with a B.ByteString containing the" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 131 1 131 27) " remainder of its input." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 136 1 136 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 137 1 137 53) " Destructor functions (taking PackedStrings apart)" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 156 1 156 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 157 1 157 46) " List-mimicking functions for PackedStrings" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 165 1 165 73) "----------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 166 1 166 62) " A reimplementation of Data.ByteString.Char8.dropSpace, but" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 167 1 167 51) " specialised to darcs' need for a 4 way isspace." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 168 1 168 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 169 1 169 70) " TODO: if it is safe to use the expanded definition of isSpaceWord8" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 170 1 170 60) " provided by Data.ByteString.Char8, then all this can go." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 172 1 172 83) " A locale-independent isspace(3) so patches are interpreted the same everywhere." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 173 1 173 61) " ((c) == ' ' || (c) == '\\t' || (c) == '\\n' || (c) == '\\r')" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 176 21 176 27) " ' '" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 177 21 177 28) " '\\t'" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 178 21 178 28) " '\\n'" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 179 21 179 28) " '\\r'" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 194 1 194 68) " | 'dropSpace' efficiently returns the 'ByteString' argument with" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 195 1 195 71) " white space Chars removed from the front. It is more efficient than" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 196 1 196 51) " calling dropWhile for removing whitespace. I.e." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 197 1 197 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 198 1 198 36) " > dropWhile isSpace == dropSpace" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 199 1 199 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 206 1 206 71) " | 'breakSpace' returns the pair of ByteStrings when the argument is" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 207 1 207 45) " broken at the first whitespace byte. I.e." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 208 1 208 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 209 1 209 33) " > break isSpace == breakSpace" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 210 1 210 3) "" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 221 1 221 73) "----------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 233 1 233 73) "----------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 235 1 235 54) " ByteString rewrites break (=='x') to breakByte 'x'" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 236 1 236 33) " break ((==) x) = breakChar x" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 237 1 237 30) " break (==x) = breakChar x" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 238 1 238 3) "" , Comment True (SrcSpan "tests/examples/ByteStringUtils.hs" 240 1 246 3) "\n{-# INLINE breakOnPS #-}\nbreakOnPS :: Char -> B.ByteString -> (B.ByteString, B.ByteString)\nbreakOnPS c p = case BC.elemIndex c p of\n Nothing -> (p, BC.empty)\n Just n -> (B.take n p, B.drop n p)\n" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 275 1 275 73) "----------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 277 1 277 72) " TODO: replace breakFirstPS and breakLastPS with definitions based on" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 278 1 278 31) " ByteString's break/breakEnd" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 291 1 291 16) " TODO: rename" , Comment True (SrcSpan "tests/examples/ByteStringUtils.hs" 298 1 311 66) " QuickCheck property:\n\nimport Test.QuickCheck\nimport qualified Data.ByteString.Char8 as BC\nimport Data.Char\ninstance Arbitrary BC.ByteString where\n arbitrary = fmap BC.pack arbitrary\ninstance Arbitrary Char where\n arbitrary = chr `fmap` choose (32,127)\ndeepCheck = check (defaultConfig { configMaxTest = 10000})\ntestLines = deepCheck (\\x -> (linesPS x == linesPSOld x))\nlinesPSOld ps = case BC.elemIndex '\\n' ps of\n Nothing -> [ps]\n Just n -> B.take n ps : linesPS (B.drop (n+1) ps) " , Comment True (SrcSpan "tests/examples/ByteStringUtils.hs" 313 1 322 31) "| This function acts exactly like the \"Prelude\" unlines function, or like\n\"Data.ByteString.Char8\" 'unlines', but with one important difference: it will\nproduce a string which may not end with a newline! That is:\n\n> unlinesPS [\"foo\", \"bar\"]\n\nevaluates to \\\"foo\\\\nbar\\\", not \\\"foo\\\\nbar\\\\n\\\"! This point should hold true for\n'linesPS' as well.\n\nTODO: rename this function. " , Comment True (SrcSpan "tests/examples/ByteStringUtils.hs" 327 1 333 36) " QuickCheck property:\n\ntestUnlines = deepCheck (\\x -> (unlinesPS x == unlinesPSOld x))\nunlinesPSOld ss = BC.concat $ intersperse_newlines ss\n where intersperse_newlines (a:b:s) = a : newline : intersperse_newlines (b:s)\n intersperse_newlines s = s\n newline = BC.pack \"\\n\" " , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 335 1 335 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 336 1 336 16) " gzReadFilePS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 338 1 338 76) " | Read an entire file, which may or may not be gzip compressed, directly" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 339 1 339 26) " into a 'B.ByteString'." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 341 1 341 29) " #ifndef HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 350 1 350 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 362 1 362 28) " #ifdef HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 363 16 363 64) " Passing the length to GZ.decompressWith means" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 364 16 364 74) " that BL.toChunks only produces one chunk, which in turn" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 365 16 365 63) " means that B.concat won't need to copy data." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 366 16 366 91) " If the length is wrong this will just affect efficiency, not correctness" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 371 1 371 30) " #ifdef HAVE_OLD_BYTESTRING" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 372 25 372 104) " bytestring < 0.9.1 had a bug where it did not know to close handles upon EOF" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 373 25 373 88) " performance would be better with a newer bytestring and lazy" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 374 25 374 70) " readFile below -- ratify readFile: comment" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 376 39 376 79) " ratify readFile: immediately consumed" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 377 1 377 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 378 39 378 120) " ratify readFile: immediately consumed by the conversion to a strict bytestring" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 379 1 379 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 380 1 380 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 392 1 392 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 407 1 407 28) " #ifdef HAVE_HASKELL_ZLIB" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 409 1 409 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 419 23 419 72) " avoid calling gzwrite with 0 length this would" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 420 23 420 73) " trouble on some versions of zlib, and is always" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 421 23 421 38) " unnecessary." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 426 1 426 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 428 1 428 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 429 1 429 14) " mmapFilePS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 431 1 431 64) " | Like readFilePS, this reads an entire file directly into a" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 432 1 432 72) " 'B.ByteString', but it is even more efficient. It involves directly" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 433 1 433 76) " mapping the file to memory. This has the advantage that the contents of" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 434 1 434 75) " the file never need to be copied. Also, under memory pressure the page" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 435 1 435 76) " may simply be discarded, wile in the case of readFilePS it would need to" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 436 1 436 73) " be written to swap. If you read many small files, mmapFilePS will be" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 437 1 437 75) " less memory-efficient than readFilePS, since each mmapFilePS takes up a" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 438 1 438 75) " separate page of memory. Also, you can run into bus errors if the file" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 439 1 439 74) " is modified. NOTE: as with 'readFilePS', the string representation in" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 440 1 440 41) " the file is assumed to be ISO-8859-1." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 443 1 443 20) " #ifdef HAVE_MMAP" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 452 1 452 9) " #else" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 454 1 454 10) " #endif" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 456 1 456 77) " -------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 457 1 457 14) " fromPS2Hex" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 468 1 468 77) " -------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 469 1 469 14) " fromHex2PS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 480 1 480 77) " -------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 481 1 481 18) " betweenLinesPS" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 483 1 483 74) " | betweenLinesPS returns the B.ByteString between the two lines given," , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 484 1 484 37) " or Nothing if they do not appear." , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 498 1 498 77) " -------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 499 1 499 27) " break_after_nth_newline" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 520 1 520 77) " -------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/ByteStringUtils.hs" 521 1 521 28) " break_before_nth_newline" ] ) haskell-src-exts-1.23.1/tests/examples/PackageImportsMissing.hs.parser.golden0000644000000000000000000000031113534314633025476 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/PackageImportsMissing.hs" 3 17) "PackageImports language extension is not enabled. Please add {-# LANGUAGE PackageImports #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/Attributes.hs.parser.golden0000644000000000000000003252107213534314632023401 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 75 1 2182 1 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 75 1 75 1 , SrcSpan "tests/examples/Attributes.hs" 75 1 75 1 , SrcSpan "tests/examples/Attributes.hs" 165 1 165 1 , SrcSpan "tests/examples/Attributes.hs" 166 1 166 1 , SrcSpan "tests/examples/Attributes.hs" 167 1 167 1 , SrcSpan "tests/examples/Attributes.hs" 168 1 168 1 , SrcSpan "tests/examples/Attributes.hs" 170 1 170 1 , SrcSpan "tests/examples/Attributes.hs" 171 1 171 1 , SrcSpan "tests/examples/Attributes.hs" 172 1 172 1 , SrcSpan "tests/examples/Attributes.hs" 173 1 173 1 , SrcSpan "tests/examples/Attributes.hs" 204 1 204 1 , SrcSpan "tests/examples/Attributes.hs" 351 1 351 1 , SrcSpan "tests/examples/Attributes.hs" 353 1 353 1 , SrcSpan "tests/examples/Attributes.hs" 501 1 501 1 , SrcSpan "tests/examples/Attributes.hs" 653 1 653 1 , SrcSpan "tests/examples/Attributes.hs" 654 1 654 1 , SrcSpan "tests/examples/Attributes.hs" 655 1 655 1 , SrcSpan "tests/examples/Attributes.hs" 656 1 656 1 , SrcSpan "tests/examples/Attributes.hs" 657 1 657 1 , SrcSpan "tests/examples/Attributes.hs" 658 1 658 1 , SrcSpan "tests/examples/Attributes.hs" 659 1 659 1 , SrcSpan "tests/examples/Attributes.hs" 660 1 660 1 , SrcSpan "tests/examples/Attributes.hs" 661 1 661 1 , SrcSpan "tests/examples/Attributes.hs" 662 1 662 1 , SrcSpan "tests/examples/Attributes.hs" 663 1 663 1 , SrcSpan "tests/examples/Attributes.hs" 664 1 664 1 , SrcSpan "tests/examples/Attributes.hs" 665 1 665 1 , SrcSpan "tests/examples/Attributes.hs" 666 1 666 1 , SrcSpan "tests/examples/Attributes.hs" 667 1 667 1 , SrcSpan "tests/examples/Attributes.hs" 668 1 668 1 , SrcSpan "tests/examples/Attributes.hs" 669 1 669 1 , SrcSpan "tests/examples/Attributes.hs" 670 1 670 1 , SrcSpan "tests/examples/Attributes.hs" 671 1 671 1 , SrcSpan "tests/examples/Attributes.hs" 672 1 672 1 , SrcSpan "tests/examples/Attributes.hs" 673 1 673 1 , SrcSpan "tests/examples/Attributes.hs" 674 1 674 1 , SrcSpan "tests/examples/Attributes.hs" 675 1 675 1 , SrcSpan "tests/examples/Attributes.hs" 676 1 676 1 , SrcSpan "tests/examples/Attributes.hs" 677 1 677 1 , SrcSpan "tests/examples/Attributes.hs" 678 1 678 1 , SrcSpan "tests/examples/Attributes.hs" 679 1 679 1 , SrcSpan "tests/examples/Attributes.hs" 680 1 680 1 , SrcSpan "tests/examples/Attributes.hs" 681 1 681 1 , SrcSpan "tests/examples/Attributes.hs" 682 1 682 1 , SrcSpan "tests/examples/Attributes.hs" 683 1 683 1 , SrcSpan "tests/examples/Attributes.hs" 684 1 684 1 , SrcSpan "tests/examples/Attributes.hs" 685 1 685 1 , SrcSpan "tests/examples/Attributes.hs" 686 1 686 1 , SrcSpan "tests/examples/Attributes.hs" 687 1 687 1 , SrcSpan "tests/examples/Attributes.hs" 688 1 688 1 , SrcSpan "tests/examples/Attributes.hs" 689 1 689 1 , SrcSpan "tests/examples/Attributes.hs" 690 1 690 1 , SrcSpan "tests/examples/Attributes.hs" 691 1 691 1 , SrcSpan "tests/examples/Attributes.hs" 692 1 692 1 , SrcSpan "tests/examples/Attributes.hs" 693 1 693 1 , SrcSpan "tests/examples/Attributes.hs" 694 1 694 1 , SrcSpan "tests/examples/Attributes.hs" 695 1 695 1 , SrcSpan "tests/examples/Attributes.hs" 696 1 696 1 , SrcSpan "tests/examples/Attributes.hs" 697 1 697 1 , SrcSpan "tests/examples/Attributes.hs" 698 1 698 1 , SrcSpan "tests/examples/Attributes.hs" 699 1 699 1 , SrcSpan "tests/examples/Attributes.hs" 700 1 700 1 , SrcSpan "tests/examples/Attributes.hs" 701 1 701 1 , SrcSpan "tests/examples/Attributes.hs" 702 1 702 1 , SrcSpan "tests/examples/Attributes.hs" 703 1 703 1 , SrcSpan "tests/examples/Attributes.hs" 704 1 704 1 , SrcSpan "tests/examples/Attributes.hs" 705 1 705 1 , SrcSpan "tests/examples/Attributes.hs" 706 1 706 1 , SrcSpan "tests/examples/Attributes.hs" 707 1 707 1 , SrcSpan "tests/examples/Attributes.hs" 708 1 708 1 , SrcSpan "tests/examples/Attributes.hs" 709 1 709 1 , SrcSpan "tests/examples/Attributes.hs" 710 1 710 1 , SrcSpan "tests/examples/Attributes.hs" 711 1 711 1 , SrcSpan "tests/examples/Attributes.hs" 712 1 712 1 , SrcSpan "tests/examples/Attributes.hs" 713 1 713 1 , SrcSpan "tests/examples/Attributes.hs" 714 1 714 1 , SrcSpan "tests/examples/Attributes.hs" 715 1 715 1 , SrcSpan "tests/examples/Attributes.hs" 716 1 716 1 , SrcSpan "tests/examples/Attributes.hs" 717 1 717 1 , SrcSpan "tests/examples/Attributes.hs" 718 1 718 1 , SrcSpan "tests/examples/Attributes.hs" 719 1 719 1 , SrcSpan "tests/examples/Attributes.hs" 720 1 720 1 , SrcSpan "tests/examples/Attributes.hs" 721 1 721 1 , SrcSpan "tests/examples/Attributes.hs" 722 1 722 1 , SrcSpan "tests/examples/Attributes.hs" 723 1 723 1 , SrcSpan "tests/examples/Attributes.hs" 724 1 724 1 , SrcSpan "tests/examples/Attributes.hs" 725 1 725 1 , SrcSpan "tests/examples/Attributes.hs" 726 1 726 1 , SrcSpan "tests/examples/Attributes.hs" 727 1 727 1 , SrcSpan "tests/examples/Attributes.hs" 728 1 728 1 , SrcSpan "tests/examples/Attributes.hs" 729 1 729 1 , SrcSpan "tests/examples/Attributes.hs" 730 1 730 1 , SrcSpan "tests/examples/Attributes.hs" 731 1 731 1 , SrcSpan "tests/examples/Attributes.hs" 732 1 732 1 , SrcSpan "tests/examples/Attributes.hs" 733 1 733 1 , SrcSpan "tests/examples/Attributes.hs" 736 1 736 1 , SrcSpan "tests/examples/Attributes.hs" 737 1 737 1 , SrcSpan "tests/examples/Attributes.hs" 738 1 738 1 , SrcSpan "tests/examples/Attributes.hs" 739 1 739 1 , SrcSpan "tests/examples/Attributes.hs" 740 1 740 1 , SrcSpan "tests/examples/Attributes.hs" 741 1 741 1 , SrcSpan "tests/examples/Attributes.hs" 742 1 742 1 , SrcSpan "tests/examples/Attributes.hs" 743 1 743 1 , SrcSpan "tests/examples/Attributes.hs" 744 1 744 1 , SrcSpan "tests/examples/Attributes.hs" 745 1 745 1 , SrcSpan "tests/examples/Attributes.hs" 746 1 746 1 , SrcSpan "tests/examples/Attributes.hs" 747 1 747 1 , SrcSpan "tests/examples/Attributes.hs" 748 1 748 1 , SrcSpan "tests/examples/Attributes.hs" 749 1 749 1 , SrcSpan "tests/examples/Attributes.hs" 750 1 750 1 , SrcSpan "tests/examples/Attributes.hs" 751 1 751 1 , SrcSpan "tests/examples/Attributes.hs" 752 1 752 1 , SrcSpan "tests/examples/Attributes.hs" 753 1 753 1 , SrcSpan "tests/examples/Attributes.hs" 754 1 754 1 , SrcSpan "tests/examples/Attributes.hs" 755 1 755 1 , SrcSpan "tests/examples/Attributes.hs" 756 1 756 1 , SrcSpan "tests/examples/Attributes.hs" 757 1 757 1 , SrcSpan "tests/examples/Attributes.hs" 758 1 758 1 , SrcSpan "tests/examples/Attributes.hs" 759 1 759 1 , SrcSpan "tests/examples/Attributes.hs" 762 1 762 1 , SrcSpan "tests/examples/Attributes.hs" 763 1 763 1 , SrcSpan "tests/examples/Attributes.hs" 764 1 764 1 , SrcSpan "tests/examples/Attributes.hs" 767 1 767 1 , SrcSpan "tests/examples/Attributes.hs" 768 1 768 1 , SrcSpan "tests/examples/Attributes.hs" 769 1 769 1 , SrcSpan "tests/examples/Attributes.hs" 770 1 770 1 , SrcSpan "tests/examples/Attributes.hs" 771 1 771 1 , SrcSpan "tests/examples/Attributes.hs" 772 1 772 1 , SrcSpan "tests/examples/Attributes.hs" 773 1 773 1 , SrcSpan "tests/examples/Attributes.hs" 774 1 774 1 , SrcSpan "tests/examples/Attributes.hs" 775 1 775 1 , SrcSpan "tests/examples/Attributes.hs" 776 1 776 1 , SrcSpan "tests/examples/Attributes.hs" 777 1 777 1 , SrcSpan "tests/examples/Attributes.hs" 778 1 778 1 , SrcSpan "tests/examples/Attributes.hs" 779 1 779 1 , SrcSpan "tests/examples/Attributes.hs" 780 1 780 1 , SrcSpan "tests/examples/Attributes.hs" 781 1 781 1 , SrcSpan "tests/examples/Attributes.hs" 782 1 782 1 , SrcSpan "tests/examples/Attributes.hs" 783 1 783 1 , SrcSpan "tests/examples/Attributes.hs" 784 1 784 1 , SrcSpan "tests/examples/Attributes.hs" 785 1 785 1 , SrcSpan "tests/examples/Attributes.hs" 786 1 786 1 , SrcSpan "tests/examples/Attributes.hs" 787 1 787 1 , SrcSpan "tests/examples/Attributes.hs" 788 1 788 1 , SrcSpan "tests/examples/Attributes.hs" 789 1 789 1 , SrcSpan "tests/examples/Attributes.hs" 790 1 790 1 , SrcSpan "tests/examples/Attributes.hs" 791 1 791 1 , SrcSpan "tests/examples/Attributes.hs" 792 1 792 1 , SrcSpan "tests/examples/Attributes.hs" 793 1 793 1 , SrcSpan "tests/examples/Attributes.hs" 794 1 794 1 , SrcSpan "tests/examples/Attributes.hs" 795 1 795 1 , SrcSpan "tests/examples/Attributes.hs" 796 1 796 1 , SrcSpan "tests/examples/Attributes.hs" 797 1 797 1 , SrcSpan "tests/examples/Attributes.hs" 798 1 798 1 , SrcSpan "tests/examples/Attributes.hs" 799 1 799 1 , SrcSpan "tests/examples/Attributes.hs" 800 1 800 1 , SrcSpan "tests/examples/Attributes.hs" 801 1 801 1 , SrcSpan "tests/examples/Attributes.hs" 802 1 802 1 , SrcSpan "tests/examples/Attributes.hs" 803 1 803 1 , SrcSpan "tests/examples/Attributes.hs" 804 1 804 1 , SrcSpan "tests/examples/Attributes.hs" 805 1 805 1 , SrcSpan "tests/examples/Attributes.hs" 806 1 806 1 , SrcSpan "tests/examples/Attributes.hs" 807 1 807 1 , SrcSpan "tests/examples/Attributes.hs" 808 1 808 1 , SrcSpan "tests/examples/Attributes.hs" 809 1 809 1 , SrcSpan "tests/examples/Attributes.hs" 812 1 812 1 , SrcSpan "tests/examples/Attributes.hs" 813 1 813 1 , SrcSpan "tests/examples/Attributes.hs" 814 1 814 1 , SrcSpan "tests/examples/Attributes.hs" 815 1 815 1 , SrcSpan "tests/examples/Attributes.hs" 816 1 816 1 , SrcSpan "tests/examples/Attributes.hs" 817 1 817 1 , SrcSpan "tests/examples/Attributes.hs" 818 1 818 1 , SrcSpan "tests/examples/Attributes.hs" 819 1 819 1 , SrcSpan "tests/examples/Attributes.hs" 820 1 820 1 , SrcSpan "tests/examples/Attributes.hs" 821 1 821 1 , SrcSpan "tests/examples/Attributes.hs" 822 1 822 1 , SrcSpan "tests/examples/Attributes.hs" 823 1 823 1 , SrcSpan "tests/examples/Attributes.hs" 824 1 824 1 , SrcSpan "tests/examples/Attributes.hs" 825 1 825 1 , SrcSpan "tests/examples/Attributes.hs" 826 1 826 1 , SrcSpan "tests/examples/Attributes.hs" 827 1 827 1 , SrcSpan "tests/examples/Attributes.hs" 828 1 828 1 , SrcSpan "tests/examples/Attributes.hs" 829 1 829 1 , SrcSpan "tests/examples/Attributes.hs" 830 1 830 1 , SrcSpan "tests/examples/Attributes.hs" 831 1 831 1 , SrcSpan "tests/examples/Attributes.hs" 832 1 832 1 , SrcSpan "tests/examples/Attributes.hs" 833 1 833 1 , SrcSpan "tests/examples/Attributes.hs" 834 1 834 1 , SrcSpan "tests/examples/Attributes.hs" 835 1 835 1 , SrcSpan "tests/examples/Attributes.hs" 836 1 836 1 , SrcSpan "tests/examples/Attributes.hs" 837 1 837 1 , SrcSpan "tests/examples/Attributes.hs" 838 1 838 1 , SrcSpan "tests/examples/Attributes.hs" 839 1 839 1 , SrcSpan "tests/examples/Attributes.hs" 840 1 840 1 , SrcSpan "tests/examples/Attributes.hs" 841 1 841 1 , SrcSpan "tests/examples/Attributes.hs" 842 1 842 1 , SrcSpan "tests/examples/Attributes.hs" 843 1 843 1 , SrcSpan "tests/examples/Attributes.hs" 844 1 844 1 , SrcSpan "tests/examples/Attributes.hs" 845 1 845 1 , SrcSpan "tests/examples/Attributes.hs" 846 1 846 1 , SrcSpan "tests/examples/Attributes.hs" 847 1 847 1 , SrcSpan "tests/examples/Attributes.hs" 848 1 848 1 , SrcSpan "tests/examples/Attributes.hs" 849 1 849 1 , SrcSpan "tests/examples/Attributes.hs" 850 1 850 1 , SrcSpan "tests/examples/Attributes.hs" 851 1 851 1 , SrcSpan "tests/examples/Attributes.hs" 852 1 852 1 , SrcSpan "tests/examples/Attributes.hs" 853 1 853 1 , SrcSpan "tests/examples/Attributes.hs" 854 1 854 1 , SrcSpan "tests/examples/Attributes.hs" 855 1 855 1 , SrcSpan "tests/examples/Attributes.hs" 856 1 856 1 , SrcSpan "tests/examples/Attributes.hs" 857 1 857 1 , SrcSpan "tests/examples/Attributes.hs" 858 1 858 1 , SrcSpan "tests/examples/Attributes.hs" 859 1 859 1 , SrcSpan "tests/examples/Attributes.hs" 860 1 860 1 , SrcSpan "tests/examples/Attributes.hs" 861 1 861 1 , SrcSpan "tests/examples/Attributes.hs" 862 1 862 1 , SrcSpan "tests/examples/Attributes.hs" 863 1 863 1 , SrcSpan "tests/examples/Attributes.hs" 864 1 864 1 , SrcSpan "tests/examples/Attributes.hs" 865 1 865 1 , SrcSpan "tests/examples/Attributes.hs" 866 1 866 1 , SrcSpan "tests/examples/Attributes.hs" 867 1 867 1 , SrcSpan "tests/examples/Attributes.hs" 868 1 868 1 , SrcSpan "tests/examples/Attributes.hs" 906 1 906 1 , SrcSpan "tests/examples/Attributes.hs" 915 1 915 1 , SrcSpan "tests/examples/Attributes.hs" 918 1 918 1 , SrcSpan "tests/examples/Attributes.hs" 923 1 923 1 , SrcSpan "tests/examples/Attributes.hs" 947 1 947 1 , SrcSpan "tests/examples/Attributes.hs" 950 1 950 1 , SrcSpan "tests/examples/Attributes.hs" 951 1 951 1 , SrcSpan "tests/examples/Attributes.hs" 952 1 952 1 , SrcSpan "tests/examples/Attributes.hs" 954 1 954 1 , SrcSpan "tests/examples/Attributes.hs" 955 1 955 1 , SrcSpan "tests/examples/Attributes.hs" 956 1 956 1 , SrcSpan "tests/examples/Attributes.hs" 957 1 957 1 , SrcSpan "tests/examples/Attributes.hs" 959 1 959 1 , SrcSpan "tests/examples/Attributes.hs" 960 1 960 1 , SrcSpan "tests/examples/Attributes.hs" 962 1 962 1 , SrcSpan "tests/examples/Attributes.hs" 963 1 963 1 , SrcSpan "tests/examples/Attributes.hs" 964 1 964 1 , SrcSpan "tests/examples/Attributes.hs" 965 1 965 1 , SrcSpan "tests/examples/Attributes.hs" 967 1 967 1 , SrcSpan "tests/examples/Attributes.hs" 968 1 968 1 , SrcSpan "tests/examples/Attributes.hs" 969 1 969 1 , SrcSpan "tests/examples/Attributes.hs" 970 1 970 1 , SrcSpan "tests/examples/Attributes.hs" 971 1 971 1 , SrcSpan "tests/examples/Attributes.hs" 972 1 972 1 , SrcSpan "tests/examples/Attributes.hs" 973 1 973 1 , SrcSpan "tests/examples/Attributes.hs" 974 1 974 1 , SrcSpan "tests/examples/Attributes.hs" 975 1 975 1 , SrcSpan "tests/examples/Attributes.hs" 977 1 977 1 , SrcSpan "tests/examples/Attributes.hs" 982 1 982 1 , SrcSpan "tests/examples/Attributes.hs" 990 1 990 1 , SrcSpan "tests/examples/Attributes.hs" 991 1 991 1 , SrcSpan "tests/examples/Attributes.hs" 998 1 998 1 , SrcSpan "tests/examples/Attributes.hs" 1009 1 1009 1 , SrcSpan "tests/examples/Attributes.hs" 1020 1 1020 1 , SrcSpan "tests/examples/Attributes.hs" 1033 1 1033 1 , SrcSpan "tests/examples/Attributes.hs" 1039 1 1039 1 , SrcSpan "tests/examples/Attributes.hs" 1040 1 1040 1 , SrcSpan "tests/examples/Attributes.hs" 1043 1 1043 1 , SrcSpan "tests/examples/Attributes.hs" 1044 1 1044 1 , SrcSpan "tests/examples/Attributes.hs" 1046 1 1046 1 , SrcSpan "tests/examples/Attributes.hs" 1049 1 1049 1 , SrcSpan "tests/examples/Attributes.hs" 1054 1 1054 1 , SrcSpan "tests/examples/Attributes.hs" 1058 1 1058 1 , SrcSpan "tests/examples/Attributes.hs" 1062 1 1062 1 , SrcSpan "tests/examples/Attributes.hs" 1071 1 1071 1 , SrcSpan "tests/examples/Attributes.hs" 1076 1 1076 1 , SrcSpan "tests/examples/Attributes.hs" 1081 1 1081 1 , SrcSpan "tests/examples/Attributes.hs" 1093 1 1093 1 , SrcSpan "tests/examples/Attributes.hs" 1097 1 1097 1 , SrcSpan "tests/examples/Attributes.hs" 1104 1 1104 1 , SrcSpan "tests/examples/Attributes.hs" 1116 1 1116 1 , SrcSpan "tests/examples/Attributes.hs" 1119 1 1119 1 , SrcSpan "tests/examples/Attributes.hs" 1124 1 1124 1 , SrcSpan "tests/examples/Attributes.hs" 1131 1 1131 1 , SrcSpan "tests/examples/Attributes.hs" 1136 1 1136 1 , SrcSpan "tests/examples/Attributes.hs" 1143 1 1143 1 , SrcSpan "tests/examples/Attributes.hs" 1151 1 1151 1 , SrcSpan "tests/examples/Attributes.hs" 1154 1 1154 1 , SrcSpan "tests/examples/Attributes.hs" 1160 1 1160 1 , SrcSpan "tests/examples/Attributes.hs" 1170 1 1170 1 , SrcSpan "tests/examples/Attributes.hs" 1175 1 1175 1 , SrcSpan "tests/examples/Attributes.hs" 1180 1 1180 1 , SrcSpan "tests/examples/Attributes.hs" 1188 1 1188 1 , SrcSpan "tests/examples/Attributes.hs" 1192 1 1192 1 , SrcSpan "tests/examples/Attributes.hs" 1199 1 1199 1 , SrcSpan "tests/examples/Attributes.hs" 1210 1 1210 1 , SrcSpan "tests/examples/Attributes.hs" 1216 1 1216 1 , SrcSpan "tests/examples/Attributes.hs" 1222 1 1222 1 , SrcSpan "tests/examples/Attributes.hs" 1231 1 1231 1 , SrcSpan "tests/examples/Attributes.hs" 1236 1 1236 1 , SrcSpan "tests/examples/Attributes.hs" 1241 1 1241 1 , SrcSpan "tests/examples/Attributes.hs" 1249 1 1249 1 , SrcSpan "tests/examples/Attributes.hs" 1253 1 1253 1 , SrcSpan "tests/examples/Attributes.hs" 1260 1 1260 1 , SrcSpan "tests/examples/Attributes.hs" 1271 1 1271 1 , SrcSpan "tests/examples/Attributes.hs" 1275 1 1275 1 , SrcSpan "tests/examples/Attributes.hs" 1285 1 1285 1 , SrcSpan "tests/examples/Attributes.hs" 1307 1 1307 1 , SrcSpan "tests/examples/Attributes.hs" 1317 1 1317 1 , SrcSpan "tests/examples/Attributes.hs" 1327 1 1327 1 , SrcSpan "tests/examples/Attributes.hs" 1340 1 1340 1 , SrcSpan "tests/examples/Attributes.hs" 1344 1 1344 1 , SrcSpan "tests/examples/Attributes.hs" 1351 1 1351 1 , SrcSpan "tests/examples/Attributes.hs" 1368 1 1368 1 , SrcSpan "tests/examples/Attributes.hs" 1369 1 1369 1 , SrcSpan "tests/examples/Attributes.hs" 1372 1 1372 1 , SrcSpan "tests/examples/Attributes.hs" 1373 1 1373 1 , SrcSpan "tests/examples/Attributes.hs" 1375 1 1375 1 , SrcSpan "tests/examples/Attributes.hs" 1376 1 1376 1 , SrcSpan "tests/examples/Attributes.hs" 1379 1 1379 1 , SrcSpan "tests/examples/Attributes.hs" 1380 1 1380 1 , SrcSpan "tests/examples/Attributes.hs" 1384 1 1384 1 , SrcSpan "tests/examples/Attributes.hs" 1385 1 1385 1 , SrcSpan "tests/examples/Attributes.hs" 1389 1 1389 1 , SrcSpan "tests/examples/Attributes.hs" 1394 1 1394 1 , SrcSpan "tests/examples/Attributes.hs" 1403 1 1403 1 , SrcSpan "tests/examples/Attributes.hs" 1410 1 1410 1 , SrcSpan "tests/examples/Attributes.hs" 1411 1 1411 1 , SrcSpan "tests/examples/Attributes.hs" 1420 1 1420 1 , SrcSpan "tests/examples/Attributes.hs" 1423 1 1423 1 , SrcSpan "tests/examples/Attributes.hs" 1432 1 1432 1 , SrcSpan "tests/examples/Attributes.hs" 1445 1 1445 1 , SrcSpan "tests/examples/Attributes.hs" 1448 1 1448 1 , SrcSpan "tests/examples/Attributes.hs" 1453 1 1453 1 , SrcSpan "tests/examples/Attributes.hs" 1461 1 1461 1 , SrcSpan "tests/examples/Attributes.hs" 1466 1 1466 1 , SrcSpan "tests/examples/Attributes.hs" 1471 1 1471 1 , SrcSpan "tests/examples/Attributes.hs" 1479 1 1479 1 , SrcSpan "tests/examples/Attributes.hs" 1487 1 1487 1 , SrcSpan "tests/examples/Attributes.hs" 1505 1 1505 1 , SrcSpan "tests/examples/Attributes.hs" 1524 1 1524 1 , SrcSpan "tests/examples/Attributes.hs" 1528 1 1528 1 , SrcSpan "tests/examples/Attributes.hs" 1535 1 1535 1 , SrcSpan "tests/examples/Attributes.hs" 1550 1 1550 1 , SrcSpan "tests/examples/Attributes.hs" 1557 1 1557 1 , SrcSpan "tests/examples/Attributes.hs" 1567 1 1567 1 , SrcSpan "tests/examples/Attributes.hs" 1584 1 1584 1 , SrcSpan "tests/examples/Attributes.hs" 1587 1 1587 1 , SrcSpan "tests/examples/Attributes.hs" 1597 1 1597 1 , SrcSpan "tests/examples/Attributes.hs" 1612 1 1612 1 , SrcSpan "tests/examples/Attributes.hs" 1615 1 1615 1 , SrcSpan "tests/examples/Attributes.hs" 1630 1 1630 1 , SrcSpan "tests/examples/Attributes.hs" 1646 1 1646 1 , SrcSpan "tests/examples/Attributes.hs" 1651 1 1651 1 , SrcSpan "tests/examples/Attributes.hs" 1656 1 1656 1 , SrcSpan "tests/examples/Attributes.hs" 1669 1 1669 1 , SrcSpan "tests/examples/Attributes.hs" 1674 1 1674 1 , SrcSpan "tests/examples/Attributes.hs" 1682 1 1682 1 , SrcSpan "tests/examples/Attributes.hs" 1693 1 1693 1 , SrcSpan "tests/examples/Attributes.hs" 1700 1 1700 1 , SrcSpan "tests/examples/Attributes.hs" 1707 1 1707 1 , SrcSpan "tests/examples/Attributes.hs" 1717 1 1717 1 , SrcSpan "tests/examples/Attributes.hs" 1723 1 1723 1 , SrcSpan "tests/examples/Attributes.hs" 1729 1 1729 1 , SrcSpan "tests/examples/Attributes.hs" 1738 1 1738 1 , SrcSpan "tests/examples/Attributes.hs" 1771 1 1771 1 , SrcSpan "tests/examples/Attributes.hs" 1803 1 1803 1 , SrcSpan "tests/examples/Attributes.hs" 1838 1 1838 1 , SrcSpan "tests/examples/Attributes.hs" 1847 1 1847 1 , SrcSpan "tests/examples/Attributes.hs" 1856 1 1856 1 , SrcSpan "tests/examples/Attributes.hs" 1868 1 1868 1 , SrcSpan "tests/examples/Attributes.hs" 1873 1 1873 1 , SrcSpan "tests/examples/Attributes.hs" 1878 1 1878 1 , SrcSpan "tests/examples/Attributes.hs" 1886 1 1886 1 , SrcSpan "tests/examples/Attributes.hs" 1891 1 1891 1 , SrcSpan "tests/examples/Attributes.hs" 1896 1 1896 1 , SrcSpan "tests/examples/Attributes.hs" 1904 1 1904 1 , SrcSpan "tests/examples/Attributes.hs" 1907 1 1907 1 , SrcSpan "tests/examples/Attributes.hs" 1924 1 1924 1 , SrcSpan "tests/examples/Attributes.hs" 1940 1 1940 1 , SrcSpan "tests/examples/Attributes.hs" 1941 1 1941 1 , SrcSpan "tests/examples/Attributes.hs" 1946 1 1946 1 , SrcSpan "tests/examples/Attributes.hs" 1957 1 1957 1 , SrcSpan "tests/examples/Attributes.hs" 1971 1 1971 1 , SrcSpan "tests/examples/Attributes.hs" 1982 1 1982 1 , SrcSpan "tests/examples/Attributes.hs" 1983 1 1983 1 , SrcSpan "tests/examples/Attributes.hs" 1994 1 1994 1 , SrcSpan "tests/examples/Attributes.hs" 1995 1 1995 1 , SrcSpan "tests/examples/Attributes.hs" 2001 1 2001 1 , SrcSpan "tests/examples/Attributes.hs" 2004 1 2004 1 , SrcSpan "tests/examples/Attributes.hs" 2009 1 2009 1 , SrcSpan "tests/examples/Attributes.hs" 2012 1 2012 1 , SrcSpan "tests/examples/Attributes.hs" 2024 1 2024 1 , SrcSpan "tests/examples/Attributes.hs" 2036 1 2036 1 , SrcSpan "tests/examples/Attributes.hs" 2052 1 2052 1 , SrcSpan "tests/examples/Attributes.hs" 2059 1 2059 1 , SrcSpan "tests/examples/Attributes.hs" 2068 1 2068 1 , SrcSpan "tests/examples/Attributes.hs" 2079 1 2079 1 , SrcSpan "tests/examples/Attributes.hs" 2083 1 2083 1 , SrcSpan "tests/examples/Attributes.hs" 2090 1 2090 1 , SrcSpan "tests/examples/Attributes.hs" 2101 1 2101 1 , SrcSpan "tests/examples/Attributes.hs" 2106 1 2106 1 , SrcSpan "tests/examples/Attributes.hs" 2111 1 2111 1 , SrcSpan "tests/examples/Attributes.hs" 2119 1 2119 1 , SrcSpan "tests/examples/Attributes.hs" 2126 1 2126 1 , SrcSpan "tests/examples/Attributes.hs" 2133 1 2133 1 , SrcSpan "tests/examples/Attributes.hs" 2143 1 2143 1 , SrcSpan "tests/examples/Attributes.hs" 2148 1 2148 1 , SrcSpan "tests/examples/Attributes.hs" 2153 1 2153 1 , SrcSpan "tests/examples/Attributes.hs" 2161 1 2161 1 , SrcSpan "tests/examples/Attributes.hs" 2168 1 2168 1 , SrcSpan "tests/examples/Attributes.hs" 2175 1 2175 1 , SrcSpan "tests/examples/Attributes.hs" 2182 1 2182 1 , SrcSpan "tests/examples/Attributes.hs" 2182 1 2182 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 75 1 163 12 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 75 1 75 7 , SrcSpan "tests/examples/Attributes.hs" 163 7 163 12 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 75 8 75 32 , srcInfoPoints = [] } "Data.GraphViz.Attributes") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 76 5 163 6 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 76 5 76 6 , SrcSpan "tests/examples/Attributes.hs" 78 5 78 6 , SrcSpan "tests/examples/Attributes.hs" 80 5 80 6 , SrcSpan "tests/examples/Attributes.hs" 81 5 81 6 , SrcSpan "tests/examples/Attributes.hs" 82 5 82 6 , SrcSpan "tests/examples/Attributes.hs" 83 5 83 6 , SrcSpan "tests/examples/Attributes.hs" 84 5 84 6 , SrcSpan "tests/examples/Attributes.hs" 86 5 86 6 , SrcSpan "tests/examples/Attributes.hs" 87 5 87 6 , SrcSpan "tests/examples/Attributes.hs" 88 5 88 6 , SrcSpan "tests/examples/Attributes.hs" 89 5 89 6 , SrcSpan "tests/examples/Attributes.hs" 90 5 90 6 , SrcSpan "tests/examples/Attributes.hs" 91 5 91 6 , SrcSpan "tests/examples/Attributes.hs" 92 5 92 6 , SrcSpan "tests/examples/Attributes.hs" 93 5 93 6 , SrcSpan "tests/examples/Attributes.hs" 94 5 94 6 , SrcSpan "tests/examples/Attributes.hs" 95 5 95 6 , SrcSpan "tests/examples/Attributes.hs" 96 5 96 6 , SrcSpan "tests/examples/Attributes.hs" 97 5 97 6 , SrcSpan "tests/examples/Attributes.hs" 98 5 98 6 , SrcSpan "tests/examples/Attributes.hs" 99 5 99 6 , SrcSpan "tests/examples/Attributes.hs" 100 5 100 6 , SrcSpan "tests/examples/Attributes.hs" 101 5 101 6 , SrcSpan "tests/examples/Attributes.hs" 102 5 102 6 , SrcSpan "tests/examples/Attributes.hs" 103 5 103 6 , SrcSpan "tests/examples/Attributes.hs" 104 5 104 6 , SrcSpan "tests/examples/Attributes.hs" 105 5 105 6 , SrcSpan "tests/examples/Attributes.hs" 106 5 106 6 , SrcSpan "tests/examples/Attributes.hs" 107 5 107 6 , SrcSpan "tests/examples/Attributes.hs" 108 5 108 6 , SrcSpan "tests/examples/Attributes.hs" 109 5 109 6 , SrcSpan "tests/examples/Attributes.hs" 110 5 110 6 , SrcSpan "tests/examples/Attributes.hs" 111 5 111 6 , SrcSpan "tests/examples/Attributes.hs" 112 5 112 6 , SrcSpan "tests/examples/Attributes.hs" 113 5 113 6 , SrcSpan "tests/examples/Attributes.hs" 114 5 114 6 , SrcSpan "tests/examples/Attributes.hs" 115 5 115 6 , SrcSpan "tests/examples/Attributes.hs" 116 5 116 6 , SrcSpan "tests/examples/Attributes.hs" 117 5 117 6 , SrcSpan "tests/examples/Attributes.hs" 118 5 118 6 , SrcSpan "tests/examples/Attributes.hs" 119 5 119 6 , SrcSpan "tests/examples/Attributes.hs" 120 5 120 6 , SrcSpan "tests/examples/Attributes.hs" 121 5 121 6 , SrcSpan "tests/examples/Attributes.hs" 122 5 122 6 , SrcSpan "tests/examples/Attributes.hs" 123 5 123 6 , SrcSpan "tests/examples/Attributes.hs" 124 5 124 6 , SrcSpan "tests/examples/Attributes.hs" 125 5 125 6 , SrcSpan "tests/examples/Attributes.hs" 126 5 126 6 , SrcSpan "tests/examples/Attributes.hs" 127 5 127 6 , SrcSpan "tests/examples/Attributes.hs" 128 5 128 6 , SrcSpan "tests/examples/Attributes.hs" 130 5 130 6 , SrcSpan "tests/examples/Attributes.hs" 131 5 131 6 , SrcSpan "tests/examples/Attributes.hs" 132 5 132 6 , SrcSpan "tests/examples/Attributes.hs" 133 5 133 6 , SrcSpan "tests/examples/Attributes.hs" 136 5 136 6 , SrcSpan "tests/examples/Attributes.hs" 137 5 137 6 , SrcSpan "tests/examples/Attributes.hs" 138 5 138 6 , SrcSpan "tests/examples/Attributes.hs" 139 5 139 6 , SrcSpan "tests/examples/Attributes.hs" 140 5 140 6 , SrcSpan "tests/examples/Attributes.hs" 141 5 141 6 , SrcSpan "tests/examples/Attributes.hs" 142 5 142 6 , SrcSpan "tests/examples/Attributes.hs" 143 5 143 6 , SrcSpan "tests/examples/Attributes.hs" 144 5 144 6 , SrcSpan "tests/examples/Attributes.hs" 146 5 146 6 , SrcSpan "tests/examples/Attributes.hs" 147 5 147 6 , SrcSpan "tests/examples/Attributes.hs" 148 5 148 6 , SrcSpan "tests/examples/Attributes.hs" 149 5 149 6 , SrcSpan "tests/examples/Attributes.hs" 150 5 150 6 , SrcSpan "tests/examples/Attributes.hs" 152 5 152 6 , SrcSpan "tests/examples/Attributes.hs" 153 5 153 6 , SrcSpan "tests/examples/Attributes.hs" 154 5 154 6 , SrcSpan "tests/examples/Attributes.hs" 155 5 155 6 , SrcSpan "tests/examples/Attributes.hs" 156 5 156 6 , SrcSpan "tests/examples/Attributes.hs" 158 5 158 6 , SrcSpan "tests/examples/Attributes.hs" 159 5 159 6 , SrcSpan "tests/examples/Attributes.hs" 161 5 161 6 , SrcSpan "tests/examples/Attributes.hs" 162 5 162 6 , SrcSpan "tests/examples/Attributes.hs" 163 5 163 6 ] } [ EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 77 7 77 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 77 16 77 17 , SrcSpan "tests/examples/Attributes.hs" 77 19 77 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 77 17 77 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 77 7 77 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 77 7 77 16 , srcInfoPoints = [] } "Attribute")) [] , EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 78 7 78 17 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 78 7 78 17 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 78 7 78 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 78 7 78 17 , srcInfoPoints = [] } "Attributes")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 80 7 80 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 80 7 80 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 80 7 80 19 , srcInfoPoints = [] } "usedByGraphs")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 81 7 81 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 81 7 81 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 81 7 81 22 , srcInfoPoints = [] } "usedBySubGraphs")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 82 7 82 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 82 7 82 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 82 7 82 21 , srcInfoPoints = [] } "usedByClusters")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 83 7 83 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 83 7 83 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 83 7 83 18 , srcInfoPoints = [] } "usedByNodes")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 84 7 84 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 84 7 84 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 84 7 84 18 , srcInfoPoints = [] } "usedByEdges")) , EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 86 7 86 16 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 86 7 86 16 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 86 7 86 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 86 7 86 16 , srcInfoPoints = [] } "EscString")) , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 87 7 87 14 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 87 10 87 11 , SrcSpan "tests/examples/Attributes.hs" 87 13 87 14 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 87 11 87 13 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 87 7 87 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 87 7 87 10 , srcInfoPoints = [] } "URL")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 88 7 88 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 88 16 88 17 , SrcSpan "tests/examples/Attributes.hs" 88 19 88 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 88 17 88 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 88 7 88 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 88 7 88 16 , srcInfoPoints = [] } "ArrowType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 89 7 89 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 89 17 89 18 , SrcSpan "tests/examples/Attributes.hs" 89 20 89 21 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 89 18 89 20 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 89 7 89 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 89 7 89 17 , srcInfoPoints = [] } "AspectType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 90 7 90 15 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 90 11 90 12 , SrcSpan "tests/examples/Attributes.hs" 90 14 90 15 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 90 12 90 14 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 90 7 90 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 90 7 90 11 , srcInfoPoints = [] } "Rect")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 91 7 91 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 91 18 91 19 , SrcSpan "tests/examples/Attributes.hs" 91 21 91 22 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 91 19 91 21 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 91 7 91 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 91 7 91 18 , srcInfoPoints = [] } "ClusterMode")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 92 7 92 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 92 14 92 15 , SrcSpan "tests/examples/Attributes.hs" 92 17 92 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 92 15 92 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 92 7 92 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 92 7 92 14 , srcInfoPoints = [] } "DirType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 93 7 93 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 93 20 93 21 , SrcSpan "tests/examples/Attributes.hs" 93 23 93 24 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 93 21 93 23 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 93 7 93 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 93 7 93 20 , srcInfoPoints = [] } "DEConstraints")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 94 7 94 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 94 13 94 14 , SrcSpan "tests/examples/Attributes.hs" 94 16 94 17 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 94 14 94 16 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 94 7 94 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 94 7 94 13 , srcInfoPoints = [] } "DPoint")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 95 7 95 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 95 15 95 16 , SrcSpan "tests/examples/Attributes.hs" 95 18 95 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 95 16 95 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 95 7 95 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 95 7 95 15 , srcInfoPoints = [] } "ModeType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 96 7 96 16 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 96 12 96 13 , SrcSpan "tests/examples/Attributes.hs" 96 15 96 16 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 96 13 96 15 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 96 7 96 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 96 7 96 12 , srcInfoPoints = [] } "Model")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 97 7 97 16 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 97 12 97 13 , SrcSpan "tests/examples/Attributes.hs" 97 15 97 16 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 97 13 97 15 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 97 7 97 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 97 7 97 12 , srcInfoPoints = [] } "Label")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 98 7 98 16 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 98 12 98 13 , SrcSpan "tests/examples/Attributes.hs" 98 15 98 16 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 98 13 98 15 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 98 7 98 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 98 7 98 12 , srcInfoPoints = [] } "Point")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 99 7 99 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 99 14 99 15 , SrcSpan "tests/examples/Attributes.hs" 99 17 99 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 99 15 99 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 99 7 99 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 99 7 99 14 , srcInfoPoints = [] } "Overlap")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 100 7 100 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 100 17 100 18 , SrcSpan "tests/examples/Attributes.hs" 100 20 100 21 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 100 18 100 20 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 100 7 100 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 100 7 100 17 , srcInfoPoints = [] } "LayerRange")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 101 7 101 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 101 14 101 15 , SrcSpan "tests/examples/Attributes.hs" 101 17 101 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 101 15 101 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 101 7 101 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 101 7 101 14 , srcInfoPoints = [] } "LayerID")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 102 7 102 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 102 16 102 17 , SrcSpan "tests/examples/Attributes.hs" 102 19 102 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 102 17 102 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 102 7 102 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 102 7 102 16 , srcInfoPoints = [] } "LayerList")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 103 7 103 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 103 17 103 18 , SrcSpan "tests/examples/Attributes.hs" 103 20 103 21 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 103 18 103 20 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 103 7 103 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 103 7 103 17 , srcInfoPoints = [] } "OutputMode")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 104 7 104 15 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 104 11 104 12 , SrcSpan "tests/examples/Attributes.hs" 104 14 104 15 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 104 12 104 14 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 104 7 104 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 104 7 104 11 , srcInfoPoints = [] } "Pack")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 105 7 105 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 105 15 105 16 , SrcSpan "tests/examples/Attributes.hs" 105 18 105 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 105 16 105 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 105 7 105 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 105 7 105 15 , srcInfoPoints = [] } "PackMode")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 106 7 106 14 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 106 10 106 11 , SrcSpan "tests/examples/Attributes.hs" 106 13 106 14 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 106 11 106 13 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 106 7 106 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 106 7 106 10 , srcInfoPoints = [] } "Pos")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 107 7 107 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 107 15 107 16 , SrcSpan "tests/examples/Attributes.hs" 107 18 107 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 107 16 107 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 107 7 107 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 107 7 107 15 , srcInfoPoints = [] } "EdgeType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 108 7 108 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 108 14 108 15 , SrcSpan "tests/examples/Attributes.hs" 108 17 108 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 108 15 108 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 108 7 108 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 108 7 108 14 , srcInfoPoints = [] } "PageDir")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 109 7 109 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 109 13 109 14 , SrcSpan "tests/examples/Attributes.hs" 109 16 109 17 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 109 14 109 16 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 109 7 109 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 109 7 109 13 , srcInfoPoints = [] } "Spline")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 110 7 110 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 110 15 110 16 , SrcSpan "tests/examples/Attributes.hs" 110 18 110 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 110 16 110 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 110 7 110 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 110 7 110 15 , srcInfoPoints = [] } "QuadType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 111 7 111 15 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 111 11 111 12 , SrcSpan "tests/examples/Attributes.hs" 111 14 111 15 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 111 12 111 14 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 111 7 111 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 111 7 111 11 , srcInfoPoints = [] } "Root")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 112 7 112 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 112 15 112 16 , SrcSpan "tests/examples/Attributes.hs" 112 18 112 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 112 16 112 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 112 7 112 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 112 7 112 15 , srcInfoPoints = [] } "RankType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 113 7 113 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 113 14 113 15 , SrcSpan "tests/examples/Attributes.hs" 113 17 113 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 113 15 113 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 113 7 113 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 113 7 113 14 , srcInfoPoints = [] } "RankDir")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 114 7 114 16 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 114 12 114 13 , SrcSpan "tests/examples/Attributes.hs" 114 15 114 16 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 114 13 114 15 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 114 7 114 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 114 7 114 12 , srcInfoPoints = [] } "Shape")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 115 7 115 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 115 17 115 18 , SrcSpan "tests/examples/Attributes.hs" 115 20 115 21 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 115 18 115 20 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 115 7 115 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 115 7 115 17 , srcInfoPoints = [] } "SmoothType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 116 7 116 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 116 16 116 17 , SrcSpan "tests/examples/Attributes.hs" 116 19 116 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 116 17 116 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 116 7 116 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 116 7 116 16 , srcInfoPoints = [] } "StartType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 117 7 117 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 117 14 117 15 , SrcSpan "tests/examples/Attributes.hs" 117 17 117 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 117 15 117 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 117 7 117 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 117 7 117 14 , srcInfoPoints = [] } "STStyle")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 118 7 118 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 118 16 118 17 , SrcSpan "tests/examples/Attributes.hs" 118 19 118 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 118 17 118 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 118 7 118 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 118 7 118 16 , srcInfoPoints = [] } "StyleItem")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 119 7 119 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 119 16 119 17 , SrcSpan "tests/examples/Attributes.hs" 119 19 119 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 119 17 119 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 119 7 119 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 119 7 119 16 , srcInfoPoints = [] } "StyleName")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 120 7 120 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 120 14 120 15 , SrcSpan "tests/examples/Attributes.hs" 120 17 120 18 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 120 15 120 17 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 120 7 120 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 120 7 120 14 , srcInfoPoints = [] } "PortPos")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 121 7 121 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 121 19 121 20 , SrcSpan "tests/examples/Attributes.hs" 121 22 121 23 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 121 20 121 22 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 121 7 121 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 121 7 121 19 , srcInfoPoints = [] } "CompassPoint")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 122 7 122 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 122 15 122 16 , SrcSpan "tests/examples/Attributes.hs" 122 18 122 19 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 122 16 122 18 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 122 7 122 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 122 7 122 15 , srcInfoPoints = [] } "ViewPort")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 123 7 123 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 123 16 123 17 , SrcSpan "tests/examples/Attributes.hs" 123 19 123 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 123 17 123 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 123 7 123 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 123 7 123 16 , srcInfoPoints = [] } "FocusType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 124 7 124 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 124 24 124 25 , SrcSpan "tests/examples/Attributes.hs" 124 27 124 28 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 124 25 124 27 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 124 7 124 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 124 7 124 24 , srcInfoPoints = [] } "VerticalPlacement")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 125 7 125 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 125 16 125 17 , SrcSpan "tests/examples/Attributes.hs" 125 19 125 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 125 17 125 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 125 7 125 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 125 7 125 16 , srcInfoPoints = [] } "ScaleType")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 126 7 126 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 126 20 126 21 , SrcSpan "tests/examples/Attributes.hs" 126 23 126 24 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 126 21 126 23 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 126 7 126 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 126 7 126 20 , srcInfoPoints = [] } "Justification")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 127 7 127 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 127 13 127 14 , SrcSpan "tests/examples/Attributes.hs" 127 16 127 17 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 127 14 127 16 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 127 7 127 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 127 7 127 13 , srcInfoPoints = [] } "Ratios")) [] , EModuleContents SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 128 7 128 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 128 7 128 13 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 128 14 128 45 , srcInfoPoints = [] } "Data.GraphViz.Attributes.Colors") , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 130 7 130 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 130 17 130 18 , SrcSpan "tests/examples/Attributes.hs" 130 20 130 21 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 130 18 130 20 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 130 7 130 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 130 7 130 17 , srcInfoPoints = [] } "ArrowShape")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 131 7 131 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 131 20 131 21 , SrcSpan "tests/examples/Attributes.hs" 131 23 131 24 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 131 21 131 23 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 131 7 131 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 131 7 131 20 , srcInfoPoints = [] } "ArrowModifier")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 132 7 132 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 132 16 132 17 , SrcSpan "tests/examples/Attributes.hs" 132 19 132 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 132 17 132 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 132 7 132 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 132 7 132 16 , srcInfoPoints = [] } "ArrowFill")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 133 7 133 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 133 16 133 17 , SrcSpan "tests/examples/Attributes.hs" 133 19 133 20 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 133 17 133 19 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 133 7 133 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 133 7 133 16 , srcInfoPoints = [] } "ArrowSide")) [] , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 136 7 136 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 136 7 136 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 136 7 136 10 , srcInfoPoints = [] } "box")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 137 7 137 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 137 7 137 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 137 7 137 11 , srcInfoPoints = [] } "crow")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 138 7 138 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 138 7 138 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 138 7 138 14 , srcInfoPoints = [] } "diamond")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 139 7 139 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 139 7 139 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 139 7 139 15 , srcInfoPoints = [] } "dotArrow")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 140 7 140 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 140 7 140 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 140 7 140 10 , srcInfoPoints = [] } "inv")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 141 7 141 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 141 7 141 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 141 7 141 14 , srcInfoPoints = [] } "noArrow")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 142 7 142 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 142 7 142 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 142 7 142 13 , srcInfoPoints = [] } "normal")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 143 7 143 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 143 7 143 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 143 7 143 10 , srcInfoPoints = [] } "tee")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 144 7 144 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 144 7 144 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 144 7 144 10 , srcInfoPoints = [] } "vee")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 146 7 146 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 146 7 146 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 146 7 146 11 , srcInfoPoints = [] } "oDot")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 147 7 147 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 147 7 147 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 147 7 147 13 , srcInfoPoints = [] } "invDot")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 148 7 148 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 148 7 148 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 148 7 148 14 , srcInfoPoints = [] } "invODot")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 149 7 149 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 149 7 149 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 149 7 149 11 , srcInfoPoints = [] } "oBox")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 150 7 150 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 150 7 150 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 150 7 150 15 , srcInfoPoints = [] } "oDiamond")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 152 7 152 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 152 7 152 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 152 7 152 15 , srcInfoPoints = [] } "eDiamond")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 153 7 153 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 153 7 153 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 153 7 153 14 , srcInfoPoints = [] } "openArr")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 154 7 154 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 154 7 154 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 154 7 154 15 , srcInfoPoints = [] } "halfOpen")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 155 7 155 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 155 7 155 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 155 7 155 15 , srcInfoPoints = [] } "emptyArr")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 156 7 156 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 156 7 156 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 156 7 156 15 , srcInfoPoints = [] } "invEmpty")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 158 7 158 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 158 7 158 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 158 7 158 13 , srcInfoPoints = [] } "noMods")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 159 7 159 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 159 7 159 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 159 7 159 14 , srcInfoPoints = [] } "openMod")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 161 7 161 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 161 7 161 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 161 7 161 18 , srcInfoPoints = [] } "defLayerSep")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 162 7 162 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 162 7 162 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 162 7 162 18 , srcInfoPoints = [] } "notLayerSep")) ])))) [] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 165 1 165 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 165 1 165 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 165 8 165 39 , srcInfoPoints = [] } "Data.GraphViz.Attributes.Colors" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 166 1 166 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 166 1 166 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 166 8 166 26 , srcInfoPoints = [] } "Data.GraphViz.Util" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 167 1 167 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 167 1 167 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 167 8 167 29 , srcInfoPoints = [] } "Data.GraphViz.Parsing" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 168 1 168 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 168 1 168 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 168 8 168 30 , srcInfoPoints = [] } "Data.GraphViz.Printing" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 170 1 170 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 170 1 170 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 170 8 170 17 , srcInfoPoints = [] } "Data.Char" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 170 17 170 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 170 17 170 18 , SrcSpan "tests/examples/Attributes.hs" 170 25 170 26 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 170 18 170 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 170 18 170 25 , srcInfoPoints = [] } "toLower") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 171 1 171 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 171 1 171 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 171 8 171 18 , srcInfoPoints = [] } "Data.Maybe" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 171 18 171 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 171 18 171 19 , SrcSpan "tests/examples/Attributes.hs" 171 25 171 26 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 171 19 171 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 171 19 171 25 , srcInfoPoints = [] } "isJust") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 172 1 172 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 172 1 172 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 172 8 172 21 , srcInfoPoints = [] } "Control.Arrow" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 172 21 172 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 172 21 172 22 , SrcSpan "tests/examples/Attributes.hs" 172 27 172 28 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 172 22 172 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 172 22 172 27 , srcInfoPoints = [] } "first") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 1 173 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 173 1 173 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 8 173 21 , srcInfoPoints = [] } "Control.Monad" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 21 173 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 173 21 173 22 , SrcSpan "tests/examples/Attributes.hs" 173 27 173 28 , SrcSpan "tests/examples/Attributes.hs" 173 35 173 36 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 22 173 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 22 173 27 , srcInfoPoints = [] } "liftM") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 29 173 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 173 29 173 35 , srcInfoPoints = [] } "liftM2") ]) } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 204 1 349 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 205 5 205 6 , SrcSpan "tests/examples/Attributes.hs" 206 5 206 6 , SrcSpan "tests/examples/Attributes.hs" 207 5 207 6 , SrcSpan "tests/examples/Attributes.hs" 208 5 208 6 , SrcSpan "tests/examples/Attributes.hs" 209 5 209 6 , SrcSpan "tests/examples/Attributes.hs" 210 5 210 6 , SrcSpan "tests/examples/Attributes.hs" 211 5 211 6 , SrcSpan "tests/examples/Attributes.hs" 212 5 212 6 , SrcSpan "tests/examples/Attributes.hs" 213 5 213 6 , SrcSpan "tests/examples/Attributes.hs" 214 5 214 6 , SrcSpan "tests/examples/Attributes.hs" 215 5 215 6 , SrcSpan "tests/examples/Attributes.hs" 216 5 216 6 , SrcSpan "tests/examples/Attributes.hs" 217 5 217 6 , SrcSpan "tests/examples/Attributes.hs" 218 5 218 6 , SrcSpan "tests/examples/Attributes.hs" 219 5 219 6 , SrcSpan "tests/examples/Attributes.hs" 220 5 220 6 , SrcSpan "tests/examples/Attributes.hs" 221 5 221 6 , SrcSpan "tests/examples/Attributes.hs" 222 5 222 6 , SrcSpan "tests/examples/Attributes.hs" 223 5 223 6 , SrcSpan "tests/examples/Attributes.hs" 224 5 224 6 , SrcSpan "tests/examples/Attributes.hs" 225 5 225 6 , SrcSpan "tests/examples/Attributes.hs" 226 5 226 6 , SrcSpan "tests/examples/Attributes.hs" 227 5 227 6 , SrcSpan "tests/examples/Attributes.hs" 228 5 228 6 , SrcSpan "tests/examples/Attributes.hs" 229 5 229 6 , SrcSpan "tests/examples/Attributes.hs" 230 5 230 6 , SrcSpan "tests/examples/Attributes.hs" 231 5 231 6 , SrcSpan "tests/examples/Attributes.hs" 232 5 232 6 , SrcSpan "tests/examples/Attributes.hs" 233 5 233 6 , SrcSpan "tests/examples/Attributes.hs" 234 5 234 6 , SrcSpan "tests/examples/Attributes.hs" 235 5 235 6 , SrcSpan "tests/examples/Attributes.hs" 236 5 236 6 , SrcSpan "tests/examples/Attributes.hs" 237 5 237 6 , SrcSpan "tests/examples/Attributes.hs" 238 5 238 6 , SrcSpan "tests/examples/Attributes.hs" 239 5 239 6 , SrcSpan "tests/examples/Attributes.hs" 240 5 240 6 , SrcSpan "tests/examples/Attributes.hs" 241 5 241 6 , SrcSpan "tests/examples/Attributes.hs" 242 5 242 6 , SrcSpan "tests/examples/Attributes.hs" 243 5 243 6 , SrcSpan "tests/examples/Attributes.hs" 244 5 244 6 , SrcSpan "tests/examples/Attributes.hs" 245 5 245 6 , SrcSpan "tests/examples/Attributes.hs" 246 5 246 6 , SrcSpan "tests/examples/Attributes.hs" 247 5 247 6 , SrcSpan "tests/examples/Attributes.hs" 248 5 248 6 , SrcSpan "tests/examples/Attributes.hs" 249 5 249 6 , SrcSpan "tests/examples/Attributes.hs" 250 5 250 6 , SrcSpan "tests/examples/Attributes.hs" 251 5 251 6 , SrcSpan "tests/examples/Attributes.hs" 252 5 252 6 , SrcSpan "tests/examples/Attributes.hs" 253 5 253 6 , SrcSpan "tests/examples/Attributes.hs" 254 5 254 6 , SrcSpan "tests/examples/Attributes.hs" 255 5 255 6 , SrcSpan "tests/examples/Attributes.hs" 256 5 256 6 , SrcSpan "tests/examples/Attributes.hs" 257 5 257 6 , SrcSpan "tests/examples/Attributes.hs" 258 5 258 6 , SrcSpan "tests/examples/Attributes.hs" 259 5 259 6 , SrcSpan "tests/examples/Attributes.hs" 260 5 260 6 , SrcSpan "tests/examples/Attributes.hs" 261 5 261 6 , SrcSpan "tests/examples/Attributes.hs" 262 5 262 6 , SrcSpan "tests/examples/Attributes.hs" 263 5 263 6 , SrcSpan "tests/examples/Attributes.hs" 264 5 264 6 , SrcSpan "tests/examples/Attributes.hs" 265 5 265 6 , SrcSpan "tests/examples/Attributes.hs" 266 5 266 6 , SrcSpan "tests/examples/Attributes.hs" 267 5 267 6 , SrcSpan "tests/examples/Attributes.hs" 268 5 268 6 , SrcSpan "tests/examples/Attributes.hs" 269 5 269 6 , SrcSpan "tests/examples/Attributes.hs" 270 5 270 6 , SrcSpan "tests/examples/Attributes.hs" 271 5 271 6 , SrcSpan "tests/examples/Attributes.hs" 272 5 272 6 , SrcSpan "tests/examples/Attributes.hs" 273 5 273 6 , SrcSpan "tests/examples/Attributes.hs" 274 5 274 6 , SrcSpan "tests/examples/Attributes.hs" 275 5 275 6 , SrcSpan "tests/examples/Attributes.hs" 276 5 276 6 , SrcSpan "tests/examples/Attributes.hs" 277 5 277 6 , SrcSpan "tests/examples/Attributes.hs" 278 5 278 6 , SrcSpan "tests/examples/Attributes.hs" 279 5 279 6 , SrcSpan "tests/examples/Attributes.hs" 280 5 280 6 , SrcSpan "tests/examples/Attributes.hs" 281 5 281 6 , SrcSpan "tests/examples/Attributes.hs" 282 5 282 6 , SrcSpan "tests/examples/Attributes.hs" 283 5 283 6 , SrcSpan "tests/examples/Attributes.hs" 284 5 284 6 , SrcSpan "tests/examples/Attributes.hs" 285 5 285 6 , SrcSpan "tests/examples/Attributes.hs" 286 5 286 6 , SrcSpan "tests/examples/Attributes.hs" 287 5 287 6 , SrcSpan "tests/examples/Attributes.hs" 288 5 288 6 , SrcSpan "tests/examples/Attributes.hs" 289 5 289 6 , SrcSpan "tests/examples/Attributes.hs" 290 5 290 6 , SrcSpan "tests/examples/Attributes.hs" 291 5 291 6 , SrcSpan "tests/examples/Attributes.hs" 292 5 292 6 , SrcSpan "tests/examples/Attributes.hs" 293 5 293 6 , SrcSpan "tests/examples/Attributes.hs" 294 5 294 6 , SrcSpan "tests/examples/Attributes.hs" 295 5 295 6 , SrcSpan "tests/examples/Attributes.hs" 296 5 296 6 , SrcSpan "tests/examples/Attributes.hs" 297 5 297 6 , SrcSpan "tests/examples/Attributes.hs" 298 5 298 6 , SrcSpan "tests/examples/Attributes.hs" 299 5 299 6 , SrcSpan "tests/examples/Attributes.hs" 300 5 300 6 , SrcSpan "tests/examples/Attributes.hs" 301 5 301 6 , SrcSpan "tests/examples/Attributes.hs" 302 5 302 6 , SrcSpan "tests/examples/Attributes.hs" 303 5 303 6 , SrcSpan "tests/examples/Attributes.hs" 304 5 304 6 , SrcSpan "tests/examples/Attributes.hs" 305 5 305 6 , SrcSpan "tests/examples/Attributes.hs" 306 5 306 6 , SrcSpan "tests/examples/Attributes.hs" 307 5 307 6 , SrcSpan "tests/examples/Attributes.hs" 308 5 308 6 , SrcSpan "tests/examples/Attributes.hs" 309 5 309 6 , SrcSpan "tests/examples/Attributes.hs" 310 5 310 6 , SrcSpan "tests/examples/Attributes.hs" 311 5 311 6 , SrcSpan "tests/examples/Attributes.hs" 312 5 312 6 , SrcSpan "tests/examples/Attributes.hs" 313 5 313 6 , SrcSpan "tests/examples/Attributes.hs" 314 5 314 6 , SrcSpan "tests/examples/Attributes.hs" 315 5 315 6 , SrcSpan "tests/examples/Attributes.hs" 316 5 316 6 , SrcSpan "tests/examples/Attributes.hs" 317 5 317 6 , SrcSpan "tests/examples/Attributes.hs" 318 5 318 6 , SrcSpan "tests/examples/Attributes.hs" 319 5 319 6 , SrcSpan "tests/examples/Attributes.hs" 320 5 320 6 , SrcSpan "tests/examples/Attributes.hs" 321 5 321 6 , SrcSpan "tests/examples/Attributes.hs" 322 5 322 6 , SrcSpan "tests/examples/Attributes.hs" 323 5 323 6 , SrcSpan "tests/examples/Attributes.hs" 324 5 324 6 , SrcSpan "tests/examples/Attributes.hs" 325 5 325 6 , SrcSpan "tests/examples/Attributes.hs" 326 5 326 6 , SrcSpan "tests/examples/Attributes.hs" 327 5 327 6 , SrcSpan "tests/examples/Attributes.hs" 328 5 328 6 , SrcSpan "tests/examples/Attributes.hs" 329 5 329 6 , SrcSpan "tests/examples/Attributes.hs" 330 5 330 6 , SrcSpan "tests/examples/Attributes.hs" 331 5 331 6 , SrcSpan "tests/examples/Attributes.hs" 332 5 332 6 , SrcSpan "tests/examples/Attributes.hs" 333 5 333 6 , SrcSpan "tests/examples/Attributes.hs" 334 5 334 6 , SrcSpan "tests/examples/Attributes.hs" 335 5 335 6 , SrcSpan "tests/examples/Attributes.hs" 336 5 336 6 , SrcSpan "tests/examples/Attributes.hs" 337 5 337 6 , SrcSpan "tests/examples/Attributes.hs" 338 5 338 6 , SrcSpan "tests/examples/Attributes.hs" 339 5 339 6 , SrcSpan "tests/examples/Attributes.hs" 340 5 340 6 , SrcSpan "tests/examples/Attributes.hs" 341 5 341 6 , SrcSpan "tests/examples/Attributes.hs" 342 5 342 6 , SrcSpan "tests/examples/Attributes.hs" 343 5 343 6 , SrcSpan "tests/examples/Attributes.hs" 344 5 344 6 , SrcSpan "tests/examples/Attributes.hs" 345 5 345 6 , SrcSpan "tests/examples/Attributes.hs" 346 5 346 6 , SrcSpan "tests/examples/Attributes.hs" 347 5 347 6 , SrcSpan "tests/examples/Attributes.hs" 348 5 348 6 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 204 1 204 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 204 6 204 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 204 6 204 15 , srcInfoPoints = [] } "Attribute")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 7 205 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 7 205 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 7 205 14 , srcInfoPoints = [] } "Damping") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 15 205 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 15 205 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 205 15 205 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 7 206 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 7 206 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 7 206 8 , srcInfoPoints = [] } "K") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 9 206 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 9 206 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 206 9 206 15 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 7 207 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 7 207 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 7 207 10 , srcInfoPoints = [] } "URL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 11 207 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 11 207 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 207 11 207 14 , srcInfoPoints = [] } "URL")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 7 208 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 7 208 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 7 208 16 , srcInfoPoints = [] } "ArrowHead") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 17 208 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 17 208 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 208 17 208 26 , srcInfoPoints = [] } "ArrowType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 7 209 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 7 209 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 7 209 16 , srcInfoPoints = [] } "ArrowSize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 17 209 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 17 209 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 209 17 209 23 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 7 210 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 7 210 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 7 210 16 , srcInfoPoints = [] } "ArrowTail") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 17 210 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 17 210 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 210 17 210 26 , srcInfoPoints = [] } "ArrowType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 7 211 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 7 211 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 7 211 13 , srcInfoPoints = [] } "Aspect") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 14 211 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 14 211 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 211 14 211 24 , srcInfoPoints = [] } "AspectType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 7 212 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 7 212 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 7 212 9 , srcInfoPoints = [] } "Bb") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 10 212 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 10 212 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 212 10 212 14 , srcInfoPoints = [] } "Rect")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 7 213 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 7 213 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 7 213 14 , srcInfoPoints = [] } "BgColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 15 213 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 15 213 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 213 15 213 20 , srcInfoPoints = [] } "Color")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 7 214 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 7 214 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 7 214 13 , srcInfoPoints = [] } "Center") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 14 214 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 14 214 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 214 14 214 18 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 7 215 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 7 215 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 7 215 14 , srcInfoPoints = [] } "Charset") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 15 215 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 15 215 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 215 15 215 21 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 7 216 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 7 216 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 7 216 18 , srcInfoPoints = [] } "ClusterRank") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 19 216 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 19 216 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 216 19 216 30 , srcInfoPoints = [] } "ClusterMode")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 7 217 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 7 217 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 7 217 18 , srcInfoPoints = [] } "ColorScheme") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 19 217 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 19 217 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 217 19 217 30 , srcInfoPoints = [] } "ColorScheme")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 7 218 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 7 218 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 7 218 12 , srcInfoPoints = [] } "Color") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 13 218 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 218 13 218 14 , SrcSpan "tests/examples/Attributes.hs" 218 19 218 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 14 218 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 14 218 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 218 14 218 19 , srcInfoPoints = [] } "Color"))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 7 219 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 7 219 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 7 219 14 , srcInfoPoints = [] } "Comment") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 15 219 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 15 219 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 219 15 219 21 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 7 220 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 7 220 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 7 220 15 , srcInfoPoints = [] } "Compound") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 16 220 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 16 220 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 220 16 220 20 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 7 221 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 7 221 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 7 221 18 , srcInfoPoints = [] } "Concentrate") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 19 221 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 19 221 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 221 19 221 23 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 7 222 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 7 222 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 7 222 17 , srcInfoPoints = [] } "Constraint") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 18 222 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 18 222 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 222 18 222 22 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 7 223 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 7 223 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 7 223 15 , srcInfoPoints = [] } "Decorate") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 16 223 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 16 223 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 223 16 223 20 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 7 224 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 7 224 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 7 224 18 , srcInfoPoints = [] } "DefaultDist") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 19 224 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 19 224 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 224 19 224 25 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 7 225 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 7 225 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 7 225 12 , srcInfoPoints = [] } "Dimen") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 13 225 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 13 225 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 225 13 225 16 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 7 226 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 7 226 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 7 226 10 , srcInfoPoints = [] } "Dim") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 11 226 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 11 226 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 226 11 226 14 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 7 227 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 7 227 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 7 227 10 , srcInfoPoints = [] } "Dir") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 11 227 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 11 227 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 227 11 227 18 , srcInfoPoints = [] } "DirType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 7 228 39 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 7 228 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 7 228 25 , srcInfoPoints = [] } "DirEdgeConstraints") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 26 228 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 26 228 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 228 26 228 39 , srcInfoPoints = [] } "DEConstraints")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 7 229 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 7 229 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 7 229 17 , srcInfoPoints = [] } "Distortion") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 18 229 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 18 229 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 229 18 229 24 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 7 230 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 7 230 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 7 230 10 , srcInfoPoints = [] } "DPI") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 11 230 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 11 230 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 230 11 230 17 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 7 231 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 7 231 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 7 231 14 , srcInfoPoints = [] } "EdgeURL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 15 231 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 15 231 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 231 15 231 18 , srcInfoPoints = [] } "URL")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 7 232 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 7 232 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 7 232 17 , srcInfoPoints = [] } "EdgeTarget") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 18 232 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 18 232 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 232 18 232 27 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 7 233 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 7 233 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 7 233 18 , srcInfoPoints = [] } "EdgeTooltip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 19 233 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 19 233 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 233 19 233 28 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 7 234 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 7 234 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 7 234 14 , srcInfoPoints = [] } "Epsilon") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 15 234 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 15 234 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 234 15 234 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 7 235 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 7 235 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 7 235 11 , srcInfoPoints = [] } "ESep") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 12 235 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 12 235 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 235 12 235 18 , srcInfoPoints = [] } "DPoint")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 7 236 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 7 236 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 7 236 16 , srcInfoPoints = [] } "FillColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 17 236 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 17 236 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 236 17 236 22 , srcInfoPoints = [] } "Color")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 7 237 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 7 237 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 7 237 16 , srcInfoPoints = [] } "FixedSize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 17 237 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 17 237 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 237 17 237 21 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 7 238 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 7 238 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 7 238 16 , srcInfoPoints = [] } "FontColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 17 238 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 17 238 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 238 17 238 22 , srcInfoPoints = [] } "Color")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 7 239 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 7 239 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 7 239 15 , srcInfoPoints = [] } "FontName") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 16 239 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 16 239 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 239 16 239 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 7 240 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 7 240 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 7 240 16 , srcInfoPoints = [] } "FontNames") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 17 240 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 17 240 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 240 17 240 23 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 7 241 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 7 241 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 7 241 15 , srcInfoPoints = [] } "FontPath") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 16 241 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 16 241 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 241 16 241 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 7 242 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 7 242 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 7 242 15 , srcInfoPoints = [] } "FontSize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 16 242 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 16 242 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 242 16 242 22 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 7 243 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 7 243 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 7 243 12 , srcInfoPoints = [] } "Group") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 13 243 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 13 243 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 243 13 243 19 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 7 244 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 7 244 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 7 244 14 , srcInfoPoints = [] } "HeadURL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 15 244 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 15 244 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 244 15 244 18 , srcInfoPoints = [] } "URL")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 7 245 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 7 245 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 7 245 15 , srcInfoPoints = [] } "HeadClip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 16 245 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 16 245 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 245 16 245 20 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 7 246 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 7 246 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 7 246 16 , srcInfoPoints = [] } "HeadLabel") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 17 246 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 17 246 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 246 17 246 22 , srcInfoPoints = [] } "Label")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 7 247 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 7 247 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 7 247 15 , srcInfoPoints = [] } "HeadPort") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 16 247 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 16 247 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 247 16 247 23 , srcInfoPoints = [] } "PortPos")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 7 248 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 7 248 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 7 248 17 , srcInfoPoints = [] } "HeadTarget") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 18 248 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 18 248 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 248 18 248 27 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 7 249 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 7 249 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 7 249 18 , srcInfoPoints = [] } "HeadTooltip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 19 249 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 19 249 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 249 19 249 28 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 7 250 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 7 250 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 7 250 13 , srcInfoPoints = [] } "Height") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 14 250 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 14 250 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 250 14 250 20 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 7 251 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 7 251 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 7 251 9 , srcInfoPoints = [] } "ID") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 10 251 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 10 251 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 251 10 251 15 , srcInfoPoints = [] } "Label")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 7 252 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 7 252 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 7 252 12 , srcInfoPoints = [] } "Image") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 13 252 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 13 252 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 252 13 252 19 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 7 253 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 7 253 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 7 253 17 , srcInfoPoints = [] } "ImageScale") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 18 253 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 18 253 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 253 18 253 27 , srcInfoPoints = [] } "ScaleType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 7 254 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 7 254 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 7 254 15 , srcInfoPoints = [] } "LabelURL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 16 254 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 16 254 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 254 16 254 19 , srcInfoPoints = [] } "URL")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 7 255 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 7 255 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 7 255 17 , srcInfoPoints = [] } "LabelAngle") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 18 255 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 18 255 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 255 18 255 24 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 7 256 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 7 256 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 7 256 20 , srcInfoPoints = [] } "LabelDistance") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 21 256 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 21 256 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 256 21 256 27 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 7 257 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 7 257 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 7 257 17 , srcInfoPoints = [] } "LabelFloat") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 18 257 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 18 257 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 257 18 257 22 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 7 258 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 7 258 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 7 258 21 , srcInfoPoints = [] } "LabelFontColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 22 258 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 22 258 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 258 22 258 27 , srcInfoPoints = [] } "Color")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 7 259 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 7 259 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 7 259 20 , srcInfoPoints = [] } "LabelFontName") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 21 259 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 21 259 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 259 21 259 27 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 7 260 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 7 260 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 7 260 20 , srcInfoPoints = [] } "LabelFontSize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 21 260 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 21 260 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 260 21 260 27 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 7 261 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 7 261 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 7 261 16 , srcInfoPoints = [] } "LabelJust") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 17 261 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 17 261 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 261 17 261 30 , srcInfoPoints = [] } "Justification")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 7 262 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 7 262 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 7 262 15 , srcInfoPoints = [] } "LabelLoc") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 16 262 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 16 262 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 262 16 262 33 , srcInfoPoints = [] } "VerticalPlacement")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 7 263 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 7 263 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 7 263 18 , srcInfoPoints = [] } "LabelTarget") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 19 263 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 19 263 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 263 19 263 28 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 7 264 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 7 264 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 7 264 19 , srcInfoPoints = [] } "LabelTooltip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 20 264 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 20 264 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 264 20 264 29 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 7 265 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 7 265 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 7 265 12 , srcInfoPoints = [] } "Label") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 13 265 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 13 265 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 265 13 265 18 , srcInfoPoints = [] } "Label")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 7 266 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 7 266 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 7 266 16 , srcInfoPoints = [] } "Landscape") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 17 266 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 17 266 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 266 17 266 21 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 7 267 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 7 267 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 7 267 15 , srcInfoPoints = [] } "LayerSep") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 16 267 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 16 267 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 267 16 267 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 7 268 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 7 268 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 7 268 13 , srcInfoPoints = [] } "Layers") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 14 268 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 14 268 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 268 14 268 23 , srcInfoPoints = [] } "LayerList")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 7 269 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 7 269 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 7 269 12 , srcInfoPoints = [] } "Layer") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 13 269 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 13 269 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 269 13 269 23 , srcInfoPoints = [] } "LayerRange")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 7 270 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 7 270 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 7 270 13 , srcInfoPoints = [] } "Layout") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 14 270 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 14 270 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 270 14 270 20 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 7 271 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 7 271 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 7 271 10 , srcInfoPoints = [] } "Len") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 11 271 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 11 271 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 271 11 271 17 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 7 272 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 7 272 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 7 272 16 , srcInfoPoints = [] } "LevelsGap") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 17 272 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 17 272 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 272 17 272 23 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 7 273 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 7 273 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 7 273 13 , srcInfoPoints = [] } "Levels") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 14 273 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 14 273 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 273 14 273 17 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 7 274 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 7 274 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 7 274 12 , srcInfoPoints = [] } "LHead") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 13 274 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 13 274 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 274 13 274 19 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 7 275 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 7 275 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 7 275 11 , srcInfoPoints = [] } "LPos") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 12 275 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 12 275 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 275 12 275 17 , srcInfoPoints = [] } "Point")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 7 276 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 7 276 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 7 276 12 , srcInfoPoints = [] } "LTail") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 13 276 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 13 276 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 276 13 276 19 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 7 277 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 7 277 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 7 277 13 , srcInfoPoints = [] } "Margin") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 14 277 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 14 277 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 277 14 277 20 , srcInfoPoints = [] } "DPoint")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 7 278 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 7 278 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 7 278 14 , srcInfoPoints = [] } "MaxIter") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 15 278 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 15 278 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 278 15 278 18 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 7 279 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 7 279 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 7 279 14 , srcInfoPoints = [] } "MCLimit") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 15 279 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 15 279 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 279 15 279 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 7 280 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 7 280 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 7 280 14 , srcInfoPoints = [] } "MinDist") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 15 280 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 15 280 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 280 15 280 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 7 281 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 7 281 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 7 281 13 , srcInfoPoints = [] } "MinLen") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 14 281 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 14 281 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 281 14 281 17 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 7 282 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 7 282 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 7 282 12 , srcInfoPoints = [] } "Model") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 13 282 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 13 282 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 282 13 282 18 , srcInfoPoints = [] } "Model")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 7 283 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 7 283 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 7 283 11 , srcInfoPoints = [] } "Mode") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 12 283 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 12 283 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 283 12 283 20 , srcInfoPoints = [] } "ModeType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 7 284 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 7 284 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 7 284 12 , srcInfoPoints = [] } "Mosek") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 13 284 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 13 284 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 284 13 284 17 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 7 285 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 7 285 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 7 285 14 , srcInfoPoints = [] } "NodeSep") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 15 285 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 15 285 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 285 15 285 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 7 286 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 7 286 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 7 286 16 , srcInfoPoints = [] } "NoJustify") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 17 286 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 17 286 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 286 17 286 21 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 7 287 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 7 287 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 7 287 16 , srcInfoPoints = [] } "Normalize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 17 287 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 17 287 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 287 17 287 21 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 7 288 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 7 288 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 7 288 15 , srcInfoPoints = [] } "Nslimit1") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 16 288 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 16 288 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 288 16 288 22 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 7 289 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 7 289 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 7 289 14 , srcInfoPoints = [] } "Nslimit") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 15 289 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 15 289 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 289 15 289 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 7 290 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 7 290 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 7 290 15 , srcInfoPoints = [] } "Ordering") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 16 290 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 16 290 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 290 16 290 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 7 291 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 7 291 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 7 291 18 , srcInfoPoints = [] } "Orientation") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 19 291 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 19 291 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 291 19 291 25 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 7 292 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 7 292 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 7 292 18 , srcInfoPoints = [] } "OutputOrder") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 19 292 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 19 292 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 292 19 292 29 , srcInfoPoints = [] } "OutputMode")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 7 293 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 7 293 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 7 293 21 , srcInfoPoints = [] } "OverlapScaling") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 22 293 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 22 293 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 293 22 293 28 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 7 294 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 7 294 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 7 294 14 , srcInfoPoints = [] } "Overlap") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 15 294 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 15 294 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 294 15 294 22 , srcInfoPoints = [] } "Overlap")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 7 295 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 7 295 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 7 295 15 , srcInfoPoints = [] } "PackMode") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 16 295 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 16 295 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 295 16 295 24 , srcInfoPoints = [] } "PackMode")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 7 296 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 7 296 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 7 296 11 , srcInfoPoints = [] } "Pack") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 12 296 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 12 296 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 296 12 296 16 , srcInfoPoints = [] } "Pack")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 7 297 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 7 297 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 7 297 10 , srcInfoPoints = [] } "Pad") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 11 297 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 11 297 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 297 11 297 17 , srcInfoPoints = [] } "DPoint")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 7 298 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 7 298 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 7 298 14 , srcInfoPoints = [] } "PageDir") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 15 298 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 15 298 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 298 15 298 22 , srcInfoPoints = [] } "PageDir")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 7 299 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 7 299 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 7 299 11 , srcInfoPoints = [] } "Page") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 12 299 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 12 299 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 299 12 299 17 , srcInfoPoints = [] } "Point")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 7 300 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 7 300 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 7 300 15 , srcInfoPoints = [] } "PenColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 16 300 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 16 300 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 300 16 300 21 , srcInfoPoints = [] } "Color")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 7 301 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 7 301 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 7 301 15 , srcInfoPoints = [] } "PenWidth") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 16 301 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 16 301 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 301 16 301 22 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 7 302 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 7 302 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 7 302 18 , srcInfoPoints = [] } "Peripheries") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 19 302 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 19 302 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 302 19 302 22 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 7 303 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 7 303 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 7 303 10 , srcInfoPoints = [] } "Pin") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 11 303 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 11 303 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 303 11 303 15 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 7 304 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 7 304 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 7 304 10 , srcInfoPoints = [] } "Pos") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 11 304 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 11 304 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 304 11 304 14 , srcInfoPoints = [] } "Pos")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 7 305 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 7 305 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 7 305 15 , srcInfoPoints = [] } "QuadTree") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 16 305 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 16 305 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 305 16 305 24 , srcInfoPoints = [] } "QuadType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 7 306 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 7 306 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 7 306 14 , srcInfoPoints = [] } "Quantum") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 15 306 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 15 306 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 306 15 306 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 7 307 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 7 307 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 7 307 14 , srcInfoPoints = [] } "RankDir") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 15 307 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 15 307 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 307 15 307 22 , srcInfoPoints = [] } "RankDir")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 7 308 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 7 308 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 7 308 14 , srcInfoPoints = [] } "RankSep") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 15 308 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 15 308 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 308 15 308 21 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 7 309 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 7 309 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 7 309 11 , srcInfoPoints = [] } "Rank") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 12 309 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 12 309 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 309 12 309 20 , srcInfoPoints = [] } "RankType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 7 310 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 7 310 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 7 310 12 , srcInfoPoints = [] } "Ratio") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 13 310 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 13 310 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 310 13 310 19 , srcInfoPoints = [] } "Ratios")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 7 311 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 7 311 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 7 311 12 , srcInfoPoints = [] } "Rects") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 13 311 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 13 311 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 311 13 311 17 , srcInfoPoints = [] } "Rect")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 7 312 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 7 312 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 7 312 14 , srcInfoPoints = [] } "Regular") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 15 312 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 15 312 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 312 15 312 19 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 7 313 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 7 313 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 7 313 17 , srcInfoPoints = [] } "ReMinCross") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 18 313 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 18 313 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 313 18 313 22 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 7 314 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 7 314 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 7 314 21 , srcInfoPoints = [] } "RepulsiveForce") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 22 314 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 22 314 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 314 22 314 28 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 7 315 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 7 315 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 7 315 11 , srcInfoPoints = [] } "Root") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 12 315 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 12 315 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 315 12 315 16 , srcInfoPoints = [] } "Root")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 7 316 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 7 316 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 7 316 13 , srcInfoPoints = [] } "Rotate") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 14 316 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 14 316 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 316 14 316 17 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 7 317 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 7 317 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 7 317 15 , srcInfoPoints = [] } "SameHead") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 16 317 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 16 317 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 317 16 317 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 7 318 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 7 318 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 7 318 15 , srcInfoPoints = [] } "SameTail") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 16 318 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 16 318 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 318 16 318 22 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 7 319 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 7 319 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 7 319 19 , srcInfoPoints = [] } "SamplePoints") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 20 319 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 20 319 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 319 20 319 23 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 7 320 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 7 320 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 7 320 17 , srcInfoPoints = [] } "SearchSize") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 18 320 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 18 320 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 320 18 320 21 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 7 321 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 7 321 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 7 321 10 , srcInfoPoints = [] } "Sep") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 11 321 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 11 321 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 321 11 321 17 , srcInfoPoints = [] } "DPoint")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 7 322 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 7 322 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 7 322 16 , srcInfoPoints = [] } "ShapeFile") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 17 322 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 17 322 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 322 17 322 23 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 7 323 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 7 323 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 7 323 12 , srcInfoPoints = [] } "Shape") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 13 323 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 13 323 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 323 13 323 18 , srcInfoPoints = [] } "Shape")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 7 324 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 7 324 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 7 324 16 , srcInfoPoints = [] } "ShowBoxes") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 17 324 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 17 324 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 324 17 324 20 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 7 325 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 7 325 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 7 325 12 , srcInfoPoints = [] } "Sides") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 13 325 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 13 325 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 325 13 325 16 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 7 326 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 7 326 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 7 326 11 , srcInfoPoints = [] } "Size") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 12 326 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 12 326 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 326 12 326 17 , srcInfoPoints = [] } "Point")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 7 327 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 7 327 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 7 327 11 , srcInfoPoints = [] } "Skew") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 12 327 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 12 327 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 327 12 327 18 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 7 328 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 7 328 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 7 328 16 , srcInfoPoints = [] } "Smoothing") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 17 328 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 17 328 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 328 17 328 27 , srcInfoPoints = [] } "SmoothType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 7 329 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 7 329 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 7 329 12 , srcInfoPoints = [] } "SortV") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 13 329 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 13 329 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 329 13 329 16 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 7 330 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 7 330 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 7 330 14 , srcInfoPoints = [] } "Splines") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 15 330 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 15 330 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 330 15 330 23 , srcInfoPoints = [] } "EdgeType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 7 331 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 7 331 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 7 331 12 , srcInfoPoints = [] } "Start") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 13 331 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 13 331 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 331 13 331 22 , srcInfoPoints = [] } "StartType")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 7 332 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 7 332 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 7 332 17 , srcInfoPoints = [] } "StyleSheet") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 18 332 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 18 332 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 332 18 332 24 , srcInfoPoints = [] } "String")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 7 333 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 7 333 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 7 333 12 , srcInfoPoints = [] } "Style") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 13 333 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 333 13 333 14 , SrcSpan "tests/examples/Attributes.hs" 333 23 333 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 14 333 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 14 333 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 333 14 333 23 , srcInfoPoints = [] } "StyleItem"))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 7 334 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 7 334 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 7 334 14 , srcInfoPoints = [] } "TailURL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 15 334 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 15 334 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 334 15 334 18 , srcInfoPoints = [] } "URL")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 7 335 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 7 335 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 7 335 15 , srcInfoPoints = [] } "TailClip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 16 335 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 16 335 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 335 16 335 20 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 7 336 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 7 336 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 7 336 16 , srcInfoPoints = [] } "TailLabel") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 17 336 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 17 336 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 336 17 336 22 , srcInfoPoints = [] } "Label")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 7 337 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 7 337 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 7 337 15 , srcInfoPoints = [] } "TailPort") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 16 337 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 16 337 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 337 16 337 23 , srcInfoPoints = [] } "PortPos")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 7 338 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 7 338 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 7 338 17 , srcInfoPoints = [] } "TailTarget") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 18 338 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 18 338 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 338 18 338 27 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 7 339 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 7 339 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 7 339 18 , srcInfoPoints = [] } "TailTooltip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 19 339 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 19 339 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 339 19 339 28 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 7 340 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 7 340 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 7 340 13 , srcInfoPoints = [] } "Target") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 14 340 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 14 340 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 340 14 340 23 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 7 341 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 7 341 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 7 341 14 , srcInfoPoints = [] } "Tooltip") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 15 341 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 15 341 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 341 15 341 24 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 7 342 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 7 342 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 7 342 16 , srcInfoPoints = [] } "TrueColor") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 17 342 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 17 342 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 342 17 342 21 , srcInfoPoints = [] } "Bool")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 7 343 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 7 343 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 7 343 15 , srcInfoPoints = [] } "Vertices") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 16 343 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 343 16 343 17 , SrcSpan "tests/examples/Attributes.hs" 343 22 343 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 17 343 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 17 343 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 343 17 343 22 , srcInfoPoints = [] } "Point"))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 7 344 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 7 344 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 7 344 15 , srcInfoPoints = [] } "ViewPort") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 16 344 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 16 344 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 344 16 344 24 , srcInfoPoints = [] } "ViewPort")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 7 345 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 7 345 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 7 345 17 , srcInfoPoints = [] } "VoroMargin") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 18 345 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 18 345 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 345 18 345 24 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 7 346 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 7 346 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 7 346 13 , srcInfoPoints = [] } "Weight") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 14 346 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 14 346 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 346 14 346 20 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 7 347 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 7 347 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 7 347 12 , srcInfoPoints = [] } "Width") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 13 347 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 13 347 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 347 13 347 19 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 7 348 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 7 348 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 7 348 8 , srcInfoPoints = [] } "Z") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 9 348 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 9 348 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 348 9 348 15 , srcInfoPoints = [] } "Double")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 7 349 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 349 7 349 15 , SrcSpan "tests/examples/Attributes.hs" 349 16 349 17 , SrcSpan "tests/examples/Attributes.hs" 349 19 349 20 , SrcSpan "tests/examples/Attributes.hs" 349 24 349 25 , SrcSpan "tests/examples/Attributes.hs" 349 30 349 31 , SrcSpan "tests/examples/Attributes.hs" 349 36 349 37 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 17 349 19 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 17 349 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 17 349 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 17 349 19 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 21 349 24 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 21 349 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 21 349 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 21 349 24 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 26 349 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 26 349 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 26 349 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 26 349 30 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 32 349 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 32 349 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 32 349 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 349 32 349 36 , srcInfoPoints = [] } "Read"))) ] ] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 1 351 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 351 1 351 5 , SrcSpan "tests/examples/Attributes.hs" 351 17 351 18 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 6 351 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 6 351 16 , srcInfoPoints = [] } "Attributes")) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 19 351 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 351 19 351 20 , SrcSpan "tests/examples/Attributes.hs" 351 29 351 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 20 351 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 20 351 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 351 20 351 29 , srcInfoPoints = [] } "Attribute")))) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 1 501 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 353 1 353 9 , SrcSpan "tests/examples/Attributes.hs" 353 29 353 34 , SrcSpan "tests/examples/Attributes.hs" 354 5 354 5 , SrcSpan "tests/examples/Attributes.hs" 355 5 355 5 , SrcSpan "tests/examples/Attributes.hs" 356 5 356 5 , SrcSpan "tests/examples/Attributes.hs" 357 5 357 5 , SrcSpan "tests/examples/Attributes.hs" 358 5 358 5 , SrcSpan "tests/examples/Attributes.hs" 359 5 359 5 , SrcSpan "tests/examples/Attributes.hs" 360 5 360 5 , SrcSpan "tests/examples/Attributes.hs" 361 5 361 5 , SrcSpan "tests/examples/Attributes.hs" 362 5 362 5 , SrcSpan "tests/examples/Attributes.hs" 363 5 363 5 , SrcSpan "tests/examples/Attributes.hs" 364 5 364 5 , SrcSpan "tests/examples/Attributes.hs" 365 5 365 5 , SrcSpan "tests/examples/Attributes.hs" 366 5 366 5 , SrcSpan "tests/examples/Attributes.hs" 367 5 367 5 , SrcSpan "tests/examples/Attributes.hs" 368 5 368 5 , SrcSpan "tests/examples/Attributes.hs" 369 5 369 5 , SrcSpan "tests/examples/Attributes.hs" 370 5 370 5 , SrcSpan "tests/examples/Attributes.hs" 371 5 371 5 , SrcSpan "tests/examples/Attributes.hs" 372 5 372 5 , SrcSpan "tests/examples/Attributes.hs" 373 5 373 5 , SrcSpan "tests/examples/Attributes.hs" 374 5 374 5 , SrcSpan "tests/examples/Attributes.hs" 375 5 375 5 , SrcSpan "tests/examples/Attributes.hs" 376 5 376 5 , SrcSpan "tests/examples/Attributes.hs" 377 5 377 5 , SrcSpan "tests/examples/Attributes.hs" 378 5 378 5 , SrcSpan "tests/examples/Attributes.hs" 379 5 379 5 , SrcSpan "tests/examples/Attributes.hs" 380 5 380 5 , SrcSpan "tests/examples/Attributes.hs" 381 5 381 5 , SrcSpan "tests/examples/Attributes.hs" 382 5 382 5 , SrcSpan "tests/examples/Attributes.hs" 383 5 383 5 , SrcSpan "tests/examples/Attributes.hs" 384 5 384 5 , SrcSpan "tests/examples/Attributes.hs" 385 5 385 5 , SrcSpan "tests/examples/Attributes.hs" 386 5 386 5 , SrcSpan "tests/examples/Attributes.hs" 387 5 387 5 , SrcSpan "tests/examples/Attributes.hs" 388 5 388 5 , SrcSpan "tests/examples/Attributes.hs" 389 5 389 5 , SrcSpan "tests/examples/Attributes.hs" 390 5 390 5 , SrcSpan "tests/examples/Attributes.hs" 391 5 391 5 , SrcSpan "tests/examples/Attributes.hs" 392 5 392 5 , SrcSpan "tests/examples/Attributes.hs" 393 5 393 5 , SrcSpan "tests/examples/Attributes.hs" 394 5 394 5 , SrcSpan "tests/examples/Attributes.hs" 395 5 395 5 , SrcSpan "tests/examples/Attributes.hs" 396 5 396 5 , SrcSpan "tests/examples/Attributes.hs" 397 5 397 5 , SrcSpan "tests/examples/Attributes.hs" 398 5 398 5 , SrcSpan "tests/examples/Attributes.hs" 399 5 399 5 , SrcSpan "tests/examples/Attributes.hs" 400 5 400 5 , SrcSpan "tests/examples/Attributes.hs" 401 5 401 5 , SrcSpan "tests/examples/Attributes.hs" 402 5 402 5 , SrcSpan "tests/examples/Attributes.hs" 403 5 403 5 , SrcSpan "tests/examples/Attributes.hs" 404 5 404 5 , SrcSpan "tests/examples/Attributes.hs" 405 5 405 5 , SrcSpan "tests/examples/Attributes.hs" 406 5 406 5 , SrcSpan "tests/examples/Attributes.hs" 407 5 407 5 , SrcSpan "tests/examples/Attributes.hs" 408 5 408 5 , SrcSpan "tests/examples/Attributes.hs" 409 5 409 5 , SrcSpan "tests/examples/Attributes.hs" 410 5 410 5 , SrcSpan "tests/examples/Attributes.hs" 411 5 411 5 , SrcSpan "tests/examples/Attributes.hs" 412 5 412 5 , SrcSpan "tests/examples/Attributes.hs" 413 5 413 5 , SrcSpan "tests/examples/Attributes.hs" 414 5 414 5 , SrcSpan "tests/examples/Attributes.hs" 415 5 415 5 , SrcSpan "tests/examples/Attributes.hs" 416 5 416 5 , SrcSpan "tests/examples/Attributes.hs" 417 5 417 5 , SrcSpan "tests/examples/Attributes.hs" 418 5 418 5 , SrcSpan "tests/examples/Attributes.hs" 419 5 419 5 , SrcSpan "tests/examples/Attributes.hs" 420 5 420 5 , SrcSpan "tests/examples/Attributes.hs" 421 5 421 5 , SrcSpan "tests/examples/Attributes.hs" 422 5 422 5 , SrcSpan "tests/examples/Attributes.hs" 423 5 423 5 , SrcSpan "tests/examples/Attributes.hs" 424 5 424 5 , SrcSpan "tests/examples/Attributes.hs" 425 5 425 5 , SrcSpan "tests/examples/Attributes.hs" 426 5 426 5 , SrcSpan "tests/examples/Attributes.hs" 427 5 427 5 , SrcSpan "tests/examples/Attributes.hs" 428 5 428 5 , SrcSpan "tests/examples/Attributes.hs" 429 5 429 5 , SrcSpan "tests/examples/Attributes.hs" 430 5 430 5 , SrcSpan "tests/examples/Attributes.hs" 431 5 431 5 , SrcSpan "tests/examples/Attributes.hs" 432 5 432 5 , SrcSpan "tests/examples/Attributes.hs" 433 5 433 5 , SrcSpan "tests/examples/Attributes.hs" 434 5 434 5 , SrcSpan "tests/examples/Attributes.hs" 435 5 435 5 , SrcSpan "tests/examples/Attributes.hs" 436 5 436 5 , SrcSpan "tests/examples/Attributes.hs" 437 5 437 5 , SrcSpan "tests/examples/Attributes.hs" 438 5 438 5 , SrcSpan "tests/examples/Attributes.hs" 439 5 439 5 , SrcSpan "tests/examples/Attributes.hs" 440 5 440 5 , SrcSpan "tests/examples/Attributes.hs" 441 5 441 5 , SrcSpan "tests/examples/Attributes.hs" 442 5 442 5 , SrcSpan "tests/examples/Attributes.hs" 443 5 443 5 , SrcSpan "tests/examples/Attributes.hs" 444 5 444 5 , SrcSpan "tests/examples/Attributes.hs" 445 5 445 5 , SrcSpan "tests/examples/Attributes.hs" 446 5 446 5 , SrcSpan "tests/examples/Attributes.hs" 447 5 447 5 , SrcSpan "tests/examples/Attributes.hs" 448 5 448 5 , SrcSpan "tests/examples/Attributes.hs" 449 5 449 5 , SrcSpan "tests/examples/Attributes.hs" 450 5 450 5 , SrcSpan "tests/examples/Attributes.hs" 451 5 451 5 , SrcSpan "tests/examples/Attributes.hs" 452 5 452 5 , SrcSpan "tests/examples/Attributes.hs" 453 5 453 5 , SrcSpan "tests/examples/Attributes.hs" 454 5 454 5 , SrcSpan "tests/examples/Attributes.hs" 455 5 455 5 , SrcSpan "tests/examples/Attributes.hs" 456 5 456 5 , SrcSpan "tests/examples/Attributes.hs" 457 5 457 5 , SrcSpan "tests/examples/Attributes.hs" 458 5 458 5 , SrcSpan "tests/examples/Attributes.hs" 459 5 459 5 , SrcSpan "tests/examples/Attributes.hs" 460 5 460 5 , SrcSpan "tests/examples/Attributes.hs" 461 5 461 5 , SrcSpan "tests/examples/Attributes.hs" 462 5 462 5 , SrcSpan "tests/examples/Attributes.hs" 463 5 463 5 , SrcSpan "tests/examples/Attributes.hs" 464 5 464 5 , SrcSpan "tests/examples/Attributes.hs" 465 5 465 5 , SrcSpan "tests/examples/Attributes.hs" 466 5 466 5 , SrcSpan "tests/examples/Attributes.hs" 467 5 467 5 , SrcSpan "tests/examples/Attributes.hs" 468 5 468 5 , SrcSpan "tests/examples/Attributes.hs" 469 5 469 5 , SrcSpan "tests/examples/Attributes.hs" 470 5 470 5 , SrcSpan "tests/examples/Attributes.hs" 471 5 471 5 , SrcSpan "tests/examples/Attributes.hs" 472 5 472 5 , SrcSpan "tests/examples/Attributes.hs" 473 5 473 5 , SrcSpan "tests/examples/Attributes.hs" 474 5 474 5 , SrcSpan "tests/examples/Attributes.hs" 475 5 475 5 , SrcSpan "tests/examples/Attributes.hs" 476 5 476 5 , SrcSpan "tests/examples/Attributes.hs" 477 5 477 5 , SrcSpan "tests/examples/Attributes.hs" 478 5 478 5 , SrcSpan "tests/examples/Attributes.hs" 479 5 479 5 , SrcSpan "tests/examples/Attributes.hs" 480 5 480 5 , SrcSpan "tests/examples/Attributes.hs" 481 5 481 5 , SrcSpan "tests/examples/Attributes.hs" 482 5 482 5 , SrcSpan "tests/examples/Attributes.hs" 483 5 483 5 , SrcSpan "tests/examples/Attributes.hs" 484 5 484 5 , SrcSpan "tests/examples/Attributes.hs" 485 5 485 5 , SrcSpan "tests/examples/Attributes.hs" 486 5 486 5 , SrcSpan "tests/examples/Attributes.hs" 487 5 487 5 , SrcSpan "tests/examples/Attributes.hs" 488 5 488 5 , SrcSpan "tests/examples/Attributes.hs" 489 5 489 5 , SrcSpan "tests/examples/Attributes.hs" 490 5 490 5 , SrcSpan "tests/examples/Attributes.hs" 491 5 491 5 , SrcSpan "tests/examples/Attributes.hs" 492 5 492 5 , SrcSpan "tests/examples/Attributes.hs" 493 5 493 5 , SrcSpan "tests/examples/Attributes.hs" 494 5 494 5 , SrcSpan "tests/examples/Attributes.hs" 495 5 495 5 , SrcSpan "tests/examples/Attributes.hs" 496 5 496 5 , SrcSpan "tests/examples/Attributes.hs" 497 5 497 5 , SrcSpan "tests/examples/Attributes.hs" 499 5 499 5 , SrcSpan "tests/examples/Attributes.hs" 501 1 501 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 10 353 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 10 353 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 10 353 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 10 353 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 10 353 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 19 353 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 19 353 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 353 19 353 28 , srcInfoPoints = [] } "Attribute"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 5 497 54 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 5 497 54 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 5 354 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 5 354 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 13 354 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 354 13 354 14 , SrcSpan "tests/examples/Attributes.hs" 354 23 354 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 14 354 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 14 354 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 14 354 21 , srcInfoPoints = [] } "Damping")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 22 354 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 22 354 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 36 354 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 354 36 354 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 38 354 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 38 354 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 38 354 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 38 354 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 38 354 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 49 354 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 49 354 58 , srcInfoPoints = [] } "Damping" "Damping"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 59 354 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 59 354 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 354 59 354 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 5 355 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 5 355 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 13 355 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 355 13 355 14 , SrcSpan "tests/examples/Attributes.hs" 355 17 355 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 14 355 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 14 355 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 14 355 15 , srcInfoPoints = [] } "K")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 16 355 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 16 355 17 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 36 355 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 355 36 355 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 38 355 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 38 355 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 38 355 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 38 355 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 38 355 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 49 355 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 49 355 52 , srcInfoPoints = [] } "K" "K"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 53 355 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 53 355 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 355 53 355 54 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 5 356 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 5 356 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 13 356 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 356 13 356 14 , SrcSpan "tests/examples/Attributes.hs" 356 19 356 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 14 356 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 14 356 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 14 356 17 , srcInfoPoints = [] } "URL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 18 356 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 18 356 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 36 356 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 356 36 356 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 38 356 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 38 356 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 38 356 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 38 356 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 38 356 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 49 356 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 49 356 54 , srcInfoPoints = [] } "URL" "URL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 55 356 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 55 356 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 356 55 356 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 5 357 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 5 357 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 13 357 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 357 13 357 14 , SrcSpan "tests/examples/Attributes.hs" 357 25 357 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 14 357 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 14 357 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 14 357 23 , srcInfoPoints = [] } "ArrowHead")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 24 357 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 24 357 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 36 357 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 357 36 357 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 38 357 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 38 357 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 38 357 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 38 357 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 38 357 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 49 357 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 49 357 60 , srcInfoPoints = [] } "arrowhead" "arrowhead"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 61 357 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 61 357 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 357 61 357 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 5 358 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 5 358 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 13 358 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 358 13 358 14 , SrcSpan "tests/examples/Attributes.hs" 358 25 358 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 14 358 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 14 358 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 14 358 23 , srcInfoPoints = [] } "ArrowSize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 24 358 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 24 358 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 36 358 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 358 36 358 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 38 358 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 38 358 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 38 358 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 38 358 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 38 358 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 49 358 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 49 358 60 , srcInfoPoints = [] } "arrowsize" "arrowsize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 61 358 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 61 358 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 358 61 358 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 5 359 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 5 359 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 13 359 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 359 13 359 14 , SrcSpan "tests/examples/Attributes.hs" 359 25 359 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 14 359 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 14 359 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 14 359 23 , srcInfoPoints = [] } "ArrowTail")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 24 359 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 24 359 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 36 359 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 359 36 359 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 38 359 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 38 359 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 38 359 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 38 359 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 38 359 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 49 359 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 49 359 60 , srcInfoPoints = [] } "arrowtail" "arrowtail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 61 359 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 61 359 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 359 61 359 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 5 360 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 5 360 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 13 360 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 360 13 360 14 , SrcSpan "tests/examples/Attributes.hs" 360 22 360 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 14 360 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 14 360 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 14 360 20 , srcInfoPoints = [] } "Aspect")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 21 360 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 21 360 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 36 360 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 360 36 360 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 38 360 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 38 360 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 38 360 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 38 360 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 38 360 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 49 360 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 49 360 57 , srcInfoPoints = [] } "aspect" "aspect"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 58 360 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 58 360 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 360 58 360 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 5 361 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 5 361 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 13 361 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 361 13 361 14 , SrcSpan "tests/examples/Attributes.hs" 361 18 361 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 14 361 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 14 361 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 14 361 16 , srcInfoPoints = [] } "Bb")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 17 361 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 17 361 18 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 36 361 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 361 36 361 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 38 361 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 38 361 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 38 361 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 38 361 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 38 361 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 49 361 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 49 361 53 , srcInfoPoints = [] } "bb" "bb"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 54 361 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 54 361 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 361 54 361 55 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 5 362 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 5 362 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 13 362 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 362 13 362 14 , SrcSpan "tests/examples/Attributes.hs" 362 23 362 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 14 362 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 14 362 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 14 362 21 , srcInfoPoints = [] } "BgColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 22 362 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 22 362 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 36 362 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 362 36 362 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 38 362 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 38 362 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 38 362 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 38 362 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 38 362 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 49 362 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 49 362 58 , srcInfoPoints = [] } "bgcolor" "bgcolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 59 362 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 59 362 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 362 59 362 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 5 363 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 5 363 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 13 363 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 363 13 363 14 , SrcSpan "tests/examples/Attributes.hs" 363 22 363 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 14 363 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 14 363 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 14 363 20 , srcInfoPoints = [] } "Center")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 21 363 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 21 363 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 36 363 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 363 36 363 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 38 363 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 38 363 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 38 363 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 38 363 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 38 363 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 49 363 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 49 363 57 , srcInfoPoints = [] } "center" "center"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 58 363 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 58 363 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 363 58 363 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 5 364 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 5 364 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 13 364 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 364 13 364 14 , SrcSpan "tests/examples/Attributes.hs" 364 23 364 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 14 364 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 14 364 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 14 364 21 , srcInfoPoints = [] } "Charset")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 22 364 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 22 364 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 36 364 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 364 36 364 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 38 364 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 38 364 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 38 364 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 38 364 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 38 364 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 49 364 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 49 364 58 , srcInfoPoints = [] } "charset" "charset"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 59 364 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 59 364 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 364 59 364 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 5 365 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 5 365 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 13 365 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 365 13 365 14 , SrcSpan "tests/examples/Attributes.hs" 365 27 365 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 14 365 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 14 365 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 14 365 25 , srcInfoPoints = [] } "ClusterRank")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 26 365 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 26 365 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 36 365 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 365 36 365 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 38 365 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 38 365 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 38 365 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 38 365 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 38 365 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 49 365 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 49 365 62 , srcInfoPoints = [] } "clusterrank" "clusterrank"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 63 365 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 63 365 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 365 63 365 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 5 366 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 5 366 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 13 366 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 366 13 366 14 , SrcSpan "tests/examples/Attributes.hs" 366 27 366 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 14 366 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 14 366 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 14 366 25 , srcInfoPoints = [] } "ColorScheme")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 26 366 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 26 366 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 36 366 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 366 36 366 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 38 366 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 38 366 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 38 366 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 38 366 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 38 366 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 49 366 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 49 366 62 , srcInfoPoints = [] } "colorscheme" "colorscheme"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 63 366 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 63 366 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 366 63 366 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 5 367 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 5 367 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 13 367 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 367 13 367 14 , SrcSpan "tests/examples/Attributes.hs" 367 21 367 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 14 367 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 14 367 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 14 367 19 , srcInfoPoints = [] } "Color")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 20 367 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 20 367 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 36 367 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 367 36 367 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 38 367 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 38 367 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 38 367 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 38 367 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 38 367 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 49 367 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 49 367 56 , srcInfoPoints = [] } "color" "color"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 57 367 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 57 367 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 367 57 367 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 5 368 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 5 368 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 13 368 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 368 13 368 14 , SrcSpan "tests/examples/Attributes.hs" 368 23 368 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 14 368 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 14 368 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 14 368 21 , srcInfoPoints = [] } "Comment")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 22 368 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 22 368 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 36 368 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 368 36 368 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 38 368 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 38 368 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 38 368 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 38 368 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 38 368 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 49 368 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 49 368 58 , srcInfoPoints = [] } "comment" "comment"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 59 368 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 59 368 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 368 59 368 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 5 369 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 5 369 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 13 369 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 369 13 369 14 , SrcSpan "tests/examples/Attributes.hs" 369 24 369 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 14 369 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 14 369 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 14 369 22 , srcInfoPoints = [] } "Compound")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 23 369 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 23 369 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 36 369 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 369 36 369 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 38 369 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 38 369 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 38 369 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 38 369 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 38 369 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 49 369 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 49 369 59 , srcInfoPoints = [] } "compound" "compound"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 60 369 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 60 369 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 369 60 369 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 5 370 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 5 370 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 13 370 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 370 13 370 14 , SrcSpan "tests/examples/Attributes.hs" 370 27 370 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 14 370 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 14 370 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 14 370 25 , srcInfoPoints = [] } "Concentrate")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 26 370 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 26 370 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 36 370 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 370 36 370 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 38 370 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 38 370 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 38 370 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 38 370 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 38 370 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 49 370 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 49 370 62 , srcInfoPoints = [] } "concentrate" "concentrate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 63 370 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 63 370 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 370 63 370 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 5 371 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 5 371 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 13 371 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 371 13 371 14 , SrcSpan "tests/examples/Attributes.hs" 371 26 371 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 14 371 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 14 371 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 14 371 24 , srcInfoPoints = [] } "Constraint")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 25 371 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 25 371 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 36 371 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 371 36 371 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 38 371 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 38 371 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 38 371 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 38 371 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 38 371 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 49 371 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 49 371 61 , srcInfoPoints = [] } "constraint" "constraint"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 62 371 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 62 371 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 371 62 371 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 5 372 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 5 372 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 13 372 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 372 13 372 14 , SrcSpan "tests/examples/Attributes.hs" 372 24 372 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 14 372 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 14 372 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 14 372 22 , srcInfoPoints = [] } "Decorate")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 23 372 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 23 372 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 36 372 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 372 36 372 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 38 372 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 38 372 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 38 372 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 38 372 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 38 372 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 49 372 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 49 372 59 , srcInfoPoints = [] } "decorate" "decorate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 60 372 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 60 372 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 372 60 372 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 5 373 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 5 373 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 13 373 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 373 13 373 14 , SrcSpan "tests/examples/Attributes.hs" 373 27 373 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 14 373 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 14 373 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 14 373 25 , srcInfoPoints = [] } "DefaultDist")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 26 373 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 26 373 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 36 373 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 373 36 373 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 38 373 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 38 373 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 38 373 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 38 373 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 38 373 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 49 373 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 49 373 62 , srcInfoPoints = [] } "defaultdist" "defaultdist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 63 373 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 63 373 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 373 63 373 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 5 374 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 5 374 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 13 374 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 374 13 374 14 , SrcSpan "tests/examples/Attributes.hs" 374 21 374 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 14 374 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 14 374 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 14 374 19 , srcInfoPoints = [] } "Dimen")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 20 374 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 20 374 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 36 374 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 374 36 374 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 38 374 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 38 374 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 38 374 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 38 374 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 38 374 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 49 374 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 49 374 56 , srcInfoPoints = [] } "dimen" "dimen"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 57 374 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 57 374 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 374 57 374 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 5 375 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 5 375 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 13 375 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 375 13 375 14 , SrcSpan "tests/examples/Attributes.hs" 375 19 375 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 14 375 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 14 375 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 14 375 17 , srcInfoPoints = [] } "Dim")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 18 375 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 18 375 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 36 375 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 375 36 375 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 38 375 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 38 375 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 38 375 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 38 375 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 38 375 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 49 375 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 49 375 54 , srcInfoPoints = [] } "dim" "dim"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 55 375 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 55 375 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 375 55 375 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 5 376 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 5 376 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 13 376 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 376 13 376 14 , SrcSpan "tests/examples/Attributes.hs" 376 19 376 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 14 376 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 14 376 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 14 376 17 , srcInfoPoints = [] } "Dir")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 18 376 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 18 376 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 36 376 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 376 36 376 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 38 376 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 38 376 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 38 376 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 38 376 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 38 376 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 49 376 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 49 376 54 , srcInfoPoints = [] } "dir" "dir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 55 376 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 55 376 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 376 55 376 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 5 377 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 5 377 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 13 377 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 377 13 377 14 , SrcSpan "tests/examples/Attributes.hs" 377 34 377 35 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 14 377 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 14 377 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 14 377 32 , srcInfoPoints = [] } "DirEdgeConstraints")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 33 377 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 33 377 34 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 36 377 71 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 377 36 377 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 38 377 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 38 377 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 38 377 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 38 377 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 38 377 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 49 377 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 49 377 69 , srcInfoPoints = [] } "diredgeconstraints" "diredgeconstraints"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 70 377 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 70 377 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 377 70 377 71 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 5 378 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 5 378 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 13 378 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 378 13 378 14 , SrcSpan "tests/examples/Attributes.hs" 378 26 378 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 14 378 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 14 378 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 14 378 24 , srcInfoPoints = [] } "Distortion")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 25 378 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 25 378 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 36 378 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 378 36 378 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 38 378 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 38 378 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 38 378 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 38 378 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 38 378 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 49 378 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 49 378 61 , srcInfoPoints = [] } "distortion" "distortion"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 62 378 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 62 378 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 378 62 378 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 5 379 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 5 379 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 13 379 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 379 13 379 14 , SrcSpan "tests/examples/Attributes.hs" 379 19 379 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 14 379 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 14 379 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 14 379 17 , srcInfoPoints = [] } "DPI")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 18 379 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 18 379 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 36 379 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 379 36 379 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 38 379 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 38 379 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 38 379 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 38 379 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 38 379 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 49 379 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 49 379 54 , srcInfoPoints = [] } "dpi" "dpi"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 55 379 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 55 379 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 379 55 379 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 5 380 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 5 380 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 13 380 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 380 13 380 14 , SrcSpan "tests/examples/Attributes.hs" 380 23 380 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 14 380 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 14 380 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 14 380 21 , srcInfoPoints = [] } "EdgeURL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 22 380 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 22 380 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 36 380 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 380 36 380 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 38 380 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 38 380 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 38 380 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 38 380 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 38 380 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 49 380 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 49 380 58 , srcInfoPoints = [] } "edgeURL" "edgeURL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 59 380 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 59 380 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 380 59 380 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 5 381 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 5 381 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 13 381 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 381 13 381 14 , SrcSpan "tests/examples/Attributes.hs" 381 26 381 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 14 381 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 14 381 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 14 381 24 , srcInfoPoints = [] } "EdgeTarget")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 25 381 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 25 381 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 36 381 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 381 36 381 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 38 381 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 38 381 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 38 381 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 38 381 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 38 381 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 49 381 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 49 381 61 , srcInfoPoints = [] } "edgetarget" "edgetarget"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 62 381 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 62 381 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 381 62 381 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 5 382 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 5 382 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 13 382 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 382 13 382 14 , SrcSpan "tests/examples/Attributes.hs" 382 27 382 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 14 382 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 14 382 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 14 382 25 , srcInfoPoints = [] } "EdgeTooltip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 26 382 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 26 382 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 36 382 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 382 36 382 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 38 382 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 38 382 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 38 382 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 38 382 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 38 382 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 49 382 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 49 382 62 , srcInfoPoints = [] } "edgetooltip" "edgetooltip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 63 382 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 63 382 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 382 63 382 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 5 383 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 5 383 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 13 383 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 383 13 383 14 , SrcSpan "tests/examples/Attributes.hs" 383 23 383 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 14 383 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 14 383 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 14 383 21 , srcInfoPoints = [] } "Epsilon")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 22 383 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 22 383 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 36 383 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 383 36 383 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 38 383 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 38 383 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 38 383 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 38 383 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 38 383 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 49 383 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 49 383 58 , srcInfoPoints = [] } "epsilon" "epsilon"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 59 383 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 59 383 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 383 59 383 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 5 384 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 5 384 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 13 384 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 384 13 384 14 , SrcSpan "tests/examples/Attributes.hs" 384 20 384 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 14 384 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 14 384 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 14 384 18 , srcInfoPoints = [] } "ESep")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 19 384 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 19 384 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 36 384 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 384 36 384 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 38 384 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 38 384 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 38 384 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 38 384 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 38 384 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 49 384 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 49 384 55 , srcInfoPoints = [] } "esep" "esep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 56 384 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 56 384 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 384 56 384 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 5 385 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 5 385 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 13 385 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 385 13 385 14 , SrcSpan "tests/examples/Attributes.hs" 385 25 385 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 14 385 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 14 385 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 14 385 23 , srcInfoPoints = [] } "FillColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 24 385 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 24 385 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 36 385 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 385 36 385 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 38 385 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 38 385 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 38 385 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 38 385 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 38 385 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 49 385 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 49 385 60 , srcInfoPoints = [] } "fillcolor" "fillcolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 61 385 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 61 385 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 385 61 385 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 5 386 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 5 386 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 13 386 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 386 13 386 14 , SrcSpan "tests/examples/Attributes.hs" 386 25 386 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 14 386 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 14 386 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 14 386 23 , srcInfoPoints = [] } "FixedSize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 24 386 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 24 386 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 36 386 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 386 36 386 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 38 386 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 38 386 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 38 386 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 38 386 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 38 386 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 49 386 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 49 386 60 , srcInfoPoints = [] } "fixedsize" "fixedsize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 61 386 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 61 386 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 386 61 386 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 5 387 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 5 387 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 13 387 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 387 13 387 14 , SrcSpan "tests/examples/Attributes.hs" 387 25 387 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 14 387 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 14 387 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 14 387 23 , srcInfoPoints = [] } "FontColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 24 387 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 24 387 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 36 387 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 387 36 387 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 38 387 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 38 387 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 38 387 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 38 387 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 38 387 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 49 387 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 49 387 60 , srcInfoPoints = [] } "fontcolor" "fontcolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 61 387 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 61 387 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 387 61 387 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 5 388 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 5 388 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 13 388 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 388 13 388 14 , SrcSpan "tests/examples/Attributes.hs" 388 24 388 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 14 388 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 14 388 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 14 388 22 , srcInfoPoints = [] } "FontName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 23 388 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 23 388 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 36 388 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 388 36 388 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 38 388 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 38 388 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 38 388 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 38 388 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 38 388 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 49 388 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 49 388 59 , srcInfoPoints = [] } "fontname" "fontname"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 60 388 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 60 388 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 388 60 388 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 5 389 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 5 389 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 13 389 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 389 13 389 14 , SrcSpan "tests/examples/Attributes.hs" 389 25 389 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 14 389 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 14 389 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 14 389 23 , srcInfoPoints = [] } "FontNames")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 24 389 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 24 389 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 36 389 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 389 36 389 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 38 389 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 38 389 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 38 389 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 38 389 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 38 389 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 49 389 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 49 389 60 , srcInfoPoints = [] } "fontnames" "fontnames"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 61 389 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 61 389 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 389 61 389 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 5 390 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 5 390 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 13 390 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 390 13 390 14 , SrcSpan "tests/examples/Attributes.hs" 390 24 390 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 14 390 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 14 390 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 14 390 22 , srcInfoPoints = [] } "FontPath")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 23 390 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 23 390 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 36 390 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 390 36 390 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 38 390 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 38 390 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 38 390 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 38 390 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 38 390 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 49 390 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 49 390 59 , srcInfoPoints = [] } "fontpath" "fontpath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 60 390 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 60 390 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 390 60 390 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 5 391 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 5 391 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 13 391 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 391 13 391 14 , SrcSpan "tests/examples/Attributes.hs" 391 24 391 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 14 391 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 14 391 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 14 391 22 , srcInfoPoints = [] } "FontSize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 23 391 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 23 391 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 36 391 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 391 36 391 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 38 391 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 38 391 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 38 391 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 38 391 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 38 391 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 49 391 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 49 391 59 , srcInfoPoints = [] } "fontsize" "fontsize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 60 391 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 60 391 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 391 60 391 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 5 392 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 5 392 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 13 392 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 392 13 392 14 , SrcSpan "tests/examples/Attributes.hs" 392 21 392 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 14 392 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 14 392 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 14 392 19 , srcInfoPoints = [] } "Group")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 20 392 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 20 392 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 36 392 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 392 36 392 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 38 392 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 38 392 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 38 392 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 38 392 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 38 392 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 49 392 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 49 392 56 , srcInfoPoints = [] } "group" "group"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 57 392 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 57 392 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 392 57 392 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 5 393 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 5 393 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 13 393 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 393 13 393 14 , SrcSpan "tests/examples/Attributes.hs" 393 23 393 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 14 393 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 14 393 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 14 393 21 , srcInfoPoints = [] } "HeadURL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 22 393 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 22 393 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 36 393 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 393 36 393 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 38 393 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 38 393 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 38 393 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 38 393 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 38 393 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 49 393 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 49 393 58 , srcInfoPoints = [] } "headURL" "headURL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 59 393 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 59 393 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 393 59 393 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 5 394 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 5 394 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 13 394 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 394 13 394 14 , SrcSpan "tests/examples/Attributes.hs" 394 24 394 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 14 394 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 14 394 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 14 394 22 , srcInfoPoints = [] } "HeadClip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 23 394 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 23 394 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 36 394 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 394 36 394 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 38 394 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 38 394 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 38 394 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 38 394 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 38 394 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 49 394 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 49 394 59 , srcInfoPoints = [] } "headclip" "headclip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 60 394 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 60 394 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 394 60 394 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 5 395 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 5 395 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 13 395 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 395 13 395 14 , SrcSpan "tests/examples/Attributes.hs" 395 25 395 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 14 395 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 14 395 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 14 395 23 , srcInfoPoints = [] } "HeadLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 24 395 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 24 395 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 36 395 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 395 36 395 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 38 395 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 38 395 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 38 395 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 38 395 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 38 395 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 49 395 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 49 395 60 , srcInfoPoints = [] } "headlabel" "headlabel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 61 395 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 61 395 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 395 61 395 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 5 396 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 5 396 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 13 396 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 396 13 396 14 , SrcSpan "tests/examples/Attributes.hs" 396 24 396 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 14 396 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 14 396 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 14 396 22 , srcInfoPoints = [] } "HeadPort")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 23 396 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 23 396 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 36 396 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 396 36 396 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 38 396 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 38 396 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 38 396 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 38 396 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 38 396 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 49 396 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 49 396 59 , srcInfoPoints = [] } "headport" "headport"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 60 396 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 60 396 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 396 60 396 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 5 397 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 5 397 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 13 397 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 397 13 397 14 , SrcSpan "tests/examples/Attributes.hs" 397 26 397 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 14 397 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 14 397 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 14 397 24 , srcInfoPoints = [] } "HeadTarget")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 25 397 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 25 397 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 36 397 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 397 36 397 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 38 397 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 38 397 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 38 397 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 38 397 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 38 397 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 49 397 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 49 397 61 , srcInfoPoints = [] } "headtarget" "headtarget"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 62 397 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 62 397 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 397 62 397 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 5 398 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 5 398 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 13 398 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 398 13 398 14 , SrcSpan "tests/examples/Attributes.hs" 398 27 398 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 14 398 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 14 398 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 14 398 25 , srcInfoPoints = [] } "HeadTooltip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 26 398 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 26 398 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 36 398 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 398 36 398 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 38 398 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 38 398 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 38 398 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 38 398 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 38 398 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 49 398 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 49 398 62 , srcInfoPoints = [] } "headtooltip" "headtooltip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 63 398 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 63 398 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 398 63 398 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 5 399 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 5 399 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 13 399 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 399 13 399 14 , SrcSpan "tests/examples/Attributes.hs" 399 22 399 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 14 399 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 14 399 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 14 399 20 , srcInfoPoints = [] } "Height")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 21 399 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 21 399 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 36 399 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 399 36 399 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 38 399 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 38 399 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 38 399 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 38 399 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 38 399 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 49 399 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 49 399 57 , srcInfoPoints = [] } "height" "height"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 58 399 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 58 399 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 399 58 399 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 5 400 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 5 400 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 13 400 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 400 13 400 14 , SrcSpan "tests/examples/Attributes.hs" 400 18 400 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 14 400 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 14 400 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 14 400 16 , srcInfoPoints = [] } "ID")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 17 400 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 17 400 18 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 36 400 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 400 36 400 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 38 400 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 38 400 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 38 400 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 38 400 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 38 400 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 49 400 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 49 400 53 , srcInfoPoints = [] } "id" "id"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 54 400 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 54 400 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 400 54 400 55 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 5 401 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 5 401 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 13 401 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 401 13 401 14 , SrcSpan "tests/examples/Attributes.hs" 401 21 401 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 14 401 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 14 401 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 14 401 19 , srcInfoPoints = [] } "Image")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 20 401 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 20 401 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 36 401 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 401 36 401 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 38 401 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 38 401 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 38 401 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 38 401 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 38 401 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 49 401 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 49 401 56 , srcInfoPoints = [] } "image" "image"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 57 401 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 57 401 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 401 57 401 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 5 402 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 5 402 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 13 402 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 402 13 402 14 , SrcSpan "tests/examples/Attributes.hs" 402 26 402 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 14 402 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 14 402 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 14 402 24 , srcInfoPoints = [] } "ImageScale")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 25 402 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 25 402 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 36 402 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 402 36 402 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 38 402 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 38 402 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 38 402 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 38 402 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 38 402 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 49 402 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 49 402 61 , srcInfoPoints = [] } "imagescale" "imagescale"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 62 402 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 62 402 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 402 62 402 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 5 403 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 5 403 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 13 403 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 403 13 403 14 , SrcSpan "tests/examples/Attributes.hs" 403 24 403 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 14 403 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 14 403 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 14 403 22 , srcInfoPoints = [] } "LabelURL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 23 403 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 23 403 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 36 403 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 403 36 403 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 38 403 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 38 403 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 38 403 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 38 403 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 38 403 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 49 403 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 49 403 59 , srcInfoPoints = [] } "labelURL" "labelURL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 60 403 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 60 403 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 403 60 403 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 5 404 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 5 404 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 13 404 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 404 13 404 14 , SrcSpan "tests/examples/Attributes.hs" 404 26 404 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 14 404 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 14 404 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 14 404 24 , srcInfoPoints = [] } "LabelAngle")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 25 404 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 25 404 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 36 404 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 404 36 404 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 38 404 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 38 404 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 38 404 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 38 404 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 38 404 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 49 404 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 49 404 61 , srcInfoPoints = [] } "labelangle" "labelangle"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 62 404 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 62 404 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 404 62 404 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 5 405 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 5 405 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 13 405 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 405 13 405 14 , SrcSpan "tests/examples/Attributes.hs" 405 29 405 30 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 14 405 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 14 405 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 14 405 27 , srcInfoPoints = [] } "LabelDistance")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 28 405 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 28 405 29 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 36 405 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 405 36 405 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 38 405 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 38 405 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 38 405 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 38 405 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 38 405 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 49 405 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 49 405 64 , srcInfoPoints = [] } "labeldistance" "labeldistance"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 65 405 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 65 405 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 405 65 405 66 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 5 406 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 5 406 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 13 406 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 406 13 406 14 , SrcSpan "tests/examples/Attributes.hs" 406 26 406 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 14 406 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 14 406 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 14 406 24 , srcInfoPoints = [] } "LabelFloat")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 25 406 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 25 406 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 36 406 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 406 36 406 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 38 406 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 38 406 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 38 406 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 38 406 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 38 406 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 49 406 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 49 406 61 , srcInfoPoints = [] } "labelfloat" "labelfloat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 62 406 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 62 406 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 406 62 406 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 5 407 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 5 407 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 13 407 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 407 13 407 14 , SrcSpan "tests/examples/Attributes.hs" 407 30 407 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 14 407 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 14 407 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 14 407 28 , srcInfoPoints = [] } "LabelFontColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 29 407 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 29 407 30 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 36 407 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 407 36 407 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 38 407 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 38 407 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 38 407 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 38 407 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 38 407 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 49 407 65 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 49 407 65 , srcInfoPoints = [] } "labelfontcolor" "labelfontcolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 66 407 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 66 407 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 407 66 407 67 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 5 408 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 5 408 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 13 408 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 408 13 408 14 , SrcSpan "tests/examples/Attributes.hs" 408 29 408 30 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 14 408 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 14 408 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 14 408 27 , srcInfoPoints = [] } "LabelFontName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 28 408 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 28 408 29 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 36 408 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 408 36 408 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 38 408 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 38 408 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 38 408 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 38 408 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 38 408 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 49 408 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 49 408 64 , srcInfoPoints = [] } "labelfontname" "labelfontname"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 65 408 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 65 408 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 408 65 408 66 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 5 409 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 5 409 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 13 409 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 409 13 409 14 , SrcSpan "tests/examples/Attributes.hs" 409 29 409 30 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 14 409 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 14 409 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 14 409 27 , srcInfoPoints = [] } "LabelFontSize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 28 409 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 28 409 29 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 36 409 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 409 36 409 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 38 409 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 38 409 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 38 409 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 38 409 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 38 409 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 49 409 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 49 409 64 , srcInfoPoints = [] } "labelfontsize" "labelfontsize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 65 409 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 65 409 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 409 65 409 66 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 5 410 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 5 410 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 13 410 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 410 13 410 14 , SrcSpan "tests/examples/Attributes.hs" 410 25 410 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 14 410 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 14 410 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 14 410 23 , srcInfoPoints = [] } "LabelJust")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 24 410 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 24 410 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 36 410 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 410 36 410 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 38 410 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 38 410 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 38 410 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 38 410 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 38 410 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 49 410 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 49 410 60 , srcInfoPoints = [] } "labeljust" "labeljust"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 61 410 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 61 410 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 410 61 410 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 5 411 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 5 411 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 13 411 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 411 13 411 14 , SrcSpan "tests/examples/Attributes.hs" 411 24 411 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 14 411 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 14 411 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 14 411 22 , srcInfoPoints = [] } "LabelLoc")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 23 411 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 23 411 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 36 411 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 411 36 411 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 38 411 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 38 411 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 38 411 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 38 411 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 38 411 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 49 411 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 49 411 59 , srcInfoPoints = [] } "labelloc" "labelloc"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 60 411 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 60 411 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 411 60 411 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 5 412 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 5 412 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 13 412 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 412 13 412 14 , SrcSpan "tests/examples/Attributes.hs" 412 27 412 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 14 412 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 14 412 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 14 412 25 , srcInfoPoints = [] } "LabelTarget")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 26 412 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 26 412 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 36 412 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 412 36 412 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 38 412 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 38 412 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 38 412 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 38 412 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 38 412 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 49 412 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 49 412 62 , srcInfoPoints = [] } "labeltarget" "labeltarget"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 63 412 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 63 412 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 412 63 412 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 5 413 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 5 413 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 13 413 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 413 13 413 14 , SrcSpan "tests/examples/Attributes.hs" 413 28 413 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 14 413 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 14 413 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 14 413 26 , srcInfoPoints = [] } "LabelTooltip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 27 413 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 27 413 28 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 36 413 65 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 413 36 413 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 38 413 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 38 413 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 38 413 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 38 413 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 38 413 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 49 413 63 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 49 413 63 , srcInfoPoints = [] } "labeltooltip" "labeltooltip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 64 413 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 64 413 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 413 64 413 65 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 5 414 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 5 414 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 13 414 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 414 13 414 14 , SrcSpan "tests/examples/Attributes.hs" 414 21 414 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 14 414 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 14 414 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 14 414 19 , srcInfoPoints = [] } "Label")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 20 414 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 20 414 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 36 414 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 414 36 414 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 38 414 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 38 414 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 38 414 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 38 414 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 38 414 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 49 414 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 49 414 56 , srcInfoPoints = [] } "label" "label"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 57 414 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 57 414 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 414 57 414 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 5 415 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 5 415 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 13 415 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 415 13 415 14 , SrcSpan "tests/examples/Attributes.hs" 415 25 415 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 14 415 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 14 415 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 14 415 23 , srcInfoPoints = [] } "Landscape")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 24 415 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 24 415 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 36 415 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 415 36 415 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 38 415 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 38 415 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 38 415 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 38 415 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 38 415 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 49 415 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 49 415 60 , srcInfoPoints = [] } "landscape" "landscape"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 61 415 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 61 415 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 415 61 415 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 5 416 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 5 416 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 13 416 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 416 13 416 14 , SrcSpan "tests/examples/Attributes.hs" 416 24 416 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 14 416 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 14 416 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 14 416 22 , srcInfoPoints = [] } "LayerSep")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 23 416 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 23 416 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 36 416 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 416 36 416 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 38 416 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 38 416 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 38 416 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 38 416 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 38 416 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 49 416 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 49 416 59 , srcInfoPoints = [] } "layersep" "layersep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 60 416 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 60 416 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 416 60 416 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 5 417 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 5 417 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 13 417 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 417 13 417 14 , SrcSpan "tests/examples/Attributes.hs" 417 22 417 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 14 417 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 14 417 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 14 417 20 , srcInfoPoints = [] } "Layers")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 21 417 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 21 417 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 36 417 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 417 36 417 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 38 417 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 38 417 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 38 417 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 38 417 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 38 417 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 49 417 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 49 417 57 , srcInfoPoints = [] } "layers" "layers"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 58 417 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 58 417 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 417 58 417 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 5 418 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 5 418 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 13 418 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 418 13 418 14 , SrcSpan "tests/examples/Attributes.hs" 418 21 418 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 14 418 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 14 418 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 14 418 19 , srcInfoPoints = [] } "Layer")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 20 418 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 20 418 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 36 418 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 418 36 418 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 38 418 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 38 418 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 38 418 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 38 418 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 38 418 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 49 418 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 49 418 56 , srcInfoPoints = [] } "layer" "layer"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 57 418 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 57 418 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 418 57 418 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 5 419 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 5 419 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 13 419 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 419 13 419 14 , SrcSpan "tests/examples/Attributes.hs" 419 22 419 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 14 419 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 14 419 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 14 419 20 , srcInfoPoints = [] } "Layout")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 21 419 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 21 419 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 36 419 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 419 36 419 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 38 419 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 38 419 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 38 419 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 38 419 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 38 419 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 49 419 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 49 419 57 , srcInfoPoints = [] } "layout" "layout"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 58 419 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 58 419 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 419 58 419 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 5 420 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 5 420 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 13 420 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 420 13 420 14 , SrcSpan "tests/examples/Attributes.hs" 420 19 420 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 14 420 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 14 420 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 14 420 17 , srcInfoPoints = [] } "Len")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 18 420 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 18 420 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 36 420 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 420 36 420 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 38 420 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 38 420 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 38 420 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 38 420 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 38 420 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 49 420 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 49 420 54 , srcInfoPoints = [] } "len" "len"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 55 420 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 55 420 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 420 55 420 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 5 421 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 5 421 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 13 421 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 421 13 421 14 , SrcSpan "tests/examples/Attributes.hs" 421 25 421 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 14 421 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 14 421 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 14 421 23 , srcInfoPoints = [] } "LevelsGap")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 24 421 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 24 421 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 36 421 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 421 36 421 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 38 421 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 38 421 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 38 421 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 38 421 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 38 421 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 49 421 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 49 421 60 , srcInfoPoints = [] } "levelsgap" "levelsgap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 61 421 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 61 421 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 421 61 421 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 5 422 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 5 422 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 13 422 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 422 13 422 14 , SrcSpan "tests/examples/Attributes.hs" 422 22 422 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 14 422 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 14 422 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 14 422 20 , srcInfoPoints = [] } "Levels")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 21 422 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 21 422 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 36 422 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 422 36 422 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 38 422 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 38 422 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 38 422 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 38 422 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 38 422 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 49 422 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 49 422 57 , srcInfoPoints = [] } "levels" "levels"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 58 422 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 58 422 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 422 58 422 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 5 423 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 5 423 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 13 423 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 423 13 423 14 , SrcSpan "tests/examples/Attributes.hs" 423 21 423 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 14 423 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 14 423 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 14 423 19 , srcInfoPoints = [] } "LHead")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 20 423 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 20 423 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 36 423 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 423 36 423 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 38 423 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 38 423 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 38 423 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 38 423 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 38 423 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 49 423 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 49 423 56 , srcInfoPoints = [] } "lhead" "lhead"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 57 423 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 57 423 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 423 57 423 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 5 424 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 5 424 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 13 424 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 424 13 424 14 , SrcSpan "tests/examples/Attributes.hs" 424 20 424 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 14 424 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 14 424 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 14 424 18 , srcInfoPoints = [] } "LPos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 19 424 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 19 424 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 36 424 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 424 36 424 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 38 424 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 38 424 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 38 424 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 38 424 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 38 424 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 49 424 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 49 424 53 , srcInfoPoints = [] } "lp" "lp"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 54 424 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 54 424 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 424 54 424 55 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 5 425 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 5 425 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 13 425 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 425 13 425 14 , SrcSpan "tests/examples/Attributes.hs" 425 21 425 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 14 425 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 14 425 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 14 425 19 , srcInfoPoints = [] } "LTail")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 20 425 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 20 425 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 36 425 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 425 36 425 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 38 425 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 38 425 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 38 425 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 38 425 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 38 425 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 49 425 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 49 425 56 , srcInfoPoints = [] } "ltail" "ltail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 57 425 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 57 425 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 425 57 425 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 5 426 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 5 426 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 13 426 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 426 13 426 14 , SrcSpan "tests/examples/Attributes.hs" 426 22 426 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 14 426 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 14 426 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 14 426 20 , srcInfoPoints = [] } "Margin")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 21 426 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 21 426 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 36 426 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 426 36 426 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 38 426 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 38 426 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 38 426 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 38 426 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 38 426 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 49 426 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 49 426 57 , srcInfoPoints = [] } "margin" "margin"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 58 426 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 58 426 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 426 58 426 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 5 427 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 5 427 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 13 427 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 427 13 427 14 , SrcSpan "tests/examples/Attributes.hs" 427 23 427 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 14 427 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 14 427 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 14 427 21 , srcInfoPoints = [] } "MaxIter")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 22 427 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 22 427 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 36 427 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 427 36 427 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 38 427 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 38 427 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 38 427 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 38 427 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 38 427 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 49 427 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 49 427 58 , srcInfoPoints = [] } "maxiter" "maxiter"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 59 427 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 59 427 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 427 59 427 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 5 428 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 5 428 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 13 428 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 428 13 428 14 , SrcSpan "tests/examples/Attributes.hs" 428 23 428 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 14 428 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 14 428 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 14 428 21 , srcInfoPoints = [] } "MCLimit")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 22 428 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 22 428 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 36 428 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 428 36 428 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 38 428 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 38 428 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 38 428 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 38 428 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 38 428 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 49 428 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 49 428 58 , srcInfoPoints = [] } "mclimit" "mclimit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 59 428 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 59 428 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 428 59 428 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 5 429 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 5 429 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 13 429 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 429 13 429 14 , SrcSpan "tests/examples/Attributes.hs" 429 23 429 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 14 429 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 14 429 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 14 429 21 , srcInfoPoints = [] } "MinDist")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 22 429 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 22 429 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 36 429 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 429 36 429 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 38 429 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 38 429 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 38 429 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 38 429 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 38 429 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 49 429 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 49 429 58 , srcInfoPoints = [] } "mindist" "mindist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 59 429 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 59 429 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 429 59 429 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 5 430 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 5 430 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 13 430 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 430 13 430 14 , SrcSpan "tests/examples/Attributes.hs" 430 22 430 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 14 430 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 14 430 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 14 430 20 , srcInfoPoints = [] } "MinLen")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 21 430 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 21 430 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 36 430 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 430 36 430 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 38 430 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 38 430 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 38 430 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 38 430 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 38 430 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 49 430 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 49 430 57 , srcInfoPoints = [] } "minlen" "minlen"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 58 430 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 58 430 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 430 58 430 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 5 431 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 5 431 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 13 431 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 431 13 431 14 , SrcSpan "tests/examples/Attributes.hs" 431 21 431 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 14 431 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 14 431 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 14 431 19 , srcInfoPoints = [] } "Model")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 20 431 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 20 431 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 36 431 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 431 36 431 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 38 431 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 38 431 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 38 431 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 38 431 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 38 431 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 49 431 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 49 431 56 , srcInfoPoints = [] } "model" "model"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 57 431 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 57 431 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 431 57 431 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 5 432 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 5 432 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 13 432 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 432 13 432 14 , SrcSpan "tests/examples/Attributes.hs" 432 20 432 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 14 432 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 14 432 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 14 432 18 , srcInfoPoints = [] } "Mode")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 19 432 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 19 432 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 36 432 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 432 36 432 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 38 432 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 38 432 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 38 432 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 38 432 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 38 432 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 49 432 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 49 432 55 , srcInfoPoints = [] } "mode" "mode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 56 432 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 56 432 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 432 56 432 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 5 433 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 5 433 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 13 433 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 433 13 433 14 , SrcSpan "tests/examples/Attributes.hs" 433 21 433 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 14 433 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 14 433 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 14 433 19 , srcInfoPoints = [] } "Mosek")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 20 433 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 20 433 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 36 433 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 433 36 433 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 38 433 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 38 433 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 38 433 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 38 433 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 38 433 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 49 433 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 49 433 56 , srcInfoPoints = [] } "mosek" "mosek"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 57 433 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 57 433 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 433 57 433 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 5 434 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 5 434 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 13 434 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 434 13 434 14 , SrcSpan "tests/examples/Attributes.hs" 434 23 434 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 14 434 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 14 434 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 14 434 21 , srcInfoPoints = [] } "NodeSep")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 22 434 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 22 434 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 36 434 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 434 36 434 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 38 434 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 38 434 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 38 434 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 38 434 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 38 434 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 49 434 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 49 434 58 , srcInfoPoints = [] } "nodesep" "nodesep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 59 434 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 59 434 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 434 59 434 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 5 435 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 5 435 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 13 435 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 435 13 435 14 , SrcSpan "tests/examples/Attributes.hs" 435 25 435 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 14 435 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 14 435 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 14 435 23 , srcInfoPoints = [] } "NoJustify")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 24 435 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 24 435 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 36 435 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 435 36 435 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 38 435 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 38 435 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 38 435 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 38 435 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 38 435 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 49 435 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 49 435 60 , srcInfoPoints = [] } "nojustify" "nojustify"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 61 435 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 61 435 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 435 61 435 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 5 436 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 5 436 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 13 436 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 436 13 436 14 , SrcSpan "tests/examples/Attributes.hs" 436 25 436 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 14 436 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 14 436 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 14 436 23 , srcInfoPoints = [] } "Normalize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 24 436 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 24 436 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 36 436 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 436 36 436 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 38 436 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 38 436 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 38 436 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 38 436 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 38 436 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 49 436 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 49 436 60 , srcInfoPoints = [] } "normalize" "normalize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 61 436 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 61 436 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 436 61 436 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 5 437 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 5 437 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 13 437 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 437 13 437 14 , SrcSpan "tests/examples/Attributes.hs" 437 24 437 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 14 437 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 14 437 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 14 437 22 , srcInfoPoints = [] } "Nslimit1")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 23 437 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 23 437 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 36 437 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 437 36 437 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 38 437 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 38 437 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 38 437 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 38 437 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 38 437 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 49 437 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 49 437 59 , srcInfoPoints = [] } "nslimit1" "nslimit1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 60 437 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 60 437 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 437 60 437 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 5 438 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 5 438 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 13 438 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 438 13 438 14 , SrcSpan "tests/examples/Attributes.hs" 438 23 438 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 14 438 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 14 438 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 14 438 21 , srcInfoPoints = [] } "Nslimit")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 22 438 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 22 438 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 36 438 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 438 36 438 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 38 438 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 38 438 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 38 438 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 38 438 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 38 438 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 49 438 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 49 438 58 , srcInfoPoints = [] } "nslimit" "nslimit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 59 438 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 59 438 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 438 59 438 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 5 439 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 5 439 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 13 439 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 439 13 439 14 , SrcSpan "tests/examples/Attributes.hs" 439 24 439 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 14 439 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 14 439 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 14 439 22 , srcInfoPoints = [] } "Ordering")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 23 439 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 23 439 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 36 439 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 439 36 439 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 38 439 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 38 439 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 38 439 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 38 439 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 38 439 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 49 439 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 49 439 59 , srcInfoPoints = [] } "ordering" "ordering"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 60 439 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 60 439 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 439 60 439 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 5 440 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 5 440 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 13 440 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 440 13 440 14 , SrcSpan "tests/examples/Attributes.hs" 440 27 440 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 14 440 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 14 440 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 14 440 25 , srcInfoPoints = [] } "Orientation")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 26 440 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 26 440 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 36 440 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 440 36 440 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 38 440 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 38 440 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 38 440 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 38 440 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 38 440 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 49 440 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 49 440 62 , srcInfoPoints = [] } "orientation" "orientation"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 63 440 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 63 440 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 440 63 440 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 5 441 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 5 441 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 13 441 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 441 13 441 14 , SrcSpan "tests/examples/Attributes.hs" 441 27 441 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 14 441 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 14 441 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 14 441 25 , srcInfoPoints = [] } "OutputOrder")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 26 441 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 26 441 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 36 441 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 441 36 441 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 38 441 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 38 441 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 38 441 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 38 441 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 38 441 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 49 441 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 49 441 62 , srcInfoPoints = [] } "outputorder" "outputorder"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 63 441 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 63 441 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 441 63 441 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 5 442 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 5 442 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 13 442 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 442 13 442 14 , SrcSpan "tests/examples/Attributes.hs" 442 30 442 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 14 442 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 14 442 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 14 442 28 , srcInfoPoints = [] } "OverlapScaling")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 29 442 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 29 442 30 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 36 442 68 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 442 36 442 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 38 442 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 38 442 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 38 442 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 38 442 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 38 442 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 49 442 66 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 49 442 66 , srcInfoPoints = [] } "overlap_scaling" "overlap_scaling"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 67 442 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 67 442 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 442 67 442 68 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 5 443 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 5 443 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 13 443 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 443 13 443 14 , SrcSpan "tests/examples/Attributes.hs" 443 23 443 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 14 443 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 14 443 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 14 443 21 , srcInfoPoints = [] } "Overlap")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 22 443 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 22 443 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 36 443 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 443 36 443 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 38 443 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 38 443 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 38 443 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 38 443 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 38 443 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 49 443 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 49 443 58 , srcInfoPoints = [] } "overlap" "overlap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 59 443 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 59 443 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 443 59 443 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 5 444 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 5 444 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 13 444 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 444 13 444 14 , SrcSpan "tests/examples/Attributes.hs" 444 24 444 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 14 444 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 14 444 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 14 444 22 , srcInfoPoints = [] } "PackMode")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 23 444 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 23 444 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 36 444 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 444 36 444 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 38 444 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 38 444 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 38 444 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 38 444 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 38 444 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 49 444 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 49 444 59 , srcInfoPoints = [] } "packmode" "packmode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 60 444 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 60 444 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 444 60 444 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 5 445 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 5 445 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 13 445 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 445 13 445 14 , SrcSpan "tests/examples/Attributes.hs" 445 20 445 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 14 445 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 14 445 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 14 445 18 , srcInfoPoints = [] } "Pack")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 19 445 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 19 445 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 36 445 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 445 36 445 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 38 445 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 38 445 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 38 445 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 38 445 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 38 445 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 49 445 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 49 445 55 , srcInfoPoints = [] } "pack" "pack"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 56 445 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 56 445 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 445 56 445 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 5 446 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 5 446 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 13 446 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 446 13 446 14 , SrcSpan "tests/examples/Attributes.hs" 446 19 446 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 14 446 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 14 446 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 14 446 17 , srcInfoPoints = [] } "Pad")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 18 446 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 18 446 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 36 446 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 446 36 446 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 38 446 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 38 446 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 38 446 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 38 446 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 38 446 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 49 446 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 49 446 54 , srcInfoPoints = [] } "pad" "pad"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 55 446 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 55 446 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 446 55 446 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 5 447 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 5 447 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 13 447 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 447 13 447 14 , SrcSpan "tests/examples/Attributes.hs" 447 23 447 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 14 447 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 14 447 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 14 447 21 , srcInfoPoints = [] } "PageDir")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 22 447 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 22 447 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 36 447 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 447 36 447 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 38 447 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 38 447 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 38 447 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 38 447 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 38 447 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 49 447 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 49 447 58 , srcInfoPoints = [] } "pagedir" "pagedir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 59 447 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 59 447 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 447 59 447 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 5 448 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 5 448 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 13 448 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 448 13 448 14 , SrcSpan "tests/examples/Attributes.hs" 448 20 448 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 14 448 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 14 448 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 14 448 18 , srcInfoPoints = [] } "Page")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 19 448 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 19 448 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 36 448 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 448 36 448 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 38 448 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 38 448 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 38 448 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 38 448 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 38 448 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 49 448 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 49 448 55 , srcInfoPoints = [] } "page" "page"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 56 448 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 56 448 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 448 56 448 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 5 449 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 5 449 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 13 449 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 449 13 449 14 , SrcSpan "tests/examples/Attributes.hs" 449 24 449 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 14 449 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 14 449 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 14 449 22 , srcInfoPoints = [] } "PenColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 23 449 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 23 449 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 36 449 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 449 36 449 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 38 449 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 38 449 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 38 449 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 38 449 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 38 449 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 49 449 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 49 449 59 , srcInfoPoints = [] } "pencolor" "pencolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 60 449 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 60 449 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 449 60 449 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 5 450 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 5 450 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 13 450 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 450 13 450 14 , SrcSpan "tests/examples/Attributes.hs" 450 24 450 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 14 450 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 14 450 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 14 450 22 , srcInfoPoints = [] } "PenWidth")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 23 450 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 23 450 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 36 450 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 450 36 450 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 38 450 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 38 450 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 38 450 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 38 450 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 38 450 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 49 450 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 49 450 59 , srcInfoPoints = [] } "penwidth" "penwidth"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 60 450 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 60 450 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 450 60 450 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 5 451 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 5 451 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 13 451 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 451 13 451 14 , SrcSpan "tests/examples/Attributes.hs" 451 27 451 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 14 451 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 14 451 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 14 451 25 , srcInfoPoints = [] } "Peripheries")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 26 451 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 26 451 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 36 451 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 451 36 451 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 38 451 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 38 451 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 38 451 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 38 451 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 38 451 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 49 451 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 49 451 62 , srcInfoPoints = [] } "peripheries" "peripheries"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 63 451 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 63 451 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 451 63 451 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 5 452 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 5 452 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 13 452 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 452 13 452 14 , SrcSpan "tests/examples/Attributes.hs" 452 19 452 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 14 452 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 14 452 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 14 452 17 , srcInfoPoints = [] } "Pin")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 18 452 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 18 452 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 36 452 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 452 36 452 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 38 452 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 38 452 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 38 452 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 38 452 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 38 452 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 49 452 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 49 452 54 , srcInfoPoints = [] } "pin" "pin"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 55 452 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 55 452 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 452 55 452 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 5 453 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 5 453 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 13 453 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 453 13 453 14 , SrcSpan "tests/examples/Attributes.hs" 453 19 453 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 14 453 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 14 453 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 14 453 17 , srcInfoPoints = [] } "Pos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 18 453 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 18 453 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 36 453 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 453 36 453 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 38 453 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 38 453 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 38 453 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 38 453 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 38 453 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 49 453 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 49 453 54 , srcInfoPoints = [] } "pos" "pos"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 55 453 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 55 453 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 453 55 453 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 5 454 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 5 454 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 13 454 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 454 13 454 14 , SrcSpan "tests/examples/Attributes.hs" 454 24 454 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 14 454 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 14 454 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 14 454 22 , srcInfoPoints = [] } "QuadTree")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 23 454 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 23 454 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 36 454 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 454 36 454 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 38 454 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 38 454 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 38 454 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 38 454 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 38 454 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 49 454 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 49 454 59 , srcInfoPoints = [] } "quadtree" "quadtree"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 60 454 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 60 454 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 454 60 454 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 5 455 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 5 455 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 13 455 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 455 13 455 14 , SrcSpan "tests/examples/Attributes.hs" 455 23 455 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 14 455 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 14 455 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 14 455 21 , srcInfoPoints = [] } "Quantum")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 22 455 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 22 455 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 36 455 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 455 36 455 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 38 455 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 38 455 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 38 455 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 38 455 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 38 455 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 49 455 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 49 455 58 , srcInfoPoints = [] } "quantum" "quantum"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 59 455 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 59 455 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 455 59 455 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 5 456 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 5 456 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 13 456 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 456 13 456 14 , SrcSpan "tests/examples/Attributes.hs" 456 23 456 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 14 456 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 14 456 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 14 456 21 , srcInfoPoints = [] } "RankDir")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 22 456 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 22 456 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 36 456 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 456 36 456 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 38 456 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 38 456 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 38 456 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 38 456 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 38 456 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 49 456 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 49 456 58 , srcInfoPoints = [] } "rankdir" "rankdir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 59 456 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 59 456 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 456 59 456 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 5 457 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 5 457 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 13 457 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 457 13 457 14 , SrcSpan "tests/examples/Attributes.hs" 457 23 457 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 14 457 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 14 457 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 14 457 21 , srcInfoPoints = [] } "RankSep")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 22 457 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 22 457 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 36 457 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 457 36 457 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 38 457 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 38 457 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 38 457 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 38 457 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 38 457 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 49 457 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 49 457 58 , srcInfoPoints = [] } "ranksep" "ranksep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 59 457 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 59 457 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 457 59 457 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 5 458 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 5 458 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 13 458 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 458 13 458 14 , SrcSpan "tests/examples/Attributes.hs" 458 20 458 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 14 458 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 14 458 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 14 458 18 , srcInfoPoints = [] } "Rank")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 19 458 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 19 458 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 36 458 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 458 36 458 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 38 458 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 38 458 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 38 458 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 38 458 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 38 458 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 49 458 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 49 458 55 , srcInfoPoints = [] } "rank" "rank"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 56 458 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 56 458 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 458 56 458 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 5 459 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 5 459 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 13 459 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 459 13 459 14 , SrcSpan "tests/examples/Attributes.hs" 459 21 459 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 14 459 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 14 459 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 14 459 19 , srcInfoPoints = [] } "Ratio")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 20 459 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 20 459 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 36 459 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 459 36 459 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 38 459 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 38 459 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 38 459 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 38 459 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 38 459 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 49 459 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 49 459 56 , srcInfoPoints = [] } "ratio" "ratio"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 57 459 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 57 459 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 459 57 459 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 5 460 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 5 460 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 13 460 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 460 13 460 14 , SrcSpan "tests/examples/Attributes.hs" 460 21 460 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 14 460 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 14 460 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 14 460 19 , srcInfoPoints = [] } "Rects")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 20 460 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 20 460 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 36 460 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 460 36 460 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 38 460 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 38 460 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 38 460 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 38 460 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 38 460 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 49 460 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 49 460 56 , srcInfoPoints = [] } "rects" "rects"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 57 460 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 57 460 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 460 57 460 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 5 461 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 5 461 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 13 461 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 461 13 461 14 , SrcSpan "tests/examples/Attributes.hs" 461 23 461 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 14 461 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 14 461 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 14 461 21 , srcInfoPoints = [] } "Regular")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 22 461 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 22 461 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 36 461 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 461 36 461 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 38 461 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 38 461 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 38 461 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 38 461 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 38 461 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 49 461 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 49 461 58 , srcInfoPoints = [] } "regular" "regular"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 59 461 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 59 461 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 461 59 461 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 5 462 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 5 462 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 13 462 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 462 13 462 14 , SrcSpan "tests/examples/Attributes.hs" 462 26 462 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 14 462 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 14 462 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 14 462 24 , srcInfoPoints = [] } "ReMinCross")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 25 462 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 25 462 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 36 462 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 462 36 462 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 38 462 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 38 462 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 38 462 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 38 462 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 38 462 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 49 462 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 49 462 61 , srcInfoPoints = [] } "remincross" "remincross"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 62 462 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 62 462 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 462 62 462 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 5 463 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 5 463 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 13 463 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 463 13 463 14 , SrcSpan "tests/examples/Attributes.hs" 463 30 463 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 14 463 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 14 463 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 14 463 28 , srcInfoPoints = [] } "RepulsiveForce")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 29 463 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 29 463 30 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 36 463 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 463 36 463 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 38 463 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 38 463 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 38 463 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 38 463 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 38 463 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 49 463 65 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 49 463 65 , srcInfoPoints = [] } "repulsiveforce" "repulsiveforce"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 66 463 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 66 463 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 463 66 463 67 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 5 464 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 5 464 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 13 464 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 464 13 464 14 , SrcSpan "tests/examples/Attributes.hs" 464 20 464 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 14 464 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 14 464 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 14 464 18 , srcInfoPoints = [] } "Root")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 19 464 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 19 464 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 36 464 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 464 36 464 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 38 464 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 38 464 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 38 464 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 38 464 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 38 464 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 49 464 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 49 464 55 , srcInfoPoints = [] } "root" "root"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 56 464 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 56 464 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 464 56 464 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 5 465 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 5 465 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 13 465 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 465 13 465 14 , SrcSpan "tests/examples/Attributes.hs" 465 22 465 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 14 465 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 14 465 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 14 465 20 , srcInfoPoints = [] } "Rotate")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 21 465 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 21 465 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 36 465 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 465 36 465 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 38 465 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 38 465 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 38 465 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 38 465 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 38 465 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 49 465 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 49 465 57 , srcInfoPoints = [] } "rotate" "rotate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 58 465 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 58 465 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 465 58 465 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 5 466 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 5 466 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 13 466 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 466 13 466 14 , SrcSpan "tests/examples/Attributes.hs" 466 24 466 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 14 466 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 14 466 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 14 466 22 , srcInfoPoints = [] } "SameHead")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 23 466 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 23 466 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 36 466 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 466 36 466 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 38 466 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 38 466 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 38 466 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 38 466 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 38 466 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 49 466 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 49 466 59 , srcInfoPoints = [] } "samehead" "samehead"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 60 466 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 60 466 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 466 60 466 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 5 467 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 5 467 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 13 467 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 467 13 467 14 , SrcSpan "tests/examples/Attributes.hs" 467 24 467 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 14 467 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 14 467 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 14 467 22 , srcInfoPoints = [] } "SameTail")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 23 467 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 23 467 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 36 467 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 467 36 467 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 38 467 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 38 467 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 38 467 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 38 467 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 38 467 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 49 467 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 49 467 59 , srcInfoPoints = [] } "sametail" "sametail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 60 467 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 60 467 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 467 60 467 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 5 468 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 5 468 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 13 468 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 468 13 468 14 , SrcSpan "tests/examples/Attributes.hs" 468 28 468 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 14 468 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 14 468 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 14 468 26 , srcInfoPoints = [] } "SamplePoints")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 27 468 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 27 468 28 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 36 468 65 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 468 36 468 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 38 468 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 38 468 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 38 468 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 38 468 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 38 468 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 49 468 63 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 49 468 63 , srcInfoPoints = [] } "samplepoints" "samplepoints"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 64 468 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 64 468 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 468 64 468 65 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 5 469 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 5 469 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 13 469 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 469 13 469 14 , SrcSpan "tests/examples/Attributes.hs" 469 26 469 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 14 469 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 14 469 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 14 469 24 , srcInfoPoints = [] } "SearchSize")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 25 469 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 25 469 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 36 469 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 469 36 469 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 38 469 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 38 469 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 38 469 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 38 469 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 38 469 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 49 469 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 49 469 61 , srcInfoPoints = [] } "searchsize" "searchsize"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 62 469 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 62 469 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 469 62 469 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 5 470 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 5 470 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 13 470 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 470 13 470 14 , SrcSpan "tests/examples/Attributes.hs" 470 19 470 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 14 470 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 14 470 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 14 470 17 , srcInfoPoints = [] } "Sep")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 18 470 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 18 470 19 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 36 470 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 470 36 470 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 38 470 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 38 470 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 38 470 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 38 470 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 38 470 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 49 470 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 49 470 54 , srcInfoPoints = [] } "sep" "sep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 55 470 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 55 470 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 470 55 470 56 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 5 471 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 5 471 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 13 471 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 471 13 471 14 , SrcSpan "tests/examples/Attributes.hs" 471 25 471 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 14 471 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 14 471 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 14 471 23 , srcInfoPoints = [] } "ShapeFile")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 24 471 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 24 471 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 36 471 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 471 36 471 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 38 471 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 38 471 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 38 471 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 38 471 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 38 471 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 49 471 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 49 471 60 , srcInfoPoints = [] } "shapefile" "shapefile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 61 471 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 61 471 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 471 61 471 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 5 472 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 5 472 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 13 472 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 472 13 472 14 , SrcSpan "tests/examples/Attributes.hs" 472 21 472 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 14 472 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 14 472 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 14 472 19 , srcInfoPoints = [] } "Shape")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 20 472 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 20 472 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 36 472 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 472 36 472 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 38 472 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 38 472 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 38 472 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 38 472 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 38 472 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 49 472 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 49 472 56 , srcInfoPoints = [] } "shape" "shape"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 57 472 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 57 472 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 472 57 472 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 5 473 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 5 473 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 13 473 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 473 13 473 14 , SrcSpan "tests/examples/Attributes.hs" 473 25 473 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 14 473 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 14 473 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 14 473 23 , srcInfoPoints = [] } "ShowBoxes")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 24 473 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 24 473 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 36 473 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 473 36 473 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 38 473 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 38 473 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 38 473 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 38 473 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 38 473 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 49 473 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 49 473 60 , srcInfoPoints = [] } "showboxes" "showboxes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 61 473 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 61 473 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 473 61 473 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 5 474 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 5 474 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 13 474 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 474 13 474 14 , SrcSpan "tests/examples/Attributes.hs" 474 21 474 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 14 474 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 14 474 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 14 474 19 , srcInfoPoints = [] } "Sides")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 20 474 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 20 474 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 36 474 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 474 36 474 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 38 474 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 38 474 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 38 474 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 38 474 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 38 474 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 49 474 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 49 474 56 , srcInfoPoints = [] } "sides" "sides"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 57 474 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 57 474 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 474 57 474 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 5 475 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 5 475 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 13 475 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 475 13 475 14 , SrcSpan "tests/examples/Attributes.hs" 475 20 475 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 14 475 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 14 475 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 14 475 18 , srcInfoPoints = [] } "Size")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 19 475 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 19 475 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 36 475 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 475 36 475 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 38 475 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 38 475 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 38 475 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 38 475 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 38 475 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 49 475 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 49 475 55 , srcInfoPoints = [] } "size" "size"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 56 475 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 56 475 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 475 56 475 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 5 476 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 5 476 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 13 476 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 476 13 476 14 , SrcSpan "tests/examples/Attributes.hs" 476 20 476 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 14 476 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 14 476 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 14 476 18 , srcInfoPoints = [] } "Skew")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 19 476 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 19 476 20 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 36 476 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 476 36 476 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 38 476 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 38 476 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 38 476 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 38 476 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 38 476 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 49 476 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 49 476 55 , srcInfoPoints = [] } "skew" "skew"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 56 476 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 56 476 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 476 56 476 57 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 5 477 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 5 477 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 13 477 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 477 13 477 14 , SrcSpan "tests/examples/Attributes.hs" 477 25 477 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 14 477 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 14 477 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 14 477 23 , srcInfoPoints = [] } "Smoothing")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 24 477 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 24 477 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 36 477 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 477 36 477 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 38 477 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 38 477 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 38 477 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 38 477 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 38 477 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 49 477 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 49 477 60 , srcInfoPoints = [] } "smoothing" "smoothing"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 61 477 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 61 477 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 477 61 477 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 5 478 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 5 478 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 13 478 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 478 13 478 14 , SrcSpan "tests/examples/Attributes.hs" 478 21 478 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 14 478 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 14 478 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 14 478 19 , srcInfoPoints = [] } "SortV")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 20 478 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 20 478 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 36 478 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 478 36 478 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 38 478 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 38 478 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 38 478 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 38 478 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 38 478 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 49 478 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 49 478 56 , srcInfoPoints = [] } "sortv" "sortv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 57 478 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 57 478 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 478 57 478 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 5 479 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 5 479 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 13 479 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 479 13 479 14 , SrcSpan "tests/examples/Attributes.hs" 479 23 479 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 14 479 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 14 479 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 14 479 21 , srcInfoPoints = [] } "Splines")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 22 479 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 22 479 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 36 479 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 479 36 479 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 38 479 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 38 479 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 38 479 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 38 479 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 38 479 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 49 479 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 49 479 58 , srcInfoPoints = [] } "splines" "splines"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 59 479 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 59 479 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 479 59 479 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 5 480 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 5 480 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 13 480 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 480 13 480 14 , SrcSpan "tests/examples/Attributes.hs" 480 21 480 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 14 480 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 14 480 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 14 480 19 , srcInfoPoints = [] } "Start")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 20 480 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 20 480 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 36 480 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 480 36 480 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 38 480 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 38 480 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 38 480 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 38 480 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 38 480 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 49 480 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 49 480 56 , srcInfoPoints = [] } "start" "start"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 57 480 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 57 480 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 480 57 480 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 5 481 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 5 481 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 13 481 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 481 13 481 14 , SrcSpan "tests/examples/Attributes.hs" 481 26 481 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 14 481 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 14 481 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 14 481 24 , srcInfoPoints = [] } "StyleSheet")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 25 481 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 25 481 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 36 481 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 481 36 481 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 38 481 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 38 481 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 38 481 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 38 481 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 38 481 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 49 481 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 49 481 61 , srcInfoPoints = [] } "stylesheet" "stylesheet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 62 481 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 62 481 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 481 62 481 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 5 482 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 5 482 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 13 482 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 482 13 482 14 , SrcSpan "tests/examples/Attributes.hs" 482 21 482 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 14 482 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 14 482 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 14 482 19 , srcInfoPoints = [] } "Style")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 20 482 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 20 482 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 36 482 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 482 36 482 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 38 482 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 38 482 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 38 482 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 38 482 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 38 482 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 49 482 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 49 482 56 , srcInfoPoints = [] } "style" "style"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 57 482 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 57 482 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 482 57 482 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 5 483 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 5 483 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 13 483 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 483 13 483 14 , SrcSpan "tests/examples/Attributes.hs" 483 23 483 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 14 483 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 14 483 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 14 483 21 , srcInfoPoints = [] } "TailURL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 22 483 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 22 483 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 36 483 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 483 36 483 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 38 483 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 38 483 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 38 483 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 38 483 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 38 483 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 49 483 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 49 483 58 , srcInfoPoints = [] } "tailURL" "tailURL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 59 483 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 59 483 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 483 59 483 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 5 484 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 5 484 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 13 484 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 484 13 484 14 , SrcSpan "tests/examples/Attributes.hs" 484 24 484 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 14 484 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 14 484 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 14 484 22 , srcInfoPoints = [] } "TailClip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 23 484 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 23 484 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 36 484 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 484 36 484 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 38 484 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 38 484 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 38 484 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 38 484 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 38 484 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 49 484 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 49 484 59 , srcInfoPoints = [] } "tailclip" "tailclip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 60 484 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 60 484 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 484 60 484 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 5 485 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 5 485 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 13 485 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 485 13 485 14 , SrcSpan "tests/examples/Attributes.hs" 485 25 485 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 14 485 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 14 485 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 14 485 23 , srcInfoPoints = [] } "TailLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 24 485 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 24 485 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 36 485 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 485 36 485 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 38 485 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 38 485 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 38 485 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 38 485 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 38 485 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 49 485 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 49 485 60 , srcInfoPoints = [] } "taillabel" "taillabel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 61 485 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 61 485 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 485 61 485 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 5 486 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 5 486 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 13 486 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 486 13 486 14 , SrcSpan "tests/examples/Attributes.hs" 486 24 486 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 14 486 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 14 486 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 14 486 22 , srcInfoPoints = [] } "TailPort")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 23 486 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 23 486 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 36 486 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 486 36 486 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 38 486 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 38 486 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 38 486 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 38 486 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 38 486 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 49 486 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 49 486 59 , srcInfoPoints = [] } "tailport" "tailport"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 60 486 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 60 486 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 486 60 486 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 5 487 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 5 487 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 13 487 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 487 13 487 14 , SrcSpan "tests/examples/Attributes.hs" 487 26 487 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 14 487 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 14 487 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 14 487 24 , srcInfoPoints = [] } "TailTarget")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 25 487 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 25 487 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 36 487 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 487 36 487 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 38 487 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 38 487 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 38 487 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 38 487 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 38 487 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 49 487 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 49 487 61 , srcInfoPoints = [] } "tailtarget" "tailtarget"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 62 487 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 62 487 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 487 62 487 63 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 5 488 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 5 488 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 13 488 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 488 13 488 14 , SrcSpan "tests/examples/Attributes.hs" 488 27 488 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 14 488 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 14 488 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 14 488 25 , srcInfoPoints = [] } "TailTooltip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 26 488 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 26 488 27 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 36 488 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 488 36 488 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 38 488 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 38 488 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 38 488 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 38 488 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 38 488 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 49 488 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 49 488 62 , srcInfoPoints = [] } "tailtooltip" "tailtooltip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 63 488 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 63 488 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 488 63 488 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 5 489 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 5 489 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 13 489 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 489 13 489 14 , SrcSpan "tests/examples/Attributes.hs" 489 22 489 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 14 489 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 14 489 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 14 489 20 , srcInfoPoints = [] } "Target")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 21 489 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 21 489 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 36 489 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 489 36 489 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 38 489 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 38 489 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 38 489 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 38 489 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 38 489 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 49 489 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 49 489 57 , srcInfoPoints = [] } "target" "target"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 58 489 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 58 489 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 489 58 489 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 5 490 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 5 490 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 13 490 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 490 13 490 14 , SrcSpan "tests/examples/Attributes.hs" 490 23 490 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 14 490 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 14 490 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 14 490 21 , srcInfoPoints = [] } "Tooltip")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 22 490 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 22 490 23 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 36 490 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 490 36 490 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 38 490 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 38 490 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 38 490 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 38 490 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 38 490 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 49 490 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 49 490 58 , srcInfoPoints = [] } "tooltip" "tooltip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 59 490 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 59 490 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 490 59 490 60 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 5 491 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 5 491 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 13 491 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 491 13 491 14 , SrcSpan "tests/examples/Attributes.hs" 491 25 491 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 14 491 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 14 491 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 14 491 23 , srcInfoPoints = [] } "TrueColor")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 24 491 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 24 491 25 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 36 491 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 491 36 491 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 38 491 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 38 491 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 38 491 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 38 491 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 38 491 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 49 491 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 49 491 60 , srcInfoPoints = [] } "truecolor" "truecolor"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 61 491 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 61 491 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 491 61 491 62 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 5 492 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 5 492 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 13 492 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 492 13 492 14 , SrcSpan "tests/examples/Attributes.hs" 492 24 492 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 14 492 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 14 492 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 14 492 22 , srcInfoPoints = [] } "Vertices")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 23 492 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 23 492 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 36 492 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 492 36 492 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 38 492 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 38 492 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 38 492 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 38 492 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 38 492 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 49 492 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 49 492 59 , srcInfoPoints = [] } "vertices" "vertices"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 60 492 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 60 492 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 492 60 492 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 5 493 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 5 493 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 13 493 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 493 13 493 14 , SrcSpan "tests/examples/Attributes.hs" 493 24 493 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 14 493 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 14 493 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 14 493 22 , srcInfoPoints = [] } "ViewPort")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 23 493 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 23 493 24 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 36 493 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 493 36 493 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 38 493 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 38 493 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 38 493 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 38 493 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 38 493 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 49 493 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 49 493 59 , srcInfoPoints = [] } "viewport" "viewport"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 60 493 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 60 493 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 493 60 493 61 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 5 494 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 5 494 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 13 494 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 494 13 494 14 , SrcSpan "tests/examples/Attributes.hs" 494 26 494 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 14 494 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 14 494 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 14 494 24 , srcInfoPoints = [] } "VoroMargin")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 25 494 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 25 494 26 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 36 494 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 494 36 494 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 38 494 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 38 494 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 38 494 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 38 494 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 38 494 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 49 494 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 49 494 62 , srcInfoPoints = [] } "voro_margin" "voro_margin"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 63 494 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 63 494 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 494 63 494 64 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 5 495 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 5 495 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 13 495 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 495 13 495 14 , SrcSpan "tests/examples/Attributes.hs" 495 22 495 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 14 495 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 14 495 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 14 495 20 , srcInfoPoints = [] } "Weight")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 21 495 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 21 495 22 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 36 495 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 495 36 495 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 38 495 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 38 495 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 38 495 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 38 495 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 38 495 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 49 495 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 49 495 57 , srcInfoPoints = [] } "weight" "weight"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 58 495 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 58 495 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 495 58 495 59 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 5 496 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 5 496 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 13 496 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 496 13 496 14 , SrcSpan "tests/examples/Attributes.hs" 496 21 496 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 14 496 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 14 496 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 14 496 19 , srcInfoPoints = [] } "Width")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 20 496 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 20 496 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 36 496 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 496 36 496 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 38 496 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 38 496 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 38 496 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 38 496 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 38 496 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 49 496 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 49 496 56 , srcInfoPoints = [] } "width" "width"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 57 496 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 57 496 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 496 57 496 58 , srcInfoPoints = [] } "v"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 5 497 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 5 497 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 13 497 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 497 13 497 14 , SrcSpan "tests/examples/Attributes.hs" 497 17 497 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 14 497 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 14 497 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 14 497 15 , srcInfoPoints = [] } "Z")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 16 497 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 16 497 17 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 36 497 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 497 36 497 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 38 497 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 38 497 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 38 497 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 38 497 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 38 497 48 , srcInfoPoints = [] } "printField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 49 497 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 49 497 52 , srcInfoPoints = [] } "z" "z"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 53 497 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 53 497 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 497 53 497 54 , srcInfoPoints = [] } "v"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 5 499 30 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 5 499 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 5 499 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 5 499 14 , srcInfoPoints = [] } "listToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 15 499 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 499 15 499 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 17 499 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 17 499 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 499 17 499 30 , srcInfoPoints = [] } "unqtListToDot")))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 1 653 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 501 1 501 9 , SrcSpan "tests/examples/Attributes.hs" 501 29 501 34 , SrcSpan "tests/examples/Attributes.hs" 502 5 502 5 , SrcSpan "tests/examples/Attributes.hs" 648 5 648 5 , SrcSpan "tests/examples/Attributes.hs" 650 5 650 5 , SrcSpan "tests/examples/Attributes.hs" 653 1 653 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 10 501 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 10 501 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 10 501 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 10 501 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 10 501 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 19 501 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 19 501 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 501 19 501 28 , srcInfoPoints = [] } "Attribute"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 5 646 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 5 646 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 5 502 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 5 502 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 15 646 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 502 15 502 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 17 646 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 17 502 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 17 502 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 17 502 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 23 646 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 502 23 502 24 , SrcSpan "tests/examples/Attributes.hs" 503 23 503 24 , SrcSpan "tests/examples/Attributes.hs" 504 23 504 24 , SrcSpan "tests/examples/Attributes.hs" 505 23 505 24 , SrcSpan "tests/examples/Attributes.hs" 506 23 506 24 , SrcSpan "tests/examples/Attributes.hs" 507 23 507 24 , SrcSpan "tests/examples/Attributes.hs" 508 23 508 24 , SrcSpan "tests/examples/Attributes.hs" 509 23 509 24 , SrcSpan "tests/examples/Attributes.hs" 510 23 510 24 , SrcSpan "tests/examples/Attributes.hs" 511 23 511 24 , SrcSpan "tests/examples/Attributes.hs" 512 23 512 24 , SrcSpan "tests/examples/Attributes.hs" 513 23 513 24 , SrcSpan "tests/examples/Attributes.hs" 514 23 514 24 , SrcSpan "tests/examples/Attributes.hs" 515 23 515 24 , SrcSpan "tests/examples/Attributes.hs" 516 23 516 24 , SrcSpan "tests/examples/Attributes.hs" 517 23 517 24 , SrcSpan "tests/examples/Attributes.hs" 518 23 518 24 , SrcSpan "tests/examples/Attributes.hs" 519 23 519 24 , SrcSpan "tests/examples/Attributes.hs" 520 23 520 24 , SrcSpan "tests/examples/Attributes.hs" 521 23 521 24 , SrcSpan "tests/examples/Attributes.hs" 522 23 522 24 , SrcSpan "tests/examples/Attributes.hs" 523 23 523 24 , SrcSpan "tests/examples/Attributes.hs" 524 23 524 24 , SrcSpan "tests/examples/Attributes.hs" 525 23 525 24 , SrcSpan "tests/examples/Attributes.hs" 526 23 526 24 , SrcSpan "tests/examples/Attributes.hs" 527 23 527 24 , SrcSpan "tests/examples/Attributes.hs" 528 23 528 24 , SrcSpan "tests/examples/Attributes.hs" 529 23 529 24 , SrcSpan "tests/examples/Attributes.hs" 530 23 530 24 , SrcSpan "tests/examples/Attributes.hs" 531 23 531 24 , SrcSpan "tests/examples/Attributes.hs" 532 23 532 24 , SrcSpan "tests/examples/Attributes.hs" 533 23 533 24 , SrcSpan "tests/examples/Attributes.hs" 534 23 534 24 , SrcSpan "tests/examples/Attributes.hs" 535 23 535 24 , SrcSpan "tests/examples/Attributes.hs" 536 23 536 24 , SrcSpan "tests/examples/Attributes.hs" 537 23 537 24 , SrcSpan "tests/examples/Attributes.hs" 538 23 538 24 , SrcSpan "tests/examples/Attributes.hs" 539 23 539 24 , SrcSpan "tests/examples/Attributes.hs" 540 23 540 24 , SrcSpan "tests/examples/Attributes.hs" 541 23 541 24 , SrcSpan "tests/examples/Attributes.hs" 542 23 542 24 , SrcSpan "tests/examples/Attributes.hs" 543 23 543 24 , SrcSpan "tests/examples/Attributes.hs" 544 23 544 24 , SrcSpan "tests/examples/Attributes.hs" 545 23 545 24 , SrcSpan "tests/examples/Attributes.hs" 546 23 546 24 , SrcSpan "tests/examples/Attributes.hs" 547 23 547 24 , SrcSpan "tests/examples/Attributes.hs" 548 23 548 24 , SrcSpan "tests/examples/Attributes.hs" 549 23 549 24 , SrcSpan "tests/examples/Attributes.hs" 550 23 550 24 , SrcSpan "tests/examples/Attributes.hs" 551 23 551 24 , SrcSpan "tests/examples/Attributes.hs" 552 23 552 24 , SrcSpan "tests/examples/Attributes.hs" 553 23 553 24 , SrcSpan "tests/examples/Attributes.hs" 554 23 554 24 , SrcSpan "tests/examples/Attributes.hs" 555 23 555 24 , SrcSpan "tests/examples/Attributes.hs" 556 23 556 24 , SrcSpan "tests/examples/Attributes.hs" 557 23 557 24 , SrcSpan "tests/examples/Attributes.hs" 558 23 558 24 , SrcSpan "tests/examples/Attributes.hs" 559 23 559 24 , SrcSpan "tests/examples/Attributes.hs" 560 23 560 24 , SrcSpan "tests/examples/Attributes.hs" 561 23 561 24 , SrcSpan "tests/examples/Attributes.hs" 562 23 562 24 , SrcSpan "tests/examples/Attributes.hs" 563 23 563 24 , SrcSpan "tests/examples/Attributes.hs" 564 23 564 24 , SrcSpan "tests/examples/Attributes.hs" 565 23 565 24 , SrcSpan "tests/examples/Attributes.hs" 566 23 566 24 , SrcSpan "tests/examples/Attributes.hs" 567 23 567 24 , SrcSpan "tests/examples/Attributes.hs" 568 23 568 24 , SrcSpan "tests/examples/Attributes.hs" 569 23 569 24 , SrcSpan "tests/examples/Attributes.hs" 570 23 570 24 , SrcSpan "tests/examples/Attributes.hs" 571 23 571 24 , SrcSpan "tests/examples/Attributes.hs" 572 23 572 24 , SrcSpan "tests/examples/Attributes.hs" 573 23 573 24 , SrcSpan "tests/examples/Attributes.hs" 574 23 574 24 , SrcSpan "tests/examples/Attributes.hs" 575 23 575 24 , SrcSpan "tests/examples/Attributes.hs" 576 23 576 24 , SrcSpan "tests/examples/Attributes.hs" 577 23 577 24 , SrcSpan "tests/examples/Attributes.hs" 578 23 578 24 , SrcSpan "tests/examples/Attributes.hs" 579 23 579 24 , SrcSpan "tests/examples/Attributes.hs" 580 23 580 24 , SrcSpan "tests/examples/Attributes.hs" 581 23 581 24 , SrcSpan "tests/examples/Attributes.hs" 582 23 582 24 , SrcSpan "tests/examples/Attributes.hs" 583 23 583 24 , SrcSpan "tests/examples/Attributes.hs" 584 23 584 24 , SrcSpan "tests/examples/Attributes.hs" 585 23 585 24 , SrcSpan "tests/examples/Attributes.hs" 586 23 586 24 , SrcSpan "tests/examples/Attributes.hs" 587 23 587 24 , SrcSpan "tests/examples/Attributes.hs" 588 23 588 24 , SrcSpan "tests/examples/Attributes.hs" 589 23 589 24 , SrcSpan "tests/examples/Attributes.hs" 590 23 590 24 , SrcSpan "tests/examples/Attributes.hs" 591 23 591 24 , SrcSpan "tests/examples/Attributes.hs" 592 23 592 24 , SrcSpan "tests/examples/Attributes.hs" 593 23 593 24 , SrcSpan "tests/examples/Attributes.hs" 594 23 594 24 , SrcSpan "tests/examples/Attributes.hs" 595 23 595 24 , SrcSpan "tests/examples/Attributes.hs" 596 23 596 24 , SrcSpan "tests/examples/Attributes.hs" 597 23 597 24 , SrcSpan "tests/examples/Attributes.hs" 598 23 598 24 , SrcSpan "tests/examples/Attributes.hs" 599 23 599 24 , SrcSpan "tests/examples/Attributes.hs" 600 23 600 24 , SrcSpan "tests/examples/Attributes.hs" 601 23 601 24 , SrcSpan "tests/examples/Attributes.hs" 602 23 602 24 , SrcSpan "tests/examples/Attributes.hs" 603 23 603 24 , SrcSpan "tests/examples/Attributes.hs" 604 23 604 24 , SrcSpan "tests/examples/Attributes.hs" 605 23 605 24 , SrcSpan "tests/examples/Attributes.hs" 606 23 606 24 , SrcSpan "tests/examples/Attributes.hs" 607 23 607 24 , SrcSpan "tests/examples/Attributes.hs" 608 23 608 24 , SrcSpan "tests/examples/Attributes.hs" 609 23 609 24 , SrcSpan "tests/examples/Attributes.hs" 610 23 610 24 , SrcSpan "tests/examples/Attributes.hs" 611 23 611 24 , SrcSpan "tests/examples/Attributes.hs" 612 23 612 24 , SrcSpan "tests/examples/Attributes.hs" 613 23 613 24 , SrcSpan "tests/examples/Attributes.hs" 614 23 614 24 , SrcSpan "tests/examples/Attributes.hs" 615 23 615 24 , SrcSpan "tests/examples/Attributes.hs" 616 23 616 24 , SrcSpan "tests/examples/Attributes.hs" 617 23 617 24 , SrcSpan "tests/examples/Attributes.hs" 618 23 618 24 , SrcSpan "tests/examples/Attributes.hs" 619 23 619 24 , SrcSpan "tests/examples/Attributes.hs" 620 23 620 24 , SrcSpan "tests/examples/Attributes.hs" 621 23 621 24 , SrcSpan "tests/examples/Attributes.hs" 622 23 622 24 , SrcSpan "tests/examples/Attributes.hs" 623 23 623 24 , SrcSpan "tests/examples/Attributes.hs" 624 23 624 24 , SrcSpan "tests/examples/Attributes.hs" 625 23 625 24 , SrcSpan "tests/examples/Attributes.hs" 626 23 626 24 , SrcSpan "tests/examples/Attributes.hs" 627 23 627 24 , SrcSpan "tests/examples/Attributes.hs" 628 23 628 24 , SrcSpan "tests/examples/Attributes.hs" 629 23 629 24 , SrcSpan "tests/examples/Attributes.hs" 630 23 630 24 , SrcSpan "tests/examples/Attributes.hs" 631 23 631 24 , SrcSpan "tests/examples/Attributes.hs" 632 23 632 24 , SrcSpan "tests/examples/Attributes.hs" 633 23 633 24 , SrcSpan "tests/examples/Attributes.hs" 634 23 634 24 , SrcSpan "tests/examples/Attributes.hs" 635 23 635 24 , SrcSpan "tests/examples/Attributes.hs" 636 23 636 24 , SrcSpan "tests/examples/Attributes.hs" 637 23 637 24 , SrcSpan "tests/examples/Attributes.hs" 638 23 638 24 , SrcSpan "tests/examples/Attributes.hs" 639 23 639 24 , SrcSpan "tests/examples/Attributes.hs" 640 23 640 24 , SrcSpan "tests/examples/Attributes.hs" 641 23 641 24 , SrcSpan "tests/examples/Attributes.hs" 642 23 642 24 , SrcSpan "tests/examples/Attributes.hs" 643 23 643 24 , SrcSpan "tests/examples/Attributes.hs" 644 23 644 24 , SrcSpan "tests/examples/Attributes.hs" 645 23 645 24 , SrcSpan "tests/examples/Attributes.hs" 646 23 646 24 ] } [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 25 502 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 25 502 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 25 502 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 25 502 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 25 502 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 31 502 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 31 502 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 31 502 38 , srcInfoPoints = [] } "Damping")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 50 502 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 50 502 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 50 502 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 52 502 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 52 502 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 52 502 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 52 502 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 63 502 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 502 63 502 72 , srcInfoPoints = [] } "Damping" "Damping"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 25 503 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 25 503 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 25 503 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 25 503 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 25 503 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 31 503 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 31 503 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 31 503 32 , srcInfoPoints = [] } "K")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 50 503 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 50 503 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 50 503 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 52 503 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 52 503 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 52 503 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 52 503 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 63 503 66 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 503 63 503 66 , srcInfoPoints = [] } "K" "K"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 25 504 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 25 504 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 25 504 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 25 504 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 25 504 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 31 504 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 31 504 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 31 504 34 , srcInfoPoints = [] } "URL")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 50 504 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 50 504 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 50 504 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 52 504 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 52 504 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 52 504 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 52 504 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 64 504 79 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 504 64 504 65 , SrcSpan "tests/examples/Attributes.hs" 504 70 504 71 , SrcSpan "tests/examples/Attributes.hs" 504 78 504 79 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 65 504 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 65 504 70 , srcInfoPoints = [] } "URL" "URL") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 72 504 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 504 72 504 78 , srcInfoPoints = [] } "href" "href") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 25 505 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 25 505 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 25 505 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 25 505 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 25 505 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 31 505 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 31 505 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 31 505 40 , srcInfoPoints = [] } "ArrowHead")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 50 505 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 50 505 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 50 505 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 52 505 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 52 505 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 52 505 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 52 505 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 63 505 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 505 63 505 74 , srcInfoPoints = [] } "arrowhead" "arrowhead"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 25 506 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 25 506 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 25 506 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 25 506 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 25 506 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 31 506 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 31 506 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 31 506 40 , srcInfoPoints = [] } "ArrowSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 50 506 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 50 506 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 50 506 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 52 506 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 52 506 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 52 506 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 52 506 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 63 506 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 506 63 506 74 , srcInfoPoints = [] } "arrowsize" "arrowsize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 25 507 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 25 507 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 25 507 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 25 507 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 25 507 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 31 507 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 31 507 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 31 507 40 , srcInfoPoints = [] } "ArrowTail")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 50 507 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 50 507 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 50 507 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 52 507 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 52 507 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 52 507 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 52 507 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 63 507 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 507 63 507 74 , srcInfoPoints = [] } "arrowtail" "arrowtail"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 25 508 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 25 508 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 25 508 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 25 508 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 25 508 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 31 508 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 31 508 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 31 508 37 , srcInfoPoints = [] } "Aspect")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 50 508 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 50 508 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 50 508 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 52 508 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 52 508 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 52 508 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 52 508 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 63 508 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 508 63 508 71 , srcInfoPoints = [] } "aspect" "aspect"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 25 509 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 25 509 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 25 509 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 25 509 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 25 509 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 31 509 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 31 509 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 31 509 33 , srcInfoPoints = [] } "Bb")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 50 509 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 50 509 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 50 509 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 52 509 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 52 509 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 52 509 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 52 509 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 63 509 67 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 509 63 509 67 , srcInfoPoints = [] } "bb" "bb"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 25 510 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 25 510 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 25 510 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 25 510 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 25 510 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 31 510 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 31 510 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 31 510 38 , srcInfoPoints = [] } "BgColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 50 510 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 50 510 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 50 510 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 52 510 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 52 510 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 52 510 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 52 510 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 63 510 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 510 63 510 72 , srcInfoPoints = [] } "bgcolor" "bgcolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 25 511 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 25 511 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 25 511 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 25 511 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 25 511 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 31 511 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 31 511 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 31 511 37 , srcInfoPoints = [] } "Center")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 50 511 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 50 511 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 50 511 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 52 511 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 52 511 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 52 511 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 52 511 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 67 511 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 511 67 511 75 , srcInfoPoints = [] } "center" "center"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 25 512 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 25 512 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 25 512 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 25 512 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 25 512 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 31 512 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 31 512 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 31 512 38 , srcInfoPoints = [] } "Charset")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 50 512 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 50 512 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 50 512 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 52 512 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 52 512 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 52 512 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 52 512 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 63 512 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 512 63 512 72 , srcInfoPoints = [] } "charset" "charset"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 25 513 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 25 513 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 25 513 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 25 513 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 25 513 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 31 513 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 31 513 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 31 513 42 , srcInfoPoints = [] } "ClusterRank")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 50 513 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 50 513 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 50 513 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 52 513 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 52 513 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 52 513 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 52 513 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 63 513 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 513 63 513 76 , srcInfoPoints = [] } "clusterrank" "clusterrank"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 25 514 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 25 514 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 25 514 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 25 514 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 25 514 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 31 514 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 31 514 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 31 514 42 , srcInfoPoints = [] } "ColorScheme")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 50 514 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 50 514 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 50 514 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 52 514 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 52 514 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 52 514 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 52 514 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 63 514 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 514 63 514 76 , srcInfoPoints = [] } "colorscheme" "colorscheme"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 25 515 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 25 515 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 25 515 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 25 515 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 25 515 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 31 515 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 31 515 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 31 515 36 , srcInfoPoints = [] } "Color")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 50 515 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 50 515 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 50 515 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 52 515 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 52 515 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 52 515 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 52 515 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 63 515 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 515 63 515 70 , srcInfoPoints = [] } "color" "color"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 25 516 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 25 516 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 25 516 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 25 516 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 25 516 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 31 516 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 31 516 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 31 516 38 , srcInfoPoints = [] } "Comment")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 50 516 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 50 516 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 50 516 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 52 516 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 52 516 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 52 516 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 52 516 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 63 516 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 516 63 516 72 , srcInfoPoints = [] } "comment" "comment"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 25 517 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 25 517 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 25 517 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 25 517 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 25 517 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 31 517 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 31 517 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 31 517 39 , srcInfoPoints = [] } "Compound")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 50 517 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 50 517 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 50 517 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 52 517 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 52 517 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 52 517 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 52 517 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 67 517 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 517 67 517 77 , srcInfoPoints = [] } "compound" "compound"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 25 518 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 25 518 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 25 518 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 25 518 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 25 518 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 31 518 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 31 518 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 31 518 42 , srcInfoPoints = [] } "Concentrate")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 50 518 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 50 518 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 50 518 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 52 518 80 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 52 518 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 52 518 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 52 518 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 67 518 80 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 518 67 518 80 , srcInfoPoints = [] } "concentrate" "concentrate"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 25 519 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 25 519 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 25 519 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 25 519 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 25 519 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 31 519 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 31 519 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 31 519 41 , srcInfoPoints = [] } "Constraint")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 50 519 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 50 519 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 50 519 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 52 519 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 52 519 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 52 519 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 52 519 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 67 519 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 519 67 519 79 , srcInfoPoints = [] } "constraint" "constraint"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 25 520 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 25 520 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 25 520 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 25 520 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 25 520 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 31 520 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 31 520 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 31 520 39 , srcInfoPoints = [] } "Decorate")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 50 520 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 50 520 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 50 520 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 52 520 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 52 520 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 52 520 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 52 520 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 67 520 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 520 67 520 77 , srcInfoPoints = [] } "decorate" "decorate"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 25 521 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 25 521 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 25 521 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 25 521 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 25 521 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 31 521 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 31 521 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 31 521 42 , srcInfoPoints = [] } "DefaultDist")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 50 521 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 50 521 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 50 521 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 52 521 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 52 521 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 52 521 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 52 521 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 63 521 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 521 63 521 76 , srcInfoPoints = [] } "defaultdist" "defaultdist"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 25 522 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 25 522 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 25 522 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 25 522 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 25 522 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 31 522 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 31 522 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 31 522 36 , srcInfoPoints = [] } "Dimen")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 50 522 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 50 522 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 50 522 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 52 522 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 52 522 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 52 522 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 52 522 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 63 522 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 522 63 522 70 , srcInfoPoints = [] } "dimen" "dimen"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 25 523 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 25 523 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 25 523 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 25 523 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 25 523 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 31 523 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 31 523 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 31 523 34 , srcInfoPoints = [] } "Dim")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 50 523 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 50 523 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 50 523 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 52 523 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 52 523 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 52 523 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 52 523 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 63 523 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 523 63 523 68 , srcInfoPoints = [] } "dim" "dim"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 25 524 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 25 524 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 25 524 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 25 524 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 25 524 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 31 524 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 31 524 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 31 524 34 , srcInfoPoints = [] } "Dir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 50 524 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 50 524 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 50 524 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 52 524 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 52 524 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 52 524 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 52 524 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 63 524 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 524 63 524 68 , srcInfoPoints = [] } "dir" "dir"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 25 525 102 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 25 525 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 25 525 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 25 525 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 25 525 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 31 525 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 31 525 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 31 525 49 , srcInfoPoints = [] } "DirEdgeConstraints")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 50 525 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 50 525 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 50 525 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 52 525 102 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 52 525 81 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 52 525 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 52 525 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 52 525 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 66 525 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 66 525 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 66 525 81 , srcInfoPoints = [] } "EdgeConstraints")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 82 525 102 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 525 82 525 102 , srcInfoPoints = [] } "diredgeconstraints" "diredgeconstraints"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 25 526 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 25 526 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 25 526 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 25 526 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 25 526 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 31 526 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 31 526 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 31 526 41 , srcInfoPoints = [] } "Distortion")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 50 526 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 50 526 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 50 526 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 52 526 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 52 526 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 52 526 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 52 526 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 63 526 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 526 63 526 75 , srcInfoPoints = [] } "distortion" "distortion"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 25 527 85 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 25 527 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 25 527 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 25 527 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 25 527 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 31 527 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 31 527 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 31 527 34 , srcInfoPoints = [] } "DPI")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 50 527 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 50 527 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 50 527 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 52 527 85 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 52 527 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 52 527 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 52 527 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 64 527 85 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 527 64 527 65 , SrcSpan "tests/examples/Attributes.hs" 527 70 527 71 , SrcSpan "tests/examples/Attributes.hs" 527 84 527 85 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 65 527 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 65 527 70 , srcInfoPoints = [] } "dpi" "dpi") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 72 527 84 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 527 72 527 84 , srcInfoPoints = [] } "resolution" "resolution") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 25 528 87 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 25 528 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 25 528 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 25 528 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 25 528 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 31 528 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 31 528 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 31 528 38 , srcInfoPoints = [] } "EdgeURL")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 50 528 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 50 528 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 50 528 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 52 528 87 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 52 528 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 52 528 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 52 528 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 64 528 87 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 528 64 528 65 , SrcSpan "tests/examples/Attributes.hs" 528 74 528 75 , SrcSpan "tests/examples/Attributes.hs" 528 86 528 87 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 65 528 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 65 528 74 , srcInfoPoints = [] } "edgeURL" "edgeURL") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 76 528 86 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 528 76 528 86 , srcInfoPoints = [] } "edgehref" "edgehref") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 25 529 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 25 529 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 25 529 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 25 529 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 25 529 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 31 529 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 31 529 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 31 529 41 , srcInfoPoints = [] } "EdgeTarget")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 50 529 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 50 529 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 50 529 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 52 529 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 52 529 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 52 529 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 52 529 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 63 529 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 529 63 529 75 , srcInfoPoints = [] } "edgetarget" "edgetarget"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 25 530 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 25 530 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 25 530 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 25 530 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 25 530 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 31 530 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 31 530 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 31 530 42 , srcInfoPoints = [] } "EdgeTooltip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 50 530 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 50 530 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 50 530 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 52 530 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 52 530 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 52 530 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 52 530 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 63 530 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 530 63 530 76 , srcInfoPoints = [] } "edgetooltip" "edgetooltip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 25 531 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 25 531 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 25 531 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 25 531 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 25 531 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 31 531 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 31 531 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 31 531 38 , srcInfoPoints = [] } "Epsilon")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 50 531 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 50 531 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 50 531 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 52 531 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 52 531 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 52 531 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 52 531 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 63 531 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 531 63 531 72 , srcInfoPoints = [] } "epsilon" "epsilon"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 25 532 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 25 532 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 25 532 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 25 532 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 25 532 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 31 532 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 31 532 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 31 532 35 , srcInfoPoints = [] } "ESep")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 50 532 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 50 532 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 50 532 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 52 532 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 52 532 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 52 532 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 52 532 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 63 532 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 532 63 532 69 , srcInfoPoints = [] } "esep" "esep"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 25 533 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 25 533 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 25 533 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 25 533 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 25 533 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 31 533 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 31 533 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 31 533 40 , srcInfoPoints = [] } "FillColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 50 533 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 50 533 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 50 533 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 52 533 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 52 533 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 52 533 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 52 533 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 63 533 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 533 63 533 74 , srcInfoPoints = [] } "fillcolor" "fillcolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 25 534 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 25 534 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 25 534 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 25 534 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 25 534 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 31 534 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 31 534 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 31 534 40 , srcInfoPoints = [] } "FixedSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 50 534 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 50 534 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 50 534 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 52 534 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 52 534 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 52 534 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 52 534 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 67 534 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 534 67 534 78 , srcInfoPoints = [] } "fixedsize" "fixedsize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 25 535 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 25 535 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 25 535 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 25 535 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 25 535 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 31 535 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 31 535 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 31 535 40 , srcInfoPoints = [] } "FontColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 50 535 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 50 535 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 50 535 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 52 535 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 52 535 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 52 535 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 52 535 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 63 535 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 535 63 535 74 , srcInfoPoints = [] } "fontcolor" "fontcolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 25 536 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 25 536 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 25 536 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 25 536 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 25 536 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 31 536 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 31 536 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 31 536 39 , srcInfoPoints = [] } "FontName")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 50 536 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 50 536 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 50 536 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 52 536 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 52 536 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 52 536 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 52 536 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 63 536 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 536 63 536 73 , srcInfoPoints = [] } "fontname" "fontname"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 25 537 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 25 537 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 25 537 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 25 537 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 25 537 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 31 537 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 31 537 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 31 537 40 , srcInfoPoints = [] } "FontNames")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 50 537 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 50 537 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 50 537 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 52 537 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 52 537 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 52 537 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 52 537 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 63 537 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 537 63 537 74 , srcInfoPoints = [] } "fontnames" "fontnames"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 25 538 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 25 538 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 25 538 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 25 538 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 25 538 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 31 538 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 31 538 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 31 538 39 , srcInfoPoints = [] } "FontPath")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 50 538 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 50 538 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 50 538 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 52 538 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 52 538 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 52 538 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 52 538 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 63 538 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 538 63 538 73 , srcInfoPoints = [] } "fontpath" "fontpath"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 25 539 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 25 539 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 25 539 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 25 539 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 25 539 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 31 539 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 31 539 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 31 539 39 , srcInfoPoints = [] } "FontSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 50 539 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 50 539 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 50 539 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 52 539 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 52 539 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 52 539 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 52 539 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 63 539 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 539 63 539 73 , srcInfoPoints = [] } "fontsize" "fontsize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 25 540 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 25 540 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 25 540 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 25 540 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 25 540 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 31 540 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 31 540 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 31 540 36 , srcInfoPoints = [] } "Group")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 50 540 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 50 540 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 50 540 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 52 540 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 52 540 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 52 540 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 52 540 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 63 540 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 540 63 540 70 , srcInfoPoints = [] } "group" "group"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 25 541 87 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 25 541 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 25 541 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 25 541 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 25 541 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 31 541 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 31 541 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 31 541 38 , srcInfoPoints = [] } "HeadURL")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 50 541 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 50 541 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 50 541 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 52 541 87 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 52 541 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 52 541 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 52 541 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 64 541 87 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 541 64 541 65 , SrcSpan "tests/examples/Attributes.hs" 541 74 541 75 , SrcSpan "tests/examples/Attributes.hs" 541 86 541 87 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 65 541 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 65 541 74 , srcInfoPoints = [] } "headURL" "headURL") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 76 541 86 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 541 76 541 86 , srcInfoPoints = [] } "headhref" "headhref") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 25 542 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 25 542 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 25 542 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 25 542 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 25 542 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 31 542 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 31 542 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 31 542 39 , srcInfoPoints = [] } "HeadClip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 50 542 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 50 542 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 50 542 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 52 542 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 52 542 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 52 542 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 52 542 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 67 542 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 542 67 542 77 , srcInfoPoints = [] } "headclip" "headclip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 25 543 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 25 543 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 25 543 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 25 543 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 25 543 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 31 543 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 31 543 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 31 543 40 , srcInfoPoints = [] } "HeadLabel")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 50 543 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 50 543 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 50 543 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 52 543 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 52 543 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 52 543 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 52 543 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 63 543 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 543 63 543 74 , srcInfoPoints = [] } "headlabel" "headlabel"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 25 544 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 25 544 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 25 544 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 25 544 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 25 544 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 31 544 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 31 544 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 31 544 39 , srcInfoPoints = [] } "HeadPort")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 50 544 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 50 544 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 50 544 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 52 544 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 52 544 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 52 544 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 52 544 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 63 544 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 544 63 544 73 , srcInfoPoints = [] } "headport" "headport"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 25 545 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 25 545 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 25 545 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 25 545 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 25 545 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 31 545 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 31 545 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 31 545 41 , srcInfoPoints = [] } "HeadTarget")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 50 545 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 50 545 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 50 545 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 52 545 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 52 545 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 52 545 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 52 545 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 63 545 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 545 63 545 75 , srcInfoPoints = [] } "headtarget" "headtarget"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 25 546 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 25 546 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 25 546 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 25 546 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 25 546 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 31 546 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 31 546 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 31 546 42 , srcInfoPoints = [] } "HeadTooltip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 50 546 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 50 546 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 50 546 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 52 546 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 52 546 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 52 546 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 52 546 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 63 546 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 546 63 546 76 , srcInfoPoints = [] } "headtooltip" "headtooltip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 25 547 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 25 547 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 25 547 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 25 547 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 25 547 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 31 547 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 31 547 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 31 547 37 , srcInfoPoints = [] } "Height")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 50 547 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 50 547 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 50 547 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 52 547 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 52 547 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 52 547 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 52 547 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 63 547 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 547 63 547 71 , srcInfoPoints = [] } "height" "height"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 25 548 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 25 548 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 25 548 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 25 548 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 25 548 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 31 548 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 31 548 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 31 548 33 , srcInfoPoints = [] } "ID")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 50 548 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 50 548 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 50 548 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 52 548 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 52 548 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 52 548 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 52 548 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 63 548 67 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 548 63 548 67 , srcInfoPoints = [] } "id" "id"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 25 549 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 25 549 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 25 549 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 25 549 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 25 549 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 31 549 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 31 549 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 31 549 36 , srcInfoPoints = [] } "Image")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 50 549 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 50 549 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 50 549 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 52 549 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 52 549 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 52 549 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 52 549 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 63 549 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 549 63 549 70 , srcInfoPoints = [] } "image" "image"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 25 550 91 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 25 550 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 25 550 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 25 550 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 25 550 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 31 550 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 31 550 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 31 550 41 , srcInfoPoints = [] } "ImageScale")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 50 550 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 50 550 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 50 550 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 52 550 91 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 52 550 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 52 550 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 52 550 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 52 550 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 66 550 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 66 550 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 66 550 78 , srcInfoPoints = [] } "UniformScale")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 79 550 91 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 550 79 550 91 , srcInfoPoints = [] } "imagescale" "imagescale"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 25 551 89 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 25 551 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 25 551 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 25 551 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 25 551 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 31 551 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 31 551 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 31 551 39 , srcInfoPoints = [] } "LabelURL")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 50 551 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 50 551 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 50 551 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 52 551 89 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 52 551 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 52 551 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 52 551 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 64 551 89 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 551 64 551 65 , SrcSpan "tests/examples/Attributes.hs" 551 75 551 76 , SrcSpan "tests/examples/Attributes.hs" 551 88 551 89 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 65 551 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 65 551 75 , srcInfoPoints = [] } "labelURL" "labelURL") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 77 551 88 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 551 77 551 88 , srcInfoPoints = [] } "labelhref" "labelhref") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 25 552 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 25 552 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 25 552 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 25 552 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 25 552 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 31 552 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 31 552 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 31 552 41 , srcInfoPoints = [] } "LabelAngle")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 50 552 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 50 552 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 50 552 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 52 552 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 52 552 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 52 552 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 52 552 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 63 552 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 552 63 552 75 , srcInfoPoints = [] } "labelangle" "labelangle"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 25 553 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 25 553 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 25 553 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 25 553 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 25 553 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 31 553 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 31 553 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 31 553 44 , srcInfoPoints = [] } "LabelDistance")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 50 553 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 50 553 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 50 553 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 52 553 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 52 553 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 52 553 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 52 553 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 63 553 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 553 63 553 78 , srcInfoPoints = [] } "labeldistance" "labeldistance"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 25 554 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 25 554 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 25 554 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 25 554 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 25 554 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 31 554 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 31 554 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 31 554 41 , srcInfoPoints = [] } "LabelFloat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 50 554 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 50 554 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 50 554 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 52 554 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 52 554 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 52 554 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 52 554 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 67 554 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 554 67 554 79 , srcInfoPoints = [] } "labelfloat" "labelfloat"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 25 555 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 25 555 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 25 555 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 25 555 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 25 555 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 31 555 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 31 555 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 31 555 45 , srcInfoPoints = [] } "LabelFontColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 50 555 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 50 555 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 50 555 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 52 555 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 52 555 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 52 555 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 52 555 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 63 555 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 555 63 555 79 , srcInfoPoints = [] } "labelfontcolor" "labelfontcolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 25 556 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 25 556 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 25 556 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 25 556 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 25 556 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 31 556 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 31 556 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 31 556 44 , srcInfoPoints = [] } "LabelFontName")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 50 556 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 50 556 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 50 556 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 52 556 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 52 556 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 52 556 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 52 556 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 63 556 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 556 63 556 78 , srcInfoPoints = [] } "labelfontname" "labelfontname"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 25 557 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 25 557 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 25 557 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 25 557 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 25 557 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 31 557 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 31 557 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 31 557 44 , srcInfoPoints = [] } "LabelFontSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 50 557 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 50 557 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 50 557 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 52 557 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 52 557 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 52 557 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 52 557 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 63 557 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 557 63 557 78 , srcInfoPoints = [] } "labelfontsize" "labelfontsize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 25 558 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 25 558 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 25 558 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 25 558 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 25 558 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 31 558 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 31 558 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 31 558 40 , srcInfoPoints = [] } "LabelJust")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 50 558 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 50 558 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 50 558 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 52 558 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 52 558 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 52 558 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 52 558 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 63 558 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 558 63 558 74 , srcInfoPoints = [] } "labeljust" "labeljust"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 25 559 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 25 559 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 25 559 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 25 559 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 25 559 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 31 559 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 31 559 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 31 559 39 , srcInfoPoints = [] } "LabelLoc")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 50 559 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 50 559 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 50 559 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 52 559 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 52 559 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 52 559 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 52 559 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 63 559 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 559 63 559 73 , srcInfoPoints = [] } "labelloc" "labelloc"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 25 560 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 25 560 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 25 560 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 25 560 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 25 560 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 31 560 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 31 560 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 31 560 42 , srcInfoPoints = [] } "LabelTarget")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 50 560 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 50 560 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 50 560 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 52 560 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 52 560 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 52 560 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 52 560 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 63 560 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 560 63 560 76 , srcInfoPoints = [] } "labeltarget" "labeltarget"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 25 561 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 25 561 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 25 561 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 25 561 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 25 561 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 31 561 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 31 561 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 31 561 43 , srcInfoPoints = [] } "LabelTooltip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 50 561 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 50 561 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 50 561 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 52 561 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 52 561 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 52 561 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 52 561 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 63 561 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 561 63 561 77 , srcInfoPoints = [] } "labeltooltip" "labeltooltip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 25 562 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 25 562 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 25 562 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 25 562 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 25 562 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 31 562 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 31 562 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 31 562 36 , srcInfoPoints = [] } "Label")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 50 562 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 50 562 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 50 562 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 52 562 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 52 562 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 52 562 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 52 562 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 63 562 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 562 63 562 70 , srcInfoPoints = [] } "label" "label"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 25 563 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 25 563 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 25 563 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 25 563 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 25 563 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 31 563 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 31 563 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 31 563 40 , srcInfoPoints = [] } "Landscape")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 50 563 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 50 563 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 50 563 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 52 563 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 52 563 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 52 563 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 52 563 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 67 563 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 563 67 563 78 , srcInfoPoints = [] } "landscape" "landscape"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 25 564 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 25 564 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 25 564 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 25 564 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 25 564 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 31 564 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 31 564 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 31 564 39 , srcInfoPoints = [] } "LayerSep")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 50 564 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 50 564 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 50 564 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 52 564 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 52 564 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 52 564 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 52 564 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 63 564 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 564 63 564 73 , srcInfoPoints = [] } "layersep" "layersep"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 25 565 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 25 565 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 25 565 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 25 565 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 25 565 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 31 565 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 31 565 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 31 565 37 , srcInfoPoints = [] } "Layers")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 50 565 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 50 565 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 50 565 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 52 565 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 52 565 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 52 565 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 52 565 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 63 565 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 565 63 565 71 , srcInfoPoints = [] } "layers" "layers"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 25 566 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 25 566 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 25 566 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 25 566 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 25 566 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 31 566 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 31 566 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 31 566 36 , srcInfoPoints = [] } "Layer")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 50 566 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 50 566 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 50 566 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 52 566 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 52 566 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 52 566 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 52 566 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 63 566 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 566 63 566 70 , srcInfoPoints = [] } "layer" "layer"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 25 567 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 25 567 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 25 567 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 25 567 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 25 567 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 31 567 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 31 567 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 31 567 37 , srcInfoPoints = [] } "Layout")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 50 567 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 50 567 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 50 567 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 52 567 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 52 567 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 52 567 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 52 567 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 63 567 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 567 63 567 71 , srcInfoPoints = [] } "layout" "layout"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 25 568 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 25 568 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 25 568 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 25 568 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 25 568 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 31 568 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 31 568 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 31 568 34 , srcInfoPoints = [] } "Len")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 50 568 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 50 568 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 50 568 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 52 568 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 52 568 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 52 568 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 52 568 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 63 568 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 568 63 568 68 , srcInfoPoints = [] } "len" "len"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 25 569 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 25 569 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 25 569 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 25 569 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 25 569 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 31 569 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 31 569 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 31 569 40 , srcInfoPoints = [] } "LevelsGap")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 50 569 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 50 569 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 50 569 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 52 569 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 52 569 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 52 569 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 52 569 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 63 569 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 569 63 569 74 , srcInfoPoints = [] } "levelsgap" "levelsgap"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 25 570 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 25 570 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 25 570 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 25 570 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 25 570 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 31 570 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 31 570 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 31 570 37 , srcInfoPoints = [] } "Levels")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 50 570 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 50 570 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 50 570 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 52 570 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 52 570 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 52 570 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 52 570 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 63 570 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 570 63 570 71 , srcInfoPoints = [] } "levels" "levels"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 25 571 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 25 571 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 25 571 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 25 571 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 25 571 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 31 571 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 31 571 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 31 571 36 , srcInfoPoints = [] } "LHead")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 50 571 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 50 571 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 50 571 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 52 571 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 52 571 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 52 571 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 52 571 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 63 571 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 571 63 571 70 , srcInfoPoints = [] } "lhead" "lhead"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 25 572 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 25 572 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 25 572 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 25 572 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 25 572 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 31 572 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 31 572 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 31 572 35 , srcInfoPoints = [] } "LPos")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 50 572 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 50 572 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 50 572 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 52 572 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 52 572 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 52 572 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 52 572 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 63 572 67 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 572 63 572 67 , srcInfoPoints = [] } "lp" "lp"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 25 573 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 25 573 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 25 573 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 25 573 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 25 573 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 31 573 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 31 573 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 31 573 36 , srcInfoPoints = [] } "LTail")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 50 573 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 50 573 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 50 573 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 52 573 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 52 573 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 52 573 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 52 573 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 63 573 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 573 63 573 70 , srcInfoPoints = [] } "ltail" "ltail"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 25 574 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 25 574 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 25 574 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 25 574 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 25 574 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 31 574 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 31 574 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 31 574 37 , srcInfoPoints = [] } "Margin")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 50 574 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 50 574 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 50 574 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 52 574 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 52 574 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 52 574 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 52 574 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 63 574 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 574 63 574 71 , srcInfoPoints = [] } "margin" "margin"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 25 575 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 25 575 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 25 575 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 25 575 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 25 575 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 31 575 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 31 575 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 31 575 38 , srcInfoPoints = [] } "MaxIter")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 50 575 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 50 575 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 50 575 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 52 575 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 52 575 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 52 575 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 52 575 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 63 575 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 575 63 575 72 , srcInfoPoints = [] } "maxiter" "maxiter"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 25 576 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 25 576 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 25 576 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 25 576 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 25 576 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 31 576 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 31 576 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 31 576 38 , srcInfoPoints = [] } "MCLimit")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 50 576 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 50 576 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 50 576 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 52 576 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 52 576 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 52 576 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 52 576 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 63 576 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 576 63 576 72 , srcInfoPoints = [] } "mclimit" "mclimit"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 25 577 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 25 577 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 25 577 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 25 577 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 25 577 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 31 577 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 31 577 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 31 577 38 , srcInfoPoints = [] } "MinDist")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 50 577 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 50 577 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 50 577 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 52 577 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 52 577 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 52 577 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 52 577 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 63 577 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 577 63 577 72 , srcInfoPoints = [] } "mindist" "mindist"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 25 578 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 25 578 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 25 578 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 25 578 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 25 578 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 31 578 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 31 578 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 31 578 37 , srcInfoPoints = [] } "MinLen")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 50 578 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 50 578 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 50 578 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 52 578 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 52 578 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 52 578 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 52 578 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 63 578 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 578 63 578 71 , srcInfoPoints = [] } "minlen" "minlen"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 25 579 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 25 579 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 25 579 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 25 579 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 25 579 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 31 579 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 31 579 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 31 579 36 , srcInfoPoints = [] } "Model")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 50 579 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 50 579 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 50 579 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 52 579 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 52 579 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 52 579 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 52 579 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 63 579 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 579 63 579 70 , srcInfoPoints = [] } "model" "model"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 25 580 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 25 580 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 25 580 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 25 580 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 25 580 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 31 580 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 31 580 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 31 580 35 , srcInfoPoints = [] } "Mode")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 50 580 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 50 580 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 50 580 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 52 580 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 52 580 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 52 580 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 52 580 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 63 580 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 580 63 580 69 , srcInfoPoints = [] } "mode" "mode"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 25 581 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 25 581 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 25 581 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 25 581 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 25 581 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 31 581 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 31 581 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 31 581 36 , srcInfoPoints = [] } "Mosek")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 50 581 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 50 581 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 50 581 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 52 581 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 52 581 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 52 581 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 52 581 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 67 581 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 581 67 581 74 , srcInfoPoints = [] } "mosek" "mosek"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 25 582 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 25 582 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 25 582 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 25 582 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 25 582 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 31 582 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 31 582 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 31 582 38 , srcInfoPoints = [] } "NodeSep")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 50 582 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 50 582 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 50 582 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 52 582 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 52 582 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 52 582 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 52 582 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 63 582 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 582 63 582 72 , srcInfoPoints = [] } "nodesep" "nodesep"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 25 583 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 25 583 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 25 583 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 25 583 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 25 583 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 31 583 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 31 583 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 31 583 40 , srcInfoPoints = [] } "NoJustify")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 50 583 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 50 583 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 50 583 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 52 583 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 52 583 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 52 583 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 52 583 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 67 583 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 583 67 583 78 , srcInfoPoints = [] } "nojustify" "nojustify"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 25 584 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 25 584 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 25 584 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 25 584 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 25 584 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 31 584 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 31 584 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 31 584 40 , srcInfoPoints = [] } "Normalize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 50 584 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 50 584 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 50 584 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 52 584 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 52 584 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 52 584 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 52 584 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 67 584 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 584 67 584 78 , srcInfoPoints = [] } "normalize" "normalize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 25 585 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 25 585 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 25 585 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 25 585 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 25 585 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 31 585 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 31 585 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 31 585 39 , srcInfoPoints = [] } "Nslimit1")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 50 585 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 50 585 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 50 585 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 52 585 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 52 585 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 52 585 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 52 585 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 63 585 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 585 63 585 73 , srcInfoPoints = [] } "nslimit1" "nslimit1"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 25 586 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 25 586 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 25 586 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 25 586 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 25 586 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 31 586 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 31 586 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 31 586 38 , srcInfoPoints = [] } "Nslimit")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 50 586 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 50 586 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 50 586 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 52 586 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 52 586 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 52 586 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 52 586 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 63 586 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 586 63 586 72 , srcInfoPoints = [] } "nslimit" "nslimit"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 25 587 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 25 587 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 25 587 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 25 587 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 25 587 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 31 587 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 31 587 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 31 587 39 , srcInfoPoints = [] } "Ordering")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 50 587 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 50 587 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 50 587 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 52 587 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 52 587 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 52 587 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 52 587 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 63 587 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 587 63 587 73 , srcInfoPoints = [] } "ordering" "ordering"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 25 588 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 25 588 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 25 588 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 25 588 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 25 588 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 31 588 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 31 588 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 31 588 42 , srcInfoPoints = [] } "Orientation")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 50 588 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 50 588 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 50 588 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 52 588 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 52 588 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 52 588 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 52 588 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 63 588 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 588 63 588 76 , srcInfoPoints = [] } "orientation" "orientation"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 25 589 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 25 589 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 25 589 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 25 589 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 25 589 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 31 589 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 31 589 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 31 589 42 , srcInfoPoints = [] } "OutputOrder")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 50 589 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 50 589 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 50 589 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 52 589 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 52 589 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 52 589 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 52 589 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 63 589 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 589 63 589 76 , srcInfoPoints = [] } "outputorder" "outputorder"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 25 590 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 25 590 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 25 590 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 25 590 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 25 590 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 31 590 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 31 590 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 31 590 45 , srcInfoPoints = [] } "OverlapScaling")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 50 590 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 50 590 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 50 590 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 52 590 80 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 52 590 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 52 590 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 52 590 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 63 590 80 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 590 63 590 80 , srcInfoPoints = [] } "overlap_scaling" "overlap_scaling"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 25 591 88 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 25 591 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 25 591 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 25 591 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 25 591 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 31 591 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 31 591 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 31 591 38 , srcInfoPoints = [] } "Overlap")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 50 591 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 50 591 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 50 591 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 52 591 88 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 52 591 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 52 591 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 52 591 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 52 591 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 66 591 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 66 591 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 66 591 78 , srcInfoPoints = [] } "KeepOverlaps")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 79 591 88 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 591 79 591 88 , srcInfoPoints = [] } "overlap" "overlap"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 25 592 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 25 592 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 25 592 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 25 592 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 25 592 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 31 592 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 31 592 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 31 592 39 , srcInfoPoints = [] } "PackMode")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 50 592 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 50 592 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 50 592 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 52 592 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 52 592 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 52 592 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 52 592 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 63 592 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 592 63 592 73 , srcInfoPoints = [] } "packmode" "packmode"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 25 593 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 25 593 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 25 593 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 25 593 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 25 593 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 31 593 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 31 593 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 31 593 35 , srcInfoPoints = [] } "Pack")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 50 593 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 50 593 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 50 593 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 52 593 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 52 593 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 52 593 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 52 593 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 52 593 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 66 593 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 66 593 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 66 593 72 , srcInfoPoints = [] } "DoPack")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 73 593 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 593 73 593 79 , srcInfoPoints = [] } "pack" "pack"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 25 594 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 25 594 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 25 594 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 25 594 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 25 594 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 31 594 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 31 594 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 31 594 34 , srcInfoPoints = [] } "Pad")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 50 594 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 50 594 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 50 594 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 52 594 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 52 594 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 52 594 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 52 594 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 63 594 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 594 63 594 68 , srcInfoPoints = [] } "pad" "pad"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 25 595 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 25 595 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 25 595 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 25 595 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 25 595 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 31 595 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 31 595 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 31 595 38 , srcInfoPoints = [] } "PageDir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 50 595 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 50 595 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 50 595 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 52 595 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 52 595 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 52 595 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 52 595 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 63 595 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 595 63 595 72 , srcInfoPoints = [] } "pagedir" "pagedir"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 25 596 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 25 596 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 25 596 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 25 596 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 25 596 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 31 596 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 31 596 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 31 596 35 , srcInfoPoints = [] } "Page")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 50 596 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 50 596 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 50 596 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 52 596 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 52 596 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 52 596 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 52 596 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 63 596 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 596 63 596 69 , srcInfoPoints = [] } "page" "page"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 25 597 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 25 597 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 25 597 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 25 597 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 25 597 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 31 597 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 31 597 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 31 597 39 , srcInfoPoints = [] } "PenColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 50 597 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 50 597 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 50 597 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 52 597 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 52 597 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 52 597 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 52 597 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 63 597 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 597 63 597 73 , srcInfoPoints = [] } "pencolor" "pencolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 25 598 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 25 598 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 25 598 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 25 598 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 25 598 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 31 598 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 31 598 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 31 598 39 , srcInfoPoints = [] } "PenWidth")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 50 598 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 50 598 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 50 598 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 52 598 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 52 598 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 52 598 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 52 598 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 63 598 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 598 63 598 73 , srcInfoPoints = [] } "penwidth" "penwidth"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 25 599 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 25 599 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 25 599 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 25 599 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 25 599 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 31 599 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 31 599 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 31 599 42 , srcInfoPoints = [] } "Peripheries")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 50 599 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 50 599 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 50 599 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 52 599 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 52 599 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 52 599 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 52 599 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 63 599 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 599 63 599 76 , srcInfoPoints = [] } "peripheries" "peripheries"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 25 600 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 25 600 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 25 600 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 25 600 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 25 600 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 31 600 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 31 600 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 31 600 34 , srcInfoPoints = [] } "Pin")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 50 600 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 50 600 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 50 600 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 52 600 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 52 600 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 52 600 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 52 600 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 67 600 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 600 67 600 72 , srcInfoPoints = [] } "pin" "pin"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 25 601 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 25 601 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 25 601 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 25 601 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 25 601 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 31 601 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 31 601 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 31 601 34 , srcInfoPoints = [] } "Pos")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 50 601 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 50 601 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 50 601 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 52 601 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 52 601 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 52 601 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 52 601 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 63 601 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 601 63 601 68 , srcInfoPoints = [] } "pos" "pos"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 25 602 85 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 25 602 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 25 602 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 25 602 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 25 602 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 31 602 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 31 602 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 31 602 39 , srcInfoPoints = [] } "QuadTree")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 50 602 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 50 602 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 50 602 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 52 602 85 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 52 602 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 52 602 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 52 602 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 52 602 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 66 602 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 66 602 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 66 602 74 , srcInfoPoints = [] } "NormalQT")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 75 602 85 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 602 75 602 85 , srcInfoPoints = [] } "quadtree" "quadtree"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 25 603 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 25 603 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 25 603 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 25 603 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 25 603 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 31 603 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 31 603 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 31 603 38 , srcInfoPoints = [] } "Quantum")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 50 603 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 50 603 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 50 603 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 52 603 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 52 603 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 52 603 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 52 603 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 63 603 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 603 63 603 72 , srcInfoPoints = [] } "quantum" "quantum"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 25 604 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 25 604 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 25 604 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 25 604 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 25 604 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 31 604 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 31 604 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 31 604 38 , srcInfoPoints = [] } "RankDir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 50 604 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 50 604 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 50 604 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 52 604 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 52 604 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 52 604 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 52 604 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 63 604 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 604 63 604 72 , srcInfoPoints = [] } "rankdir" "rankdir"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 25 605 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 25 605 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 25 605 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 25 605 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 25 605 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 31 605 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 31 605 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 31 605 38 , srcInfoPoints = [] } "RankSep")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 50 605 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 50 605 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 50 605 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 52 605 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 52 605 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 52 605 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 52 605 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 63 605 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 605 63 605 72 , srcInfoPoints = [] } "ranksep" "ranksep"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 25 606 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 25 606 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 25 606 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 25 606 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 25 606 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 31 606 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 31 606 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 31 606 35 , srcInfoPoints = [] } "Rank")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 50 606 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 50 606 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 50 606 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 52 606 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 52 606 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 52 606 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 52 606 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 63 606 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 606 63 606 69 , srcInfoPoints = [] } "rank" "rank"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 25 607 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 25 607 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 25 607 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 25 607 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 25 607 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 31 607 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 31 607 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 31 607 36 , srcInfoPoints = [] } "Ratio")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 50 607 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 50 607 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 50 607 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 52 607 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 52 607 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 52 607 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 52 607 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 63 607 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 607 63 607 70 , srcInfoPoints = [] } "ratio" "ratio"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 25 608 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 25 608 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 25 608 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 25 608 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 25 608 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 31 608 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 31 608 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 31 608 36 , srcInfoPoints = [] } "Rects")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 50 608 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 50 608 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 50 608 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 52 608 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 52 608 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 52 608 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 52 608 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 63 608 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 608 63 608 70 , srcInfoPoints = [] } "rects" "rects"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 25 609 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 25 609 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 25 609 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 25 609 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 25 609 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 31 609 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 31 609 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 31 609 38 , srcInfoPoints = [] } "Regular")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 50 609 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 50 609 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 50 609 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 52 609 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 52 609 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 52 609 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 52 609 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 67 609 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 609 67 609 76 , srcInfoPoints = [] } "regular" "regular"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 25 610 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 25 610 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 25 610 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 25 610 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 25 610 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 31 610 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 31 610 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 31 610 41 , srcInfoPoints = [] } "ReMinCross")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 50 610 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 50 610 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 50 610 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 52 610 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 52 610 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 52 610 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 52 610 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 67 610 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 610 67 610 79 , srcInfoPoints = [] } "remincross" "remincross"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 25 611 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 25 611 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 25 611 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 25 611 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 25 611 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 31 611 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 31 611 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 31 611 45 , srcInfoPoints = [] } "RepulsiveForce")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 50 611 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 50 611 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 50 611 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 52 611 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 52 611 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 52 611 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 52 611 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 63 611 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 611 63 611 79 , srcInfoPoints = [] } "repulsiveforce" "repulsiveforce"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 25 612 82 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 25 612 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 25 612 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 25 612 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 25 612 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 31 612 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 31 612 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 31 612 35 , srcInfoPoints = [] } "Root")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 50 612 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 50 612 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 50 612 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 52 612 82 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 52 612 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 52 612 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 52 612 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 52 612 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 66 612 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 66 612 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 66 612 75 , srcInfoPoints = [] } "IsCentral")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 76 612 82 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 612 76 612 82 , srcInfoPoints = [] } "root" "root"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 25 613 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 25 613 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 25 613 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 25 613 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 25 613 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 31 613 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 31 613 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 31 613 37 , srcInfoPoints = [] } "Rotate")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 50 613 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 50 613 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 50 613 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 52 613 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 52 613 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 52 613 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 52 613 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 63 613 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 613 63 613 71 , srcInfoPoints = [] } "rotate" "rotate"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 25 614 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 25 614 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 25 614 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 25 614 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 25 614 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 31 614 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 31 614 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 31 614 39 , srcInfoPoints = [] } "SameHead")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 50 614 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 50 614 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 50 614 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 52 614 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 52 614 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 52 614 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 52 614 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 63 614 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 614 63 614 73 , srcInfoPoints = [] } "samehead" "samehead"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 25 615 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 25 615 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 25 615 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 25 615 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 25 615 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 31 615 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 31 615 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 31 615 39 , srcInfoPoints = [] } "SameTail")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 50 615 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 50 615 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 50 615 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 52 615 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 52 615 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 52 615 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 52 615 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 63 615 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 615 63 615 73 , srcInfoPoints = [] } "sametail" "sametail"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 25 616 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 25 616 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 25 616 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 25 616 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 25 616 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 31 616 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 31 616 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 31 616 43 , srcInfoPoints = [] } "SamplePoints")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 50 616 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 50 616 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 50 616 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 52 616 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 52 616 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 52 616 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 52 616 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 63 616 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 616 63 616 77 , srcInfoPoints = [] } "samplepoints" "samplepoints"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 25 617 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 25 617 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 25 617 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 25 617 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 25 617 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 31 617 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 31 617 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 31 617 41 , srcInfoPoints = [] } "SearchSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 50 617 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 50 617 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 50 617 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 52 617 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 52 617 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 52 617 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 52 617 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 63 617 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 617 63 617 75 , srcInfoPoints = [] } "searchsize" "searchsize"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 25 618 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 25 618 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 25 618 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 25 618 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 25 618 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 31 618 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 31 618 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 31 618 34 , srcInfoPoints = [] } "Sep")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 50 618 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 50 618 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 50 618 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 52 618 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 52 618 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 52 618 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 52 618 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 63 618 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 618 63 618 68 , srcInfoPoints = [] } "sep" "sep"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 25 619 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 25 619 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 25 619 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 25 619 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 25 619 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 31 619 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 31 619 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 31 619 40 , srcInfoPoints = [] } "ShapeFile")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 50 619 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 50 619 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 50 619 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 52 619 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 52 619 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 52 619 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 52 619 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 63 619 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 619 63 619 74 , srcInfoPoints = [] } "shapefile" "shapefile"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 25 620 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 25 620 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 25 620 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 25 620 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 25 620 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 31 620 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 31 620 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 31 620 36 , srcInfoPoints = [] } "Shape")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 50 620 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 50 620 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 50 620 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 52 620 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 52 620 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 52 620 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 52 620 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 63 620 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 620 63 620 70 , srcInfoPoints = [] } "shape" "shape"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 25 621 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 25 621 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 25 621 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 25 621 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 25 621 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 31 621 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 31 621 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 31 621 40 , srcInfoPoints = [] } "ShowBoxes")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 50 621 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 50 621 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 50 621 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 52 621 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 52 621 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 52 621 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 52 621 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 63 621 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 621 63 621 74 , srcInfoPoints = [] } "showboxes" "showboxes"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 25 622 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 25 622 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 25 622 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 25 622 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 25 622 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 31 622 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 31 622 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 31 622 36 , srcInfoPoints = [] } "Sides")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 50 622 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 50 622 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 50 622 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 52 622 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 52 622 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 52 622 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 52 622 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 63 622 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 622 63 622 70 , srcInfoPoints = [] } "sides" "sides"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 25 623 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 25 623 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 25 623 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 25 623 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 25 623 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 31 623 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 31 623 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 31 623 35 , srcInfoPoints = [] } "Size")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 50 623 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 50 623 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 50 623 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 52 623 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 52 623 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 52 623 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 52 623 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 63 623 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 623 63 623 69 , srcInfoPoints = [] } "size" "size"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 25 624 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 25 624 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 25 624 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 25 624 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 25 624 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 31 624 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 31 624 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 31 624 35 , srcInfoPoints = [] } "Skew")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 50 624 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 50 624 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 50 624 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 52 624 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 52 624 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 52 624 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 52 624 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 63 624 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 624 63 624 69 , srcInfoPoints = [] } "skew" "skew"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 25 625 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 25 625 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 25 625 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 25 625 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 25 625 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 31 625 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 31 625 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 31 625 40 , srcInfoPoints = [] } "Smoothing")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 50 625 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 50 625 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 50 625 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 52 625 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 52 625 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 52 625 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 52 625 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 63 625 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 625 63 625 74 , srcInfoPoints = [] } "smoothing" "smoothing"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 25 626 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 25 626 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 25 626 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 25 626 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 25 626 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 31 626 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 31 626 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 31 626 36 , srcInfoPoints = [] } "SortV")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 50 626 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 50 626 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 50 626 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 52 626 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 52 626 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 52 626 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 52 626 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 63 626 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 626 63 626 70 , srcInfoPoints = [] } "sortv" "sortv"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 25 627 87 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 25 627 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 25 627 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 25 627 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 25 627 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 31 627 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 31 627 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 31 627 38 , srcInfoPoints = [] } "Splines")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 50 627 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 50 627 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 50 627 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 52 627 87 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 52 627 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 52 627 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 52 627 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 52 627 65 , srcInfoPoints = [] } "parseFieldDef"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 66 627 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 66 627 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 66 627 77 , srcInfoPoints = [] } "SplineEdges")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 78 627 87 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 627 78 627 87 , srcInfoPoints = [] } "splines" "splines"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 25 628 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 25 628 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 25 628 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 25 628 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 25 628 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 31 628 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 31 628 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 31 628 36 , srcInfoPoints = [] } "Start")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 50 628 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 50 628 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 50 628 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 52 628 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 52 628 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 52 628 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 52 628 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 63 628 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 628 63 628 70 , srcInfoPoints = [] } "start" "start"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 25 629 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 25 629 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 25 629 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 25 629 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 25 629 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 31 629 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 31 629 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 31 629 41 , srcInfoPoints = [] } "StyleSheet")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 50 629 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 50 629 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 50 629 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 52 629 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 52 629 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 52 629 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 52 629 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 63 629 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 629 63 629 75 , srcInfoPoints = [] } "stylesheet" "stylesheet"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 25 630 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 25 630 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 25 630 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 25 630 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 25 630 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 31 630 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 31 630 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 31 630 36 , srcInfoPoints = [] } "Style")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 50 630 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 50 630 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 50 630 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 52 630 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 52 630 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 52 630 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 52 630 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 63 630 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 630 63 630 70 , srcInfoPoints = [] } "style" "style"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 25 631 87 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 25 631 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 25 631 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 25 631 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 25 631 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 31 631 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 31 631 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 31 631 38 , srcInfoPoints = [] } "TailURL")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 50 631 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 50 631 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 50 631 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 52 631 87 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 52 631 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 52 631 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 52 631 63 , srcInfoPoints = [] } "parseFields"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 64 631 87 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 631 64 631 65 , SrcSpan "tests/examples/Attributes.hs" 631 74 631 75 , SrcSpan "tests/examples/Attributes.hs" 631 86 631 87 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 65 631 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 65 631 74 , srcInfoPoints = [] } "tailURL" "tailURL") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 76 631 86 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 631 76 631 86 , srcInfoPoints = [] } "tailhref" "tailhref") ])) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 25 632 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 25 632 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 25 632 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 25 632 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 25 632 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 31 632 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 31 632 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 31 632 39 , srcInfoPoints = [] } "TailClip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 50 632 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 50 632 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 50 632 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 52 632 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 52 632 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 52 632 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 52 632 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 67 632 77 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 632 67 632 77 , srcInfoPoints = [] } "tailclip" "tailclip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 25 633 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 25 633 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 25 633 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 25 633 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 25 633 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 31 633 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 31 633 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 31 633 40 , srcInfoPoints = [] } "TailLabel")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 50 633 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 50 633 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 50 633 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 52 633 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 52 633 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 52 633 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 52 633 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 63 633 74 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 633 63 633 74 , srcInfoPoints = [] } "taillabel" "taillabel"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 25 634 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 25 634 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 25 634 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 25 634 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 25 634 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 31 634 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 31 634 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 31 634 39 , srcInfoPoints = [] } "TailPort")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 50 634 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 50 634 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 50 634 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 52 634 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 52 634 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 52 634 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 52 634 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 63 634 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 634 63 634 73 , srcInfoPoints = [] } "tailport" "tailport"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 25 635 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 25 635 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 25 635 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 25 635 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 25 635 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 31 635 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 31 635 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 31 635 41 , srcInfoPoints = [] } "TailTarget")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 50 635 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 50 635 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 50 635 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 52 635 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 52 635 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 52 635 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 52 635 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 63 635 75 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 635 63 635 75 , srcInfoPoints = [] } "tailtarget" "tailtarget"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 25 636 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 25 636 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 25 636 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 25 636 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 25 636 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 31 636 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 31 636 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 31 636 42 , srcInfoPoints = [] } "TailTooltip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 50 636 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 50 636 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 50 636 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 52 636 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 52 636 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 52 636 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 52 636 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 63 636 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 636 63 636 76 , srcInfoPoints = [] } "tailtooltip" "tailtooltip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 25 637 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 25 637 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 25 637 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 25 637 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 25 637 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 31 637 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 31 637 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 31 637 37 , srcInfoPoints = [] } "Target")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 50 637 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 50 637 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 50 637 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 52 637 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 52 637 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 52 637 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 52 637 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 63 637 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 637 63 637 71 , srcInfoPoints = [] } "target" "target"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 25 638 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 25 638 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 25 638 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 25 638 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 25 638 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 31 638 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 31 638 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 31 638 38 , srcInfoPoints = [] } "Tooltip")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 50 638 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 50 638 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 50 638 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 52 638 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 52 638 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 52 638 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 52 638 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 63 638 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 638 63 638 72 , srcInfoPoints = [] } "tooltip" "tooltip"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 25 639 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 25 639 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 25 639 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 25 639 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 25 639 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 31 639 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 31 639 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 31 639 40 , srcInfoPoints = [] } "TrueColor")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 50 639 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 50 639 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 50 639 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 52 639 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 52 639 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 52 639 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 52 639 66 , srcInfoPoints = [] } "parseFieldBool"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 67 639 78 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 639 67 639 78 , srcInfoPoints = [] } "truecolor" "truecolor"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 25 640 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 25 640 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 25 640 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 25 640 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 25 640 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 31 640 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 31 640 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 31 640 39 , srcInfoPoints = [] } "Vertices")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 50 640 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 50 640 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 50 640 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 52 640 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 52 640 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 52 640 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 52 640 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 63 640 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 640 63 640 73 , srcInfoPoints = [] } "vertices" "vertices"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 25 641 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 25 641 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 25 641 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 25 641 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 25 641 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 31 641 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 31 641 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 31 641 39 , srcInfoPoints = [] } "ViewPort")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 50 641 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 50 641 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 50 641 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 52 641 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 52 641 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 52 641 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 52 641 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 63 641 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 641 63 641 73 , srcInfoPoints = [] } "viewport" "viewport"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 25 642 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 25 642 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 25 642 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 25 642 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 25 642 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 31 642 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 31 642 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 31 642 41 , srcInfoPoints = [] } "VoroMargin")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 50 642 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 50 642 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 50 642 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 52 642 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 52 642 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 52 642 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 52 642 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 63 642 76 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 642 63 642 76 , srcInfoPoints = [] } "voro_margin" "voro_margin"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 25 643 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 25 643 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 25 643 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 25 643 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 25 643 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 31 643 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 31 643 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 31 643 37 , srcInfoPoints = [] } "Weight")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 50 643 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 50 643 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 50 643 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 52 643 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 52 643 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 52 643 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 52 643 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 63 643 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 643 63 643 71 , srcInfoPoints = [] } "weight" "weight"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 25 644 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 25 644 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 25 644 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 25 644 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 25 644 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 31 644 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 31 644 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 31 644 36 , srcInfoPoints = [] } "Width")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 50 644 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 50 644 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 50 644 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 52 644 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 52 644 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 52 644 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 52 644 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 63 644 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 644 63 644 70 , srcInfoPoints = [] } "width" "width"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 25 645 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 25 645 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 25 645 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 25 645 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 25 645 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 31 645 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 31 645 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 31 645 32 , srcInfoPoints = [] } "Z")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 50 645 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 50 645 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 50 645 51 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 52 645 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 52 645 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 52 645 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 52 645 62 , srcInfoPoints = [] } "parseField"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 63 645 66 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 645 63 645 66 , srcInfoPoints = [] } "z" "z"))) ]))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 5 648 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 5 648 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 5 648 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 5 648 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 11 648 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 648 11 648 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 13 648 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 13 648 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 648 13 648 22 , srcInfoPoints = [] } "parseUnqt")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 5 650 30 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 5 650 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 5 650 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 5 650 14 , srcInfoPoints = [] } "parseList")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 15 650 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 650 15 650 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 17 650 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 17 650 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 650 17 650 30 , srcInfoPoints = [] } "parseUnqtList")))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 1 653 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 653 35 653 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 1 653 13 , srcInfoPoints = [] } "usedByGraphs" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 38 653 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 653 48 653 50 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 38 653 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 38 653 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 38 653 47 , srcInfoPoints = [] } "Attribute"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 51 653 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 51 653 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 653 51 653 55 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 1 733 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 1 654 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 1 654 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 14 654 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 654 21 654 22 , SrcSpan "tests/examples/Attributes.hs" 654 22 654 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 14 654 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 14 654 21 , srcInfoPoints = [] } "Damping")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 35 654 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 654 35 654 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 37 654 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 37 654 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 654 37 654 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 1 655 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 1 655 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 14 655 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 655 15 655 16 , SrcSpan "tests/examples/Attributes.hs" 655 16 655 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 14 655 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 14 655 15 , srcInfoPoints = [] } "K")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 35 655 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 655 35 655 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 37 655 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 37 655 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 655 37 655 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 1 656 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 1 656 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 14 656 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 656 17 656 18 , SrcSpan "tests/examples/Attributes.hs" 656 18 656 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 14 656 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 14 656 17 , srcInfoPoints = [] } "URL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 35 656 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 656 35 656 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 37 656 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 37 656 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 656 37 656 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 1 657 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 1 657 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 14 657 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 657 20 657 21 , SrcSpan "tests/examples/Attributes.hs" 657 21 657 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 14 657 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 14 657 20 , srcInfoPoints = [] } "Aspect")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 35 657 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 657 35 657 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 37 657 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 37 657 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 657 37 657 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 1 658 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 1 658 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 14 658 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 658 16 658 17 , SrcSpan "tests/examples/Attributes.hs" 658 17 658 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 14 658 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 14 658 16 , srcInfoPoints = [] } "Bb")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 35 658 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 658 35 658 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 37 658 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 37 658 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 658 37 658 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 1 659 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 1 659 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 14 659 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 659 21 659 22 , SrcSpan "tests/examples/Attributes.hs" 659 22 659 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 14 659 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 14 659 21 , srcInfoPoints = [] } "BgColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 35 659 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 659 35 659 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 37 659 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 37 659 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 659 37 659 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 1 660 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 1 660 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 14 660 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 660 20 660 21 , SrcSpan "tests/examples/Attributes.hs" 660 21 660 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 14 660 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 14 660 20 , srcInfoPoints = [] } "Center")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 35 660 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 660 35 660 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 37 660 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 37 660 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 660 37 660 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 1 661 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 1 661 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 14 661 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 661 21 661 22 , SrcSpan "tests/examples/Attributes.hs" 661 22 661 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 14 661 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 14 661 21 , srcInfoPoints = [] } "Charset")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 35 661 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 661 35 661 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 37 661 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 37 661 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 661 37 661 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 1 662 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 1 662 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 14 662 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 662 25 662 26 , SrcSpan "tests/examples/Attributes.hs" 662 26 662 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 14 662 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 14 662 25 , srcInfoPoints = [] } "ClusterRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 35 662 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 662 35 662 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 37 662 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 37 662 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 662 37 662 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 1 663 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 1 663 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 14 663 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 663 25 663 26 , SrcSpan "tests/examples/Attributes.hs" 663 26 663 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 14 663 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 14 663 25 , srcInfoPoints = [] } "ColorScheme")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 35 663 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 663 35 663 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 37 663 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 37 663 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 663 37 663 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 1 664 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 1 664 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 14 664 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 664 21 664 22 , SrcSpan "tests/examples/Attributes.hs" 664 22 664 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 14 664 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 14 664 21 , srcInfoPoints = [] } "Comment")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 35 664 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 664 35 664 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 37 664 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 37 664 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 664 37 664 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 1 665 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 1 665 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 14 665 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 665 22 665 23 , SrcSpan "tests/examples/Attributes.hs" 665 23 665 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 14 665 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 14 665 22 , srcInfoPoints = [] } "Compound")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 35 665 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 665 35 665 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 37 665 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 37 665 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 665 37 665 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 1 666 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 1 666 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 14 666 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 666 25 666 26 , SrcSpan "tests/examples/Attributes.hs" 666 26 666 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 14 666 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 14 666 25 , srcInfoPoints = [] } "Concentrate")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 35 666 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 666 35 666 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 37 666 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 37 666 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 666 37 666 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 1 667 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 1 667 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 14 667 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 667 25 667 26 , SrcSpan "tests/examples/Attributes.hs" 667 26 667 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 14 667 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 14 667 25 , srcInfoPoints = [] } "DefaultDist")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 35 667 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 667 35 667 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 37 667 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 37 667 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 667 37 667 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 1 668 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 1 668 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 14 668 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 668 19 668 20 , SrcSpan "tests/examples/Attributes.hs" 668 20 668 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 14 668 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 14 668 19 , srcInfoPoints = [] } "Dimen")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 35 668 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 668 35 668 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 37 668 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 37 668 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 668 37 668 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 1 669 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 1 669 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 14 669 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 669 17 669 18 , SrcSpan "tests/examples/Attributes.hs" 669 18 669 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 14 669 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 14 669 17 , srcInfoPoints = [] } "Dim")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 35 669 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 669 35 669 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 37 669 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 37 669 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 669 37 669 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 1 670 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 1 670 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 14 670 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 670 32 670 33 , SrcSpan "tests/examples/Attributes.hs" 670 33 670 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 14 670 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 14 670 32 , srcInfoPoints = [] } "DirEdgeConstraints")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 35 670 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 670 35 670 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 37 670 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 37 670 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 670 37 670 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 1 671 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 1 671 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 14 671 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 671 17 671 18 , SrcSpan "tests/examples/Attributes.hs" 671 18 671 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 14 671 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 14 671 17 , srcInfoPoints = [] } "DPI")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 35 671 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 671 35 671 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 37 671 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 37 671 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 671 37 671 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 1 672 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 1 672 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 14 672 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 672 21 672 22 , SrcSpan "tests/examples/Attributes.hs" 672 22 672 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 14 672 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 14 672 21 , srcInfoPoints = [] } "Epsilon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 35 672 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 672 35 672 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 37 672 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 37 672 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 672 37 672 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 1 673 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 1 673 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 14 673 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 673 18 673 19 , SrcSpan "tests/examples/Attributes.hs" 673 19 673 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 14 673 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 14 673 18 , srcInfoPoints = [] } "ESep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 35 673 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 673 35 673 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 37 673 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 37 673 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 673 37 673 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 1 674 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 1 674 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 14 674 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 674 23 674 24 , SrcSpan "tests/examples/Attributes.hs" 674 24 674 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 14 674 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 14 674 23 , srcInfoPoints = [] } "FontColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 35 674 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 674 35 674 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 37 674 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 37 674 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 674 37 674 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 1 675 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 1 675 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 14 675 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 675 22 675 23 , SrcSpan "tests/examples/Attributes.hs" 675 23 675 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 14 675 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 14 675 22 , srcInfoPoints = [] } "FontName")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 35 675 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 675 35 675 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 37 675 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 37 675 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 675 37 675 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 1 676 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 1 676 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 14 676 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 676 23 676 24 , SrcSpan "tests/examples/Attributes.hs" 676 24 676 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 14 676 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 14 676 23 , srcInfoPoints = [] } "FontNames")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 35 676 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 676 35 676 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 37 676 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 37 676 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 676 37 676 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 1 677 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 1 677 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 14 677 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 677 22 677 23 , SrcSpan "tests/examples/Attributes.hs" 677 23 677 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 14 677 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 14 677 22 , srcInfoPoints = [] } "FontPath")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 35 677 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 677 35 677 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 37 677 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 37 677 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 677 37 677 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 1 678 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 1 678 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 14 678 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 678 22 678 23 , SrcSpan "tests/examples/Attributes.hs" 678 23 678 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 14 678 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 14 678 22 , srcInfoPoints = [] } "FontSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 35 678 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 678 35 678 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 37 678 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 37 678 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 678 37 678 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 1 679 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 1 679 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 14 679 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 679 16 679 17 , SrcSpan "tests/examples/Attributes.hs" 679 17 679 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 14 679 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 14 679 16 , srcInfoPoints = [] } "ID")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 35 679 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 679 35 679 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 37 679 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 37 679 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 679 37 679 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 1 680 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 1 680 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 14 680 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 680 23 680 24 , SrcSpan "tests/examples/Attributes.hs" 680 24 680 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 14 680 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 14 680 23 , srcInfoPoints = [] } "LabelJust")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 35 680 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 680 35 680 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 37 680 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 37 680 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 680 37 680 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 1 681 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 1 681 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 14 681 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 681 22 681 23 , SrcSpan "tests/examples/Attributes.hs" 681 23 681 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 14 681 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 14 681 22 , srcInfoPoints = [] } "LabelLoc")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 35 681 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 681 35 681 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 37 681 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 37 681 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 681 37 681 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 1 682 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 1 682 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 14 682 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 682 19 682 20 , SrcSpan "tests/examples/Attributes.hs" 682 20 682 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 14 682 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 14 682 19 , srcInfoPoints = [] } "Label")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 35 682 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 682 35 682 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 37 682 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 37 682 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 682 37 682 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 1 683 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 1 683 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 14 683 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 683 23 683 24 , SrcSpan "tests/examples/Attributes.hs" 683 24 683 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 14 683 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 14 683 23 , srcInfoPoints = [] } "Landscape")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 35 683 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 683 35 683 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 37 683 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 37 683 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 683 37 683 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 1 684 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 1 684 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 14 684 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 684 22 684 23 , SrcSpan "tests/examples/Attributes.hs" 684 23 684 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 14 684 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 14 684 22 , srcInfoPoints = [] } "LayerSep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 35 684 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 684 35 684 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 37 684 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 37 684 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 684 37 684 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 1 685 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 1 685 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 14 685 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 685 20 685 21 , SrcSpan "tests/examples/Attributes.hs" 685 21 685 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 14 685 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 14 685 20 , srcInfoPoints = [] } "Layers")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 35 685 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 685 35 685 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 37 685 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 37 685 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 685 37 685 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 1 686 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 1 686 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 14 686 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 686 20 686 21 , SrcSpan "tests/examples/Attributes.hs" 686 21 686 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 14 686 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 14 686 20 , srcInfoPoints = [] } "Layout")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 35 686 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 686 35 686 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 37 686 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 37 686 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 686 37 686 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 1 687 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 1 687 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 14 687 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 687 23 687 24 , SrcSpan "tests/examples/Attributes.hs" 687 24 687 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 14 687 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 14 687 23 , srcInfoPoints = [] } "LevelsGap")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 35 687 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 687 35 687 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 37 687 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 37 687 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 687 37 687 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 1 688 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 1 688 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 14 688 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 688 20 688 21 , SrcSpan "tests/examples/Attributes.hs" 688 21 688 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 14 688 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 14 688 20 , srcInfoPoints = [] } "Levels")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 35 688 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 688 35 688 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 37 688 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 37 688 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 688 37 688 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 1 689 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 1 689 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 14 689 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 689 18 689 19 , SrcSpan "tests/examples/Attributes.hs" 689 19 689 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 14 689 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 14 689 18 , srcInfoPoints = [] } "LPos")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 35 689 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 689 35 689 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 37 689 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 37 689 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 689 37 689 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 1 690 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 1 690 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 14 690 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 690 20 690 21 , SrcSpan "tests/examples/Attributes.hs" 690 21 690 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 14 690 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 14 690 20 , srcInfoPoints = [] } "Margin")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 35 690 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 690 35 690 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 37 690 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 37 690 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 690 37 690 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 1 691 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 1 691 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 14 691 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 691 21 691 22 , SrcSpan "tests/examples/Attributes.hs" 691 22 691 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 14 691 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 14 691 21 , srcInfoPoints = [] } "MaxIter")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 35 691 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 691 35 691 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 37 691 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 37 691 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 691 37 691 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 1 692 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 1 692 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 14 692 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 692 21 692 22 , SrcSpan "tests/examples/Attributes.hs" 692 22 692 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 14 692 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 14 692 21 , srcInfoPoints = [] } "MCLimit")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 35 692 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 692 35 692 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 37 692 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 37 692 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 692 37 692 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 1 693 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 1 693 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 14 693 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 693 21 693 22 , SrcSpan "tests/examples/Attributes.hs" 693 22 693 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 14 693 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 14 693 21 , srcInfoPoints = [] } "MinDist")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 35 693 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 693 35 693 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 37 693 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 37 693 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 693 37 693 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 1 694 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 1 694 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 14 694 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 694 19 694 20 , SrcSpan "tests/examples/Attributes.hs" 694 20 694 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 14 694 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 14 694 19 , srcInfoPoints = [] } "Model")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 35 694 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 694 35 694 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 37 694 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 37 694 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 694 37 694 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 1 695 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 1 695 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 14 695 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 695 18 695 19 , SrcSpan "tests/examples/Attributes.hs" 695 19 695 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 14 695 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 14 695 18 , srcInfoPoints = [] } "Mode")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 35 695 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 695 35 695 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 37 695 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 37 695 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 695 37 695 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 1 696 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 1 696 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 14 696 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 696 19 696 20 , SrcSpan "tests/examples/Attributes.hs" 696 20 696 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 14 696 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 14 696 19 , srcInfoPoints = [] } "Mosek")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 35 696 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 696 35 696 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 37 696 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 37 696 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 696 37 696 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 1 697 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 1 697 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 14 697 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 697 21 697 22 , SrcSpan "tests/examples/Attributes.hs" 697 22 697 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 14 697 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 14 697 21 , srcInfoPoints = [] } "NodeSep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 35 697 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 697 35 697 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 37 697 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 37 697 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 697 37 697 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 1 698 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 1 698 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 14 698 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 698 23 698 24 , SrcSpan "tests/examples/Attributes.hs" 698 24 698 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 14 698 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 14 698 23 , srcInfoPoints = [] } "NoJustify")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 35 698 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 698 35 698 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 37 698 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 37 698 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 698 37 698 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 1 699 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 1 699 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 14 699 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 699 23 699 24 , SrcSpan "tests/examples/Attributes.hs" 699 24 699 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 14 699 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 14 699 23 , srcInfoPoints = [] } "Normalize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 35 699 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 699 35 699 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 37 699 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 37 699 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 699 37 699 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 1 700 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 1 700 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 14 700 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 700 22 700 23 , SrcSpan "tests/examples/Attributes.hs" 700 23 700 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 14 700 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 14 700 22 , srcInfoPoints = [] } "Nslimit1")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 35 700 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 700 35 700 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 37 700 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 37 700 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 700 37 700 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 1 701 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 1 701 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 14 701 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 701 21 701 22 , SrcSpan "tests/examples/Attributes.hs" 701 22 701 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 14 701 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 14 701 21 , srcInfoPoints = [] } "Nslimit")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 35 701 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 701 35 701 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 37 701 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 37 701 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 701 37 701 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 1 702 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 1 702 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 14 702 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 702 22 702 23 , SrcSpan "tests/examples/Attributes.hs" 702 23 702 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 14 702 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 14 702 22 , srcInfoPoints = [] } "Ordering")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 35 702 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 702 35 702 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 37 702 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 37 702 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 702 37 702 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 1 703 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 1 703 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 14 703 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 703 25 703 26 , SrcSpan "tests/examples/Attributes.hs" 703 26 703 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 14 703 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 14 703 25 , srcInfoPoints = [] } "OutputOrder")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 35 703 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 703 35 703 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 37 703 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 37 703 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 703 37 703 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 1 704 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 1 704 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 14 704 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 704 28 704 29 , SrcSpan "tests/examples/Attributes.hs" 704 29 704 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 14 704 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 14 704 28 , srcInfoPoints = [] } "OverlapScaling")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 35 704 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 704 35 704 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 37 704 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 37 704 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 704 37 704 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 1 705 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 1 705 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 14 705 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 705 21 705 22 , SrcSpan "tests/examples/Attributes.hs" 705 22 705 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 14 705 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 14 705 21 , srcInfoPoints = [] } "Overlap")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 35 705 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 705 35 705 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 37 705 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 37 705 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 705 37 705 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 1 706 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 1 706 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 14 706 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 706 22 706 23 , SrcSpan "tests/examples/Attributes.hs" 706 23 706 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 14 706 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 14 706 22 , srcInfoPoints = [] } "PackMode")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 35 706 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 706 35 706 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 37 706 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 37 706 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 706 37 706 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 1 707 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 1 707 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 14 707 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 707 18 707 19 , SrcSpan "tests/examples/Attributes.hs" 707 19 707 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 14 707 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 14 707 18 , srcInfoPoints = [] } "Pack")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 35 707 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 707 35 707 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 37 707 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 37 707 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 707 37 707 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 1 708 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 1 708 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 14 708 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 708 17 708 18 , SrcSpan "tests/examples/Attributes.hs" 708 18 708 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 14 708 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 14 708 17 , srcInfoPoints = [] } "Pad")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 35 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 708 35 708 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 37 708 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 37 708 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 708 37 708 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 1 709 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 1 709 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 14 709 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 709 21 709 22 , SrcSpan "tests/examples/Attributes.hs" 709 22 709 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 14 709 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 14 709 21 , srcInfoPoints = [] } "PageDir")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 35 709 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 709 35 709 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 37 709 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 37 709 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 709 37 709 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 1 710 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 1 710 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 14 710 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 710 18 710 19 , SrcSpan "tests/examples/Attributes.hs" 710 19 710 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 14 710 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 14 710 18 , srcInfoPoints = [] } "Page")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 35 710 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 710 35 710 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 37 710 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 37 710 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 710 37 710 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 1 711 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 1 711 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 14 711 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 711 22 711 23 , SrcSpan "tests/examples/Attributes.hs" 711 23 711 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 14 711 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 14 711 22 , srcInfoPoints = [] } "QuadTree")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 35 711 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 711 35 711 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 37 711 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 37 711 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 711 37 711 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 1 712 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 1 712 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 14 712 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 712 21 712 22 , SrcSpan "tests/examples/Attributes.hs" 712 22 712 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 14 712 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 14 712 21 , srcInfoPoints = [] } "Quantum")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 35 712 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 712 35 712 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 37 712 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 37 712 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 712 37 712 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 1 713 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 1 713 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 14 713 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 713 21 713 22 , SrcSpan "tests/examples/Attributes.hs" 713 22 713 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 14 713 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 14 713 21 , srcInfoPoints = [] } "RankDir")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 35 713 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 713 35 713 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 37 713 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 37 713 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 713 37 713 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 1 714 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 1 714 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 14 714 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 714 21 714 22 , SrcSpan "tests/examples/Attributes.hs" 714 22 714 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 14 714 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 14 714 21 , srcInfoPoints = [] } "RankSep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 35 714 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 714 35 714 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 37 714 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 37 714 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 714 37 714 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 1 715 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 1 715 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 14 715 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 715 19 715 20 , SrcSpan "tests/examples/Attributes.hs" 715 20 715 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 14 715 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 14 715 19 , srcInfoPoints = [] } "Ratio")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 35 715 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 715 35 715 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 37 715 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 37 715 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 715 37 715 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 1 716 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 1 716 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 14 716 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 716 24 716 25 , SrcSpan "tests/examples/Attributes.hs" 716 25 716 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 14 716 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 14 716 24 , srcInfoPoints = [] } "ReMinCross")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 35 716 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 716 35 716 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 37 716 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 37 716 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 716 37 716 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 1 717 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 1 717 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 14 717 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 717 28 717 29 , SrcSpan "tests/examples/Attributes.hs" 717 29 717 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 14 717 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 14 717 28 , srcInfoPoints = [] } "RepulsiveForce")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 35 717 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 717 35 717 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 37 717 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 37 717 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 717 37 717 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 1 718 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 1 718 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 14 718 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 718 18 718 19 , SrcSpan "tests/examples/Attributes.hs" 718 19 718 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 14 718 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 14 718 18 , srcInfoPoints = [] } "Root")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 35 718 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 718 35 718 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 37 718 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 37 718 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 718 37 718 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 1 719 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 1 719 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 14 719 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 719 20 719 21 , SrcSpan "tests/examples/Attributes.hs" 719 21 719 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 14 719 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 14 719 20 , srcInfoPoints = [] } "Rotate")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 35 719 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 719 35 719 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 37 719 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 37 719 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 719 37 719 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 1 720 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 1 720 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 14 720 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 720 24 720 25 , SrcSpan "tests/examples/Attributes.hs" 720 25 720 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 14 720 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 14 720 24 , srcInfoPoints = [] } "SearchSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 35 720 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 720 35 720 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 37 720 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 37 720 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 720 37 720 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 1 721 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 1 721 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 14 721 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 721 17 721 18 , SrcSpan "tests/examples/Attributes.hs" 721 18 721 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 14 721 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 14 721 17 , srcInfoPoints = [] } "Sep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 35 721 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 721 35 721 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 37 721 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 37 721 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 721 37 721 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 1 722 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 1 722 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 14 722 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 722 23 722 24 , SrcSpan "tests/examples/Attributes.hs" 722 24 722 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 14 722 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 14 722 23 , srcInfoPoints = [] } "ShowBoxes")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 35 722 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 722 35 722 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 37 722 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 37 722 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 722 37 722 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 1 723 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 1 723 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 14 723 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 723 18 723 19 , SrcSpan "tests/examples/Attributes.hs" 723 19 723 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 14 723 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 14 723 18 , srcInfoPoints = [] } "Size")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 35 723 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 723 35 723 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 37 723 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 37 723 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 723 37 723 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 1 724 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 1 724 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 14 724 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 724 23 724 24 , SrcSpan "tests/examples/Attributes.hs" 724 24 724 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 14 724 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 14 724 23 , srcInfoPoints = [] } "Smoothing")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 35 724 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 724 35 724 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 37 724 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 37 724 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 724 37 724 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 1 725 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 1 725 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 14 725 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 725 19 725 20 , SrcSpan "tests/examples/Attributes.hs" 725 20 725 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 14 725 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 14 725 19 , srcInfoPoints = [] } "SortV")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 35 725 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 725 35 725 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 37 725 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 37 725 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 725 37 725 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 1 726 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 1 726 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 14 726 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 726 21 726 22 , SrcSpan "tests/examples/Attributes.hs" 726 22 726 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 14 726 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 14 726 21 , srcInfoPoints = [] } "Splines")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 35 726 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 726 35 726 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 37 726 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 37 726 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 726 37 726 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 1 727 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 1 727 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 14 727 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 727 19 727 20 , SrcSpan "tests/examples/Attributes.hs" 727 20 727 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 14 727 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 14 727 19 , srcInfoPoints = [] } "Start")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 35 727 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 727 35 727 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 37 727 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 37 727 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 727 37 727 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 1 728 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 1 728 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 14 728 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 728 24 728 25 , SrcSpan "tests/examples/Attributes.hs" 728 25 728 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 14 728 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 14 728 24 , srcInfoPoints = [] } "StyleSheet")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 35 728 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 728 35 728 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 37 728 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 37 728 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 728 37 728 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 1 729 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 1 729 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 14 729 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 729 20 729 21 , SrcSpan "tests/examples/Attributes.hs" 729 21 729 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 14 729 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 14 729 20 , srcInfoPoints = [] } "Target")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 35 729 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 729 35 729 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 37 729 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 37 729 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 729 37 729 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 1 730 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 1 730 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 14 730 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 730 23 730 24 , SrcSpan "tests/examples/Attributes.hs" 730 24 730 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 14 730 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 14 730 23 , srcInfoPoints = [] } "TrueColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 35 730 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 730 35 730 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 37 730 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 37 730 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 730 37 730 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 1 731 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 1 731 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 14 731 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 731 22 731 23 , SrcSpan "tests/examples/Attributes.hs" 731 23 731 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 14 731 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 14 731 22 , srcInfoPoints = [] } "ViewPort")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 35 731 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 731 35 731 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 37 731 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 37 731 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 731 37 731 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 1 732 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 1 732 13 , srcInfoPoints = [] } "usedByGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 14 732 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 732 24 732 25 , SrcSpan "tests/examples/Attributes.hs" 732 25 732 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 14 732 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 14 732 24 , srcInfoPoints = [] } "VoroMargin")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 35 732 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 732 35 732 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 37 732 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 37 732 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 732 37 732 41 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 1 733 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 1 733 13 , srcInfoPoints = [] } "usedByGraphs") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 14 733 15 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 35 733 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 733 35 733 36 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 37 733 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 37 733 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 733 37 733 42 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 1 736 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 736 30 736 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 1 736 15 , srcInfoPoints = [] } "usedByClusters" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 33 736 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 736 43 736 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 33 736 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 33 736 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 33 736 42 , srcInfoPoints = [] } "Attribute"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 46 736 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 46 736 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 736 46 736 50 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 1 759 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 1 737 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 1 737 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 16 737 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 737 17 737 18 , SrcSpan "tests/examples/Attributes.hs" 737 18 737 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 16 737 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 16 737 17 , srcInfoPoints = [] } "K")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 30 737 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 737 30 737 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 32 737 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 32 737 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 737 32 737 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 1 738 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 1 738 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 16 738 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 738 19 738 20 , SrcSpan "tests/examples/Attributes.hs" 738 20 738 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 16 738 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 16 738 19 , srcInfoPoints = [] } "URL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 30 738 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 738 30 738 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 32 738 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 32 738 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 738 32 738 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 1 739 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 1 739 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 16 739 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 739 23 739 24 , SrcSpan "tests/examples/Attributes.hs" 739 24 739 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 16 739 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 16 739 23 , srcInfoPoints = [] } "BgColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 30 739 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 739 30 739 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 32 739 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 32 739 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 739 32 739 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 1 740 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 1 740 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 16 740 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 740 27 740 28 , SrcSpan "tests/examples/Attributes.hs" 740 28 740 29 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 16 740 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 16 740 27 , srcInfoPoints = [] } "ColorScheme")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 30 740 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 740 30 740 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 32 740 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 32 740 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 740 32 740 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 1 741 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 1 741 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 16 741 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 741 21 741 22 , SrcSpan "tests/examples/Attributes.hs" 741 22 741 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 16 741 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 16 741 21 , srcInfoPoints = [] } "Color")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 30 741 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 741 30 741 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 32 741 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 32 741 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 741 32 741 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 1 742 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 1 742 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 16 742 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 742 25 742 26 , SrcSpan "tests/examples/Attributes.hs" 742 26 742 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 16 742 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 16 742 25 , srcInfoPoints = [] } "FillColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 30 742 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 742 30 742 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 32 742 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 32 742 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 742 32 742 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 1 743 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 1 743 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 16 743 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 743 25 743 26 , SrcSpan "tests/examples/Attributes.hs" 743 26 743 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 16 743 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 16 743 25 , srcInfoPoints = [] } "FontColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 30 743 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 743 30 743 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 32 743 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 32 743 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 743 32 743 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 1 744 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 1 744 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 16 744 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 744 24 744 25 , SrcSpan "tests/examples/Attributes.hs" 744 25 744 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 16 744 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 16 744 24 , srcInfoPoints = [] } "FontName")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 30 744 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 744 30 744 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 32 744 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 32 744 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 744 32 744 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 1 745 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 1 745 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 16 745 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 745 24 745 25 , SrcSpan "tests/examples/Attributes.hs" 745 25 745 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 16 745 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 16 745 24 , srcInfoPoints = [] } "FontSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 30 745 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 745 30 745 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 32 745 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 32 745 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 745 32 745 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 1 746 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 1 746 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 16 746 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 746 25 746 26 , SrcSpan "tests/examples/Attributes.hs" 746 26 746 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 16 746 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 16 746 25 , srcInfoPoints = [] } "LabelJust")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 30 746 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 746 30 746 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 32 746 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 32 746 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 746 32 746 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 1 747 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 1 747 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 16 747 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 747 24 747 25 , SrcSpan "tests/examples/Attributes.hs" 747 25 747 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 16 747 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 16 747 24 , srcInfoPoints = [] } "LabelLoc")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 30 747 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 747 30 747 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 32 747 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 32 747 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 747 32 747 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 1 748 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 1 748 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 16 748 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 748 21 748 22 , SrcSpan "tests/examples/Attributes.hs" 748 22 748 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 16 748 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 16 748 21 , srcInfoPoints = [] } "Label")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 30 748 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 748 30 748 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 32 748 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 32 748 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 748 32 748 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 1 749 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 1 749 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 16 749 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 749 20 749 21 , SrcSpan "tests/examples/Attributes.hs" 749 21 749 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 16 749 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 16 749 20 , srcInfoPoints = [] } "LPos")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 30 749 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 749 30 749 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 32 749 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 32 749 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 749 32 749 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 1 750 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 1 750 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 16 750 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 750 25 750 26 , SrcSpan "tests/examples/Attributes.hs" 750 26 750 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 16 750 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 16 750 25 , srcInfoPoints = [] } "NoJustify")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 30 750 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 750 30 750 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 32 750 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 32 750 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 750 32 750 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 1 751 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 1 751 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 16 751 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 751 24 751 25 , SrcSpan "tests/examples/Attributes.hs" 751 25 751 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 16 751 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 16 751 24 , srcInfoPoints = [] } "PenColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 30 751 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 751 30 751 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 32 751 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 32 751 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 751 32 751 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 1 752 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 1 752 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 16 752 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 752 24 752 25 , SrcSpan "tests/examples/Attributes.hs" 752 25 752 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 16 752 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 16 752 24 , srcInfoPoints = [] } "PenWidth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 30 752 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 752 30 752 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 32 752 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 32 752 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 752 32 752 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 1 753 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 1 753 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 16 753 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 753 27 753 28 , SrcSpan "tests/examples/Attributes.hs" 753 28 753 29 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 16 753 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 16 753 27 , srcInfoPoints = [] } "Peripheries")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 30 753 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 753 30 753 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 32 753 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 32 753 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 753 32 753 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 1 754 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 1 754 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 16 754 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 754 20 754 21 , SrcSpan "tests/examples/Attributes.hs" 754 21 754 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 16 754 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 16 754 20 , srcInfoPoints = [] } "Rank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 30 754 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 754 30 754 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 32 754 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 32 754 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 754 32 754 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 1 755 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 1 755 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 16 755 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 755 21 755 22 , SrcSpan "tests/examples/Attributes.hs" 755 22 755 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 16 755 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 16 755 21 , srcInfoPoints = [] } "SortV")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 30 755 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 755 30 755 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 32 755 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 32 755 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 755 32 755 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 1 756 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 1 756 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 16 756 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 756 21 756 22 , SrcSpan "tests/examples/Attributes.hs" 756 22 756 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 16 756 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 16 756 21 , srcInfoPoints = [] } "Style")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 30 756 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 756 30 756 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 32 756 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 32 756 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 756 32 756 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 1 757 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 1 757 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 16 757 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 757 22 757 23 , SrcSpan "tests/examples/Attributes.hs" 757 23 757 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 16 757 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 16 757 22 , srcInfoPoints = [] } "Target")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 30 757 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 757 30 757 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 32 757 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 32 757 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 757 32 757 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 1 758 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 1 758 15 , srcInfoPoints = [] } "usedByClusters") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 16 758 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 758 23 758 24 , SrcSpan "tests/examples/Attributes.hs" 758 24 758 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 16 758 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 16 758 23 , srcInfoPoints = [] } "Tooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 30 758 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 758 30 758 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 32 758 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 32 758 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 758 32 758 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 1 759 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 1 759 15 , srcInfoPoints = [] } "usedByClusters") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 16 759 17 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 30 759 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 759 30 759 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 32 759 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 32 759 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 759 32 759 37 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 1 762 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 762 24 762 26 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 1 762 16 , srcInfoPoints = [] } "usedBySubGraphs" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 27 762 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 762 37 762 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 27 762 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 27 762 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 27 762 36 , srcInfoPoints = [] } "Attribute"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 40 762 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 40 762 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 762 40 762 44 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 1 764 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 1 763 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 1 763 16 , srcInfoPoints = [] } "usedBySubGraphs") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 17 763 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 763 21 763 22 , SrcSpan "tests/examples/Attributes.hs" 763 22 763 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 17 763 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 17 763 21 , srcInfoPoints = [] } "Rank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 24 763 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 763 24 763 25 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 26 763 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 26 763 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 763 26 763 30 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 1 764 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 1 764 16 , srcInfoPoints = [] } "usedBySubGraphs") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 17 764 18 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 24 764 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 764 24 764 25 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 26 764 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 26 764 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 764 26 764 31 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 1 767 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 767 28 767 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 1 767 12 , srcInfoPoints = [] } "usedByNodes" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 31 767 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 767 41 767 43 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 31 767 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 31 767 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 31 767 40 , srcInfoPoints = [] } "Attribute"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 44 767 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 44 767 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 767 44 767 48 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 1 809 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 1 768 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 1 768 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 13 768 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 768 16 768 17 , SrcSpan "tests/examples/Attributes.hs" 768 17 768 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 13 768 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 13 768 16 , srcInfoPoints = [] } "URL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 28 768 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 768 28 768 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 30 768 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 30 768 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 768 30 768 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 1 769 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 1 769 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 13 769 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 769 24 769 25 , SrcSpan "tests/examples/Attributes.hs" 769 25 769 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 13 769 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 13 769 24 , srcInfoPoints = [] } "ColorScheme")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 28 769 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 769 28 769 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 30 769 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 30 769 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 769 30 769 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 1 770 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 1 770 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 13 770 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 770 18 770 19 , SrcSpan "tests/examples/Attributes.hs" 770 19 770 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 13 770 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 13 770 18 , srcInfoPoints = [] } "Color")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 28 770 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 770 28 770 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 30 770 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 30 770 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 770 30 770 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 1 771 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 1 771 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 13 771 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 771 20 771 21 , SrcSpan "tests/examples/Attributes.hs" 771 21 771 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 13 771 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 13 771 20 , srcInfoPoints = [] } "Comment")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 28 771 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 771 28 771 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 30 771 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 30 771 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 771 30 771 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 1 772 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 1 772 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 13 772 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 772 23 772 24 , SrcSpan "tests/examples/Attributes.hs" 772 24 772 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 13 772 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 13 772 23 , srcInfoPoints = [] } "Distortion")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 28 772 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 772 28 772 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 30 772 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 30 772 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 772 30 772 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 1 773 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 1 773 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 13 773 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 773 22 773 23 , SrcSpan "tests/examples/Attributes.hs" 773 23 773 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 13 773 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 13 773 22 , srcInfoPoints = [] } "FillColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 28 773 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 773 28 773 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 30 773 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 30 773 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 773 30 773 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 1 774 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 1 774 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 13 774 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 774 22 774 23 , SrcSpan "tests/examples/Attributes.hs" 774 23 774 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 13 774 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 13 774 22 , srcInfoPoints = [] } "FixedSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 28 774 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 774 28 774 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 30 774 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 30 774 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 774 30 774 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 1 775 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 1 775 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 13 775 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 775 22 775 23 , SrcSpan "tests/examples/Attributes.hs" 775 23 775 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 13 775 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 13 775 22 , srcInfoPoints = [] } "FontColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 28 775 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 775 28 775 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 30 775 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 30 775 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 775 30 775 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 1 776 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 1 776 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 13 776 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 776 21 776 22 , SrcSpan "tests/examples/Attributes.hs" 776 22 776 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 13 776 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 13 776 21 , srcInfoPoints = [] } "FontName")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 28 776 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 776 28 776 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 30 776 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 30 776 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 776 30 776 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 1 777 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 1 777 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 13 777 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 777 21 777 22 , SrcSpan "tests/examples/Attributes.hs" 777 22 777 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 13 777 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 13 777 21 , srcInfoPoints = [] } "FontSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 28 777 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 777 28 777 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 30 777 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 30 777 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 777 30 777 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 1 778 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 1 778 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 13 778 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 778 18 778 19 , SrcSpan "tests/examples/Attributes.hs" 778 19 778 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 13 778 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 13 778 18 , srcInfoPoints = [] } "Group")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 28 778 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 778 28 778 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 30 778 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 30 778 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 778 30 778 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 1 779 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 1 779 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 13 779 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 779 19 779 20 , SrcSpan "tests/examples/Attributes.hs" 779 20 779 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 13 779 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 13 779 19 , srcInfoPoints = [] } "Height")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 28 779 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 779 28 779 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 30 779 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 30 779 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 779 30 779 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 1 780 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 1 780 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 13 780 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 780 15 780 16 , SrcSpan "tests/examples/Attributes.hs" 780 16 780 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 13 780 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 13 780 15 , srcInfoPoints = [] } "ID")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 28 780 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 780 28 780 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 30 780 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 30 780 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 780 30 780 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 1 781 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 1 781 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 13 781 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 781 18 781 19 , SrcSpan "tests/examples/Attributes.hs" 781 19 781 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 13 781 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 13 781 18 , srcInfoPoints = [] } "Image")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 28 781 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 781 28 781 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 30 781 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 30 781 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 781 30 781 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 1 782 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 1 782 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 13 782 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 782 23 782 24 , SrcSpan "tests/examples/Attributes.hs" 782 24 782 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 13 782 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 13 782 23 , srcInfoPoints = [] } "ImageScale")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 28 782 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 782 28 782 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 30 782 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 30 782 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 782 30 782 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 1 783 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 1 783 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 13 783 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 783 21 783 22 , SrcSpan "tests/examples/Attributes.hs" 783 22 783 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 13 783 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 13 783 21 , srcInfoPoints = [] } "LabelLoc")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 28 783 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 783 28 783 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 30 783 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 30 783 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 783 30 783 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 1 784 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 1 784 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 13 784 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 784 18 784 19 , SrcSpan "tests/examples/Attributes.hs" 784 19 784 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 13 784 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 13 784 18 , srcInfoPoints = [] } "Label")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 28 784 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 784 28 784 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 30 784 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 30 784 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 784 30 784 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 1 785 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 1 785 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 13 785 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 785 18 785 19 , SrcSpan "tests/examples/Attributes.hs" 785 19 785 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 13 785 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 13 785 18 , srcInfoPoints = [] } "Layer")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 28 785 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 785 28 785 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 30 785 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 30 785 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 785 30 785 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 1 786 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 1 786 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 13 786 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 786 19 786 20 , SrcSpan "tests/examples/Attributes.hs" 786 20 786 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 13 786 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 13 786 19 , srcInfoPoints = [] } "Margin")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 28 786 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 786 28 786 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 30 786 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 30 786 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 786 30 786 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 1 787 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 1 787 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 13 787 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 787 22 787 23 , SrcSpan "tests/examples/Attributes.hs" 787 23 787 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 13 787 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 13 787 22 , srcInfoPoints = [] } "NoJustify")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 28 787 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 787 28 787 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 30 787 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 30 787 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 787 30 787 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 1 788 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 1 788 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 13 788 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 788 24 788 25 , SrcSpan "tests/examples/Attributes.hs" 788 25 788 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 13 788 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 13 788 24 , srcInfoPoints = [] } "Orientation")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 28 788 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 788 28 788 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 30 788 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 30 788 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 788 30 788 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 1 789 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 1 789 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 13 789 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 789 21 789 22 , SrcSpan "tests/examples/Attributes.hs" 789 22 789 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 13 789 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 13 789 21 , srcInfoPoints = [] } "PenWidth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 28 789 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 789 28 789 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 30 789 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 30 789 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 789 30 789 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 1 790 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 1 790 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 13 790 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 790 24 790 25 , SrcSpan "tests/examples/Attributes.hs" 790 25 790 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 13 790 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 13 790 24 , srcInfoPoints = [] } "Peripheries")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 28 790 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 790 28 790 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 30 790 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 30 790 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 790 30 790 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 1 791 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 1 791 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 13 791 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 791 16 791 17 , SrcSpan "tests/examples/Attributes.hs" 791 17 791 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 13 791 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 13 791 16 , srcInfoPoints = [] } "Pin")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 28 791 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 791 28 791 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 30 791 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 30 791 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 791 30 791 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 1 792 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 1 792 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 13 792 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 792 16 792 17 , SrcSpan "tests/examples/Attributes.hs" 792 17 792 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 13 792 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 13 792 16 , srcInfoPoints = [] } "Pos")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 28 792 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 792 28 792 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 30 792 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 30 792 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 792 30 792 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 1 793 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 1 793 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 13 793 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 793 18 793 19 , SrcSpan "tests/examples/Attributes.hs" 793 19 793 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 13 793 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 13 793 18 , srcInfoPoints = [] } "Rects")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 28 793 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 793 28 793 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 30 793 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 30 793 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 793 30 793 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 1 794 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 1 794 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 13 794 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 794 20 794 21 , SrcSpan "tests/examples/Attributes.hs" 794 21 794 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 13 794 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 13 794 20 , srcInfoPoints = [] } "Regular")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 28 794 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 794 28 794 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 30 794 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 30 794 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 794 30 794 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 1 795 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 1 795 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 13 795 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 795 17 795 18 , SrcSpan "tests/examples/Attributes.hs" 795 18 795 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 13 795 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 13 795 17 , srcInfoPoints = [] } "Root")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 28 795 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 795 28 795 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 30 795 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 30 795 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 795 30 795 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 1 796 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 1 796 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 13 796 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 796 25 796 26 , SrcSpan "tests/examples/Attributes.hs" 796 26 796 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 13 796 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 13 796 25 , srcInfoPoints = [] } "SamplePoints")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 28 796 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 796 28 796 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 30 796 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 30 796 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 796 30 796 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 1 797 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 1 797 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 13 797 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 797 22 797 23 , SrcSpan "tests/examples/Attributes.hs" 797 23 797 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 13 797 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 13 797 22 , srcInfoPoints = [] } "ShapeFile")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 28 797 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 797 28 797 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 30 797 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 30 797 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 797 30 797 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 1 798 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 1 798 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 13 798 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 798 18 798 19 , SrcSpan "tests/examples/Attributes.hs" 798 19 798 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 13 798 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 13 798 18 , srcInfoPoints = [] } "Shape")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 28 798 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 798 28 798 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 30 798 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 30 798 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 798 30 798 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 1 799 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 1 799 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 13 799 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 799 22 799 23 , SrcSpan "tests/examples/Attributes.hs" 799 23 799 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 13 799 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 13 799 22 , srcInfoPoints = [] } "ShowBoxes")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 28 799 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 799 28 799 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 30 799 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 30 799 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 799 30 799 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 1 800 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 1 800 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 13 800 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 800 18 800 19 , SrcSpan "tests/examples/Attributes.hs" 800 19 800 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 13 800 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 13 800 18 , srcInfoPoints = [] } "Sides")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 28 800 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 800 28 800 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 30 800 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 30 800 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 800 30 800 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 1 801 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 1 801 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 13 801 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 801 17 801 18 , SrcSpan "tests/examples/Attributes.hs" 801 18 801 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 13 801 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 13 801 17 , srcInfoPoints = [] } "Skew")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 28 801 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 801 28 801 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 30 801 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 30 801 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 801 30 801 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 1 802 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 1 802 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 13 802 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 802 18 802 19 , SrcSpan "tests/examples/Attributes.hs" 802 19 802 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 13 802 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 13 802 18 , srcInfoPoints = [] } "SortV")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 28 802 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 802 28 802 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 30 802 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 30 802 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 802 30 802 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 1 803 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 1 803 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 13 803 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 803 18 803 19 , SrcSpan "tests/examples/Attributes.hs" 803 19 803 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 13 803 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 13 803 18 , srcInfoPoints = [] } "Style")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 28 803 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 803 28 803 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 30 803 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 30 803 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 803 30 803 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 1 804 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 1 804 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 13 804 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 804 19 804 20 , SrcSpan "tests/examples/Attributes.hs" 804 20 804 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 13 804 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 13 804 19 , srcInfoPoints = [] } "Target")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 28 804 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 804 28 804 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 30 804 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 30 804 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 804 30 804 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 1 805 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 1 805 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 13 805 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 805 20 805 21 , SrcSpan "tests/examples/Attributes.hs" 805 21 805 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 13 805 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 13 805 20 , srcInfoPoints = [] } "Tooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 28 805 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 805 28 805 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 30 805 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 30 805 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 805 30 805 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 1 806 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 1 806 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 13 806 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 806 21 806 22 , SrcSpan "tests/examples/Attributes.hs" 806 22 806 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 13 806 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 13 806 21 , srcInfoPoints = [] } "Vertices")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 28 806 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 806 28 806 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 30 806 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 30 806 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 806 30 806 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 1 807 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 1 807 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 13 807 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 807 18 807 19 , SrcSpan "tests/examples/Attributes.hs" 807 19 807 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 13 807 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 13 807 18 , srcInfoPoints = [] } "Width")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 28 807 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 807 28 807 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 30 807 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 30 807 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 807 30 807 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 1 808 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 1 808 12 , srcInfoPoints = [] } "usedByNodes") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 13 808 16 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 808 14 808 15 , SrcSpan "tests/examples/Attributes.hs" 808 15 808 16 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 13 808 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 13 808 14 , srcInfoPoints = [] } "Z")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 28 808 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 808 28 808 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 30 808 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 30 808 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 808 30 808 34 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 1 809 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 1 809 12 , srcInfoPoints = [] } "usedByNodes") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 13 809 14 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 28 809 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 809 28 809 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 30 809 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 30 809 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 809 30 809 35 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 1 812 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 812 30 812 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 1 812 12 , srcInfoPoints = [] } "usedByEdges" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 33 812 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 812 43 812 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 33 812 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 33 812 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 33 812 42 , srcInfoPoints = [] } "Attribute"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 46 812 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 46 812 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 812 46 812 50 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 1 868 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 1 813 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 1 813 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 13 813 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 813 16 813 17 , SrcSpan "tests/examples/Attributes.hs" 813 17 813 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 13 813 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 13 813 16 , srcInfoPoints = [] } "URL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 30 813 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 813 30 813 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 32 813 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 32 813 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 813 32 813 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 1 814 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 1 814 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 13 814 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 814 22 814 23 , SrcSpan "tests/examples/Attributes.hs" 814 23 814 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 13 814 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 13 814 22 , srcInfoPoints = [] } "ArrowHead")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 30 814 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 814 30 814 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 32 814 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 32 814 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 814 32 814 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 1 815 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 1 815 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 13 815 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 815 22 815 23 , SrcSpan "tests/examples/Attributes.hs" 815 23 815 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 13 815 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 13 815 22 , srcInfoPoints = [] } "ArrowSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 30 815 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 815 30 815 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 32 815 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 32 815 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 815 32 815 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 1 816 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 1 816 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 13 816 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 816 22 816 23 , SrcSpan "tests/examples/Attributes.hs" 816 23 816 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 13 816 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 13 816 22 , srcInfoPoints = [] } "ArrowTail")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 30 816 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 816 30 816 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 32 816 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 32 816 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 816 32 816 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 1 817 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 1 817 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 13 817 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 817 24 817 25 , SrcSpan "tests/examples/Attributes.hs" 817 25 817 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 13 817 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 13 817 24 , srcInfoPoints = [] } "ColorScheme")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 30 817 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 817 30 817 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 32 817 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 32 817 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 817 32 817 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 1 818 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 1 818 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 13 818 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 818 18 818 19 , SrcSpan "tests/examples/Attributes.hs" 818 19 818 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 13 818 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 13 818 18 , srcInfoPoints = [] } "Color")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 30 818 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 818 30 818 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 32 818 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 32 818 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 818 32 818 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 1 819 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 1 819 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 13 819 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 819 20 819 21 , SrcSpan "tests/examples/Attributes.hs" 819 21 819 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 13 819 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 13 819 20 , srcInfoPoints = [] } "Comment")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 30 819 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 819 30 819 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 32 819 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 32 819 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 819 32 819 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 1 820 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 1 820 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 13 820 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 820 23 820 24 , SrcSpan "tests/examples/Attributes.hs" 820 24 820 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 13 820 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 13 820 23 , srcInfoPoints = [] } "Constraint")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 30 820 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 820 30 820 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 32 820 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 32 820 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 820 32 820 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 1 821 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 1 821 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 13 821 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 821 21 821 22 , SrcSpan "tests/examples/Attributes.hs" 821 22 821 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 13 821 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 13 821 21 , srcInfoPoints = [] } "Decorate")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 30 821 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 821 30 821 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 32 821 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 32 821 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 821 32 821 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 1 822 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 1 822 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 13 822 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 822 16 822 17 , SrcSpan "tests/examples/Attributes.hs" 822 17 822 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 13 822 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 13 822 16 , srcInfoPoints = [] } "Dir")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 30 822 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 822 30 822 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 32 822 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 32 822 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 822 32 822 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 1 823 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 1 823 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 13 823 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 823 20 823 21 , SrcSpan "tests/examples/Attributes.hs" 823 21 823 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 13 823 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 13 823 20 , srcInfoPoints = [] } "EdgeURL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 30 823 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 823 30 823 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 32 823 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 32 823 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 823 32 823 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 1 824 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 1 824 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 13 824 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 824 23 824 24 , SrcSpan "tests/examples/Attributes.hs" 824 24 824 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 13 824 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 13 824 23 , srcInfoPoints = [] } "EdgeTarget")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 30 824 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 824 30 824 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 32 824 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 32 824 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 824 32 824 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 1 825 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 1 825 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 13 825 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 825 24 825 25 , SrcSpan "tests/examples/Attributes.hs" 825 25 825 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 13 825 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 13 825 24 , srcInfoPoints = [] } "EdgeTooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 30 825 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 825 30 825 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 32 825 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 32 825 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 825 32 825 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 1 826 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 1 826 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 13 826 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 826 22 826 23 , SrcSpan "tests/examples/Attributes.hs" 826 23 826 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 13 826 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 13 826 22 , srcInfoPoints = [] } "FontColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 30 826 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 826 30 826 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 32 826 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 32 826 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 826 32 826 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 1 827 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 1 827 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 13 827 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 827 21 827 22 , SrcSpan "tests/examples/Attributes.hs" 827 22 827 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 13 827 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 13 827 21 , srcInfoPoints = [] } "FontName")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 30 827 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 827 30 827 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 32 827 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 32 827 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 827 32 827 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 1 828 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 1 828 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 13 828 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 828 21 828 22 , SrcSpan "tests/examples/Attributes.hs" 828 22 828 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 13 828 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 13 828 21 , srcInfoPoints = [] } "FontSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 30 828 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 828 30 828 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 32 828 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 32 828 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 828 32 828 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 1 829 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 1 829 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 13 829 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 829 20 829 21 , SrcSpan "tests/examples/Attributes.hs" 829 21 829 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 13 829 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 13 829 20 , srcInfoPoints = [] } "HeadURL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 30 829 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 829 30 829 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 32 829 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 32 829 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 829 32 829 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 1 830 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 1 830 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 13 830 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 830 21 830 22 , SrcSpan "tests/examples/Attributes.hs" 830 22 830 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 13 830 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 13 830 21 , srcInfoPoints = [] } "HeadClip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 30 830 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 830 30 830 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 32 830 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 32 830 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 830 32 830 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 1 831 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 1 831 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 13 831 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 831 22 831 23 , SrcSpan "tests/examples/Attributes.hs" 831 23 831 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 13 831 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 13 831 22 , srcInfoPoints = [] } "HeadLabel")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 30 831 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 831 30 831 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 32 831 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 32 831 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 831 32 831 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 1 832 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 1 832 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 13 832 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 832 21 832 22 , SrcSpan "tests/examples/Attributes.hs" 832 22 832 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 13 832 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 13 832 21 , srcInfoPoints = [] } "HeadPort")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 30 832 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 832 30 832 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 32 832 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 32 832 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 832 32 832 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 1 833 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 1 833 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 13 833 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 833 23 833 24 , SrcSpan "tests/examples/Attributes.hs" 833 24 833 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 13 833 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 13 833 23 , srcInfoPoints = [] } "HeadTarget")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 30 833 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 833 30 833 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 32 833 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 32 833 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 833 32 833 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 1 834 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 1 834 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 13 834 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 834 24 834 25 , SrcSpan "tests/examples/Attributes.hs" 834 25 834 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 13 834 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 13 834 24 , srcInfoPoints = [] } "HeadTooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 30 834 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 834 30 834 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 32 834 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 32 834 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 834 32 834 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 1 835 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 1 835 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 13 835 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 835 15 835 16 , SrcSpan "tests/examples/Attributes.hs" 835 16 835 17 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 13 835 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 13 835 15 , srcInfoPoints = [] } "ID")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 30 835 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 835 30 835 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 32 835 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 32 835 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 835 32 835 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 1 836 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 1 836 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 13 836 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 836 21 836 22 , SrcSpan "tests/examples/Attributes.hs" 836 22 836 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 13 836 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 13 836 21 , srcInfoPoints = [] } "LabelURL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 30 836 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 836 30 836 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 32 836 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 32 836 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 836 32 836 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 1 837 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 1 837 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 13 837 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 837 23 837 24 , SrcSpan "tests/examples/Attributes.hs" 837 24 837 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 13 837 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 13 837 23 , srcInfoPoints = [] } "LabelAngle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 30 837 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 837 30 837 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 32 837 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 32 837 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 837 32 837 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 1 838 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 1 838 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 13 838 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 838 26 838 27 , SrcSpan "tests/examples/Attributes.hs" 838 27 838 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 13 838 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 13 838 26 , srcInfoPoints = [] } "LabelDistance")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 30 838 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 838 30 838 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 32 838 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 32 838 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 838 32 838 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 1 839 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 1 839 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 13 839 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 839 23 839 24 , SrcSpan "tests/examples/Attributes.hs" 839 24 839 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 13 839 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 13 839 23 , srcInfoPoints = [] } "LabelFloat")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 30 839 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 839 30 839 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 32 839 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 32 839 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 839 32 839 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 1 840 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 1 840 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 13 840 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 840 27 840 28 , SrcSpan "tests/examples/Attributes.hs" 840 28 840 29 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 13 840 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 13 840 27 , srcInfoPoints = [] } "LabelFontColor")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 30 840 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 840 30 840 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 32 840 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 32 840 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 840 32 840 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 1 841 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 1 841 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 13 841 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 841 26 841 27 , SrcSpan "tests/examples/Attributes.hs" 841 27 841 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 13 841 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 13 841 26 , srcInfoPoints = [] } "LabelFontName")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 30 841 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 841 30 841 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 32 841 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 32 841 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 841 32 841 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 1 842 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 1 842 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 13 842 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 842 26 842 27 , SrcSpan "tests/examples/Attributes.hs" 842 27 842 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 13 842 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 13 842 26 , srcInfoPoints = [] } "LabelFontSize")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 30 842 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 842 30 842 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 32 842 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 32 842 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 842 32 842 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 1 843 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 1 843 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 13 843 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 843 24 843 25 , SrcSpan "tests/examples/Attributes.hs" 843 25 843 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 13 843 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 13 843 24 , srcInfoPoints = [] } "LabelTarget")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 30 843 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 843 30 843 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 32 843 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 32 843 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 843 32 843 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 1 844 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 1 844 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 13 844 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 844 25 844 26 , SrcSpan "tests/examples/Attributes.hs" 844 26 844 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 13 844 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 13 844 25 , srcInfoPoints = [] } "LabelTooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 30 844 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 844 30 844 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 32 844 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 32 844 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 844 32 844 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 1 845 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 1 845 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 13 845 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 845 18 845 19 , SrcSpan "tests/examples/Attributes.hs" 845 19 845 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 13 845 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 13 845 18 , srcInfoPoints = [] } "Label")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 30 845 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 845 30 845 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 32 845 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 32 845 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 845 32 845 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 1 846 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 1 846 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 13 846 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 846 18 846 19 , SrcSpan "tests/examples/Attributes.hs" 846 19 846 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 13 846 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 13 846 18 , srcInfoPoints = [] } "Layer")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 30 846 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 846 30 846 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 32 846 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 32 846 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 846 32 846 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 1 847 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 1 847 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 13 847 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 847 16 847 17 , SrcSpan "tests/examples/Attributes.hs" 847 17 847 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 13 847 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 13 847 16 , srcInfoPoints = [] } "Len")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 30 847 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 847 30 847 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 32 847 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 32 847 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 847 32 847 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 1 848 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 1 848 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 13 848 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 848 18 848 19 , SrcSpan "tests/examples/Attributes.hs" 848 19 848 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 13 848 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 13 848 18 , srcInfoPoints = [] } "LHead")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 30 848 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 848 30 848 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 32 848 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 32 848 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 848 32 848 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 1 849 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 1 849 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 13 849 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 849 17 849 18 , SrcSpan "tests/examples/Attributes.hs" 849 18 849 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 13 849 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 13 849 17 , srcInfoPoints = [] } "LPos")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 30 849 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 849 30 849 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 32 849 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 32 849 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 849 32 849 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 1 850 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 1 850 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 13 850 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 850 18 850 19 , SrcSpan "tests/examples/Attributes.hs" 850 19 850 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 13 850 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 13 850 18 , srcInfoPoints = [] } "LTail")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 30 850 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 850 30 850 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 32 850 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 32 850 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 850 32 850 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 1 851 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 1 851 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 13 851 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 851 19 851 20 , SrcSpan "tests/examples/Attributes.hs" 851 20 851 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 13 851 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 13 851 19 , srcInfoPoints = [] } "MinLen")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 30 851 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 851 30 851 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 32 851 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 32 851 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 851 32 851 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 1 852 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 1 852 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 13 852 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 852 22 852 23 , SrcSpan "tests/examples/Attributes.hs" 852 23 852 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 13 852 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 13 852 22 , srcInfoPoints = [] } "NoJustify")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 30 852 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 852 30 852 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 32 852 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 32 852 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 852 32 852 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 1 853 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 1 853 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 13 853 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 853 21 853 22 , SrcSpan "tests/examples/Attributes.hs" 853 22 853 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 13 853 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 13 853 21 , srcInfoPoints = [] } "PenWidth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 30 853 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 853 30 853 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 32 853 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 32 853 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 853 32 853 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 1 854 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 1 854 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 13 854 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 854 16 854 17 , SrcSpan "tests/examples/Attributes.hs" 854 17 854 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 13 854 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 13 854 16 , srcInfoPoints = [] } "Pos")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 30 854 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 854 30 854 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 32 854 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 32 854 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 854 32 854 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 1 855 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 1 855 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 13 855 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 855 21 855 22 , SrcSpan "tests/examples/Attributes.hs" 855 22 855 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 13 855 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 13 855 21 , srcInfoPoints = [] } "SameHead")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 30 855 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 855 30 855 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 32 855 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 32 855 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 855 32 855 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 1 856 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 1 856 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 13 856 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 856 21 856 22 , SrcSpan "tests/examples/Attributes.hs" 856 22 856 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 13 856 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 13 856 21 , srcInfoPoints = [] } "SameTail")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 30 856 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 856 30 856 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 32 856 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 32 856 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 856 32 856 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 1 857 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 1 857 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 13 857 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 857 22 857 23 , SrcSpan "tests/examples/Attributes.hs" 857 23 857 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 13 857 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 13 857 22 , srcInfoPoints = [] } "ShowBoxes")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 30 857 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 857 30 857 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 32 857 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 32 857 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 857 32 857 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 1 858 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 1 858 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 13 858 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 858 18 858 19 , SrcSpan "tests/examples/Attributes.hs" 858 19 858 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 13 858 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 13 858 18 , srcInfoPoints = [] } "Style")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 30 858 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 858 30 858 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 32 858 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 32 858 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 858 32 858 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 1 859 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 1 859 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 13 859 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 859 20 859 21 , SrcSpan "tests/examples/Attributes.hs" 859 21 859 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 13 859 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 13 859 20 , srcInfoPoints = [] } "TailURL")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 30 859 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 859 30 859 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 32 859 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 32 859 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 859 32 859 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 1 860 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 1 860 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 13 860 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 860 21 860 22 , SrcSpan "tests/examples/Attributes.hs" 860 22 860 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 13 860 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 13 860 21 , srcInfoPoints = [] } "TailClip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 30 860 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 860 30 860 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 32 860 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 32 860 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 860 32 860 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 1 861 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 1 861 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 13 861 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 861 22 861 23 , SrcSpan "tests/examples/Attributes.hs" 861 23 861 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 13 861 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 13 861 22 , srcInfoPoints = [] } "TailLabel")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 30 861 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 861 30 861 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 32 861 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 32 861 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 861 32 861 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 1 862 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 1 862 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 13 862 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 862 21 862 22 , SrcSpan "tests/examples/Attributes.hs" 862 22 862 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 13 862 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 13 862 21 , srcInfoPoints = [] } "TailPort")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 30 862 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 862 30 862 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 32 862 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 32 862 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 862 32 862 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 1 863 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 1 863 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 13 863 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 863 23 863 24 , SrcSpan "tests/examples/Attributes.hs" 863 24 863 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 13 863 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 13 863 23 , srcInfoPoints = [] } "TailTarget")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 30 863 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 863 30 863 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 32 863 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 32 863 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 863 32 863 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 1 864 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 1 864 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 13 864 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 864 24 864 25 , SrcSpan "tests/examples/Attributes.hs" 864 25 864 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 13 864 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 13 864 24 , srcInfoPoints = [] } "TailTooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 30 864 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 864 30 864 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 32 864 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 32 864 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 864 32 864 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 1 865 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 1 865 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 13 865 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 865 19 865 20 , SrcSpan "tests/examples/Attributes.hs" 865 20 865 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 13 865 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 13 865 19 , srcInfoPoints = [] } "Target")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 30 865 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 865 30 865 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 32 865 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 32 865 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 865 32 865 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 1 866 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 1 866 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 13 866 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 866 20 866 21 , SrcSpan "tests/examples/Attributes.hs" 866 21 866 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 13 866 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 13 866 20 , srcInfoPoints = [] } "Tooltip")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 30 866 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 866 30 866 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 32 866 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 32 866 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 866 32 866 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 1 867 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 1 867 12 , srcInfoPoints = [] } "usedByEdges") [ PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 13 867 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 867 19 867 20 , SrcSpan "tests/examples/Attributes.hs" 867 20 867 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 13 867 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 13 867 19 , srcInfoPoints = [] } "Weight")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 30 867 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 867 30 867 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 32 867 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 32 867 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 867 32 867 36 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 1 868 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 1 868 12 , srcInfoPoints = [] } "usedByEdges") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 13 868 14 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 30 868 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 868 30 868 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 32 868 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 32 868 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 868 32 868 37 , srcInfoPoints = [] } "False")))) Nothing ] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 1 906 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 906 1 906 5 , SrcSpan "tests/examples/Attributes.hs" 906 16 906 17 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 6 906 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 6 906 15 , srcInfoPoints = [] } "EscString")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 18 906 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 18 906 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 906 18 906 24 , srcInfoPoints = [] } "String"))) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 1 916 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 915 13 915 14 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 1 915 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 9 915 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 9 915 12 , srcInfoPoints = [] } "URL")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 15 915 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 915 20 915 21 , SrcSpan "tests/examples/Attributes.hs" 915 45 915 46 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 15 915 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 915 20 915 21 , SrcSpan "tests/examples/Attributes.hs" 915 45 915 46 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 15 915 19 , srcInfoPoints = [] } "UStr") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 22 915 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 915 32 915 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 22 915 31 , srcInfoPoints = [] } "urlString" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 35 915 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 35 915 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 915 35 915 44 , srcInfoPoints = [] } "EscString"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 5 916 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 916 5 916 13 , SrcSpan "tests/examples/Attributes.hs" 916 14 916 15 , SrcSpan "tests/examples/Attributes.hs" 916 17 916 18 , SrcSpan "tests/examples/Attributes.hs" 916 22 916 23 , SrcSpan "tests/examples/Attributes.hs" 916 28 916 29 , SrcSpan "tests/examples/Attributes.hs" 916 34 916 35 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 15 916 17 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 15 916 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 15 916 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 15 916 17 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 19 916 22 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 19 916 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 19 916 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 19 916 22 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 24 916 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 24 916 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 24 916 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 24 916 28 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 30 916 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 30 916 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 30 916 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 916 30 916 34 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 1 923 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 918 1 918 9 , SrcSpan "tests/examples/Attributes.hs" 918 23 918 28 , SrcSpan "tests/examples/Attributes.hs" 919 5 919 5 , SrcSpan "tests/examples/Attributes.hs" 923 1 923 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 10 918 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 10 918 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 10 918 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 10 918 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 10 918 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 19 918 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 19 918 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 918 19 918 22 , srcInfoPoints = [] } "URL"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 5 921 33 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 5 921 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 5 919 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 5 919 12 , srcInfoPoints = [] } "unqtDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 13 921 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 919 13 919 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 921 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 919 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 919 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 919 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 919 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 15 919 19 , srcInfoPoints = [] } "wrap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 20 919 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 919 20 919 21 , SrcSpan "tests/examples/Attributes.hs" 919 29 919 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 21 919 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 21 919 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 21 919 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 21 919 25 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 26 919 29 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 26 919 29 , srcInfoPoints = [] } '<' "<"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 31 919 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 919 31 919 32 , SrcSpan "tests/examples/Attributes.hs" 919 40 919 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 32 919 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 32 919 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 32 919 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 32 919 36 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 37 919 40 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 919 37 919 40 , srcInfoPoints = [] } '>' ">"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 15 921 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 15 921 16 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 15 921 16 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 17 921 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 17 921 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 17 921 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 17 921 21 , srcInfoPoints = [] } "text"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 22 921 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 22 921 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 22 921 23 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 24 921 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 24 921 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 921 24 921 33 , srcInfoPoints = [] } "urlString")))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 1 947 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 923 1 923 9 , SrcSpan "tests/examples/Attributes.hs" 923 23 923 28 , SrcSpan "tests/examples/Attributes.hs" 924 5 924 5 , SrcSpan "tests/examples/Attributes.hs" 933 5 933 5 , SrcSpan "tests/examples/Attributes.hs" 947 1 947 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 10 923 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 10 923 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 10 923 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 10 923 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 10 923 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 19 923 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 19 923 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 923 19 923 22 , srcInfoPoints = [] } "URL"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 5 930 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 928 9 928 14 ] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 5 930 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 928 9 928 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 5 924 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 5 924 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 15 927 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 924 15 924 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 17 927 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 17 924 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 17 924 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 17 924 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 17 924 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 23 924 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 23 924 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 924 23 924 27 , srcInfoPoints = [] } "UStr")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 17 925 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 17 925 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 17 925 18 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 927 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 926 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 925 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 925 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 925 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 19 925 26 , srcInfoPoints = [] } "bracket"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 27 925 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 925 27 925 28 , SrcSpan "tests/examples/Attributes.hs" 925 42 925 43 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 28 925 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 28 925 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 28 925 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 28 925 37 , srcInfoPoints = [] } "character"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 38 925 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 38 925 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 925 38 925 42 , srcInfoPoints = [] } "open")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 27 926 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 926 27 926 28 , SrcSpan "tests/examples/Attributes.hs" 926 43 926 44 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 28 926 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 28 926 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 28 926 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 28 926 37 , srcInfoPoints = [] } "character"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 38 926 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 38 926 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 926 38 926 43 , srcInfoPoints = [] } "close")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 27 927 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 927 27 927 28 , SrcSpan "tests/examples/Attributes.hs" 927 56 927 57 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 28 927 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 28 927 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 28 927 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 28 927 33 , srcInfoPoints = [] } "many1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 34 927 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 34 927 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 34 927 35 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 36 927 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 36 927 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 36 927 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 36 927 43 , srcInfoPoints = [] } "satisfy"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 44 927 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 927 44 927 45 , SrcSpan "tests/examples/Attributes.hs" 927 55 927 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 45 927 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 45 927 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 927 45 927 46 , SrcSpan "tests/examples/Attributes.hs" 927 46 927 48 , SrcSpan "tests/examples/Attributes.hs" 927 48 927 49 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 45 927 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 927 45 927 46 , SrcSpan "tests/examples/Attributes.hs" 927 46 927 48 , SrcSpan "tests/examples/Attributes.hs" 927 48 927 49 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 46 927 48 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 50 927 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 50 927 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 927 50 927 55 , srcInfoPoints = [] } "close"))))))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 11 930 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 929 11 929 11 , SrcSpan "tests/examples/Attributes.hs" 930 11 930 11 , SrcSpan "tests/examples/Attributes.hs" 933 5 933 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 11 929 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 11 929 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 11 929 15 , srcInfoPoints = [] } "open")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 16 929 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 929 16 929 17 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 18 929 21 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 929 18 929 21 , srcInfoPoints = [] } '<' "<"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 11 930 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 11 930 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 11 930 16 , srcInfoPoints = [] } "close")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 17 930 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 930 17 930 18 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 19 930 22 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 930 19 930 22 , srcInfoPoints = [] } '>' ">"))) Nothing ]))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 5 933 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 5 933 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 5 933 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 5 933 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 11 933 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 933 11 933 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 13 933 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 13 933 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 933 13 933 22 , srcInfoPoints = [] } "parseUnqt")))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 1 948 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 947 19 947 20 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 1 947 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 9 947 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 9 947 18 , srcInfoPoints = [] } "ArrowType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 21 947 56 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 21 947 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 21 947 26 , srcInfoPoints = [] } "AType") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 27 947 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 947 27 947 28 , SrcSpan "tests/examples/Attributes.hs" 947 55 947 56 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 28 947 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 947 28 947 29 , SrcSpan "tests/examples/Attributes.hs" 947 42 947 43 , SrcSpan "tests/examples/Attributes.hs" 947 54 947 55 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 29 947 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 29 947 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 29 947 42 , srcInfoPoints = [] } "ArrowModifier")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 44 947 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 44 947 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 947 44 947 54 , srcInfoPoints = [] } "ArrowShape")) ]) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 5 948 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 948 5 948 13 , SrcSpan "tests/examples/Attributes.hs" 948 14 948 15 , SrcSpan "tests/examples/Attributes.hs" 948 17 948 18 , SrcSpan "tests/examples/Attributes.hs" 948 22 948 23 , SrcSpan "tests/examples/Attributes.hs" 948 28 948 29 , SrcSpan "tests/examples/Attributes.hs" 948 34 948 35 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 15 948 17 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 15 948 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 15 948 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 15 948 17 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 19 948 22 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 19 948 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 19 948 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 19 948 22 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 24 948 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 24 948 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 24 948 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 24 948 28 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 30 948 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 30 948 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 30 948 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 948 30 948 34 , srcInfoPoints = [] } "Read"))) ] ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 1 950 74 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 950 4 950 5 , SrcSpan "tests/examples/Attributes.hs" 950 10 950 11 , SrcSpan "tests/examples/Attributes.hs" 950 19 950 20 , SrcSpan "tests/examples/Attributes.hs" 950 29 950 30 , SrcSpan "tests/examples/Attributes.hs" 950 34 950 35 , SrcSpan "tests/examples/Attributes.hs" 950 43 950 44 , SrcSpan "tests/examples/Attributes.hs" 950 51 950 52 , SrcSpan "tests/examples/Attributes.hs" 950 56 950 57 , SrcSpan "tests/examples/Attributes.hs" 950 62 950 64 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 1 950 4 , srcInfoPoints = [] } "box" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 6 950 10 , srcInfoPoints = [] } "crow" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 12 950 19 , srcInfoPoints = [] } "diamond" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 21 950 29 , srcInfoPoints = [] } "dotArrow" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 31 950 34 , srcInfoPoints = [] } "inv" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 36 950 43 , srcInfoPoints = [] } "noArrow" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 45 950 51 , srcInfoPoints = [] } "normal" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 53 950 56 , srcInfoPoints = [] } "tee" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 58 950 61 , srcInfoPoints = [] } "vee" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 65 950 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 65 950 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 950 65 950 74 , srcInfoPoints = [] } "ArrowType"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 1 951 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 951 5 951 6 , SrcSpan "tests/examples/Attributes.hs" 951 13 951 14 , SrcSpan "tests/examples/Attributes.hs" 951 22 951 23 , SrcSpan "tests/examples/Attributes.hs" 951 28 951 29 , SrcSpan "tests/examples/Attributes.hs" 951 39 951 41 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 1 951 5 , srcInfoPoints = [] } "oDot" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 7 951 13 , srcInfoPoints = [] } "invDot" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 15 951 22 , srcInfoPoints = [] } "invODot" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 24 951 28 , srcInfoPoints = [] } "oBox" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 30 951 38 , srcInfoPoints = [] } "oDiamond" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 42 951 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 42 951 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 951 42 951 51 , srcInfoPoints = [] } "ArrowType"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 1 952 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 952 9 952 10 , SrcSpan "tests/examples/Attributes.hs" 952 18 952 19 , SrcSpan "tests/examples/Attributes.hs" 952 28 952 29 , SrcSpan "tests/examples/Attributes.hs" 952 38 952 39 , SrcSpan "tests/examples/Attributes.hs" 952 49 952 51 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 1 952 9 , srcInfoPoints = [] } "eDiamond" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 11 952 18 , srcInfoPoints = [] } "openArr" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 20 952 28 , srcInfoPoints = [] } "halfOpen" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 30 952 38 , srcInfoPoints = [] } "emptyArr" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 40 952 48 , srcInfoPoints = [] } "invEmpty" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 52 952 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 52 952 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 952 52 952 61 , srcInfoPoints = [] } "ArrowType"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 1 954 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 1 954 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 1 954 7 , srcInfoPoints = [] } "normal")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 8 954 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 954 8 954 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 10 954 34 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 10 954 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 10 954 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 10 954 15 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 16 954 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 954 16 954 17 , SrcSpan "tests/examples/Attributes.hs" 954 33 954 34 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 17 954 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 954 17 954 18 , SrcSpan "tests/examples/Attributes.hs" 954 24 954 25 , SrcSpan "tests/examples/Attributes.hs" 954 32 954 33 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 18 954 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 18 954 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 18 954 24 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 26 954 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 26 954 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 954 26 954 32 , srcInfoPoints = [] } "Normal")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 1 955 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 1 955 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 1 955 4 , srcInfoPoints = [] } "inv")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 5 955 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 955 5 955 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 7 955 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 7 955 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 7 955 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 7 955 12 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 13 955 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 955 13 955 14 , SrcSpan "tests/examples/Attributes.hs" 955 27 955 28 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 14 955 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 955 14 955 15 , SrcSpan "tests/examples/Attributes.hs" 955 21 955 22 , SrcSpan "tests/examples/Attributes.hs" 955 26 955 27 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 15 955 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 15 955 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 15 955 21 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 23 955 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 23 955 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 955 23 955 26 , srcInfoPoints = [] } "Inv")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 1 956 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 1 956 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 1 956 9 , srcInfoPoints = [] } "dotArrow")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 10 956 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 956 10 956 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 12 956 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 12 956 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 12 956 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 12 956 17 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 18 956 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 956 18 956 19 , SrcSpan "tests/examples/Attributes.hs" 956 37 956 38 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 19 956 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 956 19 956 20 , SrcSpan "tests/examples/Attributes.hs" 956 26 956 27 , SrcSpan "tests/examples/Attributes.hs" 956 36 956 37 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 20 956 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 20 956 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 20 956 26 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 28 956 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 28 956 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 956 28 956 36 , srcInfoPoints = [] } "DotArrow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 1 958 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 1 957 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 1 957 7 , srcInfoPoints = [] } "invDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 8 958 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 957 8 957 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 10 958 37 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 10 957 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 10 957 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 10 957 15 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 16 958 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 957 16 957 17 , SrcSpan "tests/examples/Attributes.hs" 958 16 958 17 , SrcSpan "tests/examples/Attributes.hs" 958 36 958 37 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 18 957 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 957 18 957 19 , SrcSpan "tests/examples/Attributes.hs" 957 25 957 26 , SrcSpan "tests/examples/Attributes.hs" 957 30 957 31 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 19 957 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 19 957 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 19 957 25 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 27 957 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 27 957 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 957 27 957 30 , srcInfoPoints = [] } "Inv")) ] , Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 18 958 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 958 18 958 19 , SrcSpan "tests/examples/Attributes.hs" 958 25 958 26 , SrcSpan "tests/examples/Attributes.hs" 958 35 958 36 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 19 958 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 19 958 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 19 958 25 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 27 958 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 27 958 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 958 27 958 35 , srcInfoPoints = [] } "DotArrow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 1 959 54 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 1 959 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 1 959 5 , srcInfoPoints = [] } "oDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 6 959 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 959 6 959 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 8 959 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 8 959 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 8 959 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 8 959 13 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 14 959 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 959 14 959 15 , SrcSpan "tests/examples/Attributes.hs" 959 53 959 54 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 15 959 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 959 15 959 16 , SrcSpan "tests/examples/Attributes.hs" 959 42 959 43 , SrcSpan "tests/examples/Attributes.hs" 959 52 959 53 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 16 959 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 16 959 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 16 959 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 16 959 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 16 959 22 , srcInfoPoints = [] } "ArrMod"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 23 959 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 23 959 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 23 959 32 , srcInfoPoints = [] } "OpenArrow")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 33 959 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 33 959 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 33 959 42 , srcInfoPoints = [] } "BothSides"))) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 44 959 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 44 959 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 959 44 959 52 , srcInfoPoints = [] } "DotArrow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 1 961 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 1 960 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 1 960 8 , srcInfoPoints = [] } "invODot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 9 961 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 960 9 960 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 11 961 39 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 11 960 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 11 960 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 11 960 16 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 17 961 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 960 17 960 18 , SrcSpan "tests/examples/Attributes.hs" 961 17 961 18 , SrcSpan "tests/examples/Attributes.hs" 961 38 961 39 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 19 960 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 960 19 960 20 , SrcSpan "tests/examples/Attributes.hs" 960 26 960 27 , SrcSpan "tests/examples/Attributes.hs" 960 31 960 32 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 20 960 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 20 960 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 20 960 26 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 28 960 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 28 960 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 960 28 960 31 , srcInfoPoints = [] } "Inv")) ] , Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 19 961 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 961 19 961 20 , SrcSpan "tests/examples/Attributes.hs" 961 27 961 28 , SrcSpan "tests/examples/Attributes.hs" 961 37 961 38 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 20 961 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 20 961 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 20 961 27 , srcInfoPoints = [] } "openMod")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 29 961 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 29 961 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 961 29 961 37 , srcInfoPoints = [] } "DotArrow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 1 962 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 1 962 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 1 962 8 , srcInfoPoints = [] } "noArrow")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 9 962 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 962 9 962 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 11 962 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 11 962 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 11 962 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 11 962 16 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 17 962 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 962 17 962 18 , SrcSpan "tests/examples/Attributes.hs" 962 35 962 36 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 18 962 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 962 18 962 19 , SrcSpan "tests/examples/Attributes.hs" 962 25 962 26 , SrcSpan "tests/examples/Attributes.hs" 962 34 962 35 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 19 962 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 19 962 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 19 962 25 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 27 962 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 27 962 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 962 27 962 34 , srcInfoPoints = [] } "NoArrow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 1 963 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 1 963 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 1 963 4 , srcInfoPoints = [] } "tee")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 5 963 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 963 5 963 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 7 963 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 7 963 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 7 963 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 7 963 12 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 13 963 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 963 13 963 14 , SrcSpan "tests/examples/Attributes.hs" 963 27 963 28 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 14 963 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 963 14 963 15 , SrcSpan "tests/examples/Attributes.hs" 963 21 963 22 , SrcSpan "tests/examples/Attributes.hs" 963 26 963 27 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 15 963 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 15 963 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 15 963 21 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 23 963 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 23 963 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 963 23 963 26 , srcInfoPoints = [] } "Tee")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 1 964 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 1 964 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 1 964 9 , srcInfoPoints = [] } "emptyArr")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 10 964 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 964 10 964 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 12 964 37 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 12 964 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 12 964 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 12 964 17 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 18 964 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 964 18 964 19 , SrcSpan "tests/examples/Attributes.hs" 964 36 964 37 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 19 964 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 964 19 964 20 , SrcSpan "tests/examples/Attributes.hs" 964 27 964 28 , SrcSpan "tests/examples/Attributes.hs" 964 35 964 36 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 20 964 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 20 964 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 20 964 27 , srcInfoPoints = [] } "openMod")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 29 964 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 29 964 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 964 29 964 35 , srcInfoPoints = [] } "Normal")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 1 966 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 1 965 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 1 965 9 , srcInfoPoints = [] } "invEmpty")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 10 966 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 965 10 965 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 12 966 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 12 965 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 12 965 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 12 965 17 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 18 966 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 965 18 965 19 , SrcSpan "tests/examples/Attributes.hs" 966 18 966 19 , SrcSpan "tests/examples/Attributes.hs" 966 37 966 38 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 20 965 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 965 20 965 21 , SrcSpan "tests/examples/Attributes.hs" 965 27 965 28 , SrcSpan "tests/examples/Attributes.hs" 965 32 965 33 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 21 965 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 21 965 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 21 965 27 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 29 965 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 29 965 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 965 29 965 32 , srcInfoPoints = [] } "Inv")) ] , Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 20 966 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 966 20 966 21 , SrcSpan "tests/examples/Attributes.hs" 966 28 966 29 , SrcSpan "tests/examples/Attributes.hs" 966 36 966 37 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 21 966 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 21 966 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 21 966 28 , srcInfoPoints = [] } "openMod")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 30 966 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 30 966 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 966 30 966 36 , srcInfoPoints = [] } "Normal")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 1 967 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 1 967 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 1 967 8 , srcInfoPoints = [] } "diamond")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 9 967 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 967 9 967 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 11 967 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 11 967 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 11 967 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 11 967 16 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 17 967 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 967 17 967 18 , SrcSpan "tests/examples/Attributes.hs" 967 35 967 36 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 18 967 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 967 18 967 19 , SrcSpan "tests/examples/Attributes.hs" 967 25 967 26 , SrcSpan "tests/examples/Attributes.hs" 967 34 967 35 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 19 967 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 19 967 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 19 967 25 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 27 967 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 27 967 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 967 27 967 34 , srcInfoPoints = [] } "Diamond")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 1 968 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 1 968 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 1 968 9 , srcInfoPoints = [] } "oDiamond")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 10 968 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 968 10 968 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 12 968 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 12 968 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 12 968 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 12 968 17 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 18 968 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 968 18 968 19 , SrcSpan "tests/examples/Attributes.hs" 968 37 968 38 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 19 968 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 968 19 968 20 , SrcSpan "tests/examples/Attributes.hs" 968 27 968 28 , SrcSpan "tests/examples/Attributes.hs" 968 36 968 37 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 20 968 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 20 968 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 20 968 27 , srcInfoPoints = [] } "openMod")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 29 968 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 29 968 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 968 29 968 36 , srcInfoPoints = [] } "Diamond")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 1 969 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 1 969 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 1 969 9 , srcInfoPoints = [] } "eDiamond")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 10 969 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 969 10 969 11 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 12 969 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 12 969 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 969 12 969 20 , srcInfoPoints = [] } "oDiamond")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 1 970 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 1 970 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 1 970 5 , srcInfoPoints = [] } "crow")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 6 970 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 970 6 970 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 8 970 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 8 970 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 8 970 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 8 970 13 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 14 970 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 970 14 970 15 , SrcSpan "tests/examples/Attributes.hs" 970 29 970 30 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 15 970 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 970 15 970 16 , SrcSpan "tests/examples/Attributes.hs" 970 22 970 23 , SrcSpan "tests/examples/Attributes.hs" 970 28 970 29 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 16 970 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 16 970 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 16 970 22 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 24 970 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 24 970 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 970 24 970 28 , srcInfoPoints = [] } "Crow")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 1 971 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 1 971 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 1 971 4 , srcInfoPoints = [] } "box")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 5 971 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 971 5 971 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 7 971 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 7 971 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 7 971 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 7 971 12 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 13 971 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 971 13 971 14 , SrcSpan "tests/examples/Attributes.hs" 971 27 971 28 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 14 971 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 971 14 971 15 , SrcSpan "tests/examples/Attributes.hs" 971 21 971 22 , SrcSpan "tests/examples/Attributes.hs" 971 26 971 27 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 15 971 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 15 971 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 15 971 21 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 23 971 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 23 971 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 971 23 971 26 , srcInfoPoints = [] } "Box")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 1 972 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 1 972 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 1 972 5 , srcInfoPoints = [] } "oBox")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 6 972 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 972 6 972 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 8 972 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 8 972 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 8 972 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 8 972 13 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 14 972 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 972 14 972 15 , SrcSpan "tests/examples/Attributes.hs" 972 29 972 30 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 15 972 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 972 15 972 16 , SrcSpan "tests/examples/Attributes.hs" 972 23 972 24 , SrcSpan "tests/examples/Attributes.hs" 972 28 972 29 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 16 972 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 16 972 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 16 972 23 , srcInfoPoints = [] } "openMod")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 25 972 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 25 972 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 972 25 972 28 , srcInfoPoints = [] } "Box")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 1 973 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 1 973 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 1 973 8 , srcInfoPoints = [] } "openArr")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 9 973 14 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 973 9 973 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 11 973 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 11 973 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 973 11 973 14 , srcInfoPoints = [] } "vee")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 1 974 54 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 1 974 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 1 974 9 , srcInfoPoints = [] } "halfOpen")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 10 974 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 974 10 974 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 12 974 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 12 974 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 12 974 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 12 974 17 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 18 974 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 974 18 974 19 , SrcSpan "tests/examples/Attributes.hs" 974 53 974 54 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 19 974 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 974 19 974 20 , SrcSpan "tests/examples/Attributes.hs" 974 47 974 48 , SrcSpan "tests/examples/Attributes.hs" 974 52 974 53 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 20 974 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 20 974 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 20 974 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 20 974 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 20 974 26 , srcInfoPoints = [] } "ArrMod"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 27 974 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 27 974 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 27 974 38 , srcInfoPoints = [] } "FilledArrow")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 39 974 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 39 974 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 39 974 47 , srcInfoPoints = [] } "LeftSide"))) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 49 974 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 49 974 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 974 49 974 52 , srcInfoPoints = [] } "Vee")) ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 1 975 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 1 975 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 1 975 4 , srcInfoPoints = [] } "vee")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 5 975 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 975 5 975 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 7 975 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 7 975 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 7 975 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 7 975 12 , srcInfoPoints = [] } "AType"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 13 975 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 975 13 975 14 , SrcSpan "tests/examples/Attributes.hs" 975 27 975 28 ] } [ Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 14 975 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 975 14 975 15 , SrcSpan "tests/examples/Attributes.hs" 975 21 975 22 , SrcSpan "tests/examples/Attributes.hs" 975 26 975 27 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 15 975 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 15 975 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 15 975 21 , srcInfoPoints = [] } "noMods")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 23 975 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 23 975 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 975 23 975 26 , srcInfoPoints = [] } "Vee")) ] ]))) Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 1 982 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 977 1 977 9 , SrcSpan "tests/examples/Attributes.hs" 977 29 977 34 , SrcSpan "tests/examples/Attributes.hs" 978 5 978 5 , SrcSpan "tests/examples/Attributes.hs" 982 1 982 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 10 977 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 10 977 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 10 977 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 10 977 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 10 977 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 19 977 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 19 977 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 977 19 977 28 , srcInfoPoints = [] } "ArrowType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 5 980 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 979 9 979 14 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 5 980 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 979 9 979 14 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 5 980 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 979 9 979 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 5 978 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 13 978 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 978 13 978 14 , SrcSpan "tests/examples/Attributes.hs" 978 23 978 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 14 978 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 14 978 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 14 978 19 , srcInfoPoints = [] } "AType")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 20 978 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 20 978 23 , srcInfoPoints = [] } "mas") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 25 978 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 978 25 978 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 27 978 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 27 978 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 27 978 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 27 978 31 , srcInfoPoints = [] } "hcat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 32 978 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 32 978 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 32 978 33 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 34 978 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 34 978 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 34 978 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 34 978 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 34 978 37 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 38 978 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 38 978 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 38 978 44 , srcInfoPoints = [] } "appMod")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 45 978 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 45 978 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 978 45 978 48 , srcInfoPoints = [] } "mas")))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 11 980 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 980 11 980 11 , SrcSpan "tests/examples/Attributes.hs" 982 1 982 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 11 980 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 11 980 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 11 980 17 , srcInfoPoints = [] } "appMod") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 18 980 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 980 18 980 19 , SrcSpan "tests/examples/Attributes.hs" 980 20 980 21 , SrcSpan "tests/examples/Attributes.hs" 980 23 980 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 19 980 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 19 980 20 , srcInfoPoints = [] } "m") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 22 980 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 22 980 23 , srcInfoPoints = [] } "a") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 25 980 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 980 25 980 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 27 980 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 27 980 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 27 980 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 27 980 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 27 980 34 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 35 980 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 35 980 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 35 980 36 , srcInfoPoints = [] } "m")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 37 980 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 37 980 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 37 980 39 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 40 980 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 40 980 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 40 980 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 40 980 47 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 48 980 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 48 980 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 980 48 980 49 , srcInfoPoints = [] } "a")))))) Nothing ] ])) ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 1 990 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 982 1 982 9 , SrcSpan "tests/examples/Attributes.hs" 982 29 982 34 , SrcSpan "tests/examples/Attributes.hs" 983 5 983 5 , SrcSpan "tests/examples/Attributes.hs" 990 1 990 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 10 982 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 10 982 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 10 982 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 10 982 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 10 982 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 19 982 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 19 982 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 982 19 982 28 , srcInfoPoints = [] } "ArrowType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 5 988 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 5 988 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 5 983 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 5 983 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 15 988 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 983 15 983 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 17 988 34 , srcInfoPoints = [] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 17 986 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 983 17 983 19 , SrcSpan "tests/examples/Attributes.hs" 983 20 983 20 , SrcSpan "tests/examples/Attributes.hs" 986 20 986 20 , SrcSpan "tests/examples/Attributes.hs" 987 17 987 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 20 985 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 983 24 983 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 20 983 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 20 983 23 , srcInfoPoints = [] } "mas")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 27 985 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 27 983 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 27 983 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 27 983 32 , srcInfoPoints = [] } "many1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 33 983 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 33 983 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 33 983 34 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 35 985 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 983 35 983 37 , SrcSpan "tests/examples/Attributes.hs" 983 38 983 38 , SrcSpan "tests/examples/Attributes.hs" 984 38 984 38 , SrcSpan "tests/examples/Attributes.hs" 985 38 985 38 , SrcSpan "tests/examples/Attributes.hs" 986 20 986 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 38 983 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 983 40 983 42 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 38 983 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 38 983 39 , srcInfoPoints = [] } "m")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 43 983 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 43 983 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 983 43 983 52 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 38 984 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 984 40 984 42 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 38 984 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 38 984 39 , srcInfoPoints = [] } "a")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 43 984 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 43 984 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 984 43 984 52 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 38 985 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 38 985 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 38 985 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 38 985 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 38 985 44 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 45 985 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 985 45 985 46 , SrcSpan "tests/examples/Attributes.hs" 985 47 985 48 , SrcSpan "tests/examples/Attributes.hs" 985 49 985 50 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 46 985 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 46 985 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 46 985 47 , srcInfoPoints = [] } "m")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 48 985 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 48 985 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 985 48 985 49 , srcInfoPoints = [] } "a")) ])) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 20 986 38 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 20 986 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 20 986 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 20 986 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 20 986 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 27 986 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 27 986 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 27 986 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 29 986 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 29 986 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 29 986 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 29 986 34 , srcInfoPoints = [] } "AType"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 35 986 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 35 986 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 986 35 986 38 , srcInfoPoints = [] } "mas"))))) ]) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 987 17 987 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 987 17 987 18 , SrcSpan "tests/examples/Attributes.hs" 987 18 987 24 , SrcSpan "tests/examples/Attributes.hs" 987 24 987 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 987 17 987 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 987 17 987 18 , SrcSpan "tests/examples/Attributes.hs" 987 18 987 24 , SrcSpan "tests/examples/Attributes.hs" 987 24 987 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 987 18 987 24 , srcInfoPoints = [] } "onFail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 988 17 988 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 988 17 988 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 988 17 988 34 , srcInfoPoints = [] } "specialArrowParse"))))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 1 990 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 990 19 990 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 1 990 18 , srcInfoPoints = [] } "specialArrowParse" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 22 990 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 22 990 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 22 990 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 22 990 27 , srcInfoPoints = [] } "Parse"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 28 990 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 28 990 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 990 28 990 37 , srcInfoPoints = [] } "ArrowType")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 1 996 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 1 991 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 1 991 18 , srcInfoPoints = [] } "specialArrowParse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 19 996 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 991 19 991 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 21 996 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 21 991 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 21 991 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 21 991 26 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 27 996 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 991 27 991 28 , SrcSpan "tests/examples/Attributes.hs" 992 27 992 28 , SrcSpan "tests/examples/Attributes.hs" 993 27 993 28 , SrcSpan "tests/examples/Attributes.hs" 994 27 994 28 , SrcSpan "tests/examples/Attributes.hs" 995 27 995 28 , SrcSpan "tests/examples/Attributes.hs" 996 27 996 28 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 29 991 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 29 991 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 29 991 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 29 991 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 29 991 38 , srcInfoPoints = [] } "stringRep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 39 991 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 39 991 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 39 991 47 , srcInfoPoints = [] } "eDiamond")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 48 991 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 991 48 991 58 , srcInfoPoints = [] } "ediamond" "ediamond")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 29 992 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 29 992 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 29 992 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 29 992 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 29 992 38 , srcInfoPoints = [] } "stringRep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 39 992 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 39 992 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 39 992 46 , srcInfoPoints = [] } "openArr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 47 992 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 992 47 992 53 , srcInfoPoints = [] } "open" "open")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 29 993 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 29 993 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 29 993 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 29 993 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 29 993 38 , srcInfoPoints = [] } "stringRep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 39 993 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 39 993 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 39 993 47 , srcInfoPoints = [] } "halfOpen")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 48 993 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 993 48 993 58 , srcInfoPoints = [] } "halfopen" "halfopen")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 29 994 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 29 994 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 29 994 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 29 994 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 29 994 38 , srcInfoPoints = [] } "stringRep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 39 994 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 39 994 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 39 994 47 , srcInfoPoints = [] } "emptyArr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 48 994 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 994 48 994 55 , srcInfoPoints = [] } "empty" "empty")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 29 995 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 29 995 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 29 995 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 29 995 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 29 995 38 , srcInfoPoints = [] } "stringRep"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 39 995 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 39 995 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 39 995 47 , srcInfoPoints = [] } "invEmpty")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 48 995 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 995 48 995 58 , srcInfoPoints = [] } "invempty" "invempty")) ]))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 1 1007 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 998 17 998 18 , SrcSpan "tests/examples/Attributes.hs" 999 17 999 18 , SrcSpan "tests/examples/Attributes.hs" 1000 17 1000 18 , SrcSpan "tests/examples/Attributes.hs" 1001 17 1001 18 , SrcSpan "tests/examples/Attributes.hs" 1002 17 1002 18 , SrcSpan "tests/examples/Attributes.hs" 1003 17 1003 18 , SrcSpan "tests/examples/Attributes.hs" 1004 17 1004 18 , SrcSpan "tests/examples/Attributes.hs" 1005 17 1005 18 , SrcSpan "tests/examples/Attributes.hs" 1006 17 1006 18 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 1 998 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 6 998 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 6 998 16 , srcInfoPoints = [] } "ArrowShape")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 19 998 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 19 998 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 998 19 998 22 , srcInfoPoints = [] } "Box") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 999 19 999 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 999 19 999 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 999 19 999 23 , srcInfoPoints = [] } "Crow") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1000 19 1000 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1000 19 1000 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1000 19 1000 26 , srcInfoPoints = [] } "Diamond") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1001 19 1001 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1001 19 1001 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1001 19 1001 27 , srcInfoPoints = [] } "DotArrow") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1002 19 1002 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1002 19 1002 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1002 19 1002 22 , srcInfoPoints = [] } "Inv") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1003 19 1003 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1003 19 1003 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1003 19 1003 26 , srcInfoPoints = [] } "NoArrow") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1004 19 1004 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1004 19 1004 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1004 19 1004 25 , srcInfoPoints = [] } "Normal") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1005 19 1005 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1005 19 1005 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1005 19 1005 22 , srcInfoPoints = [] } "Tee") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1006 19 1006 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1006 19 1006 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1006 19 1006 22 , srcInfoPoints = [] } "Vee") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 19 1007 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1007 19 1007 27 , SrcSpan "tests/examples/Attributes.hs" 1007 28 1007 29 , SrcSpan "tests/examples/Attributes.hs" 1007 31 1007 32 , SrcSpan "tests/examples/Attributes.hs" 1007 36 1007 37 , SrcSpan "tests/examples/Attributes.hs" 1007 45 1007 46 , SrcSpan "tests/examples/Attributes.hs" 1007 51 1007 52 , SrcSpan "tests/examples/Attributes.hs" 1007 57 1007 58 , SrcSpan "tests/examples/Attributes.hs" 1007 63 1007 64 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 29 1007 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 29 1007 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 29 1007 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 29 1007 31 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 33 1007 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 33 1007 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 33 1007 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 33 1007 36 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 38 1007 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 38 1007 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 38 1007 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 38 1007 45 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 47 1007 51 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 47 1007 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 47 1007 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 47 1007 51 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 53 1007 57 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 53 1007 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 53 1007 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 53 1007 57 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 59 1007 63 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 59 1007 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 59 1007 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1007 59 1007 63 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 1 1020 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1009 1 1009 9 , SrcSpan "tests/examples/Attributes.hs" 1009 30 1009 35 , SrcSpan "tests/examples/Attributes.hs" 1010 5 1010 5 , SrcSpan "tests/examples/Attributes.hs" 1011 5 1011 5 , SrcSpan "tests/examples/Attributes.hs" 1012 5 1012 5 , SrcSpan "tests/examples/Attributes.hs" 1013 5 1013 5 , SrcSpan "tests/examples/Attributes.hs" 1014 5 1014 5 , SrcSpan "tests/examples/Attributes.hs" 1015 5 1015 5 , SrcSpan "tests/examples/Attributes.hs" 1016 5 1016 5 , SrcSpan "tests/examples/Attributes.hs" 1017 5 1017 5 , SrcSpan "tests/examples/Attributes.hs" 1018 5 1018 5 , SrcSpan "tests/examples/Attributes.hs" 1020 1 1020 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 10 1009 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 10 1009 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 10 1009 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 10 1009 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 10 1009 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 19 1009 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 19 1009 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1009 19 1009 29 , srcInfoPoints = [] } "ArrowShape"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 5 1018 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 5 1018 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 5 1010 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 5 1010 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 13 1010 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 13 1010 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 13 1010 16 , srcInfoPoints = [] } "Box")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 22 1010 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1010 22 1010 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 24 1010 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 24 1010 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 24 1010 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 24 1010 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 32 1010 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1010 32 1010 37 , srcInfoPoints = [] } "box" "box")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 5 1011 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 5 1011 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 13 1011 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 13 1011 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 13 1011 17 , srcInfoPoints = [] } "Crow")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 22 1011 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1011 22 1011 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 24 1011 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 24 1011 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 24 1011 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 24 1011 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 32 1011 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1011 32 1011 38 , srcInfoPoints = [] } "crow" "crow")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 5 1012 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 5 1012 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 13 1012 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 13 1012 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 13 1012 20 , srcInfoPoints = [] } "Diamond")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 22 1012 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1012 22 1012 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 24 1012 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 24 1012 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 24 1012 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 24 1012 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 32 1012 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1012 32 1012 41 , srcInfoPoints = [] } "diamond" "diamond")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 5 1013 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 5 1013 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 13 1013 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 13 1013 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 13 1013 21 , srcInfoPoints = [] } "DotArrow")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 22 1013 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1013 22 1013 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 24 1013 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 24 1013 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 24 1013 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 24 1013 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 32 1013 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1013 32 1013 37 , srcInfoPoints = [] } "dot" "dot")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 5 1014 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 5 1014 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 13 1014 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 13 1014 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 13 1014 16 , srcInfoPoints = [] } "Inv")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 22 1014 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1014 22 1014 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 24 1014 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 24 1014 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 24 1014 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 24 1014 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 32 1014 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1014 32 1014 37 , srcInfoPoints = [] } "inv" "inv")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 5 1015 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 5 1015 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 13 1015 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 13 1015 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 13 1015 20 , srcInfoPoints = [] } "NoArrow")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 22 1015 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1015 22 1015 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 24 1015 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 24 1015 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 24 1015 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 24 1015 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 32 1015 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1015 32 1015 38 , srcInfoPoints = [] } "none" "none")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 5 1016 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 5 1016 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 13 1016 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 13 1016 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 13 1016 19 , srcInfoPoints = [] } "Normal")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 22 1016 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1016 22 1016 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 24 1016 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 24 1016 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 24 1016 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 24 1016 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 32 1016 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1016 32 1016 40 , srcInfoPoints = [] } "normal" "normal")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 5 1017 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 5 1017 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 13 1017 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 13 1017 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 13 1017 16 , srcInfoPoints = [] } "Tee")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 22 1017 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1017 22 1017 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 24 1017 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 24 1017 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 24 1017 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 24 1017 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 32 1017 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1017 32 1017 37 , srcInfoPoints = [] } "tee" "tee")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 5 1018 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 5 1018 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 13 1018 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 13 1018 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 13 1018 16 , srcInfoPoints = [] } "Vee")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 22 1018 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1018 22 1018 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 24 1018 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 24 1018 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 24 1018 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 24 1018 31 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 32 1018 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1018 32 1018 37 , srcInfoPoints = [] } "vee" "vee")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 1 1033 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1020 1 1020 9 , SrcSpan "tests/examples/Attributes.hs" 1020 30 1020 35 , SrcSpan "tests/examples/Attributes.hs" 1021 5 1021 5 , SrcSpan "tests/examples/Attributes.hs" 1033 1 1033 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 10 1020 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 10 1020 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 10 1020 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 10 1020 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 10 1020 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 19 1020 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 19 1020 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1020 19 1020 29 , srcInfoPoints = [] } "ArrowShape"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 5 1030 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 5 1030 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 5 1021 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 5 1021 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 15 1030 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1021 15 1021 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 17 1030 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 17 1021 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 17 1021 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 17 1021 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 23 1030 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1021 23 1021 24 , SrcSpan "tests/examples/Attributes.hs" 1022 23 1022 24 , SrcSpan "tests/examples/Attributes.hs" 1023 23 1023 24 , SrcSpan "tests/examples/Attributes.hs" 1024 23 1024 24 , SrcSpan "tests/examples/Attributes.hs" 1025 23 1025 24 , SrcSpan "tests/examples/Attributes.hs" 1026 23 1026 24 , SrcSpan "tests/examples/Attributes.hs" 1027 23 1027 24 , SrcSpan "tests/examples/Attributes.hs" 1028 23 1028 24 , SrcSpan "tests/examples/Attributes.hs" 1029 23 1029 24 , SrcSpan "tests/examples/Attributes.hs" 1030 23 1030 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 25 1021 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 25 1021 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 25 1021 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 25 1021 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 25 1021 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 35 1021 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 35 1021 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 35 1021 38 , srcInfoPoints = [] } "Box")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 39 1021 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1021 39 1021 44 , srcInfoPoints = [] } "box" "box")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 25 1022 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 25 1022 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 25 1022 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 25 1022 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 25 1022 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 35 1022 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 35 1022 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 35 1022 39 , srcInfoPoints = [] } "Crow")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 40 1022 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1022 40 1022 46 , srcInfoPoints = [] } "crow" "crow")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 25 1023 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 25 1023 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 25 1023 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 25 1023 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 25 1023 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 35 1023 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 35 1023 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 35 1023 42 , srcInfoPoints = [] } "Diamond")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 43 1023 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1023 43 1023 52 , srcInfoPoints = [] } "diamond" "diamond")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 25 1024 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 25 1024 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 25 1024 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 25 1024 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 25 1024 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 35 1024 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 35 1024 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 35 1024 43 , srcInfoPoints = [] } "DotArrow")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 44 1024 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1024 44 1024 49 , srcInfoPoints = [] } "dot" "dot")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 25 1025 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 25 1025 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 25 1025 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 25 1025 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 25 1025 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 35 1025 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 35 1025 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 35 1025 38 , srcInfoPoints = [] } "Inv")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 39 1025 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1025 39 1025 44 , srcInfoPoints = [] } "inv" "inv")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 25 1026 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 25 1026 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 25 1026 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 25 1026 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 25 1026 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 35 1026 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 35 1026 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 35 1026 42 , srcInfoPoints = [] } "NoArrow")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 43 1026 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1026 43 1026 49 , srcInfoPoints = [] } "none" "none")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 25 1027 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 25 1027 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 25 1027 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 25 1027 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 25 1027 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 35 1027 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 35 1027 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 35 1027 41 , srcInfoPoints = [] } "Normal")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 42 1027 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1027 42 1027 50 , srcInfoPoints = [] } "normal" "normal")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 25 1028 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 25 1028 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 25 1028 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 25 1028 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 25 1028 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 35 1028 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 35 1028 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 35 1028 38 , srcInfoPoints = [] } "Tee")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 39 1028 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1028 39 1028 44 , srcInfoPoints = [] } "tee" "tee")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 25 1029 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 25 1029 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 25 1029 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 25 1029 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 25 1029 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 35 1029 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 35 1029 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 35 1029 38 , srcInfoPoints = [] } "Vee")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 39 1029 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1029 39 1029 44 , srcInfoPoints = [] } "vee" "vee")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 1 1036 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1033 20 1033 21 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 1 1033 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 6 1033 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 6 1033 19 , srcInfoPoints = [] } "ArrowModifier")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 22 1035 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1033 29 1033 30 , SrcSpan "tests/examples/Attributes.hs" 1034 29 1034 30 , SrcSpan "tests/examples/Attributes.hs" 1035 29 1035 30 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 22 1035 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1033 29 1033 30 , SrcSpan "tests/examples/Attributes.hs" 1034 29 1034 30 , SrcSpan "tests/examples/Attributes.hs" 1035 29 1035 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 22 1033 28 , srcInfoPoints = [] } "ArrMod") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 31 1033 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1033 41 1033 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 31 1033 40 , srcInfoPoints = [] } "arrowFill" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 44 1033 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 44 1033 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1033 44 1033 53 , srcInfoPoints = [] } "ArrowFill"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1034 31 1034 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1034 41 1034 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1034 31 1034 40 , srcInfoPoints = [] } "arrowSide" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1034 44 1034 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1034 44 1034 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1034 44 1034 53 , srcInfoPoints = [] } "ArrowSide"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 22 1036 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1036 22 1036 30 , SrcSpan "tests/examples/Attributes.hs" 1036 31 1036 32 , SrcSpan "tests/examples/Attributes.hs" 1036 34 1036 35 , SrcSpan "tests/examples/Attributes.hs" 1036 39 1036 40 , SrcSpan "tests/examples/Attributes.hs" 1036 45 1036 46 , SrcSpan "tests/examples/Attributes.hs" 1036 51 1036 52 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 32 1036 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 32 1036 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 32 1036 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 32 1036 34 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 36 1036 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 36 1036 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 36 1036 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 36 1036 39 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 41 1036 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 41 1036 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 41 1036 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 41 1036 45 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 47 1036 51 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 47 1036 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 47 1036 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1036 47 1036 51 , srcInfoPoints = [] } "Read"))) ] ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1039 1 1039 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1039 8 1039 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1039 1 1039 7 , srcInfoPoints = [] } "noMods" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1039 11 1039 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1039 11 1039 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1039 11 1039 24 , srcInfoPoints = [] } "ArrowModifier"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 1 1040 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 1 1040 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 1 1040 7 , srcInfoPoints = [] } "noMods")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 8 1040 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1040 8 1040 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 10 1040 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 10 1040 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 10 1040 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 10 1040 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 10 1040 16 , srcInfoPoints = [] } "ArrMod"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 17 1040 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 17 1040 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 17 1040 28 , srcInfoPoints = [] } "FilledArrow")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 29 1040 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 29 1040 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1040 29 1040 38 , srcInfoPoints = [] } "BothSides"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1043 1 1043 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1043 9 1043 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1043 1 1043 8 , srcInfoPoints = [] } "openMod" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1043 12 1043 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1043 12 1043 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1043 12 1043 25 , srcInfoPoints = [] } "ArrowModifier"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 1 1044 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 1 1044 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 1 1044 8 , srcInfoPoints = [] } "openMod")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 9 1044 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1044 9 1044 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 11 1044 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 11 1044 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 11 1044 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 11 1044 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 11 1044 17 , srcInfoPoints = [] } "ArrMod"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 18 1044 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 18 1044 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 18 1044 27 , srcInfoPoints = [] } "OpenArrow")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 28 1044 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 28 1044 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1044 28 1044 37 , srcInfoPoints = [] } "BothSides"))))) Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 1 1049 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1046 1 1046 9 , SrcSpan "tests/examples/Attributes.hs" 1046 33 1046 38 , SrcSpan "tests/examples/Attributes.hs" 1047 5 1047 5 , SrcSpan "tests/examples/Attributes.hs" 1049 1 1049 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 10 1046 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 10 1046 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 10 1046 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 10 1046 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 10 1046 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 19 1046 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 19 1046 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1046 19 1046 32 , srcInfoPoints = [] } "ArrowModifier"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 5 1047 50 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 5 1047 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 5 1047 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 5 1047 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 13 1047 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1047 13 1047 14 , SrcSpan "tests/examples/Attributes.hs" 1047 24 1047 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 14 1047 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 14 1047 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 14 1047 20 , srcInfoPoints = [] } "ArrMod")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 21 1047 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 21 1047 22 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 23 1047 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 23 1047 24 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 26 1047 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1047 26 1047 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 28 1047 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 28 1047 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 28 1047 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 28 1047 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 28 1047 35 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 36 1047 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 36 1047 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 36 1047 37 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 38 1047 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 38 1047 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 38 1047 40 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 41 1047 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 41 1047 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 41 1047 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 41 1047 48 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 49 1047 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 49 1047 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1047 49 1047 50 , srcInfoPoints = [] } "s")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 1 1054 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1049 1 1049 9 , SrcSpan "tests/examples/Attributes.hs" 1049 33 1049 38 , SrcSpan "tests/examples/Attributes.hs" 1050 5 1050 5 , SrcSpan "tests/examples/Attributes.hs" 1054 1 1054 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 10 1049 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 10 1049 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 10 1049 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 10 1049 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 10 1049 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 19 1049 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 19 1049 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1049 19 1049 32 , srcInfoPoints = [] } "ArrowModifier"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 5 1052 39 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 5 1052 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 5 1050 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 5 1050 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 15 1052 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1050 15 1050 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 17 1052 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1050 17 1050 19 , SrcSpan "tests/examples/Attributes.hs" 1050 20 1050 20 , SrcSpan "tests/examples/Attributes.hs" 1051 20 1051 20 , SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 20 , SrcSpan "tests/examples/Attributes.hs" 1054 1 1054 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 20 1050 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1050 22 1050 24 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 20 1050 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 20 1050 21 , srcInfoPoints = [] } "f")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 25 1050 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 25 1050 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1050 25 1050 34 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 20 1051 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1051 22 1051 24 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 20 1051 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 20 1051 21 , srcInfoPoints = [] } "s")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 25 1051 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 25 1051 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1051 25 1051 34 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 39 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 20 1052 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 27 1052 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 27 1052 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 27 1052 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 29 1052 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 29 1052 37 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 29 1052 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 29 1052 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 29 1052 35 , srcInfoPoints = [] } "ArrMod"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 36 1052 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 36 1052 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 36 1052 37 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 38 1052 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 38 1052 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1052 38 1052 39 , srcInfoPoints = [] } "s"))))) ])) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 1 1056 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1054 16 1054 17 , SrcSpan "tests/examples/Attributes.hs" 1055 16 1055 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 1 1054 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 6 1054 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 6 1054 15 , srcInfoPoints = [] } "ArrowFill")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 18 1054 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 18 1054 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1054 18 1054 27 , srcInfoPoints = [] } "OpenArrow") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1055 18 1055 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1055 18 1055 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1055 18 1055 29 , srcInfoPoints = [] } "FilledArrow") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 18 1056 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1056 18 1056 26 , SrcSpan "tests/examples/Attributes.hs" 1056 27 1056 28 , SrcSpan "tests/examples/Attributes.hs" 1056 30 1056 31 , SrcSpan "tests/examples/Attributes.hs" 1056 35 1056 36 , SrcSpan "tests/examples/Attributes.hs" 1056 44 1056 45 , SrcSpan "tests/examples/Attributes.hs" 1056 50 1056 51 , SrcSpan "tests/examples/Attributes.hs" 1056 56 1056 57 , SrcSpan "tests/examples/Attributes.hs" 1056 62 1056 63 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 28 1056 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 28 1056 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 28 1056 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 28 1056 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 32 1056 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 32 1056 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 32 1056 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 32 1056 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 37 1056 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 37 1056 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 37 1056 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 37 1056 44 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 46 1056 50 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 46 1056 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 46 1056 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 46 1056 50 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 52 1056 56 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 52 1056 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 52 1056 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 52 1056 56 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 58 1056 62 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 58 1056 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 58 1056 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1056 58 1056 62 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 1 1062 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1058 1 1058 9 , SrcSpan "tests/examples/Attributes.hs" 1058 29 1058 34 , SrcSpan "tests/examples/Attributes.hs" 1059 5 1059 5 , SrcSpan "tests/examples/Attributes.hs" 1060 5 1060 5 , SrcSpan "tests/examples/Attributes.hs" 1062 1 1062 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 10 1058 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 10 1058 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 10 1058 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 10 1058 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 10 1058 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 19 1058 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 19 1058 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1058 19 1058 28 , srcInfoPoints = [] } "ArrowFill"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 5 1060 32 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 5 1060 32 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 5 1059 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 5 1059 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 13 1059 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 13 1059 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 13 1059 22 , srcInfoPoints = [] } "OpenArrow")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 25 1059 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1059 25 1059 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 27 1059 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 27 1059 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 27 1059 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 27 1059 31 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 32 1059 35 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1059 32 1059 35 , srcInfoPoints = [] } 'o' "o")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 5 1060 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 5 1060 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 13 1060 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 13 1060 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 13 1060 24 , srcInfoPoints = [] } "FilledArrow")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 25 1060 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1060 25 1060 26 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 27 1060 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 27 1060 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1060 27 1060 32 , srcInfoPoints = [] } "empty")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 1 1071 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1062 1 1062 9 , SrcSpan "tests/examples/Attributes.hs" 1062 29 1062 34 , SrcSpan "tests/examples/Attributes.hs" 1063 5 1063 5 , SrcSpan "tests/examples/Attributes.hs" 1067 5 1067 5 , SrcSpan "tests/examples/Attributes.hs" 1071 1 1071 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 10 1062 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 10 1062 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 10 1062 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 10 1062 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 10 1062 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 19 1062 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 19 1062 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1062 19 1062 28 , srcInfoPoints = [] } "ArrowFill"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 5 1064 43 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 5 1064 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 5 1063 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 5 1063 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 15 1064 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1063 15 1063 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 17 1064 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 17 1063 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 17 1063 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 17 1063 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 17 1063 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 23 1063 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1063 23 1063 24 , SrcSpan "tests/examples/Attributes.hs" 1063 59 1063 60 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 24 1063 28 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 29 1063 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 29 1063 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 29 1063 40 , srcInfoPoints = [] } "FilledArrow")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 41 1063 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 41 1063 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 41 1063 50 , srcInfoPoints = [] } "OpenArrow")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 51 1063 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 51 1063 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 51 1063 52 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 53 1063 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 53 1063 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1063 53 1063 59 , srcInfoPoints = [] } "isJust")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 17 1064 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 17 1064 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 17 1064 18 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 19 1064 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 19 1064 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 19 1064 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 19 1064 27 , srcInfoPoints = [] } "optional"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 28 1064 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1064 28 1064 29 , SrcSpan "tests/examples/Attributes.hs" 1064 42 1064 43 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 29 1064 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 29 1064 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 29 1064 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 29 1064 38 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 39 1064 42 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1064 39 1064 42 , srcInfoPoints = [] } 'o' "o"))))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 5 1067 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 5 1067 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 5 1067 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 5 1067 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 11 1067 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1067 11 1067 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 13 1067 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 13 1067 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1067 13 1067 22 , srcInfoPoints = [] } "parseUnqt")))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 1 1074 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1071 16 1071 17 , SrcSpan "tests/examples/Attributes.hs" 1072 16 1072 17 , SrcSpan "tests/examples/Attributes.hs" 1073 16 1073 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 1 1071 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 6 1071 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 6 1071 15 , srcInfoPoints = [] } "ArrowSide")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 18 1071 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 18 1071 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1071 18 1071 26 , srcInfoPoints = [] } "LeftSide") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1072 18 1072 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1072 18 1072 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1072 18 1072 27 , srcInfoPoints = [] } "RightSide") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1073 18 1073 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1073 18 1073 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1073 18 1073 27 , srcInfoPoints = [] } "BothSides") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 18 1074 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1074 18 1074 26 , SrcSpan "tests/examples/Attributes.hs" 1074 27 1074 28 , SrcSpan "tests/examples/Attributes.hs" 1074 30 1074 31 , SrcSpan "tests/examples/Attributes.hs" 1074 35 1074 36 , SrcSpan "tests/examples/Attributes.hs" 1074 44 1074 45 , SrcSpan "tests/examples/Attributes.hs" 1074 50 1074 51 , SrcSpan "tests/examples/Attributes.hs" 1074 56 1074 57 , SrcSpan "tests/examples/Attributes.hs" 1074 62 1074 63 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 28 1074 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 28 1074 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 28 1074 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 28 1074 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 32 1074 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 32 1074 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 32 1074 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 32 1074 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 37 1074 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 37 1074 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 37 1074 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 37 1074 44 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 46 1074 50 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 46 1074 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 46 1074 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 46 1074 50 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 52 1074 56 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 52 1074 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 52 1074 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 52 1074 56 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 58 1074 62 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 58 1074 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 58 1074 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1074 58 1074 62 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 1 1081 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1076 1 1076 9 , SrcSpan "tests/examples/Attributes.hs" 1076 29 1076 34 , SrcSpan "tests/examples/Attributes.hs" 1077 5 1077 5 , SrcSpan "tests/examples/Attributes.hs" 1078 5 1078 5 , SrcSpan "tests/examples/Attributes.hs" 1079 5 1079 5 , SrcSpan "tests/examples/Attributes.hs" 1081 1 1081 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 10 1076 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 10 1076 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 10 1076 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 10 1076 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 10 1076 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 19 1076 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 19 1076 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1076 19 1076 28 , srcInfoPoints = [] } "ArrowSide"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 5 1079 30 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 5 1079 30 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 5 1077 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 5 1077 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 13 1077 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 13 1077 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 13 1077 21 , srcInfoPoints = [] } "LeftSide")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 23 1077 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1077 23 1077 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 25 1077 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 25 1077 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 25 1077 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 25 1077 29 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 30 1077 33 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1077 30 1077 33 , srcInfoPoints = [] } 'l' "l")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 5 1078 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 5 1078 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 13 1078 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 13 1078 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 13 1078 22 , srcInfoPoints = [] } "RightSide")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 23 1078 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1078 23 1078 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 25 1078 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 25 1078 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 25 1078 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 25 1078 29 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 30 1078 33 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1078 30 1078 33 , srcInfoPoints = [] } 'r' "r")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 5 1079 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 5 1079 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 13 1079 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 13 1079 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 13 1079 22 , srcInfoPoints = [] } "BothSides")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 23 1079 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1079 23 1079 24 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 25 1079 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 25 1079 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1079 25 1079 30 , srcInfoPoints = [] } "empty")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 1 1093 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1081 1 1081 9 , SrcSpan "tests/examples/Attributes.hs" 1081 29 1081 34 , SrcSpan "tests/examples/Attributes.hs" 1082 5 1082 5 , SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 5 , SrcSpan "tests/examples/Attributes.hs" 1093 1 1093 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 10 1081 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 10 1081 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 10 1081 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 10 1081 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 10 1081 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 19 1081 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 19 1081 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1081 19 1081 28 , srcInfoPoints = [] } "ArrowSide"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 5 1086 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1084 9 1084 14 ] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 5 1086 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1084 9 1084 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 5 1082 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 5 1082 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 15 1083 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1082 15 1082 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 17 1083 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 17 1082 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 17 1082 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 17 1082 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 17 1082 22 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 23 1082 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 23 1082 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1082 23 1082 34 , srcInfoPoints = [] } "getSideType")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 17 1083 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 17 1083 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 17 1083 18 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 19 1083 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 19 1083 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 19 1083 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 19 1083 27 , srcInfoPoints = [] } "optional"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 28 1083 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1083 28 1083 29 , SrcSpan "tests/examples/Attributes.hs" 1083 61 1083 62 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 29 1083 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 29 1083 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 29 1083 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 29 1083 34 , srcInfoPoints = [] } "oneOf"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 35 1083 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 35 1083 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 35 1083 36 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 37 1083 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 37 1083 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 37 1083 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 37 1083 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 37 1083 40 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 41 1083 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 41 1083 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 41 1083 50 , srcInfoPoints = [] } "character")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 51 1083 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1083 51 1083 52 , SrcSpan "tests/examples/Attributes.hs" 1083 55 1083 56 , SrcSpan "tests/examples/Attributes.hs" 1083 60 1083 61 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 52 1083 55 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 52 1083 55 , srcInfoPoints = [] } 'l' "l") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 57 1083 60 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1083 57 1083 60 , srcInfoPoints = [] } 'r' "r") ]))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 11 1086 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1085 11 1085 11 , SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 11 1086 67 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 11 1085 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 11 1085 22 , srcInfoPoints = [] } "getSideType")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 23 1086 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1085 23 1085 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 25 1086 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 25 1085 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 25 1085 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 25 1085 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 25 1085 30 , srcInfoPoints = [] } "maybe"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 31 1085 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 31 1085 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1085 31 1085 40 , srcInfoPoints = [] } "BothSides")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 31 1086 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1086 31 1086 32 , SrcSpan "tests/examples/Attributes.hs" 1086 66 1086 67 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 32 1086 36 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 37 1086 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 37 1086 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 37 1086 46 , srcInfoPoints = [] } "RightSide")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 47 1086 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 47 1086 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 47 1086 55 , srcInfoPoints = [] } "LeftSide")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 56 1086 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 56 1086 57 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 56 1086 57 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 58 1086 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 58 1086 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1086 58 1086 59 , SrcSpan "tests/examples/Attributes.hs" 1086 59 1086 61 , SrcSpan "tests/examples/Attributes.hs" 1086 61 1086 62 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 58 1086 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1086 58 1086 59 , SrcSpan "tests/examples/Attributes.hs" 1086 59 1086 61 , SrcSpan "tests/examples/Attributes.hs" 1086 61 1086 62 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 59 1086 61 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 63 1086 66 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1086 63 1086 66 , srcInfoPoints = [] } 'l' "l"))))))) Nothing ]))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 22 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 5 1089 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 11 1089 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1089 11 1089 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 13 1089 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 13 1089 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1089 13 1089 22 , srcInfoPoints = [] } "parseUnqt")))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 1 1095 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1093 17 1093 18 , SrcSpan "tests/examples/Attributes.hs" 1094 17 1094 18 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 1 1093 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 6 1093 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 6 1093 16 , srcInfoPoints = [] } "AspectType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 19 1093 35 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 19 1093 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 19 1093 28 , srcInfoPoints = [] } "RatioOnly") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 29 1093 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 29 1093 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1093 29 1093 35 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 19 1094 44 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 19 1094 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 19 1094 33 , srcInfoPoints = [] } "RatioPassCount") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 34 1094 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 34 1094 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 34 1094 40 , srcInfoPoints = [] } "Double")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 41 1094 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 41 1094 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1094 41 1094 44 , srcInfoPoints = [] } "Int")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 19 1095 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1095 19 1095 27 , SrcSpan "tests/examples/Attributes.hs" 1095 28 1095 29 , SrcSpan "tests/examples/Attributes.hs" 1095 31 1095 32 , SrcSpan "tests/examples/Attributes.hs" 1095 36 1095 37 , SrcSpan "tests/examples/Attributes.hs" 1095 42 1095 43 , SrcSpan "tests/examples/Attributes.hs" 1095 48 1095 49 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 29 1095 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 29 1095 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 29 1095 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 29 1095 31 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 33 1095 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 33 1095 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 33 1095 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 33 1095 36 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 38 1095 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 38 1095 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 38 1095 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 38 1095 42 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 44 1095 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 44 1095 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 44 1095 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1095 44 1095 48 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 1 1104 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1097 1 1097 9 , SrcSpan "tests/examples/Attributes.hs" 1097 30 1097 35 , SrcSpan "tests/examples/Attributes.hs" 1098 5 1098 5 , SrcSpan "tests/examples/Attributes.hs" 1099 5 1099 5 , SrcSpan "tests/examples/Attributes.hs" 1101 5 1101 5 , SrcSpan "tests/examples/Attributes.hs" 1102 5 1102 5 , SrcSpan "tests/examples/Attributes.hs" 1104 1 1104 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 10 1097 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 10 1097 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 10 1097 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 10 1097 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 10 1097 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 19 1097 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 19 1097 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1097 19 1097 29 , srcInfoPoints = [] } "AspectType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 5 1099 48 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 5 1099 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 5 1098 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 5 1098 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 13 1098 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1098 13 1098 14 , SrcSpan "tests/examples/Attributes.hs" 1098 25 1098 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 14 1098 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 14 1098 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 14 1098 23 , srcInfoPoints = [] } "RatioOnly")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 24 1098 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 24 1098 25 , srcInfoPoints = [] } "r") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 34 1098 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1098 34 1098 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 36 1098 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 36 1098 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 36 1098 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 36 1098 43 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 44 1098 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 44 1098 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1098 44 1098 45 , srcInfoPoints = [] } "r"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 5 1099 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 5 1099 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 13 1099 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1099 13 1099 14 , SrcSpan "tests/examples/Attributes.hs" 1099 32 1099 33 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 14 1099 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 14 1099 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 14 1099 28 , srcInfoPoints = [] } "RatioPassCount")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 29 1099 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 29 1099 30 , srcInfoPoints = [] } "r") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 31 1099 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 31 1099 32 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 34 1099 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1099 34 1099 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 36 1099 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 36 1099 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 36 1099 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 36 1099 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 36 1099 44 , srcInfoPoints = [] } "commaDel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 45 1099 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 45 1099 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 45 1099 46 , srcInfoPoints = [] } "r")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 47 1099 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 47 1099 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1099 47 1099 48 , srcInfoPoints = [] } "p"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 5 1102 58 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 5 1102 58 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 5 1101 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 5 1101 10 , srcInfoPoints = [] } "toDot") [ PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 11 1101 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1101 13 1101 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 11 1101 13 , srcInfoPoints = [] } "at") (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 14 1101 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1101 23 1101 24 , SrcSpan "tests/examples/Attributes.hs" 1101 24 1101 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 14 1101 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 14 1101 23 , srcInfoPoints = [] } "RatioOnly")) []) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 31 1101 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1101 31 1101 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 33 1101 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 33 1101 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 33 1101 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 33 1101 40 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 41 1101 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 41 1101 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1101 41 1101 43 , srcInfoPoints = [] } "at"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 5 1102 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 5 1102 10 , srcInfoPoints = [] } "toDot") [ PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 11 1102 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1102 13 1102 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 11 1102 13 , srcInfoPoints = [] } "at") (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 14 1102 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1102 28 1102 29 , SrcSpan "tests/examples/Attributes.hs" 1102 29 1102 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 14 1102 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 14 1102 28 , srcInfoPoints = [] } "RatioPassCount")) []) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 31 1102 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1102 31 1102 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 33 1102 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 33 1102 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 33 1102 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 33 1102 45 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 46 1102 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 46 1102 47 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 46 1102 47 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 48 1102 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 48 1102 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 48 1102 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 48 1102 55 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 56 1102 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 56 1102 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1102 56 1102 58 , srcInfoPoints = [] } "at")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 1 1116 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1104 1 1104 9 , SrcSpan "tests/examples/Attributes.hs" 1104 30 1104 35 , SrcSpan "tests/examples/Attributes.hs" 1105 5 1105 5 , SrcSpan "tests/examples/Attributes.hs" 1110 5 1110 5 , SrcSpan "tests/examples/Attributes.hs" 1116 1 1116 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 10 1104 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 10 1104 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 10 1104 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 10 1104 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 10 1104 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 19 1104 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 19 1104 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1104 19 1104 29 , srcInfoPoints = [] } "AspectType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 5 1107 42 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 5 1107 42 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 5 1105 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 5 1105 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 15 1107 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1105 15 1105 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1107 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1105 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1105 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1105 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1105 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 17 1105 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 23 1105 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1105 23 1105 24 , SrcSpan "tests/examples/Attributes.hs" 1105 46 1105 47 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 24 1105 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 24 1105 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 24 1105 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 24 1105 31 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 32 1105 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 32 1105 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 32 1105 46 , srcInfoPoints = [] } "RatioPassCount")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 48 1105 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 48 1105 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1105 48 1105 60 , srcInfoPoints = [] } "commaSepUnqt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1106 17 1106 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1106 17 1106 18 , SrcSpan "tests/examples/Attributes.hs" 1106 18 1106 24 , SrcSpan "tests/examples/Attributes.hs" 1106 24 1106 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1106 17 1106 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1106 17 1106 18 , SrcSpan "tests/examples/Attributes.hs" 1106 18 1106 24 , SrcSpan "tests/examples/Attributes.hs" 1106 24 1106 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1106 18 1106 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 17 1107 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 17 1107 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 17 1107 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 17 1107 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 17 1107 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 23 1107 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 23 1107 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 23 1107 32 , srcInfoPoints = [] } "RatioOnly")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 33 1107 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 33 1107 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1107 33 1107 42 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 5 1112 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 5 1112 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 5 1110 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 5 1110 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 11 1112 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1110 11 1110 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 13 1112 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 13 1110 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 13 1110 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 13 1110 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 13 1110 24 , srcInfoPoints = [] } "quotedParse"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 25 1110 70 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1110 25 1110 26 , SrcSpan "tests/examples/Attributes.hs" 1110 69 1110 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 26 1110 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 26 1110 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 26 1110 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 26 1110 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 26 1110 31 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 32 1110 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1110 32 1110 33 , SrcSpan "tests/examples/Attributes.hs" 1110 55 1110 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 33 1110 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 33 1110 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 33 1110 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 33 1110 40 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 41 1110 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 41 1110 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 41 1110 55 , srcInfoPoints = [] } "RatioPassCount")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 57 1110 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 57 1110 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1110 57 1110 69 , srcInfoPoints = [] } "commaSepUnqt")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1111 13 1111 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1111 13 1111 14 , SrcSpan "tests/examples/Attributes.hs" 1111 14 1111 20 , SrcSpan "tests/examples/Attributes.hs" 1111 20 1111 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1111 13 1111 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1111 13 1111 14 , SrcSpan "tests/examples/Attributes.hs" 1111 14 1111 20 , SrcSpan "tests/examples/Attributes.hs" 1111 20 1111 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1111 14 1111 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 13 1112 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 13 1112 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 13 1112 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 13 1112 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 13 1112 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 19 1112 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 19 1112 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 19 1112 28 , srcInfoPoints = [] } "RatioOnly")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 29 1112 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 29 1112 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1112 29 1112 34 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 1 1117 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1116 11 1116 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 1 1116 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 6 1116 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 6 1116 10 , srcInfoPoints = [] } "Rect")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 13 1116 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 13 1116 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 13 1116 17 , srcInfoPoints = [] } "Rect") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 18 1116 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 18 1116 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 18 1116 23 , srcInfoPoints = [] } "Point")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 24 1116 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 24 1116 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1116 24 1116 29 , srcInfoPoints = [] } "Point")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 13 1117 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1117 13 1117 21 , SrcSpan "tests/examples/Attributes.hs" 1117 22 1117 23 , SrcSpan "tests/examples/Attributes.hs" 1117 25 1117 26 , SrcSpan "tests/examples/Attributes.hs" 1117 30 1117 31 , SrcSpan "tests/examples/Attributes.hs" 1117 36 1117 37 , SrcSpan "tests/examples/Attributes.hs" 1117 42 1117 43 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 23 1117 25 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 23 1117 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 23 1117 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 23 1117 25 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 27 1117 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 27 1117 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 27 1117 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 27 1117 30 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 32 1117 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 32 1117 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 32 1117 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 32 1117 36 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 38 1117 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 38 1117 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 38 1117 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1117 38 1117 42 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 1 1124 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1119 1 1119 9 , SrcSpan "tests/examples/Attributes.hs" 1119 24 1119 29 , SrcSpan "tests/examples/Attributes.hs" 1120 5 1120 5 , SrcSpan "tests/examples/Attributes.hs" 1122 5 1122 5 , SrcSpan "tests/examples/Attributes.hs" 1124 1 1124 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 10 1119 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 10 1119 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 10 1119 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 10 1119 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 10 1119 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 19 1119 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 19 1119 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1119 19 1119 23 , srcInfoPoints = [] } "Rect"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 5 1120 42 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 5 1120 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 5 1120 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 5 1120 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 13 1120 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1120 13 1120 14 , SrcSpan "tests/examples/Attributes.hs" 1120 24 1120 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 14 1120 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 14 1120 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 14 1120 18 , srcInfoPoints = [] } "Rect")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 19 1120 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 19 1120 21 , srcInfoPoints = [] } "p1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 22 1120 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 22 1120 24 , srcInfoPoints = [] } "p2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 26 1120 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1120 26 1120 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 28 1120 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 28 1120 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 28 1120 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 28 1120 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 28 1120 36 , srcInfoPoints = [] } "commaDel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 37 1120 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 37 1120 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 37 1120 39 , srcInfoPoints = [] } "p1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 40 1120 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 40 1120 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1120 40 1120 42 , srcInfoPoints = [] } "p2"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 5 1122 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 5 1122 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 5 1122 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 5 1122 10 , srcInfoPoints = [] } "toDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 11 1122 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1122 11 1122 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 13 1122 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 13 1122 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 13 1122 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 13 1122 25 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 26 1122 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 26 1122 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 26 1122 27 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 28 1122 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 28 1122 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1122 28 1122 35 , srcInfoPoints = [] } "unqtDot"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 1 1131 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1124 1 1124 9 , SrcSpan "tests/examples/Attributes.hs" 1124 24 1124 29 , SrcSpan "tests/examples/Attributes.hs" 1125 5 1125 5 , SrcSpan "tests/examples/Attributes.hs" 1127 5 1127 5 , SrcSpan "tests/examples/Attributes.hs" 1131 1 1131 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 10 1124 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 10 1124 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 10 1124 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 10 1124 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 10 1124 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 19 1124 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 19 1124 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1124 19 1124 23 , srcInfoPoints = [] } "Rect"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 5 1125 50 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 5 1125 50 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 5 1125 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 5 1125 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 15 1125 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1125 15 1125 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 17 1125 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 17 1125 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 17 1125 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 17 1125 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 17 1125 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 23 1125 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1125 23 1125 24 , SrcSpan "tests/examples/Attributes.hs" 1125 36 1125 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 24 1125 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 24 1125 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 24 1125 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 24 1125 31 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 32 1125 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 32 1125 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 32 1125 36 , srcInfoPoints = [] } "Rect")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 38 1125 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 38 1125 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1125 38 1125 50 , srcInfoPoints = [] } "commaSepUnqt"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 5 1127 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 5 1127 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 5 1127 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 5 1127 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 11 1127 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1127 11 1127 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 13 1127 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 13 1127 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 13 1127 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 13 1127 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 25 1127 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 25 1127 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1127 25 1127 34 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 1 1134 65 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1131 18 1131 19 , SrcSpan "tests/examples/Attributes.hs" 1132 18 1132 19 , SrcSpan "tests/examples/Attributes.hs" 1133 18 1133 19 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 1 1131 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 6 1131 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 6 1131 17 , srcInfoPoints = [] } "ClusterMode")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 20 1131 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 20 1131 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1131 20 1131 25 , srcInfoPoints = [] } "Local") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1132 20 1132 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1132 20 1132 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1132 20 1132 26 , srcInfoPoints = [] } "Global") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1133 20 1133 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1133 20 1133 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1133 20 1133 29 , srcInfoPoints = [] } "NoCluster") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 20 1134 65 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1134 20 1134 28 , SrcSpan "tests/examples/Attributes.hs" 1134 29 1134 30 , SrcSpan "tests/examples/Attributes.hs" 1134 32 1134 33 , SrcSpan "tests/examples/Attributes.hs" 1134 37 1134 38 , SrcSpan "tests/examples/Attributes.hs" 1134 46 1134 47 , SrcSpan "tests/examples/Attributes.hs" 1134 52 1134 53 , SrcSpan "tests/examples/Attributes.hs" 1134 58 1134 59 , SrcSpan "tests/examples/Attributes.hs" 1134 64 1134 65 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 30 1134 32 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 30 1134 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 30 1134 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 30 1134 32 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 34 1134 37 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 34 1134 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 34 1134 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 34 1134 37 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 39 1134 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 39 1134 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 39 1134 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 39 1134 46 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 48 1134 52 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 48 1134 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 48 1134 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 48 1134 52 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 54 1134 58 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 54 1134 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 54 1134 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 54 1134 58 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 60 1134 64 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 60 1134 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 60 1134 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1134 60 1134 64 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 1 1143 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1136 1 1136 9 , SrcSpan "tests/examples/Attributes.hs" 1136 31 1136 36 , SrcSpan "tests/examples/Attributes.hs" 1137 5 1137 5 , SrcSpan "tests/examples/Attributes.hs" 1138 5 1138 5 , SrcSpan "tests/examples/Attributes.hs" 1139 5 1139 5 , SrcSpan "tests/examples/Attributes.hs" 1143 1 1143 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 10 1136 30 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 10 1136 30 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 10 1136 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 10 1136 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 10 1136 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 19 1136 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 19 1136 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1136 19 1136 30 , srcInfoPoints = [] } "ClusterMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 5 1139 39 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 5 1139 39 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 5 1137 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 5 1137 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 13 1137 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 13 1137 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 13 1137 18 , srcInfoPoints = [] } "Local")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 23 1137 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1137 23 1137 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 25 1137 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 25 1137 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 25 1137 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 25 1137 32 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 33 1137 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1137 33 1137 40 , srcInfoPoints = [] } "local" "local")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 5 1138 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 5 1138 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 13 1138 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 13 1138 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 13 1138 19 , srcInfoPoints = [] } "Global")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 23 1138 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1138 23 1138 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 25 1138 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 25 1138 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 25 1138 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 25 1138 32 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 33 1138 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1138 33 1138 41 , srcInfoPoints = [] } "global" "global")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 5 1139 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 5 1139 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 13 1139 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 13 1139 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 13 1139 22 , srcInfoPoints = [] } "NoCluster")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 23 1139 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1139 23 1139 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 25 1139 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 25 1139 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 25 1139 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 25 1139 32 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 33 1139 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1139 33 1139 39 , srcInfoPoints = [] } "none" "none")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 1 1151 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1143 1 1143 9 , SrcSpan "tests/examples/Attributes.hs" 1143 31 1143 36 , SrcSpan "tests/examples/Attributes.hs" 1144 5 1144 5 , SrcSpan "tests/examples/Attributes.hs" 1151 1 1151 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 10 1143 30 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 10 1143 30 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 10 1143 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 10 1143 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 10 1143 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 19 1143 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 19 1143 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1143 19 1143 30 , srcInfoPoints = [] } "ClusterMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 5 1147 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 5 1147 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 5 1144 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 5 1144 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 15 1147 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1144 15 1144 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 17 1147 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 17 1144 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 17 1144 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 17 1144 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 23 1147 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1144 23 1144 24 , SrcSpan "tests/examples/Attributes.hs" 1145 23 1145 24 , SrcSpan "tests/examples/Attributes.hs" 1146 23 1146 24 , SrcSpan "tests/examples/Attributes.hs" 1147 23 1147 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 25 1144 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 25 1144 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 25 1144 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 25 1144 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 25 1144 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 35 1144 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 35 1144 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 35 1144 40 , srcInfoPoints = [] } "Local")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 41 1144 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1144 41 1144 48 , srcInfoPoints = [] } "local" "local")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 25 1145 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 25 1145 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 25 1145 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 25 1145 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 25 1145 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 35 1145 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 35 1145 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 35 1145 41 , srcInfoPoints = [] } "Global")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 42 1145 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1145 42 1145 50 , srcInfoPoints = [] } "global" "global")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 25 1146 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 25 1146 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 25 1146 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 25 1146 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 25 1146 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 35 1146 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 35 1146 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 35 1146 44 , srcInfoPoints = [] } "NoCluster")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 45 1146 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1146 45 1146 51 , srcInfoPoints = [] } "none" "none")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 1 1152 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1151 14 1151 15 , SrcSpan "tests/examples/Attributes.hs" 1151 24 1151 25 , SrcSpan "tests/examples/Attributes.hs" 1151 31 1151 32 , SrcSpan "tests/examples/Attributes.hs" 1151 38 1151 39 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 1 1151 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 6 1151 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 6 1151 13 , srcInfoPoints = [] } "DirType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 16 1151 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 16 1151 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 16 1151 23 , srcInfoPoints = [] } "Forward") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 26 1151 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 26 1151 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 26 1151 30 , srcInfoPoints = [] } "Back") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 33 1151 37 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 33 1151 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 33 1151 37 , srcInfoPoints = [] } "Both") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 40 1151 45 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 40 1151 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1151 40 1151 45 , srcInfoPoints = [] } "NoDir") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 16 1152 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1152 16 1152 24 , SrcSpan "tests/examples/Attributes.hs" 1152 25 1152 26 , SrcSpan "tests/examples/Attributes.hs" 1152 28 1152 29 , SrcSpan "tests/examples/Attributes.hs" 1152 33 1152 34 , SrcSpan "tests/examples/Attributes.hs" 1152 42 1152 43 , SrcSpan "tests/examples/Attributes.hs" 1152 48 1152 49 , SrcSpan "tests/examples/Attributes.hs" 1152 54 1152 55 , SrcSpan "tests/examples/Attributes.hs" 1152 60 1152 61 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 26 1152 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 26 1152 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 26 1152 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 26 1152 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 30 1152 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 30 1152 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 30 1152 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 30 1152 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 35 1152 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 35 1152 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 35 1152 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 35 1152 42 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 44 1152 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 44 1152 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 44 1152 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 44 1152 48 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 50 1152 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 50 1152 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 50 1152 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 50 1152 54 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 56 1152 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 56 1152 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 56 1152 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1152 56 1152 60 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 1 1160 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1154 1 1154 9 , SrcSpan "tests/examples/Attributes.hs" 1154 27 1154 32 , SrcSpan "tests/examples/Attributes.hs" 1155 5 1155 5 , SrcSpan "tests/examples/Attributes.hs" 1156 5 1156 5 , SrcSpan "tests/examples/Attributes.hs" 1157 5 1157 5 , SrcSpan "tests/examples/Attributes.hs" 1158 5 1158 5 , SrcSpan "tests/examples/Attributes.hs" 1160 1 1160 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 10 1154 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 10 1154 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 10 1154 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 10 1154 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 10 1154 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 19 1154 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 19 1154 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1154 19 1154 26 , srcInfoPoints = [] } "DirType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 5 1158 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 5 1158 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 5 1155 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 5 1155 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 13 1155 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 13 1155 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 13 1155 20 , srcInfoPoints = [] } "Forward")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 21 1155 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1155 21 1155 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 23 1155 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 23 1155 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 23 1155 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 23 1155 30 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 31 1155 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1155 31 1155 40 , srcInfoPoints = [] } "forward" "forward")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 5 1156 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 5 1156 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 13 1156 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 13 1156 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 13 1156 17 , srcInfoPoints = [] } "Back")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 21 1156 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1156 21 1156 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 23 1156 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 23 1156 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 23 1156 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 23 1156 30 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 31 1156 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1156 31 1156 37 , srcInfoPoints = [] } "back" "back")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 5 1157 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 5 1157 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 13 1157 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 13 1157 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 13 1157 17 , srcInfoPoints = [] } "Both")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 21 1157 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1157 21 1157 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 23 1157 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 23 1157 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 23 1157 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 23 1157 30 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 31 1157 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1157 31 1157 37 , srcInfoPoints = [] } "both" "both")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 5 1158 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 5 1158 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 13 1158 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 13 1158 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 13 1158 18 , srcInfoPoints = [] } "NoDir")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 21 1158 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1158 21 1158 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 23 1158 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 23 1158 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 23 1158 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 23 1158 30 , srcInfoPoints = [] } "unqtDot"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 31 1158 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1158 31 1158 37 , srcInfoPoints = [] } "none" "none")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 1 1170 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1160 1 1160 9 , SrcSpan "tests/examples/Attributes.hs" 1160 27 1160 32 , SrcSpan "tests/examples/Attributes.hs" 1161 5 1161 5 , SrcSpan "tests/examples/Attributes.hs" 1170 1 1170 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 10 1160 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 10 1160 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 10 1160 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 10 1160 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 10 1160 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 19 1160 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 19 1160 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1160 19 1160 26 , srcInfoPoints = [] } "DirType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 5 1165 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 5 1165 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 5 1161 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 5 1161 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 15 1165 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1161 15 1161 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 17 1165 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 17 1161 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 17 1161 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 17 1161 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 23 1165 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1161 23 1161 24 , SrcSpan "tests/examples/Attributes.hs" 1162 23 1162 24 , SrcSpan "tests/examples/Attributes.hs" 1163 23 1163 24 , SrcSpan "tests/examples/Attributes.hs" 1164 23 1164 24 , SrcSpan "tests/examples/Attributes.hs" 1165 23 1165 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 25 1161 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 25 1161 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 25 1161 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 25 1161 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 25 1161 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 35 1161 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 35 1161 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 35 1161 42 , srcInfoPoints = [] } "Forward")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 43 1161 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1161 43 1161 52 , srcInfoPoints = [] } "forward" "forward")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 25 1162 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 25 1162 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 25 1162 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 25 1162 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 25 1162 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 35 1162 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 35 1162 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 35 1162 39 , srcInfoPoints = [] } "Back")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 40 1162 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1162 40 1162 46 , srcInfoPoints = [] } "back" "back")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 25 1163 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 25 1163 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 25 1163 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 25 1163 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 25 1163 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 35 1163 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 35 1163 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 35 1163 39 , srcInfoPoints = [] } "Both")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 40 1163 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1163 40 1163 46 , srcInfoPoints = [] } "both" "both")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 25 1164 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 25 1164 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 25 1164 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 25 1164 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 25 1164 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 35 1164 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 35 1164 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 35 1164 40 , srcInfoPoints = [] } "NoDir")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 41 1164 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1164 41 1164 47 , srcInfoPoints = [] } "none" "none")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 1 1173 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1170 20 1170 21 , SrcSpan "tests/examples/Attributes.hs" 1171 20 1171 21 , SrcSpan "tests/examples/Attributes.hs" 1172 20 1172 21 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 1 1170 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 6 1170 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 6 1170 19 , srcInfoPoints = [] } "DEConstraints")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 22 1170 37 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 22 1170 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1170 22 1170 37 , srcInfoPoints = [] } "EdgeConstraints") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1171 22 1171 35 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1171 22 1171 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1171 22 1171 35 , srcInfoPoints = [] } "NoConstraints") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1172 22 1172 37 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1172 22 1172 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1172 22 1172 37 , srcInfoPoints = [] } "HierConstraints") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 22 1173 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1173 22 1173 30 , SrcSpan "tests/examples/Attributes.hs" 1173 31 1173 32 , SrcSpan "tests/examples/Attributes.hs" 1173 34 1173 35 , SrcSpan "tests/examples/Attributes.hs" 1173 39 1173 40 , SrcSpan "tests/examples/Attributes.hs" 1173 48 1173 49 , SrcSpan "tests/examples/Attributes.hs" 1173 54 1173 55 , SrcSpan "tests/examples/Attributes.hs" 1173 60 1173 61 , SrcSpan "tests/examples/Attributes.hs" 1173 66 1173 67 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 32 1173 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 32 1173 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 32 1173 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 32 1173 34 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 36 1173 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 36 1173 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 36 1173 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 36 1173 39 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 41 1173 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 41 1173 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 41 1173 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 41 1173 48 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 50 1173 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 50 1173 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 50 1173 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 50 1173 54 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 56 1173 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 56 1173 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 56 1173 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 56 1173 60 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 62 1173 66 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 62 1173 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 62 1173 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1173 62 1173 66 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 1 1180 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1175 1 1175 9 , SrcSpan "tests/examples/Attributes.hs" 1175 33 1175 38 , SrcSpan "tests/examples/Attributes.hs" 1176 5 1176 5 , SrcSpan "tests/examples/Attributes.hs" 1177 5 1177 5 , SrcSpan "tests/examples/Attributes.hs" 1178 5 1178 5 , SrcSpan "tests/examples/Attributes.hs" 1180 1 1180 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 10 1175 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 10 1175 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 10 1175 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 10 1175 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 10 1175 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 19 1175 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 19 1175 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1175 19 1175 32 , srcInfoPoints = [] } "DEConstraints"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 5 1178 42 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 5 1178 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 5 1176 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 5 1176 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 13 1176 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 13 1176 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 13 1176 28 , srcInfoPoints = [] } "EdgeConstraints")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 29 1176 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1176 29 1176 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 31 1176 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 31 1176 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 31 1176 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 31 1176 38 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 39 1176 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 39 1176 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1176 39 1176 43 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 5 1177 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 5 1177 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 13 1177 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 13 1177 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 13 1177 26 , srcInfoPoints = [] } "NoConstraints")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 29 1177 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1177 29 1177 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 31 1177 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 31 1177 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 31 1177 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 31 1177 38 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 39 1177 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 39 1177 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1177 39 1177 44 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 5 1178 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 5 1178 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 13 1178 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 13 1178 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 13 1178 28 , srcInfoPoints = [] } "HierConstraints")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 29 1178 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1178 29 1178 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 31 1178 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 31 1178 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 31 1178 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 31 1178 35 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 36 1178 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1178 36 1178 42 , srcInfoPoints = [] } "hier" "hier")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 1 1188 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1180 1 1180 9 , SrcSpan "tests/examples/Attributes.hs" 1180 33 1180 38 , SrcSpan "tests/examples/Attributes.hs" 1181 5 1181 5 , SrcSpan "tests/examples/Attributes.hs" 1188 1 1188 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 10 1180 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 10 1180 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 10 1180 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 10 1180 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 10 1180 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 19 1180 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 19 1180 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1180 19 1180 32 , srcInfoPoints = [] } "DEConstraints"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 5 1183 49 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 5 1183 49 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 5 1181 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 5 1181 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 15 1183 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1181 15 1181 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1183 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1181 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1181 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1181 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1181 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 17 1181 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 23 1181 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1181 23 1181 24 , SrcSpan "tests/examples/Attributes.hs" 1181 58 1181 59 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 24 1181 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 24 1181 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 24 1181 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 24 1181 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 24 1181 28 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 29 1181 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 29 1181 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 29 1181 42 , srcInfoPoints = [] } "NoConstraints")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 43 1181 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 43 1181 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 43 1181 58 , srcInfoPoints = [] } "EdgeConstraints")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 60 1181 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 60 1181 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1181 60 1181 65 , srcInfoPoints = [] } "parse")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1182 17 1182 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1182 17 1182 18 , SrcSpan "tests/examples/Attributes.hs" 1182 18 1182 24 , SrcSpan "tests/examples/Attributes.hs" 1182 24 1182 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1182 17 1182 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1182 17 1182 18 , SrcSpan "tests/examples/Attributes.hs" 1182 18 1182 24 , SrcSpan "tests/examples/Attributes.hs" 1182 24 1182 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1182 18 1182 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 17 1183 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 17 1183 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 17 1183 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 17 1183 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 17 1183 26 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 27 1183 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 27 1183 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 27 1183 42 , srcInfoPoints = [] } "HierConstraints")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 43 1183 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1183 43 1183 49 , srcInfoPoints = [] } "hier" "hier"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 1 1190 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1188 13 1188 14 , SrcSpan "tests/examples/Attributes.hs" 1189 13 1189 14 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 1 1188 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 6 1188 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 6 1188 12 , srcInfoPoints = [] } "DPoint")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 15 1188 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 15 1188 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 15 1188 19 , srcInfoPoints = [] } "DVal") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 20 1188 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 20 1188 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1188 20 1188 26 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 15 1189 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 15 1189 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 15 1189 19 , srcInfoPoints = [] } "PVal") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 20 1189 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 20 1189 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1189 20 1189 25 , srcInfoPoints = [] } "Point")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 14 1190 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1190 14 1190 22 , SrcSpan "tests/examples/Attributes.hs" 1190 23 1190 24 , SrcSpan "tests/examples/Attributes.hs" 1190 26 1190 27 , SrcSpan "tests/examples/Attributes.hs" 1190 31 1190 32 , SrcSpan "tests/examples/Attributes.hs" 1190 37 1190 38 , SrcSpan "tests/examples/Attributes.hs" 1190 43 1190 44 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 24 1190 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 24 1190 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 24 1190 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 24 1190 26 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 28 1190 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 28 1190 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 28 1190 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 28 1190 31 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 33 1190 37 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 33 1190 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 33 1190 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 33 1190 37 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 39 1190 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 39 1190 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 39 1190 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1190 39 1190 43 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 1 1199 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1192 1 1192 9 , SrcSpan "tests/examples/Attributes.hs" 1192 26 1192 31 , SrcSpan "tests/examples/Attributes.hs" 1193 5 1193 5 , SrcSpan "tests/examples/Attributes.hs" 1194 5 1194 5 , SrcSpan "tests/examples/Attributes.hs" 1196 5 1196 5 , SrcSpan "tests/examples/Attributes.hs" 1197 5 1197 5 , SrcSpan "tests/examples/Attributes.hs" 1199 1 1199 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 10 1192 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 10 1192 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 10 1192 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 10 1192 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 10 1192 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 19 1192 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 19 1192 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1192 19 1192 25 , srcInfoPoints = [] } "DPoint"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 5 1194 33 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 5 1194 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 5 1193 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 5 1193 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 13 1193 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1193 13 1193 14 , SrcSpan "tests/examples/Attributes.hs" 1193 20 1193 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 14 1193 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 14 1193 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 14 1193 18 , srcInfoPoints = [] } "DVal")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 19 1193 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 19 1193 20 , srcInfoPoints = [] } "d") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 22 1193 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1193 22 1193 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 24 1193 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 24 1193 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 24 1193 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 24 1193 31 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 32 1193 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 32 1193 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1193 32 1193 33 , srcInfoPoints = [] } "d"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 5 1194 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 5 1194 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 13 1194 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1194 13 1194 14 , SrcSpan "tests/examples/Attributes.hs" 1194 20 1194 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 14 1194 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 14 1194 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 14 1194 18 , srcInfoPoints = [] } "PVal")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 19 1194 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 19 1194 20 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 22 1194 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1194 22 1194 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 24 1194 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 24 1194 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 24 1194 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 24 1194 31 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 32 1194 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 32 1194 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1194 32 1194 33 , srcInfoPoints = [] } "p"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 5 1197 29 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 5 1197 29 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 5 1196 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 5 1196 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 11 1196 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1196 11 1196 12 , SrcSpan "tests/examples/Attributes.hs" 1196 18 1196 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 12 1196 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 12 1196 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 12 1196 16 , srcInfoPoints = [] } "DVal")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 17 1196 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 17 1196 18 , srcInfoPoints = [] } "d") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 20 1196 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1196 20 1196 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 22 1196 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 22 1196 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 22 1196 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 22 1196 27 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 28 1196 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 28 1196 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1196 28 1196 29 , srcInfoPoints = [] } "d"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 5 1197 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 5 1197 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 11 1197 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1197 11 1197 12 , SrcSpan "tests/examples/Attributes.hs" 1197 18 1197 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 12 1197 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 12 1197 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 12 1197 16 , srcInfoPoints = [] } "PVal")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 17 1197 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 17 1197 18 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 20 1197 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1197 20 1197 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 22 1197 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 22 1197 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 22 1197 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 22 1197 27 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 28 1197 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 28 1197 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1197 28 1197 29 , srcInfoPoints = [] } "p"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 1 1210 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1199 1 1199 9 , SrcSpan "tests/examples/Attributes.hs" 1199 26 1199 31 , SrcSpan "tests/examples/Attributes.hs" 1200 5 1200 5 , SrcSpan "tests/examples/Attributes.hs" 1204 5 1204 5 , SrcSpan "tests/examples/Attributes.hs" 1210 1 1210 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 10 1199 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 10 1199 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 10 1199 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 10 1199 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 10 1199 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 19 1199 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 19 1199 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1199 19 1199 25 , srcInfoPoints = [] } "DPoint"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 5 1202 37 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 5 1202 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 5 1200 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 5 1200 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 15 1202 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1200 15 1200 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1202 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1200 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1200 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1200 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1200 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 17 1200 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 23 1200 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 23 1200 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 23 1200 27 , srcInfoPoints = [] } "PVal")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 28 1200 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 28 1200 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1200 28 1200 37 , srcInfoPoints = [] } "parseUnqt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1201 17 1201 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1201 17 1201 18 , SrcSpan "tests/examples/Attributes.hs" 1201 18 1201 24 , SrcSpan "tests/examples/Attributes.hs" 1201 24 1201 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1201 17 1201 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1201 17 1201 18 , SrcSpan "tests/examples/Attributes.hs" 1201 18 1201 24 , SrcSpan "tests/examples/Attributes.hs" 1201 24 1201 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1201 18 1201 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 17 1202 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 17 1202 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 17 1202 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 17 1202 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 17 1202 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 23 1202 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 23 1202 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 23 1202 27 , srcInfoPoints = [] } "DVal")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 28 1202 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 28 1202 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1202 28 1202 37 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 5 1206 29 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 5 1206 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 5 1204 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 5 1204 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 11 1206 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1204 11 1204 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1206 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1204 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1204 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1204 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1204 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 13 1204 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 19 1204 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 19 1204 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 19 1204 23 , srcInfoPoints = [] } "PVal")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 24 1204 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 24 1204 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1204 24 1204 29 , srcInfoPoints = [] } "parse")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1205 13 1205 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1205 13 1205 14 , SrcSpan "tests/examples/Attributes.hs" 1205 14 1205 20 , SrcSpan "tests/examples/Attributes.hs" 1205 20 1205 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1205 13 1205 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1205 13 1205 14 , SrcSpan "tests/examples/Attributes.hs" 1205 14 1205 20 , SrcSpan "tests/examples/Attributes.hs" 1205 20 1205 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1205 14 1205 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 13 1206 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 13 1206 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 13 1206 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 13 1206 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 13 1206 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 19 1206 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 19 1206 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 19 1206 23 , srcInfoPoints = [] } "DVal")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 24 1206 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 24 1206 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1206 24 1206 29 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 1 1214 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1210 15 1210 16 , SrcSpan "tests/examples/Attributes.hs" 1211 15 1211 16 , SrcSpan "tests/examples/Attributes.hs" 1212 15 1212 16 , SrcSpan "tests/examples/Attributes.hs" 1213 15 1213 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 1 1210 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 6 1210 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 6 1210 14 , srcInfoPoints = [] } "ModeType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 17 1210 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 17 1210 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1210 17 1210 22 , srcInfoPoints = [] } "Major") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1211 17 1211 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1211 17 1211 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1211 17 1211 19 , srcInfoPoints = [] } "KK") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1212 17 1212 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1212 17 1212 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1212 17 1212 21 , srcInfoPoints = [] } "Hier") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1213 17 1213 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1213 17 1213 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1213 17 1213 22 , srcInfoPoints = [] } "IpSep") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 17 1214 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1214 17 1214 25 , SrcSpan "tests/examples/Attributes.hs" 1214 26 1214 27 , SrcSpan "tests/examples/Attributes.hs" 1214 29 1214 30 , SrcSpan "tests/examples/Attributes.hs" 1214 34 1214 35 , SrcSpan "tests/examples/Attributes.hs" 1214 43 1214 44 , SrcSpan "tests/examples/Attributes.hs" 1214 49 1214 50 , SrcSpan "tests/examples/Attributes.hs" 1214 55 1214 56 , SrcSpan "tests/examples/Attributes.hs" 1214 61 1214 62 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 27 1214 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 27 1214 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 27 1214 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 27 1214 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 31 1214 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 31 1214 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 31 1214 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 31 1214 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 36 1214 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 36 1214 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 36 1214 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 36 1214 43 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 45 1214 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 45 1214 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 45 1214 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 45 1214 49 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 51 1214 55 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 51 1214 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 51 1214 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 51 1214 55 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 57 1214 61 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 57 1214 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 57 1214 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1214 57 1214 61 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 1 1222 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1216 1 1216 9 , SrcSpan "tests/examples/Attributes.hs" 1216 28 1216 33 , SrcSpan "tests/examples/Attributes.hs" 1217 5 1217 5 , SrcSpan "tests/examples/Attributes.hs" 1218 5 1218 5 , SrcSpan "tests/examples/Attributes.hs" 1219 5 1219 5 , SrcSpan "tests/examples/Attributes.hs" 1220 5 1220 5 , SrcSpan "tests/examples/Attributes.hs" 1222 1 1222 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 10 1216 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 10 1216 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 10 1216 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 10 1216 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 10 1216 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 19 1216 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 19 1216 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1216 19 1216 27 , srcInfoPoints = [] } "ModeType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 5 1220 33 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 5 1220 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 5 1217 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 5 1217 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 13 1217 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 13 1217 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 13 1217 18 , srcInfoPoints = [] } "Major")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 19 1217 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1217 19 1217 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 21 1217 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 21 1217 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 21 1217 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 21 1217 25 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 26 1217 33 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1217 26 1217 33 , srcInfoPoints = [] } "major" "major")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 5 1218 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 5 1218 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 13 1218 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 13 1218 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 13 1218 15 , srcInfoPoints = [] } "KK")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 19 1218 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1218 19 1218 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 21 1218 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 21 1218 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 21 1218 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 21 1218 25 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 26 1218 30 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1218 26 1218 30 , srcInfoPoints = [] } "KK" "KK")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 5 1219 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 5 1219 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 13 1219 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 13 1219 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 13 1219 17 , srcInfoPoints = [] } "Hier")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 19 1219 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1219 19 1219 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 21 1219 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 21 1219 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 21 1219 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 21 1219 25 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 26 1219 32 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1219 26 1219 32 , srcInfoPoints = [] } "hier" "hier")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 5 1220 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 5 1220 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 13 1220 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 13 1220 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 13 1220 18 , srcInfoPoints = [] } "IpSep")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 19 1220 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1220 19 1220 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 21 1220 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 21 1220 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 21 1220 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 21 1220 25 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 26 1220 33 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1220 26 1220 33 , srcInfoPoints = [] } "ipsep" "ipsep")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 1 1231 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1222 1 1222 9 , SrcSpan "tests/examples/Attributes.hs" 1222 28 1222 33 , SrcSpan "tests/examples/Attributes.hs" 1223 5 1223 5 , SrcSpan "tests/examples/Attributes.hs" 1231 1 1231 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 10 1222 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 10 1222 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 10 1222 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 10 1222 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 10 1222 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 19 1222 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 19 1222 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1222 19 1222 27 , srcInfoPoints = [] } "ModeType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 5 1227 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 5 1227 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 5 1223 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 5 1223 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 15 1227 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1223 15 1223 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 17 1227 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 17 1223 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 17 1223 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 17 1223 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 23 1227 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1223 23 1223 24 , SrcSpan "tests/examples/Attributes.hs" 1224 23 1224 24 , SrcSpan "tests/examples/Attributes.hs" 1225 23 1225 24 , SrcSpan "tests/examples/Attributes.hs" 1226 23 1226 24 , SrcSpan "tests/examples/Attributes.hs" 1227 23 1227 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 25 1223 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 25 1223 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 25 1223 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 25 1223 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 25 1223 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 35 1223 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 35 1223 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 35 1223 40 , srcInfoPoints = [] } "Major")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 41 1223 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1223 41 1223 48 , srcInfoPoints = [] } "major" "major")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 25 1224 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 25 1224 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 25 1224 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 25 1224 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 25 1224 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 35 1224 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 35 1224 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 35 1224 37 , srcInfoPoints = [] } "KK")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 38 1224 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1224 38 1224 42 , srcInfoPoints = [] } "KK" "KK")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 25 1225 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 25 1225 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 25 1225 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 25 1225 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 25 1225 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 35 1225 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 35 1225 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 35 1225 39 , srcInfoPoints = [] } "Hier")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 40 1225 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1225 40 1225 46 , srcInfoPoints = [] } "hier" "hier")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 25 1226 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 25 1226 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 25 1226 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 25 1226 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 25 1226 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 35 1226 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 35 1226 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 35 1226 40 , srcInfoPoints = [] } "IpSep")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 41 1226 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1226 41 1226 48 , srcInfoPoints = [] } "ipsep" "ipsep")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 1 1234 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1231 12 1231 13 , SrcSpan "tests/examples/Attributes.hs" 1232 12 1232 13 , SrcSpan "tests/examples/Attributes.hs" 1233 12 1233 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 1 1231 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 6 1231 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 6 1231 11 , srcInfoPoints = [] } "Model")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 14 1231 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 14 1231 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1231 14 1231 23 , srcInfoPoints = [] } "ShortPath") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1232 14 1232 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1232 14 1232 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1232 14 1232 20 , srcInfoPoints = [] } "SubSet") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1233 14 1233 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1233 14 1233 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1233 14 1233 21 , srcInfoPoints = [] } "Circuit") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 14 1234 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1234 14 1234 22 , SrcSpan "tests/examples/Attributes.hs" 1234 23 1234 24 , SrcSpan "tests/examples/Attributes.hs" 1234 26 1234 27 , SrcSpan "tests/examples/Attributes.hs" 1234 31 1234 32 , SrcSpan "tests/examples/Attributes.hs" 1234 40 1234 41 , SrcSpan "tests/examples/Attributes.hs" 1234 46 1234 47 , SrcSpan "tests/examples/Attributes.hs" 1234 52 1234 53 , SrcSpan "tests/examples/Attributes.hs" 1234 58 1234 59 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 24 1234 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 24 1234 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 24 1234 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 24 1234 26 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 28 1234 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 28 1234 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 28 1234 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 28 1234 31 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 33 1234 40 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 33 1234 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 33 1234 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 33 1234 40 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 42 1234 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 42 1234 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 42 1234 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 42 1234 46 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 48 1234 52 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 48 1234 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 48 1234 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 48 1234 52 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 54 1234 58 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 54 1234 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 54 1234 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1234 54 1234 58 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 1 1241 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1236 1 1236 9 , SrcSpan "tests/examples/Attributes.hs" 1236 25 1236 30 , SrcSpan "tests/examples/Attributes.hs" 1237 5 1237 5 , SrcSpan "tests/examples/Attributes.hs" 1238 5 1238 5 , SrcSpan "tests/examples/Attributes.hs" 1239 5 1239 5 , SrcSpan "tests/examples/Attributes.hs" 1241 1 1241 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 10 1236 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 10 1236 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 10 1236 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 10 1236 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 10 1236 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 19 1236 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 19 1236 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1236 19 1236 24 , srcInfoPoints = [] } "Model"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 5 1239 39 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 5 1239 39 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 5 1237 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 5 1237 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 13 1237 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 13 1237 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 13 1237 22 , srcInfoPoints = [] } "ShortPath")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 23 1237 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1237 23 1237 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 25 1237 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 25 1237 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 25 1237 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 25 1237 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 30 1237 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1237 30 1237 41 , srcInfoPoints = [] } "shortpath" "shortpath")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 5 1238 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 5 1238 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 13 1238 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 13 1238 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 13 1238 19 , srcInfoPoints = [] } "SubSet")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 23 1238 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1238 23 1238 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 25 1238 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 25 1238 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 25 1238 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 25 1238 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 30 1238 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1238 30 1238 38 , srcInfoPoints = [] } "subset" "subset")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 5 1239 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 5 1239 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 13 1239 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 13 1239 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 13 1239 20 , srcInfoPoints = [] } "Circuit")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 23 1239 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1239 23 1239 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 25 1239 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 25 1239 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 25 1239 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 25 1239 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 30 1239 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1239 30 1239 39 , srcInfoPoints = [] } "circuit" "circuit")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 1 1249 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1241 1 1241 9 , SrcSpan "tests/examples/Attributes.hs" 1241 25 1241 30 , SrcSpan "tests/examples/Attributes.hs" 1242 5 1242 5 , SrcSpan "tests/examples/Attributes.hs" 1249 1 1249 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 10 1241 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 10 1241 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 10 1241 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 10 1241 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 10 1241 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 19 1241 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 19 1241 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1241 19 1241 24 , srcInfoPoints = [] } "Model"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 5 1245 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 5 1245 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 5 1242 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 5 1242 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 15 1245 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1242 15 1242 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 17 1245 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 17 1242 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 17 1242 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 17 1242 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 23 1245 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1242 23 1242 24 , SrcSpan "tests/examples/Attributes.hs" 1243 23 1243 24 , SrcSpan "tests/examples/Attributes.hs" 1244 23 1244 24 , SrcSpan "tests/examples/Attributes.hs" 1245 23 1245 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 25 1242 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 25 1242 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 25 1242 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 25 1242 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 25 1242 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 35 1242 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 35 1242 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 35 1242 44 , srcInfoPoints = [] } "ShortPath")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 45 1242 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1242 45 1242 56 , srcInfoPoints = [] } "shortpath" "shortpath")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 25 1243 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 25 1243 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 25 1243 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 25 1243 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 25 1243 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 35 1243 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 35 1243 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 35 1243 41 , srcInfoPoints = [] } "SubSet")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 42 1243 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1243 42 1243 50 , srcInfoPoints = [] } "subset" "subset")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 25 1244 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 25 1244 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 25 1244 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 25 1244 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 25 1244 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 35 1244 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 35 1244 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 35 1244 42 , srcInfoPoints = [] } "Circuit")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 43 1244 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1244 43 1244 52 , srcInfoPoints = [] } "circuit" "circuit")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 1 1251 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1249 12 1249 13 , SrcSpan "tests/examples/Attributes.hs" 1250 12 1250 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 1 1249 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 6 1249 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 6 1249 11 , srcInfoPoints = [] } "Label")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 14 1249 32 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 14 1249 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 14 1249 22 , srcInfoPoints = [] } "StrLabel") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 23 1249 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 23 1249 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1249 23 1249 32 , srcInfoPoints = [] } "EscString")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 14 1250 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 14 1250 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 14 1250 22 , srcInfoPoints = [] } "URLLabel") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 23 1250 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 23 1250 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1250 23 1250 26 , srcInfoPoints = [] } "URL")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 14 1251 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1251 14 1251 22 , SrcSpan "tests/examples/Attributes.hs" 1251 23 1251 24 , SrcSpan "tests/examples/Attributes.hs" 1251 26 1251 27 , SrcSpan "tests/examples/Attributes.hs" 1251 31 1251 32 , SrcSpan "tests/examples/Attributes.hs" 1251 37 1251 38 , SrcSpan "tests/examples/Attributes.hs" 1251 43 1251 44 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 24 1251 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 24 1251 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 24 1251 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 24 1251 26 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 28 1251 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 28 1251 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 28 1251 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 28 1251 31 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 33 1251 37 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 33 1251 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 33 1251 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 33 1251 37 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 39 1251 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 39 1251 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 39 1251 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1251 39 1251 43 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 1 1260 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1253 1 1253 9 , SrcSpan "tests/examples/Attributes.hs" 1253 25 1253 30 , SrcSpan "tests/examples/Attributes.hs" 1254 5 1254 5 , SrcSpan "tests/examples/Attributes.hs" 1255 5 1255 5 , SrcSpan "tests/examples/Attributes.hs" 1257 5 1257 5 , SrcSpan "tests/examples/Attributes.hs" 1258 5 1258 5 , SrcSpan "tests/examples/Attributes.hs" 1260 1 1260 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 10 1253 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 10 1253 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 10 1253 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 10 1253 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 10 1253 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 19 1253 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 19 1253 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1253 19 1253 24 , srcInfoPoints = [] } "Label"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 5 1255 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 5 1255 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 5 1254 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 5 1254 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 13 1254 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1254 13 1254 14 , SrcSpan "tests/examples/Attributes.hs" 1254 24 1254 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 14 1254 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 14 1254 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 14 1254 22 , srcInfoPoints = [] } "StrLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 23 1254 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 23 1254 24 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 26 1254 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1254 26 1254 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 28 1254 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 28 1254 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 28 1254 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 28 1254 35 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 36 1254 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 36 1254 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1254 36 1254 37 , srcInfoPoints = [] } "s"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 5 1255 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 5 1255 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 13 1255 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1255 13 1255 14 , SrcSpan "tests/examples/Attributes.hs" 1255 24 1255 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 14 1255 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 14 1255 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 14 1255 22 , srcInfoPoints = [] } "URLLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 23 1255 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 23 1255 24 , srcInfoPoints = [] } "u") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 26 1255 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1255 26 1255 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 28 1255 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 28 1255 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 28 1255 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 28 1255 35 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 36 1255 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 36 1255 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1255 36 1255 37 , srcInfoPoints = [] } "u"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 5 1258 33 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 5 1258 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 5 1257 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 5 1257 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 11 1257 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1257 11 1257 12 , SrcSpan "tests/examples/Attributes.hs" 1257 22 1257 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 12 1257 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 12 1257 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 12 1257 20 , srcInfoPoints = [] } "StrLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 21 1257 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 21 1257 22 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 24 1257 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1257 24 1257 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 26 1257 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 26 1257 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 26 1257 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 26 1257 31 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 32 1257 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 32 1257 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1257 32 1257 33 , srcInfoPoints = [] } "s"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 5 1258 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 5 1258 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 11 1258 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1258 11 1258 12 , SrcSpan "tests/examples/Attributes.hs" 1258 22 1258 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 12 1258 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 12 1258 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 12 1258 20 , srcInfoPoints = [] } "URLLabel")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 21 1258 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 21 1258 22 , srcInfoPoints = [] } "u") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 24 1258 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1258 24 1258 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 26 1258 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 26 1258 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 26 1258 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 26 1258 31 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 32 1258 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 32 1258 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1258 32 1258 33 , srcInfoPoints = [] } "u"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 1 1271 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1260 1 1260 9 , SrcSpan "tests/examples/Attributes.hs" 1260 25 1260 30 , SrcSpan "tests/examples/Attributes.hs" 1261 5 1261 5 , SrcSpan "tests/examples/Attributes.hs" 1265 5 1265 5 , SrcSpan "tests/examples/Attributes.hs" 1271 1 1271 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 10 1260 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 10 1260 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 10 1260 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 10 1260 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 10 1260 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 19 1260 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 19 1260 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1260 19 1260 24 , srcInfoPoints = [] } "Label"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 5 1263 41 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 5 1263 41 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 5 1261 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 5 1261 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 15 1263 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1261 15 1261 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1263 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1261 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1261 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1261 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1261 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 17 1261 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 23 1261 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 23 1261 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 23 1261 31 , srcInfoPoints = [] } "StrLabel")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 32 1261 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 32 1261 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1261 32 1261 41 , srcInfoPoints = [] } "parseUnqt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1262 17 1262 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1262 17 1262 18 , SrcSpan "tests/examples/Attributes.hs" 1262 18 1262 24 , SrcSpan "tests/examples/Attributes.hs" 1262 24 1262 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1262 17 1262 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1262 17 1262 18 , SrcSpan "tests/examples/Attributes.hs" 1262 18 1262 24 , SrcSpan "tests/examples/Attributes.hs" 1262 24 1262 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1262 18 1262 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 17 1263 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 17 1263 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 17 1263 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 17 1263 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 17 1263 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 23 1263 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 23 1263 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 23 1263 31 , srcInfoPoints = [] } "URLLabel")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 32 1263 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 32 1263 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1263 32 1263 41 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 5 1267 33 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 5 1267 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 5 1265 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 5 1265 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 11 1267 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1265 11 1265 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1267 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1265 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1265 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1265 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1265 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 13 1265 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 19 1265 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 19 1265 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 19 1265 27 , srcInfoPoints = [] } "StrLabel")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 28 1265 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 28 1265 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1265 28 1265 33 , srcInfoPoints = [] } "parse")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1266 13 1266 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1266 13 1266 14 , SrcSpan "tests/examples/Attributes.hs" 1266 14 1266 20 , SrcSpan "tests/examples/Attributes.hs" 1266 20 1266 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1266 13 1266 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1266 13 1266 14 , SrcSpan "tests/examples/Attributes.hs" 1266 14 1266 20 , SrcSpan "tests/examples/Attributes.hs" 1266 20 1266 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1266 14 1266 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 13 1267 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 13 1267 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 13 1267 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 13 1267 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 13 1267 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 19 1267 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 19 1267 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 19 1267 27 , srcInfoPoints = [] } "URLLabel")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 28 1267 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 28 1267 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1267 28 1267 33 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 1 1273 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1271 12 1271 13 , SrcSpan "tests/examples/Attributes.hs" 1272 12 1272 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 1 1271 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 6 1271 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 6 1271 11 , srcInfoPoints = [] } "Point")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 14 1271 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 14 1271 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 14 1271 19 , srcInfoPoints = [] } "Point") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 20 1271 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 20 1271 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 20 1271 23 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 24 1271 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 24 1271 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1271 24 1271 27 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 14 1272 34 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 14 1272 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 14 1272 20 , srcInfoPoints = [] } "PointD") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 21 1272 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 21 1272 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 21 1272 27 , srcInfoPoints = [] } "Double")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 28 1272 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 28 1272 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1272 28 1272 34 , srcInfoPoints = [] } "Double")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 14 1273 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1273 14 1273 22 , SrcSpan "tests/examples/Attributes.hs" 1273 23 1273 24 , SrcSpan "tests/examples/Attributes.hs" 1273 26 1273 27 , SrcSpan "tests/examples/Attributes.hs" 1273 31 1273 32 , SrcSpan "tests/examples/Attributes.hs" 1273 37 1273 38 , SrcSpan "tests/examples/Attributes.hs" 1273 43 1273 44 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 24 1273 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 24 1273 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 24 1273 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 24 1273 26 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 28 1273 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 28 1273 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 28 1273 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 28 1273 31 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 33 1273 37 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 33 1273 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 33 1273 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 33 1273 37 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 39 1273 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 39 1273 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 39 1273 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1273 39 1273 43 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 1 1285 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1275 1 1275 9 , SrcSpan "tests/examples/Attributes.hs" 1275 25 1275 30 , SrcSpan "tests/examples/Attributes.hs" 1276 5 1276 5 , SrcSpan "tests/examples/Attributes.hs" 1277 5 1277 5 , SrcSpan "tests/examples/Attributes.hs" 1279 5 1279 5 , SrcSpan "tests/examples/Attributes.hs" 1281 5 1281 5 , SrcSpan "tests/examples/Attributes.hs" 1283 5 1283 5 , SrcSpan "tests/examples/Attributes.hs" 1285 1 1285 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 10 1275 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 10 1275 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 10 1275 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 10 1275 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 10 1275 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 19 1275 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 19 1275 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1275 19 1275 24 , srcInfoPoints = [] } "Point"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 5 1277 40 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 5 1277 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 5 1276 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 5 1276 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 13 1276 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1276 13 1276 14 , SrcSpan "tests/examples/Attributes.hs" 1276 24 1276 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 14 1276 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 14 1276 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 14 1276 19 , srcInfoPoints = [] } "Point")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 21 1276 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 21 1276 22 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 23 1276 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 23 1276 24 , srcInfoPoints = [] } "y") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 26 1276 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1276 26 1276 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 28 1276 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 28 1276 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 28 1276 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 28 1276 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 28 1276 36 , srcInfoPoints = [] } "commaDel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 37 1276 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 37 1276 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 37 1276 38 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 39 1276 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 39 1276 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1276 39 1276 40 , srcInfoPoints = [] } "y"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 5 1277 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 5 1277 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 13 1277 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1277 13 1277 14 , SrcSpan "tests/examples/Attributes.hs" 1277 24 1277 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 14 1277 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 14 1277 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 14 1277 20 , srcInfoPoints = [] } "PointD")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 21 1277 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 21 1277 22 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 23 1277 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 23 1277 24 , srcInfoPoints = [] } "y") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 26 1277 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1277 26 1277 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 28 1277 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 28 1277 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 28 1277 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 28 1277 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 28 1277 36 , srcInfoPoints = [] } "commaDel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 37 1277 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 37 1277 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 37 1277 38 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 39 1277 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 39 1277 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1277 39 1277 40 , srcInfoPoints = [] } "y"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 5 1279 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 5 1279 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 5 1279 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 5 1279 10 , srcInfoPoints = [] } "toDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 11 1279 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1279 11 1279 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 13 1279 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 13 1279 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 13 1279 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 13 1279 25 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 26 1279 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 26 1279 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 26 1279 27 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 28 1279 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 28 1279 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1279 28 1279 35 , srcInfoPoints = [] } "unqtDot"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 5 1281 39 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 5 1281 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 5 1281 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 5 1281 18 , srcInfoPoints = [] } "unqtListToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 19 1281 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1281 19 1281 20 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 21 1281 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 21 1281 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 21 1281 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 21 1281 25 , srcInfoPoints = [] } "hsep"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 26 1281 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 26 1281 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 26 1281 27 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 28 1281 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 28 1281 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 28 1281 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 28 1281 31 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 32 1281 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 32 1281 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1281 32 1281 39 , srcInfoPoints = [] } "unqtDot")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 5 1283 45 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 5 1283 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 5 1283 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 5 1283 14 , srcInfoPoints = [] } "listToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 15 1283 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1283 15 1283 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 17 1283 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 17 1283 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 17 1283 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 17 1283 29 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 30 1283 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 30 1283 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 30 1283 31 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 32 1283 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 32 1283 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1283 32 1283 45 , srcInfoPoints = [] } "unqtListToDot"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 1 1307 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1285 1 1285 9 , SrcSpan "tests/examples/Attributes.hs" 1285 25 1285 30 , SrcSpan "tests/examples/Attributes.hs" 1290 5 1290 5 , SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 5 , SrcSpan "tests/examples/Attributes.hs" 1303 5 1303 5 , SrcSpan "tests/examples/Attributes.hs" 1307 1 1307 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 10 1285 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 10 1285 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 10 1285 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 10 1285 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 10 1285 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 19 1285 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 19 1285 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1285 19 1285 24 , srcInfoPoints = [] } "Point"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 5 1299 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1295 9 1295 14 ] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 5 1299 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1295 9 1295 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 5 1290 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 5 1290 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 15 1294 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1290 15 1290 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 17 1294 52 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 17 1292 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 17 1290 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 17 1290 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1290 17 1290 28 , srcInfoPoints = [] } "intDblPoint"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1291 17 1291 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1291 17 1291 18 , SrcSpan "tests/examples/Attributes.hs" 1291 18 1291 24 , SrcSpan "tests/examples/Attributes.hs" 1291 24 1291 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1291 17 1291 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1291 17 1291 18 , SrcSpan "tests/examples/Attributes.hs" 1291 18 1291 24 , SrcSpan "tests/examples/Attributes.hs" 1291 24 1291 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1291 18 1291 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 17 1292 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 17 1292 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 17 1292 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 17 1292 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 17 1292 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 23 1292 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1292 23 1292 24 , SrcSpan "tests/examples/Attributes.hs" 1292 37 1292 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 24 1292 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 24 1292 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 24 1292 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 24 1292 31 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 32 1292 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 32 1292 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 32 1292 37 , srcInfoPoints = [] } "Point")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 40 1292 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 40 1292 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1292 40 1292 52 , srcInfoPoints = [] } "commaSepUnqt"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1293 17 1293 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1293 17 1293 18 , SrcSpan "tests/examples/Attributes.hs" 1293 18 1293 24 , SrcSpan "tests/examples/Attributes.hs" 1293 24 1293 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1293 17 1293 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1293 17 1293 18 , SrcSpan "tests/examples/Attributes.hs" 1293 18 1293 24 , SrcSpan "tests/examples/Attributes.hs" 1293 24 1293 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1293 18 1293 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 17 1294 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 17 1294 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 17 1294 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 17 1294 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 17 1294 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 23 1294 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1294 23 1294 24 , SrcSpan "tests/examples/Attributes.hs" 1294 38 1294 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 24 1294 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 24 1294 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 24 1294 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 24 1294 31 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 32 1294 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 32 1294 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 32 1294 38 , srcInfoPoints = [] } "PointD")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 40 1294 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 40 1294 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1294 40 1294 52 , srcInfoPoints = [] } "commaSepUnqt")))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 11 1299 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1296 11 1296 11 , SrcSpan "tests/examples/Attributes.hs" 1298 11 1298 11 , SrcSpan "tests/examples/Attributes.hs" 1299 11 1299 11 , SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 11 1297 63 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 11 1296 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 11 1296 22 , srcInfoPoints = [] } "intDblPoint")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 23 1297 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1296 23 1296 24 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 25 1297 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 25 1296 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 25 1296 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 25 1296 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 25 1296 30 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 31 1296 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1296 31 1296 32 , SrcSpan "tests/examples/Attributes.hs" 1296 57 1296 58 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 32 1296 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 32 1296 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 32 1296 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 32 1296 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 32 1296 39 , srcInfoPoints = [] } "uncurry"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 40 1296 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 40 1296 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 40 1296 46 , srcInfoPoints = [] } "PointD")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 47 1296 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 47 1296 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 47 1296 48 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 49 1296 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 49 1296 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 49 1296 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 49 1296 54 , srcInfoPoints = [] } "first"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 55 1296 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 55 1296 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1296 55 1296 57 , srcInfoPoints = [] } "fI"))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 25 1297 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 25 1297 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 25 1297 26 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 27 1297 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 27 1297 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 27 1297 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 27 1297 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 27 1297 36 , srcInfoPoints = [] } "commaSep'"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 37 1297 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 37 1297 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 37 1297 46 , srcInfoPoints = [] } "parseUnqt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 47 1297 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 47 1297 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1297 47 1297 63 , srcInfoPoints = [] } "parseStrictFloat")))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 11 1298 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1298 14 1298 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 11 1298 13 , srcInfoPoints = [] } "fI" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 17 1298 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1298 21 1298 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 17 1298 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 17 1298 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 17 1298 20 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 24 1298 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 24 1298 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1298 24 1298 30 , srcInfoPoints = [] } "Double")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 11 1299 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 11 1299 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 11 1299 13 , srcInfoPoints = [] } "fI")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 14 1299 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1299 14 1299 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 16 1299 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 16 1299 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1299 16 1299 28 , srcInfoPoints = [] } "fromIntegral")))) Nothing ]))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 5 1301 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 11 1301 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1301 11 1301 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 13 1301 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 13 1301 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 13 1301 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 13 1301 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 25 1301 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 25 1301 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1301 25 1301 34 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 5 1303 48 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 5 1303 48 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 5 1303 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 5 1303 18 , srcInfoPoints = [] } "parseUnqtList")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 19 1303 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1303 19 1303 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 21 1303 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 21 1303 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 21 1303 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 21 1303 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 21 1303 27 , srcInfoPoints = [] } "sepBy1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 28 1303 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 28 1303 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 28 1303 37 , srcInfoPoints = [] } "parseUnqt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 38 1303 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 38 1303 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1303 38 1303 48 , srcInfoPoints = [] } "whitespace"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 1 1315 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1307 14 1307 15 , SrcSpan "tests/examples/Attributes.hs" 1308 14 1308 15 , SrcSpan "tests/examples/Attributes.hs" 1309 14 1309 15 , SrcSpan "tests/examples/Attributes.hs" 1310 14 1310 15 , SrcSpan "tests/examples/Attributes.hs" 1311 14 1311 15 , SrcSpan "tests/examples/Attributes.hs" 1312 14 1312 15 , SrcSpan "tests/examples/Attributes.hs" 1313 14 1313 15 , SrcSpan "tests/examples/Attributes.hs" 1314 14 1314 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 1 1307 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 6 1307 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 6 1307 13 , srcInfoPoints = [] } "Overlap")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 16 1307 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 16 1307 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1307 16 1307 28 , srcInfoPoints = [] } "KeepOverlaps") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1308 16 1308 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1308 16 1308 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1308 16 1308 30 , srcInfoPoints = [] } "RemoveOverlaps") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1309 16 1309 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1309 16 1309 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1309 16 1309 29 , srcInfoPoints = [] } "ScaleOverlaps") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1310 16 1310 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1310 16 1310 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1310 16 1310 31 , srcInfoPoints = [] } "ScaleXYOverlaps") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 16 1311 40 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 16 1311 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 16 1311 28 , srcInfoPoints = [] } "PrismOverlap") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 29 1311 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1311 29 1311 30 , SrcSpan "tests/examples/Attributes.hs" 1311 39 1311 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 30 1311 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 30 1311 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 30 1311 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 30 1311 35 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 36 1311 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 36 1311 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1311 36 1311 39 , srcInfoPoints = [] } "Int")))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1312 16 1312 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1312 16 1312 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1312 16 1312 31 , srcInfoPoints = [] } "CompressOverlap") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1313 16 1313 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1313 16 1313 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1313 16 1313 27 , srcInfoPoints = [] } "VpscOverlap") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1314 16 1314 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1314 16 1314 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1314 16 1314 28 , srcInfoPoints = [] } "IpsepOverlap") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 16 1315 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1315 16 1315 24 , SrcSpan "tests/examples/Attributes.hs" 1315 25 1315 26 , SrcSpan "tests/examples/Attributes.hs" 1315 28 1315 29 , SrcSpan "tests/examples/Attributes.hs" 1315 33 1315 34 , SrcSpan "tests/examples/Attributes.hs" 1315 39 1315 40 , SrcSpan "tests/examples/Attributes.hs" 1315 45 1315 46 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 26 1315 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 26 1315 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 26 1315 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 26 1315 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 30 1315 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 30 1315 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 30 1315 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 30 1315 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 35 1315 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 35 1315 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 35 1315 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 35 1315 39 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 41 1315 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 41 1315 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 41 1315 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1315 41 1315 45 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 1 1327 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1317 1 1317 9 , SrcSpan "tests/examples/Attributes.hs" 1317 27 1317 32 , SrcSpan "tests/examples/Attributes.hs" 1318 5 1318 5 , SrcSpan "tests/examples/Attributes.hs" 1319 5 1319 5 , SrcSpan "tests/examples/Attributes.hs" 1320 5 1320 5 , SrcSpan "tests/examples/Attributes.hs" 1321 5 1321 5 , SrcSpan "tests/examples/Attributes.hs" 1322 5 1322 5 , SrcSpan "tests/examples/Attributes.hs" 1323 5 1323 5 , SrcSpan "tests/examples/Attributes.hs" 1324 5 1324 5 , SrcSpan "tests/examples/Attributes.hs" 1325 5 1325 5 , SrcSpan "tests/examples/Attributes.hs" 1327 1 1327 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 10 1317 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 10 1317 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 10 1317 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 10 1317 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 10 1317 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 19 1317 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 19 1317 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1317 19 1317 26 , srcInfoPoints = [] } "Overlap"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 5 1325 44 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 5 1325 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 5 1318 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 5 1318 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 13 1318 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 13 1318 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 13 1318 25 , srcInfoPoints = [] } "KeepOverlaps")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 30 1318 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1318 30 1318 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 32 1318 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 32 1318 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 32 1318 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 32 1318 39 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 40 1318 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 40 1318 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1318 40 1318 44 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 5 1319 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 5 1319 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 13 1319 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 13 1319 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 13 1319 27 , srcInfoPoints = [] } "RemoveOverlaps")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 30 1319 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1319 30 1319 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 32 1319 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 32 1319 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 32 1319 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 32 1319 39 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 40 1319 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 40 1319 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1319 40 1319 45 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 5 1320 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 5 1320 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 13 1320 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 13 1320 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 13 1320 26 , srcInfoPoints = [] } "ScaleOverlaps")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 30 1320 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1320 30 1320 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 32 1320 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 32 1320 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 32 1320 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 32 1320 36 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 37 1320 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1320 37 1320 44 , srcInfoPoints = [] } "scale" "scale")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 5 1321 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 5 1321 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 13 1321 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 13 1321 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 13 1321 28 , srcInfoPoints = [] } "ScaleXYOverlaps")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 30 1321 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1321 30 1321 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 32 1321 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 32 1321 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 32 1321 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 32 1321 36 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 37 1321 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1321 37 1321 46 , srcInfoPoints = [] } "scalexy" "scalexy")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 5 1322 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 5 1322 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 13 1322 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1322 13 1322 14 , SrcSpan "tests/examples/Attributes.hs" 1322 28 1322 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 14 1322 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 14 1322 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 14 1322 26 , srcInfoPoints = [] } "PrismOverlap")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 27 1322 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 27 1322 28 , srcInfoPoints = [] } "i") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 30 1322 79 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1322 30 1322 31 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 32 1322 37 , srcInfoPoints = [] } "maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 38 1322 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 38 1322 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 38 1322 40 , srcInfoPoints = [] } "id")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 41 1322 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1322 41 1322 42 , SrcSpan "tests/examples/Attributes.hs" 1322 61 1322 62 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 42 1322 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 42 1322 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 42 1322 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 42 1322 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 42 1322 46 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 47 1322 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1322 47 1322 48 , SrcSpan "tests/examples/Attributes.hs" 1322 48 1322 50 , SrcSpan "tests/examples/Attributes.hs" 1322 50 1322 51 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 47 1322 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1322 47 1322 48 , SrcSpan "tests/examples/Attributes.hs" 1322 48 1322 50 , SrcSpan "tests/examples/Attributes.hs" 1322 50 1322 51 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 48 1322 50 , srcInfoPoints = [] } "<>")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 52 1322 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 52 1322 53 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 52 1322 53 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 54 1322 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 54 1322 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 54 1322 61 , srcInfoPoints = [] } "unqtDot")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 63 1322 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 63 1322 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 63 1322 64 , srcInfoPoints = [] } "i")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 65 1322 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 65 1322 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 65 1322 66 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 67 1322 79 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 67 1322 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 67 1322 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 67 1322 71 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 72 1322 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1322 72 1322 79 , srcInfoPoints = [] } "prism" "prism"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 5 1323 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 5 1323 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 13 1323 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 13 1323 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 13 1323 28 , srcInfoPoints = [] } "CompressOverlap")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 30 1323 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1323 30 1323 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 32 1323 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 32 1323 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 32 1323 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 32 1323 36 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 37 1323 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1323 37 1323 47 , srcInfoPoints = [] } "compress" "compress")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 5 1324 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 5 1324 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 13 1324 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 13 1324 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 13 1324 24 , srcInfoPoints = [] } "VpscOverlap")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 30 1324 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1324 30 1324 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 32 1324 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 32 1324 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 32 1324 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 32 1324 36 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 37 1324 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1324 37 1324 43 , srcInfoPoints = [] } "vpsc" "vpsc")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 5 1325 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 5 1325 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 13 1325 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 13 1325 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 13 1325 25 , srcInfoPoints = [] } "IpsepOverlap")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 30 1325 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1325 30 1325 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 32 1325 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 32 1325 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 32 1325 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 32 1325 36 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 37 1325 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1325 37 1325 44 , srcInfoPoints = [] } "ipsep" "ipsep")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 1 1340 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1327 1 1327 9 , SrcSpan "tests/examples/Attributes.hs" 1327 27 1327 32 , SrcSpan "tests/examples/Attributes.hs" 1328 5 1328 5 , SrcSpan "tests/examples/Attributes.hs" 1340 1 1340 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 10 1327 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 10 1327 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 10 1327 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 10 1327 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 10 1327 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 19 1327 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 19 1327 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1327 19 1327 26 , srcInfoPoints = [] } "Overlap"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 5 1336 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 5 1336 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 5 1328 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 5 1328 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 15 1336 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1328 15 1328 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 17 1336 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 17 1328 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 17 1328 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 17 1328 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 23 1336 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1328 23 1328 24 , SrcSpan "tests/examples/Attributes.hs" 1329 23 1329 24 , SrcSpan "tests/examples/Attributes.hs" 1330 23 1330 24 , SrcSpan "tests/examples/Attributes.hs" 1331 23 1331 24 , SrcSpan "tests/examples/Attributes.hs" 1332 23 1332 24 , SrcSpan "tests/examples/Attributes.hs" 1333 23 1333 24 , SrcSpan "tests/examples/Attributes.hs" 1334 23 1334 24 , SrcSpan "tests/examples/Attributes.hs" 1335 23 1335 24 , SrcSpan "tests/examples/Attributes.hs" 1336 23 1336 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 25 1328 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 25 1328 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 25 1328 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 25 1328 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 25 1328 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 35 1328 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 35 1328 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 35 1328 47 , srcInfoPoints = [] } "KeepOverlaps")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 48 1328 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1328 48 1328 54 , srcInfoPoints = [] } "true" "true")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 25 1329 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 25 1329 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 25 1329 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 25 1329 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 25 1329 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 35 1329 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 35 1329 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 35 1329 49 , srcInfoPoints = [] } "RemoveOverlaps")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 50 1329 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1329 50 1329 57 , srcInfoPoints = [] } "false" "false")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 25 1330 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 25 1330 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 25 1330 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 25 1330 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 25 1330 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 35 1330 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 35 1330 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 35 1330 50 , srcInfoPoints = [] } "ScaleXYOverlaps")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 51 1330 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1330 51 1330 60 , srcInfoPoints = [] } "scalexy" "scalexy")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 25 1331 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 25 1331 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 25 1331 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 25 1331 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 25 1331 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 35 1331 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 35 1331 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 35 1331 48 , srcInfoPoints = [] } "ScaleOverlaps")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 49 1331 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1331 49 1331 56 , srcInfoPoints = [] } "scale" "scale")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 25 1332 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 25 1332 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 25 1332 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 25 1332 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 25 1332 31 , srcInfoPoints = [] } "string"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 32 1332 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 32 1332 39 , srcInfoPoints = [] } "prism" "prism"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 40 1332 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 40 1332 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 40 1332 42 , srcInfoPoints = [] } ">>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 43 1332 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 43 1332 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 43 1332 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 43 1332 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 43 1332 48 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 49 1332 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 49 1332 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 49 1332 61 , srcInfoPoints = [] } "PrismOverlap")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 62 1332 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1332 62 1332 63 , SrcSpan "tests/examples/Attributes.hs" 1332 77 1332 78 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 63 1332 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 63 1332 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 63 1332 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 63 1332 71 , srcInfoPoints = [] } "optional"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 72 1332 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 72 1332 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1332 72 1332 77 , srcInfoPoints = [] } "parse")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 25 1333 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 25 1333 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 25 1333 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 25 1333 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 25 1333 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 35 1333 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 35 1333 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 35 1333 50 , srcInfoPoints = [] } "CompressOverlap")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 51 1333 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1333 51 1333 61 , srcInfoPoints = [] } "compress" "compress")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 25 1334 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 25 1334 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 25 1334 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 25 1334 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 25 1334 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 35 1334 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 35 1334 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 35 1334 46 , srcInfoPoints = [] } "VpscOverlap")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 47 1334 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1334 47 1334 53 , srcInfoPoints = [] } "vpsc" "vpsc")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 25 1335 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 25 1335 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 25 1335 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 25 1335 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 25 1335 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 35 1335 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 35 1335 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 35 1335 47 , srcInfoPoints = [] } "IpsepOverlap")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 48 1335 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1335 48 1335 55 , srcInfoPoints = [] } "ipsep" "ipsep")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 1 1342 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1340 17 1340 18 , SrcSpan "tests/examples/Attributes.hs" 1341 17 1341 18 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 1 1340 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 6 1340 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 6 1340 16 , srcInfoPoints = [] } "LayerRange")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 19 1340 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 19 1340 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 19 1340 23 , srcInfoPoints = [] } "LRID") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 24 1340 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 24 1340 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1340 24 1340 31 , srcInfoPoints = [] } "LayerID")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 19 1341 45 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 19 1341 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 19 1341 22 , srcInfoPoints = [] } "LRS") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 23 1341 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 23 1341 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 23 1341 30 , srcInfoPoints = [] } "LayerID")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 31 1341 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 31 1341 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 31 1341 37 , srcInfoPoints = [] } "String")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 38 1341 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 38 1341 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1341 38 1341 45 , srcInfoPoints = [] } "LayerID")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 19 1342 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1342 19 1342 27 , SrcSpan "tests/examples/Attributes.hs" 1342 28 1342 29 , SrcSpan "tests/examples/Attributes.hs" 1342 31 1342 32 , SrcSpan "tests/examples/Attributes.hs" 1342 36 1342 37 , SrcSpan "tests/examples/Attributes.hs" 1342 42 1342 43 , SrcSpan "tests/examples/Attributes.hs" 1342 48 1342 49 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 29 1342 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 29 1342 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 29 1342 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 29 1342 31 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 33 1342 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 33 1342 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 33 1342 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 33 1342 36 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 38 1342 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 38 1342 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 38 1342 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 38 1342 42 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 44 1342 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 44 1342 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 44 1342 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1342 44 1342 48 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 1 1351 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1344 1 1344 9 , SrcSpan "tests/examples/Attributes.hs" 1344 30 1344 35 , SrcSpan "tests/examples/Attributes.hs" 1345 5 1345 5 , SrcSpan "tests/examples/Attributes.hs" 1346 5 1346 5 , SrcSpan "tests/examples/Attributes.hs" 1348 5 1348 5 , SrcSpan "tests/examples/Attributes.hs" 1349 5 1349 5 , SrcSpan "tests/examples/Attributes.hs" 1351 1 1351 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 10 1344 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 10 1344 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 10 1344 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 10 1344 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 10 1344 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 19 1344 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 19 1344 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1344 19 1344 29 , srcInfoPoints = [] } "LayerRange"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 5 1346 70 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 5 1346 70 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 5 1345 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 5 1345 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 13 1345 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1345 13 1345 14 , SrcSpan "tests/examples/Attributes.hs" 1345 22 1345 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 14 1345 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 14 1345 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 14 1345 18 , srcInfoPoints = [] } "LRID")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 19 1345 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 19 1345 22 , srcInfoPoints = [] } "lid") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 29 1345 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1345 29 1345 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 31 1345 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 31 1345 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 31 1345 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 31 1345 38 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 39 1345 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 39 1345 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1345 39 1345 42 , srcInfoPoints = [] } "lid"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 5 1346 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 5 1346 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 13 1346 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1346 13 1346 14 , SrcSpan "tests/examples/Attributes.hs" 1346 27 1346 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 14 1346 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 14 1346 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 14 1346 17 , srcInfoPoints = [] } "LRS")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 18 1346 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 18 1346 21 , srcInfoPoints = [] } "id1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 22 1346 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 22 1346 23 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 24 1346 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 24 1346 27 , srcInfoPoints = [] } "id2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 29 1346 70 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1346 29 1346 30 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 70 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 31 1346 38 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 39 1346 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 39 1346 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 39 1346 42 , srcInfoPoints = [] } "id1")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 43 1346 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 43 1346 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 43 1346 45 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 46 1346 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 46 1346 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 46 1346 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 46 1346 53 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 54 1346 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 54 1346 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 54 1346 55 , srcInfoPoints = [] } "s"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 56 1346 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 56 1346 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 56 1346 58 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 59 1346 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 59 1346 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 59 1346 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 59 1346 66 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 67 1346 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 67 1346 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1346 67 1346 70 , srcInfoPoints = [] } "id2")))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 5 1349 50 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 5 1349 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 5 1348 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 5 1348 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 11 1348 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1348 11 1348 12 , SrcSpan "tests/examples/Attributes.hs" 1348 20 1348 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 12 1348 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 12 1348 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 12 1348 16 , srcInfoPoints = [] } "LRID")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 17 1348 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 17 1348 20 , srcInfoPoints = [] } "lid") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 22 1348 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1348 22 1348 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 24 1348 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 24 1348 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 24 1348 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 24 1348 29 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 30 1348 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 30 1348 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1348 30 1348 33 , srcInfoPoints = [] } "lid"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 5 1349 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 5 1349 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 11 1349 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 11 1349 14 , srcInfoPoints = [] } "lrs") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 22 1349 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1349 22 1349 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 24 1349 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 24 1349 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 24 1349 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 24 1349 36 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 37 1349 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 37 1349 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 37 1349 38 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 39 1349 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 39 1349 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 39 1349 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 39 1349 46 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 47 1349 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 47 1349 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1349 47 1349 50 , srcInfoPoints = [] } "lrs")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 1 1368 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1351 1 1351 9 , SrcSpan "tests/examples/Attributes.hs" 1351 30 1351 35 , SrcSpan "tests/examples/Attributes.hs" 1352 5 1352 5 , SrcSpan "tests/examples/Attributes.hs" 1360 5 1360 5 , SrcSpan "tests/examples/Attributes.hs" 1368 1 1368 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 10 1351 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 10 1351 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 10 1351 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 10 1351 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 10 1351 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 19 1351 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 19 1351 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1351 19 1351 29 , srcInfoPoints = [] } "LayerRange"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 5 1357 37 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 5 1357 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 5 1352 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 5 1352 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 15 1357 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1352 15 1352 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 17 1357 37 , srcInfoPoints = [] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 17 1355 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1352 17 1352 19 , SrcSpan "tests/examples/Attributes.hs" 1352 20 1352 20 , SrcSpan "tests/examples/Attributes.hs" 1353 20 1353 20 , SrcSpan "tests/examples/Attributes.hs" 1354 20 1354 20 , SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 20 , SrcSpan "tests/examples/Attributes.hs" 1356 17 1356 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 20 1352 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1352 24 1352 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 20 1352 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 20 1352 23 , srcInfoPoints = [] } "id1")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 27 1352 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 27 1352 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1352 27 1352 36 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 20 1353 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1353 24 1353 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 20 1353 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 20 1353 21 , srcInfoPoints = [] } "s")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 27 1353 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 27 1353 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1353 27 1353 40 , srcInfoPoints = [] } "parseLayerSep"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 20 1354 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1354 24 1354 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 20 1354 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 20 1354 23 , srcInfoPoints = [] } "id2")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 27 1354 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 27 1354 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1354 27 1354 36 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 42 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 20 1355 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 27 1355 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 27 1355 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 27 1355 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 29 1355 32 , srcInfoPoints = [] } "LRS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 33 1355 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 33 1355 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 33 1355 36 , srcInfoPoints = [] } "id1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 37 1355 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 37 1355 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 37 1355 38 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 39 1355 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 39 1355 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1355 39 1355 42 , srcInfoPoints = [] } "id2"))))) ]) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1356 17 1356 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1356 17 1356 18 , SrcSpan "tests/examples/Attributes.hs" 1356 18 1356 24 , SrcSpan "tests/examples/Attributes.hs" 1356 24 1356 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1356 17 1356 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1356 17 1356 18 , SrcSpan "tests/examples/Attributes.hs" 1356 18 1356 24 , SrcSpan "tests/examples/Attributes.hs" 1356 24 1356 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1356 18 1356 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 17 1357 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 17 1357 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 17 1357 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 17 1357 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 17 1357 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 23 1357 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 23 1357 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 23 1357 27 , srcInfoPoints = [] } "LRID")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 28 1357 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 28 1357 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1357 28 1357 37 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 5 1366 29 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 5 1366 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 5 1360 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 5 1360 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 11 1366 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1360 11 1360 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 13 1366 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 13 1364 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 13 1360 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 13 1360 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 13 1360 24 , srcInfoPoints = [] } "quotedParse"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 25 1364 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1360 25 1360 26 , SrcSpan "tests/examples/Attributes.hs" 1364 25 1364 26 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 27 1363 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1360 27 1360 29 , SrcSpan "tests/examples/Attributes.hs" 1360 30 1360 30 , SrcSpan "tests/examples/Attributes.hs" 1361 30 1361 30 , SrcSpan "tests/examples/Attributes.hs" 1362 30 1362 30 , SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 30 , SrcSpan "tests/examples/Attributes.hs" 1364 25 1364 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 30 1360 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1360 34 1360 36 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 30 1360 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 30 1360 33 , srcInfoPoints = [] } "id1")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 37 1360 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 37 1360 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1360 37 1360 46 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 30 1361 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1361 34 1361 36 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 30 1361 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 30 1361 31 , srcInfoPoints = [] } "s")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 37 1361 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 37 1361 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1361 37 1361 50 , srcInfoPoints = [] } "parseLayerSep"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 30 1362 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1362 34 1362 36 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 30 1362 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 30 1362 33 , srcInfoPoints = [] } "id2")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 37 1362 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 37 1362 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1362 37 1362 46 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 52 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 30 1363 36 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 37 1363 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 37 1363 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 37 1363 38 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 46 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 39 1363 42 , srcInfoPoints = [] } "LRS"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 43 1363 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 43 1363 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 43 1363 46 , srcInfoPoints = [] } "id1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 47 1363 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 47 1363 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 47 1363 48 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 49 1363 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 49 1363 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1363 49 1363 52 , srcInfoPoints = [] } "id2"))))) ]))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1365 13 1365 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1365 13 1365 14 , SrcSpan "tests/examples/Attributes.hs" 1365 14 1365 20 , SrcSpan "tests/examples/Attributes.hs" 1365 20 1365 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1365 13 1365 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1365 13 1365 14 , SrcSpan "tests/examples/Attributes.hs" 1365 14 1365 20 , SrcSpan "tests/examples/Attributes.hs" 1365 20 1365 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1365 14 1365 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 13 1366 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 13 1366 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 13 1366 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 13 1366 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 13 1366 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 19 1366 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 19 1366 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 19 1366 23 , srcInfoPoints = [] } "LRID")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 24 1366 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 24 1366 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1366 24 1366 29 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 1 1368 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1368 15 1368 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 1 1368 14 , srcInfoPoints = [] } "parseLayerSep" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 18 1368 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 18 1368 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 18 1368 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 18 1368 23 , srcInfoPoints = [] } "Parse"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 24 1368 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 24 1368 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1368 24 1368 30 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 1 1370 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 1 1369 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 1 1369 14 , srcInfoPoints = [] } "parseLayerSep")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 15 1370 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1369 15 1369 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 17 1370 44 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 17 1369 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 17 1369 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 17 1369 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 17 1369 22 , srcInfoPoints = [] } "many1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 23 1369 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 23 1369 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 23 1369 24 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 25 1369 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 25 1369 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1369 25 1369 30 , srcInfoPoints = [] } "oneOf")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 17 1370 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 17 1370 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 17 1370 18 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 19 1370 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 19 1370 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 19 1370 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 19 1370 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 19 1370 22 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 23 1370 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 23 1370 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 23 1370 32 , srcInfoPoints = [] } "character")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 33 1370 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 33 1370 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1370 33 1370 44 , srcInfoPoints = [] } "defLayerSep")))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 1 1372 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1372 13 1372 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 1 1372 12 , srcInfoPoints = [] } "defLayerSep" ] (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 16 1372 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1372 16 1372 17 , SrcSpan "tests/examples/Attributes.hs" 1372 21 1372 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 17 1372 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 17 1372 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1372 17 1372 21 , srcInfoPoints = [] } "Char")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 1 1373 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 1 1373 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 1 1373 12 , srcInfoPoints = [] } "defLayerSep")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 13 1373 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1373 13 1373 14 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 15 1373 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1373 15 1373 16 , SrcSpan "tests/examples/Attributes.hs" 1373 19 1373 20 , SrcSpan "tests/examples/Attributes.hs" 1373 24 1373 25 , SrcSpan "tests/examples/Attributes.hs" 1373 30 1373 31 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 16 1373 19 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 16 1373 19 , srcInfoPoints = [] } ' ' " ") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 21 1373 24 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 21 1373 24 , srcInfoPoints = [] } ':' ":") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 26 1373 30 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1373 26 1373 30 , srcInfoPoints = [] } '\t' "\\t") ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 1 1375 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1375 16 1375 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 1 1375 15 , srcInfoPoints = [] } "parseLayerName" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 19 1375 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 19 1375 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 19 1375 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 19 1375 24 , srcInfoPoints = [] } "Parse"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 25 1375 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 25 1375 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1375 25 1375 31 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 1 1377 70 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 1 1376 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 1 1376 15 , srcInfoPoints = [] } "parseLayerName")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 16 1377 70 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1376 16 1376 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 18 1377 70 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 18 1376 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 18 1376 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 18 1376 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 18 1376 23 , srcInfoPoints = [] } "many1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 24 1376 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 24 1376 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 24 1376 25 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 26 1376 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 26 1376 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1376 26 1376 33 , srcInfoPoints = [] } "orQuote")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 18 1377 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 18 1377 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 18 1377 19 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 20 1377 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 20 1377 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 20 1377 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 20 1377 27 , srcInfoPoints = [] } "satisfy"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 28 1377 70 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 28 1377 29 , SrcSpan "tests/examples/Attributes.hs" 1377 69 1377 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 29 1377 35 , srcInfoPoints = [] } "liftM2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 36 1377 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 36 1377 37 , SrcSpan "tests/examples/Attributes.hs" 1377 37 1377 39 , SrcSpan "tests/examples/Attributes.hs" 1377 39 1377 40 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 36 1377 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 36 1377 37 , SrcSpan "tests/examples/Attributes.hs" 1377 37 1377 39 , SrcSpan "tests/examples/Attributes.hs" 1377 39 1377 40 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 37 1377 39 , srcInfoPoints = [] } "&&")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 41 1377 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 41 1377 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 41 1377 52 , srcInfoPoints = [] } "notLayerSep")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 53 1377 69 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 53 1377 54 , SrcSpan "tests/examples/Attributes.hs" 1377 68 1377 69 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 54 1377 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 54 1377 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 54 1377 55 , SrcSpan "tests/examples/Attributes.hs" 1377 55 1377 57 , SrcSpan "tests/examples/Attributes.hs" 1377 57 1377 58 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 54 1377 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1377 54 1377 55 , SrcSpan "tests/examples/Attributes.hs" 1377 55 1377 57 , SrcSpan "tests/examples/Attributes.hs" 1377 57 1377 58 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 55 1377 57 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 59 1377 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 59 1377 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1377 59 1377 68 , srcInfoPoints = [] } "quoteChar")))))))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 1 1379 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1379 17 1379 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 1 1379 16 , srcInfoPoints = [] } "parseLayerName'" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 20 1379 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 20 1379 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 20 1379 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 20 1379 25 , srcInfoPoints = [] } "Parse"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 26 1379 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 26 1379 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1379 26 1379 32 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 1 1382 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 1 1380 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 1 1380 16 , srcInfoPoints = [] } "parseLayerName'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 17 1382 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1380 17 1380 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 19 1382 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 19 1380 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 19 1380 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1380 19 1380 30 , srcInfoPoints = [] } "stringBlock"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1381 19 1381 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1381 19 1381 20 , SrcSpan "tests/examples/Attributes.hs" 1381 20 1381 26 , SrcSpan "tests/examples/Attributes.hs" 1381 26 1381 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1381 19 1381 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1381 19 1381 20 , SrcSpan "tests/examples/Attributes.hs" 1381 20 1381 26 , SrcSpan "tests/examples/Attributes.hs" 1381 26 1381 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1381 20 1381 26 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 19 1382 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 19 1382 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 19 1382 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 19 1382 30 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 31 1382 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 31 1382 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1382 31 1382 45 , srcInfoPoints = [] } "parseLayerName")))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 1 1384 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1384 13 1384 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 1 1384 12 , srcInfoPoints = [] } "notLayerSep" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 16 1384 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1384 21 1384 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 16 1384 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 16 1384 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 16 1384 20 , srcInfoPoints = [] } "Char"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 24 1384 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 24 1384 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1384 24 1384 28 , srcInfoPoints = [] } "Bool")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 1 1385 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 1 1385 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 1 1385 12 , srcInfoPoints = [] } "notLayerSep")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 13 1385 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1385 13 1385 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 15 1385 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 15 1385 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 15 1385 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 15 1385 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 15 1385 19 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 20 1385 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 20 1385 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 20 1385 27 , srcInfoPoints = [] } "notElem")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 28 1385 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 28 1385 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1385 28 1385 39 , srcInfoPoints = [] } "defLayerSep"))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 1 1392 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1389 14 1389 15 , SrcSpan "tests/examples/Attributes.hs" 1390 14 1390 15 , SrcSpan "tests/examples/Attributes.hs" 1391 14 1391 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 1 1389 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 6 1389 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 6 1389 13 , srcInfoPoints = [] } "LayerID")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 16 1389 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 16 1389 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1389 16 1389 25 , srcInfoPoints = [] } "AllLayers") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 16 1390 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 16 1390 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 16 1390 21 , srcInfoPoints = [] } "LRInt") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 22 1390 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 22 1390 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1390 22 1390 25 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 16 1391 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 16 1391 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 16 1391 22 , srcInfoPoints = [] } "LRName") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 23 1391 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 23 1391 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1391 23 1391 29 , srcInfoPoints = [] } "String")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 16 1392 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1392 16 1392 24 , SrcSpan "tests/examples/Attributes.hs" 1392 25 1392 26 , SrcSpan "tests/examples/Attributes.hs" 1392 28 1392 29 , SrcSpan "tests/examples/Attributes.hs" 1392 33 1392 34 , SrcSpan "tests/examples/Attributes.hs" 1392 39 1392 40 , SrcSpan "tests/examples/Attributes.hs" 1392 45 1392 46 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 26 1392 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 26 1392 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 26 1392 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 26 1392 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 30 1392 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 30 1392 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 30 1392 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 30 1392 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 35 1392 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 35 1392 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 35 1392 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 35 1392 39 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 41 1392 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 41 1392 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 41 1392 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1392 41 1392 45 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 1 1403 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1394 1 1394 9 , SrcSpan "tests/examples/Attributes.hs" 1394 27 1394 32 , SrcSpan "tests/examples/Attributes.hs" 1395 5 1395 5 , SrcSpan "tests/examples/Attributes.hs" 1396 5 1396 5 , SrcSpan "tests/examples/Attributes.hs" 1397 5 1397 5 , SrcSpan "tests/examples/Attributes.hs" 1399 5 1399 5 , SrcSpan "tests/examples/Attributes.hs" 1401 5 1401 5 , SrcSpan "tests/examples/Attributes.hs" 1403 1 1403 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 10 1394 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 10 1394 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 10 1394 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 10 1394 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 10 1394 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 19 1394 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 19 1394 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1394 19 1394 26 , srcInfoPoints = [] } "LayerID"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 5 1397 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 5 1397 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 5 1395 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 5 1395 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 13 1395 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 13 1395 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 13 1395 22 , srcInfoPoints = [] } "AllLayers")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 25 1395 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1395 25 1395 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 27 1395 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 27 1395 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 27 1395 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 27 1395 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 32 1395 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1395 32 1395 37 , srcInfoPoints = [] } "all" "all")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 5 1396 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 5 1396 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 13 1396 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1396 13 1396 14 , SrcSpan "tests/examples/Attributes.hs" 1396 21 1396 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 14 1396 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 14 1396 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 14 1396 19 , srcInfoPoints = [] } "LRInt")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 20 1396 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 20 1396 21 , srcInfoPoints = [] } "n") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 25 1396 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1396 25 1396 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 27 1396 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 27 1396 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 27 1396 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 27 1396 34 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 35 1396 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 35 1396 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1396 35 1396 36 , srcInfoPoints = [] } "n"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 5 1397 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 5 1397 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 13 1397 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1397 13 1397 14 , SrcSpan "tests/examples/Attributes.hs" 1397 23 1397 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 14 1397 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 14 1397 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 14 1397 20 , srcInfoPoints = [] } "LRName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 21 1397 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 21 1397 23 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 25 1397 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1397 25 1397 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 27 1397 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 27 1397 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 27 1397 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 27 1397 34 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 35 1397 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 35 1397 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1397 35 1397 37 , srcInfoPoints = [] } "nm"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 5 1401 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 5 1401 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 5 1399 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 5 1399 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 11 1399 22 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1399 11 1399 12 , SrcSpan "tests/examples/Attributes.hs" 1399 21 1399 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 12 1399 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 12 1399 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 12 1399 18 , srcInfoPoints = [] } "LRName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 19 1399 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 19 1399 21 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 23 1399 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1399 23 1399 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 25 1399 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 25 1399 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 25 1399 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 25 1399 30 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 31 1399 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 31 1399 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1399 31 1399 33 , srcInfoPoints = [] } "nm"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 5 1401 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 5 1401 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 11 1401 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 11 1401 13 , srcInfoPoints = [] } "li") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 23 1401 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1401 23 1401 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 25 1401 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 25 1401 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 25 1401 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 25 1401 32 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 33 1401 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 33 1401 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1401 33 1401 35 , srcInfoPoints = [] } "li"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 1 1410 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1403 1 1403 9 , SrcSpan "tests/examples/Attributes.hs" 1403 27 1403 32 , SrcSpan "tests/examples/Attributes.hs" 1404 5 1404 5 , SrcSpan "tests/examples/Attributes.hs" 1406 5 1406 5 , SrcSpan "tests/examples/Attributes.hs" 1410 1 1410 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 10 1403 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 10 1403 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 10 1403 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 10 1403 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 10 1403 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 19 1403 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 19 1403 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1403 19 1403 26 , srcInfoPoints = [] } "LayerID"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 5 1404 52 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 5 1404 52 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 5 1404 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 5 1404 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 15 1404 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1404 15 1404 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 17 1404 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 17 1404 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 17 1404 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 17 1404 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 17 1404 22 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 23 1404 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 23 1404 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 23 1404 37 , srcInfoPoints = [] } "checkLayerName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 38 1404 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 38 1404 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1404 38 1404 52 , srcInfoPoints = [] } "parseLayerName"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 5 1408 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 5 1408 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 5 1406 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 5 1406 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 11 1408 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1406 11 1406 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 13 1408 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 13 1406 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 13 1406 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 13 1406 18 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 19 1408 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1406 19 1406 20 , SrcSpan "tests/examples/Attributes.hs" 1407 19 1407 20 , SrcSpan "tests/examples/Attributes.hs" 1408 19 1408 20 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 21 1406 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 21 1406 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 21 1406 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 21 1406 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 21 1406 26 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 27 1406 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 27 1406 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 27 1406 41 , srcInfoPoints = [] } "checkLayerName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 42 1406 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 42 1406 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1406 42 1406 57 , srcInfoPoints = [] } "parseLayerName'"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 21 1407 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 21 1407 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 21 1407 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 21 1407 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 21 1407 26 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 27 1407 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 27 1407 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 27 1407 32 , srcInfoPoints = [] } "LRInt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 33 1407 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 33 1407 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1407 33 1407 38 , srcInfoPoints = [] } "parse"))) ]))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 1 1410 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1410 20 1410 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 1 1410 15 , srcInfoPoints = [] } "checkLayerName" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 23 1410 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1410 30 1410 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 23 1410 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 23 1410 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 23 1410 29 , srcInfoPoints = [] } "String"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 33 1410 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 33 1410 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1410 33 1410 40 , srcInfoPoints = [] } "LayerID")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 1 1415 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1412 3 1412 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 1 1415 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1412 3 1412 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 1 1411 15 , srcInfoPoints = [] } "checkLayerName") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 16 1411 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 16 1411 19 , srcInfoPoints = [] } "str") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 20 1411 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1411 20 1411 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 22 1411 27 , srcInfoPoints = [] } "maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 28 1411 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 28 1411 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 28 1411 36 , srcInfoPoints = [] } "checkAll")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 37 1411 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 37 1411 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 37 1411 42 , srcInfoPoints = [] } "LRInt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 43 1411 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 43 1411 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 43 1411 44 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 45 1411 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 45 1411 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 45 1411 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 45 1411 56 , srcInfoPoints = [] } "stringToInt"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 57 1411 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 57 1411 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1411 57 1411 60 , srcInfoPoints = [] } "str")))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 5 1415 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1413 5 1413 5 , SrcSpan "tests/examples/Attributes.hs" 1420 1 1420 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 5 1415 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 5 1413 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 5 1413 13 , srcInfoPoints = [] } "checkAll")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 14 1415 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1413 14 1413 15 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 16 1415 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1413 16 1413 18 , SrcSpan "tests/examples/Attributes.hs" 1414 16 1414 20 , SrcSpan "tests/examples/Attributes.hs" 1415 16 1415 20 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 19 1413 22 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 23 1413 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 23 1413 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 23 1413 30 , srcInfoPoints = [] } "toLower")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 31 1413 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 31 1413 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 31 1413 34 , srcInfoPoints = [] } "str")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 35 1413 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 35 1413 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 35 1413 37 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 38 1413 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1413 38 1413 43 , srcInfoPoints = [] } "all" "all"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1414 21 1414 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1414 21 1414 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1414 21 1414 30 , srcInfoPoints = [] } "AllLayers"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 21 1415 31 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 21 1415 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 21 1415 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 21 1415 27 , srcInfoPoints = [] } "LRName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 28 1415 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 28 1415 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1415 28 1415 31 , srcInfoPoints = [] } "str")))))) Nothing ])) ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 1 1421 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1420 16 1420 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 1 1420 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 6 1420 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 6 1420 15 , srcInfoPoints = [] } "LayerList")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 18 1420 46 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 18 1420 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 18 1420 20 , srcInfoPoints = [] } "LL") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 21 1420 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 21 1420 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 21 1420 27 , srcInfoPoints = [] } "String")) , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 28 1420 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1420 28 1420 29 , SrcSpan "tests/examples/Attributes.hs" 1420 45 1420 46 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 29 1420 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1420 29 1420 30 , SrcSpan "tests/examples/Attributes.hs" 1420 36 1420 37 , SrcSpan "tests/examples/Attributes.hs" 1420 44 1420 45 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 30 1420 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 30 1420 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 30 1420 36 , srcInfoPoints = [] } "String")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 38 1420 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 38 1420 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1420 38 1420 44 , srcInfoPoints = [] } "String")) ]) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 18 1421 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1421 18 1421 26 , SrcSpan "tests/examples/Attributes.hs" 1421 27 1421 28 , SrcSpan "tests/examples/Attributes.hs" 1421 30 1421 31 , SrcSpan "tests/examples/Attributes.hs" 1421 35 1421 36 , SrcSpan "tests/examples/Attributes.hs" 1421 41 1421 42 , SrcSpan "tests/examples/Attributes.hs" 1421 47 1421 48 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 28 1421 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 28 1421 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 28 1421 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 28 1421 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 32 1421 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 32 1421 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 32 1421 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 32 1421 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 37 1421 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 37 1421 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 37 1421 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 37 1421 41 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 43 1421 47 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 43 1421 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 43 1421 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1421 43 1421 47 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 1 1432 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1423 1 1423 9 , SrcSpan "tests/examples/Attributes.hs" 1423 29 1423 34 , SrcSpan "tests/examples/Attributes.hs" 1424 5 1424 5 , SrcSpan "tests/examples/Attributes.hs" 1428 5 1428 5 , SrcSpan "tests/examples/Attributes.hs" 1430 5 1430 5 , SrcSpan "tests/examples/Attributes.hs" 1432 1 1432 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 10 1423 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 10 1423 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 10 1423 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 10 1423 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 10 1423 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 19 1423 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 19 1423 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1423 19 1423 28 , srcInfoPoints = [] } "LayerList"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 5 1426 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1425 9 1425 14 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 5 1426 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1425 9 1425 14 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 5 1426 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1425 9 1425 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 5 1424 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 13 1424 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1424 13 1424 14 , SrcSpan "tests/examples/Attributes.hs" 1424 23 1424 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 14 1424 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 14 1424 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 14 1424 16 , srcInfoPoints = [] } "LL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 17 1424 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 17 1424 19 , srcInfoPoints = [] } "l1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 20 1424 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 20 1424 23 , srcInfoPoints = [] } "ols") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 25 1424 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1424 25 1424 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 27 1424 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 27 1424 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 27 1424 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 27 1424 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 27 1424 34 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 35 1424 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 35 1424 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 35 1424 37 , srcInfoPoints = [] } "l1")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 38 1424 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 38 1424 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 38 1424 40 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 41 1424 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 41 1424 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 41 1424 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 41 1424 45 , srcInfoPoints = [] } "hcat"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 46 1424 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1424 46 1424 47 , SrcSpan "tests/examples/Attributes.hs" 1424 60 1424 61 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 47 1424 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 47 1424 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 47 1424 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 47 1424 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 47 1424 50 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 51 1424 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 51 1424 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 51 1424 56 , srcInfoPoints = [] } "subLL")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 57 1424 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 57 1424 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1424 57 1424 60 , srcInfoPoints = [] } "ols")))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 11 1426 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1426 11 1426 11 , SrcSpan "tests/examples/Attributes.hs" 1428 5 1428 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 11 1426 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 11 1426 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 11 1426 16 , srcInfoPoints = [] } "subLL") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 17 1426 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1426 17 1426 18 , SrcSpan "tests/examples/Attributes.hs" 1426 19 1426 20 , SrcSpan "tests/examples/Attributes.hs" 1426 22 1426 23 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 18 1426 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 18 1426 19 , srcInfoPoints = [] } "s") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 21 1426 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 21 1426 22 , srcInfoPoints = [] } "l") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 24 1426 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1426 24 1426 25 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 26 1426 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 26 1426 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 26 1426 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 26 1426 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 26 1426 33 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 34 1426 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 34 1426 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 34 1426 35 , srcInfoPoints = [] } "s")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 36 1426 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 36 1426 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 36 1426 38 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 39 1426 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 39 1426 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 39 1426 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 39 1426 46 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 47 1426 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 47 1426 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1426 47 1426 48 , srcInfoPoints = [] } "l")))))) Nothing ] ])) ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 5 1430 49 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 5 1430 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 5 1428 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 5 1428 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 11 1428 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1428 11 1428 12 , SrcSpan "tests/examples/Attributes.hs" 1428 20 1428 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 12 1428 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 12 1428 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 12 1428 14 , srcInfoPoints = [] } "LL")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 15 1428 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 15 1428 17 , srcInfoPoints = [] } "l1") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 18 1428 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1428 18 1428 19 , SrcSpan "tests/examples/Attributes.hs" 1428 19 1428 20 ] } [] ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 22 1428 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1428 22 1428 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 24 1428 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 24 1428 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 24 1428 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 24 1428 29 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 30 1428 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 30 1428 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1428 30 1428 32 , srcInfoPoints = [] } "l1"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 5 1430 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 5 1430 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 11 1430 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 11 1430 13 , srcInfoPoints = [] } "ll") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 22 1430 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1430 22 1430 23 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 24 1430 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 24 1430 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 24 1430 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 24 1430 36 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 37 1430 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 37 1430 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 37 1430 38 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 39 1430 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 39 1430 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 39 1430 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 39 1430 46 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 47 1430 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 47 1430 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1430 47 1430 49 , srcInfoPoints = [] } "ll")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 1 1445 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1432 1 1432 9 , SrcSpan "tests/examples/Attributes.hs" 1432 29 1432 34 , SrcSpan "tests/examples/Attributes.hs" 1433 5 1433 5 , SrcSpan "tests/examples/Attributes.hs" 1439 5 1439 5 , SrcSpan "tests/examples/Attributes.hs" 1445 1 1445 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 10 1432 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 10 1432 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 10 1432 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 10 1432 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 10 1432 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 19 1432 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 19 1432 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1432 19 1432 28 , srcInfoPoints = [] } "LayerList"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 5 1437 38 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 5 1437 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 5 1433 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 5 1433 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 15 1437 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1433 15 1433 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 17 1437 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1433 17 1433 19 , SrcSpan "tests/examples/Attributes.hs" 1433 20 1433 20 , SrcSpan "tests/examples/Attributes.hs" 1434 20 1434 20 , SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 20 , SrcSpan "tests/examples/Attributes.hs" 1439 5 1439 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 20 1433 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1433 23 1433 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 20 1433 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 20 1433 22 , srcInfoPoints = [] } "l1")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 26 1433 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 26 1433 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1433 26 1433 40 , srcInfoPoints = [] } "parseLayerName"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 20 1436 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1434 24 1434 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 20 1434 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 20 1434 23 , srcInfoPoints = [] } "ols")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 27 1436 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 27 1434 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 27 1434 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 27 1434 31 , srcInfoPoints = [] } "many"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 32 1434 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 32 1434 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 32 1434 33 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 34 1436 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1434 34 1434 36 , SrcSpan "tests/examples/Attributes.hs" 1434 37 1434 37 , SrcSpan "tests/examples/Attributes.hs" 1435 37 1435 37 , SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 37 , SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 37 1434 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1434 41 1434 43 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 37 1434 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 37 1434 38 , srcInfoPoints = [] } "s")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 44 1434 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 44 1434 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1434 44 1434 57 , srcInfoPoints = [] } "parseLayerSep"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 37 1435 58 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1435 41 1435 43 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 37 1435 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 37 1435 40 , srcInfoPoints = [] } "lnm")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 44 1435 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 44 1435 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1435 44 1435 58 , srcInfoPoints = [] } "parseLayerName"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 37 1436 43 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 44 1436 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1436 44 1436 45 , SrcSpan "tests/examples/Attributes.hs" 1436 46 1436 47 , SrcSpan "tests/examples/Attributes.hs" 1436 51 1436 52 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 45 1436 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 45 1436 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 45 1436 46 , srcInfoPoints = [] } "s")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 48 1436 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 48 1436 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1436 48 1436 51 , srcInfoPoints = [] } "lnm")) ])) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 38 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 20 1437 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 27 1437 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 27 1437 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 27 1437 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 29 1437 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 29 1437 34 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 29 1437 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 29 1437 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 29 1437 31 , srcInfoPoints = [] } "LL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 32 1437 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 32 1437 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 32 1437 34 , srcInfoPoints = [] } "l1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 35 1437 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 35 1437 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1437 35 1437 38 , srcInfoPoints = [] } "ols"))))) ])) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 5 1441 68 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 5 1441 68 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 5 1439 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 5 1439 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 11 1441 68 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1439 11 1439 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 13 1441 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 13 1439 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 13 1439 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 13 1439 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 13 1439 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 25 1439 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 25 1439 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1439 25 1439 34 , srcInfoPoints = [] } "parseUnqt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1440 13 1440 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1440 13 1440 14 , SrcSpan "tests/examples/Attributes.hs" 1440 14 1440 20 , SrcSpan "tests/examples/Attributes.hs" 1440 20 1440 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1440 13 1440 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1440 13 1440 14 , SrcSpan "tests/examples/Attributes.hs" 1440 14 1440 20 , SrcSpan "tests/examples/Attributes.hs" 1440 20 1440 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1440 14 1440 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 13 1441 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 13 1441 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 13 1441 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 13 1441 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 13 1441 18 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 19 1441 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1441 19 1441 20 , SrcSpan "tests/examples/Attributes.hs" 1441 30 1441 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 20 1441 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 20 1441 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 20 1441 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 20 1441 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 20 1441 24 , srcInfoPoints = [] } "flip"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 25 1441 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 25 1441 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 25 1441 27 , srcInfoPoints = [] } "LL")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 28 1441 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1441 28 1441 29 , SrcSpan "tests/examples/Attributes.hs" 1441 29 1441 30 ] } [])))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 32 1441 68 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1441 32 1441 33 , SrcSpan "tests/examples/Attributes.hs" 1441 67 1441 68 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 33 1441 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 33 1441 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 33 1441 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 33 1441 48 , srcInfoPoints = [] } "parseLayerName'"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 49 1441 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1441 49 1441 50 , SrcSpan "tests/examples/Attributes.hs" 1441 50 1441 56 , SrcSpan "tests/examples/Attributes.hs" 1441 56 1441 57 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 49 1441 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1441 49 1441 50 , SrcSpan "tests/examples/Attributes.hs" 1441 50 1441 56 , SrcSpan "tests/examples/Attributes.hs" 1441 56 1441 57 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 50 1441 56 , srcInfoPoints = [] } "onFail"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 58 1441 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 58 1441 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1441 58 1441 67 , srcInfoPoints = [] } "numString")))))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 1 1446 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1445 17 1445 18 , SrcSpan "tests/examples/Attributes.hs" 1445 32 1445 33 , SrcSpan "tests/examples/Attributes.hs" 1445 45 1445 46 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 1 1445 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 6 1445 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 6 1445 16 , srcInfoPoints = [] } "OutputMode")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 19 1445 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 19 1445 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 19 1445 31 , srcInfoPoints = [] } "BreadthFirst") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 34 1445 44 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 34 1445 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 34 1445 44 , srcInfoPoints = [] } "NodesFirst") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 47 1445 57 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 47 1445 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1445 47 1445 57 , srcInfoPoints = [] } "EdgesFirst") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 19 1446 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1446 19 1446 27 , SrcSpan "tests/examples/Attributes.hs" 1446 28 1446 29 , SrcSpan "tests/examples/Attributes.hs" 1446 31 1446 32 , SrcSpan "tests/examples/Attributes.hs" 1446 36 1446 37 , SrcSpan "tests/examples/Attributes.hs" 1446 45 1446 46 , SrcSpan "tests/examples/Attributes.hs" 1446 51 1446 52 , SrcSpan "tests/examples/Attributes.hs" 1446 57 1446 58 , SrcSpan "tests/examples/Attributes.hs" 1446 63 1446 64 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 29 1446 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 29 1446 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 29 1446 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 29 1446 31 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 33 1446 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 33 1446 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 33 1446 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 33 1446 36 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 38 1446 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 38 1446 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 38 1446 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 38 1446 45 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 47 1446 51 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 47 1446 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 47 1446 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 47 1446 51 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 53 1446 57 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 53 1446 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 53 1446 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 53 1446 57 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 59 1446 63 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 59 1446 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 59 1446 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1446 59 1446 63 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 1 1453 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1448 1 1448 9 , SrcSpan "tests/examples/Attributes.hs" 1448 30 1448 35 , SrcSpan "tests/examples/Attributes.hs" 1449 5 1449 5 , SrcSpan "tests/examples/Attributes.hs" 1450 5 1450 5 , SrcSpan "tests/examples/Attributes.hs" 1451 5 1451 5 , SrcSpan "tests/examples/Attributes.hs" 1453 1 1453 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 10 1448 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 10 1448 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 10 1448 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 10 1448 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 10 1448 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 19 1448 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 19 1448 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1448 19 1448 29 , srcInfoPoints = [] } "OutputMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 5 1451 45 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 5 1451 45 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 5 1449 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 5 1449 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 13 1449 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 13 1449 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 13 1449 25 , srcInfoPoints = [] } "BreadthFirst")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 26 1449 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1449 26 1449 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 28 1449 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 28 1449 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 28 1449 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 28 1449 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 33 1449 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1449 33 1449 47 , srcInfoPoints = [] } "breadthfirst" "breadthfirst")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 5 1450 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 5 1450 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 13 1450 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 13 1450 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 13 1450 23 , srcInfoPoints = [] } "NodesFirst")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 26 1450 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1450 26 1450 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 28 1450 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 28 1450 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 28 1450 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 28 1450 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 33 1450 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1450 33 1450 45 , srcInfoPoints = [] } "nodesfirst" "nodesfirst")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 5 1451 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 5 1451 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 13 1451 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 13 1451 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 13 1451 23 , srcInfoPoints = [] } "EdgesFirst")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 26 1451 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1451 26 1451 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 28 1451 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 28 1451 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 28 1451 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 28 1451 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 33 1451 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1451 33 1451 45 , srcInfoPoints = [] } "edgesfirst" "edgesfirst")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 1 1461 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1453 1 1453 9 , SrcSpan "tests/examples/Attributes.hs" 1453 30 1453 35 , SrcSpan "tests/examples/Attributes.hs" 1454 5 1454 5 , SrcSpan "tests/examples/Attributes.hs" 1461 1 1461 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 10 1453 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 10 1453 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 10 1453 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 10 1453 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 10 1453 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 19 1453 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 19 1453 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1453 19 1453 29 , srcInfoPoints = [] } "OutputMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 5 1457 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 5 1457 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 5 1454 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 5 1454 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 15 1457 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1454 15 1454 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 17 1457 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 17 1454 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 17 1454 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 17 1454 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 23 1457 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1454 23 1454 24 , SrcSpan "tests/examples/Attributes.hs" 1455 23 1455 24 , SrcSpan "tests/examples/Attributes.hs" 1456 23 1456 24 , SrcSpan "tests/examples/Attributes.hs" 1457 23 1457 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 25 1454 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 25 1454 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 25 1454 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 25 1454 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 25 1454 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 35 1454 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 35 1454 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 35 1454 47 , srcInfoPoints = [] } "BreadthFirst")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 48 1454 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1454 48 1454 62 , srcInfoPoints = [] } "breadthfirst" "breadthfirst")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 25 1455 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 25 1455 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 25 1455 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 25 1455 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 25 1455 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 35 1455 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 35 1455 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 35 1455 45 , srcInfoPoints = [] } "NodesFirst")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 46 1455 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1455 46 1455 58 , srcInfoPoints = [] } "nodesfirst" "nodesfirst")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 25 1456 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 25 1456 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 25 1456 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 25 1456 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 25 1456 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 35 1456 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 35 1456 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 35 1456 45 , srcInfoPoints = [] } "EdgesFirst")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 46 1456 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1456 46 1456 58 , srcInfoPoints = [] } "edgesfirst" "edgesfirst")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 1 1464 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1461 11 1461 12 , SrcSpan "tests/examples/Attributes.hs" 1462 11 1462 12 , SrcSpan "tests/examples/Attributes.hs" 1463 11 1463 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 1 1461 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 6 1461 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 6 1461 10 , srcInfoPoints = [] } "Pack")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 13 1461 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 13 1461 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1461 13 1461 19 , srcInfoPoints = [] } "DoPack") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1462 13 1462 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1462 13 1462 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1462 13 1462 21 , srcInfoPoints = [] } "DontPack") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 13 1463 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 13 1463 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 13 1463 23 , srcInfoPoints = [] } "PackMargin") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 24 1463 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 24 1463 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1463 24 1463 27 , srcInfoPoints = [] } "Int")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 13 1464 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1464 13 1464 21 , SrcSpan "tests/examples/Attributes.hs" 1464 22 1464 23 , SrcSpan "tests/examples/Attributes.hs" 1464 25 1464 26 , SrcSpan "tests/examples/Attributes.hs" 1464 30 1464 31 , SrcSpan "tests/examples/Attributes.hs" 1464 36 1464 37 , SrcSpan "tests/examples/Attributes.hs" 1464 42 1464 43 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 23 1464 25 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 23 1464 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 23 1464 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 23 1464 25 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 27 1464 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 27 1464 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 27 1464 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 27 1464 30 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 32 1464 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 32 1464 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 32 1464 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 32 1464 36 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 38 1464 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 38 1464 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 38 1464 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1464 38 1464 42 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 1 1471 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1466 1 1466 9 , SrcSpan "tests/examples/Attributes.hs" 1466 24 1466 29 , SrcSpan "tests/examples/Attributes.hs" 1467 5 1467 5 , SrcSpan "tests/examples/Attributes.hs" 1468 5 1468 5 , SrcSpan "tests/examples/Attributes.hs" 1469 5 1469 5 , SrcSpan "tests/examples/Attributes.hs" 1471 1 1471 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 10 1466 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 10 1466 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 10 1466 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 10 1466 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 10 1466 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 19 1466 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 19 1466 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1466 19 1466 23 , srcInfoPoints = [] } "Pack"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 5 1469 39 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 5 1469 39 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 5 1467 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 5 1467 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 13 1467 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 13 1467 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 13 1467 19 , srcInfoPoints = [] } "DoPack")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 28 1467 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1467 28 1467 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 30 1467 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 30 1467 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 30 1467 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 30 1467 37 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 38 1467 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 38 1467 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1467 38 1467 42 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 5 1468 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 5 1468 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 13 1468 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 13 1468 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 13 1468 21 , srcInfoPoints = [] } "DontPack")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 28 1468 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1468 28 1468 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 30 1468 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 30 1468 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 30 1468 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 30 1468 37 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 38 1468 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 38 1468 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1468 38 1468 43 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 5 1469 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 5 1469 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 13 1469 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1469 13 1469 14 , SrcSpan "tests/examples/Attributes.hs" 1469 26 1469 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 14 1469 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 14 1469 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 14 1469 24 , srcInfoPoints = [] } "PackMargin")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 25 1469 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 25 1469 26 , srcInfoPoints = [] } "m") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 28 1469 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1469 28 1469 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 30 1469 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 30 1469 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 30 1469 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 30 1469 37 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 38 1469 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 38 1469 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1469 38 1469 39 , srcInfoPoints = [] } "m"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 1 1479 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1471 1 1471 9 , SrcSpan "tests/examples/Attributes.hs" 1471 24 1471 29 , SrcSpan "tests/examples/Attributes.hs" 1473 5 1473 5 , SrcSpan "tests/examples/Attributes.hs" 1479 1 1479 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 10 1471 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 10 1471 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 10 1471 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 10 1471 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 10 1471 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 19 1471 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 19 1471 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1471 19 1471 23 , srcInfoPoints = [] } "Pack"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 5 1475 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 5 1475 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 5 1473 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 5 1473 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 15 1475 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1473 15 1473 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 17 1475 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 17 1473 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 17 1473 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 17 1473 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 23 1475 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1473 23 1473 24 , SrcSpan "tests/examples/Attributes.hs" 1474 23 1474 24 , SrcSpan "tests/examples/Attributes.hs" 1475 23 1475 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 25 1473 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 25 1473 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 25 1473 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 25 1473 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 25 1473 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 31 1473 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 31 1473 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 31 1473 41 , srcInfoPoints = [] } "PackMargin")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 42 1473 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 42 1473 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1473 42 1473 51 , srcInfoPoints = [] } "parseUnqt"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 25 1474 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 25 1474 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 25 1474 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 25 1474 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 25 1474 30 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 31 1474 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1474 31 1474 32 , SrcSpan "tests/examples/Attributes.hs" 1474 52 1474 53 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 32 1474 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 32 1474 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 32 1474 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 32 1474 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 32 1474 36 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 37 1474 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 37 1474 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 37 1474 45 , srcInfoPoints = [] } "DontPack")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 46 1474 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 46 1474 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 46 1474 52 , srcInfoPoints = [] } "DoPack")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 54 1474 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 54 1474 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1474 54 1474 62 , srcInfoPoints = [] } "onlyBool"))) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 1 1485 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1479 15 1479 16 , SrcSpan "tests/examples/Attributes.hs" 1480 15 1480 16 , SrcSpan "tests/examples/Attributes.hs" 1481 15 1481 16 , SrcSpan "tests/examples/Attributes.hs" 1482 15 1482 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 1 1479 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 6 1479 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 6 1479 14 , srcInfoPoints = [] } "PackMode")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 17 1479 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 17 1479 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1479 17 1479 25 , srcInfoPoints = [] } "PackNode") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1480 17 1480 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1480 17 1480 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1480 17 1480 26 , srcInfoPoints = [] } "PackClust") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1481 17 1481 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1481 17 1481 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1481 17 1481 26 , srcInfoPoints = [] } "PackGraph") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 17 1482 48 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 17 1482 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 17 1482 26 , srcInfoPoints = [] } "PackArray") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 27 1482 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 27 1482 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 27 1482 31 , srcInfoPoints = [] } "Bool")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 32 1482 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 32 1482 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 32 1482 36 , srcInfoPoints = [] } "Bool")) , TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 37 1482 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1482 37 1482 38 , SrcSpan "tests/examples/Attributes.hs" 1482 47 1482 48 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 38 1482 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 38 1482 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 38 1482 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 38 1482 43 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 44 1482 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 44 1482 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1482 44 1482 47 , srcInfoPoints = [] } "Int")))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 17 1485 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1485 17 1485 25 , SrcSpan "tests/examples/Attributes.hs" 1485 26 1485 27 , SrcSpan "tests/examples/Attributes.hs" 1485 29 1485 30 , SrcSpan "tests/examples/Attributes.hs" 1485 34 1485 35 , SrcSpan "tests/examples/Attributes.hs" 1485 40 1485 41 , SrcSpan "tests/examples/Attributes.hs" 1485 46 1485 47 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 27 1485 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 27 1485 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 27 1485 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 27 1485 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 31 1485 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 31 1485 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 31 1485 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 31 1485 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 36 1485 40 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 36 1485 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 36 1485 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 36 1485 40 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 42 1485 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 42 1485 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 42 1485 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1485 42 1485 46 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 1 1505 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1487 1 1487 9 , SrcSpan "tests/examples/Attributes.hs" 1487 28 1487 33 , SrcSpan "tests/examples/Attributes.hs" 1488 5 1488 5 , SrcSpan "tests/examples/Attributes.hs" 1489 5 1489 5 , SrcSpan "tests/examples/Attributes.hs" 1490 5 1490 5 , SrcSpan "tests/examples/Attributes.hs" 1491 5 1491 5 , SrcSpan "tests/examples/Attributes.hs" 1505 1 1505 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 10 1487 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 10 1487 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 10 1487 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 10 1487 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 10 1487 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 19 1487 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 19 1487 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1487 19 1487 27 , srcInfoPoints = [] } "PackMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 5 1503 24 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 5 1503 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 5 1488 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 5 1488 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 13 1488 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 13 1488 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 13 1488 21 , srcInfoPoints = [] } "PackNode")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 32 1488 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1488 32 1488 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 34 1488 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 34 1488 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 34 1488 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 34 1488 38 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 39 1488 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1488 39 1488 45 , srcInfoPoints = [] } "node" "node")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 5 1489 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 5 1489 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 13 1489 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 13 1489 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 13 1489 22 , srcInfoPoints = [] } "PackClust")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 32 1489 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1489 32 1489 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 34 1489 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 34 1489 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 34 1489 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 34 1489 38 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 39 1489 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1489 39 1489 46 , srcInfoPoints = [] } "clust" "clust")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 5 1490 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 5 1490 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 13 1490 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 13 1490 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 13 1490 22 , srcInfoPoints = [] } "PackGraph")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 32 1490 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1490 32 1490 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 34 1490 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 34 1490 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 34 1490 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 34 1490 38 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 39 1490 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1490 39 1490 46 , srcInfoPoints = [] } "graph" "graph")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 5 1503 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1493 9 1493 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 5 1491 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 13 1491 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1491 13 1491 14 , SrcSpan "tests/examples/Attributes.hs" 1491 30 1491 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 14 1491 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 14 1491 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 14 1491 23 , srcInfoPoints = [] } "PackArray")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 24 1491 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 24 1491 25 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 26 1491 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 26 1491 27 , srcInfoPoints = [] } "u") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 28 1491 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 28 1491 30 , srcInfoPoints = [] } "mi") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 32 1492 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1491 32 1491 33 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 34 1492 48 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 34 1491 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 34 1491 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 34 1491 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 34 1491 40 , srcInfoPoints = [] } "addNum"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 41 1491 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 41 1491 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 41 1491 42 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 43 1491 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 43 1491 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 43 1491 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 43 1491 46 , srcInfoPoints = [] } "isU"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 47 1491 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 47 1491 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 47 1491 48 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 49 1491 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 49 1491 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 49 1491 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 49 1491 52 , srcInfoPoints = [] } "isC"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 53 1491 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 53 1491 54 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 53 1491 54 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 55 1491 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 55 1491 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1491 55 1491 62 , srcInfoPoints = [] } "isUnder")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 34 1492 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 34 1492 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 34 1492 35 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 36 1492 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 36 1492 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 36 1492 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 36 1492 40 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 41 1492 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1492 41 1492 48 , srcInfoPoints = [] } "array" "array"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 11 1503 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1494 11 1494 11 , SrcSpan "tests/examples/Attributes.hs" 1495 11 1495 11 , SrcSpan "tests/examples/Attributes.hs" 1498 11 1498 11 , SrcSpan "tests/examples/Attributes.hs" 1501 11 1501 11 , SrcSpan "tests/examples/Attributes.hs" 1505 1 1505 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 11 1494 53 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 11 1494 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 11 1494 17 , srcInfoPoints = [] } "addNum")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 18 1494 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1494 18 1494 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 20 1494 25 , srcInfoPoints = [] } "maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 26 1494 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 26 1494 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 26 1494 28 , srcInfoPoints = [] } "id")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 29 1494 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1494 29 1494 30 , SrcSpan "tests/examples/Attributes.hs" 1494 49 1494 50 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 30 1494 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 30 1494 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 30 1494 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 30 1494 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 30 1494 34 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 35 1494 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1494 35 1494 36 , SrcSpan "tests/examples/Attributes.hs" 1494 36 1494 38 , SrcSpan "tests/examples/Attributes.hs" 1494 38 1494 39 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 35 1494 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1494 35 1494 36 , SrcSpan "tests/examples/Attributes.hs" 1494 36 1494 38 , SrcSpan "tests/examples/Attributes.hs" 1494 38 1494 39 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 36 1494 38 , srcInfoPoints = [] } "<>")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 40 1494 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 40 1494 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 40 1494 41 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 42 1494 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 42 1494 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 42 1494 49 , srcInfoPoints = [] } "unqtDot")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 51 1494 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 51 1494 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1494 51 1494 53 , srcInfoPoints = [] } "mi"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 11 1497 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 11 1495 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 11 1495 18 , srcInfoPoints = [] } "isUnder")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 19 1497 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1495 19 1495 20 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 21 1497 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1495 21 1495 23 , SrcSpan "tests/examples/Attributes.hs" 1496 21 1496 25 , SrcSpan "tests/examples/Attributes.hs" 1497 21 1497 25 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 24 1495 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 24 1495 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 24 1495 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 24 1495 25 , srcInfoPoints = [] } "c"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 26 1495 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 26 1495 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 26 1495 28 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 29 1495 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 29 1495 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1495 29 1495 30 , srcInfoPoints = [] } "u")))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 26 1496 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 26 1496 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 26 1496 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 26 1496 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 26 1496 30 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 31 1496 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1496 31 1496 32 , SrcSpan "tests/examples/Attributes.hs" 1496 32 1496 34 , SrcSpan "tests/examples/Attributes.hs" 1496 34 1496 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 31 1496 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1496 31 1496 32 , SrcSpan "tests/examples/Attributes.hs" 1496 32 1496 34 , SrcSpan "tests/examples/Attributes.hs" 1496 34 1496 35 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 32 1496 34 , srcInfoPoints = [] } "<>")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 36 1496 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 36 1496 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 36 1496 37 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 38 1496 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 38 1496 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 38 1496 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 38 1496 42 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 43 1496 46 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1496 43 1496 46 , srcInfoPoints = [] } '_' "_")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1497 26 1497 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1497 26 1497 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1497 26 1497 28 , srcInfoPoints = [] } "id"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 11 1500 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 11 1498 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 11 1498 14 , srcInfoPoints = [] } "isC")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 15 1500 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1498 15 1498 16 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 17 1500 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1498 17 1498 19 , SrcSpan "tests/examples/Attributes.hs" 1499 17 1499 21 , SrcSpan "tests/examples/Attributes.hs" 1500 17 1500 21 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 20 1498 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 20 1498 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1498 20 1498 21 , srcInfoPoints = [] } "c"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 22 1499 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 22 1499 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 22 1499 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 22 1499 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 22 1499 26 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 27 1499 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1499 27 1499 28 , SrcSpan "tests/examples/Attributes.hs" 1499 28 1499 30 , SrcSpan "tests/examples/Attributes.hs" 1499 30 1499 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 27 1499 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1499 27 1499 28 , SrcSpan "tests/examples/Attributes.hs" 1499 28 1499 30 , SrcSpan "tests/examples/Attributes.hs" 1499 30 1499 31 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 28 1499 30 , srcInfoPoints = [] } "<>")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 32 1499 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 32 1499 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 32 1499 33 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 34 1499 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 34 1499 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 34 1499 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 34 1499 38 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 39 1499 42 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1499 39 1499 42 , srcInfoPoints = [] } 'c' "c")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1500 22 1500 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1500 22 1500 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1500 22 1500 24 , srcInfoPoints = [] } "id"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 11 1503 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 11 1501 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 11 1501 14 , srcInfoPoints = [] } "isU")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 15 1503 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1501 15 1501 16 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 17 1503 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1501 17 1501 19 , SrcSpan "tests/examples/Attributes.hs" 1502 17 1502 21 , SrcSpan "tests/examples/Attributes.hs" 1503 17 1503 21 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 20 1501 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 20 1501 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1501 20 1501 21 , srcInfoPoints = [] } "u"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 22 1502 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 22 1502 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 22 1502 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 22 1502 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 22 1502 26 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 27 1502 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1502 27 1502 28 , SrcSpan "tests/examples/Attributes.hs" 1502 28 1502 30 , SrcSpan "tests/examples/Attributes.hs" 1502 30 1502 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 27 1502 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1502 27 1502 28 , SrcSpan "tests/examples/Attributes.hs" 1502 28 1502 30 , SrcSpan "tests/examples/Attributes.hs" 1502 30 1502 31 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 28 1502 30 , srcInfoPoints = [] } "<>")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 32 1502 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 32 1502 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 32 1502 33 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 34 1502 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 34 1502 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 34 1502 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 34 1502 38 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 39 1502 42 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1502 39 1502 42 , srcInfoPoints = [] } 'u' "u")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1503 22 1503 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1503 22 1503 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1503 22 1503 24 , srcInfoPoints = [] } "id"))))) Nothing ])) ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 1 1524 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1505 1 1505 9 , SrcSpan "tests/examples/Attributes.hs" 1505 28 1505 33 , SrcSpan "tests/examples/Attributes.hs" 1506 5 1506 5 , SrcSpan "tests/examples/Attributes.hs" 1524 1 1524 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 10 1505 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 10 1505 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 10 1505 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 10 1505 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 10 1505 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 19 1505 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 19 1505 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1505 19 1505 27 , srcInfoPoints = [] } "PackMode"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 5 1520 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1517 9 1517 14 ] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 5 1520 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1517 9 1517 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 5 1506 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 5 1506 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 15 1516 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1506 15 1506 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 17 1516 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 17 1506 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 17 1506 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 17 1506 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 23 1516 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1506 23 1506 24 , SrcSpan "tests/examples/Attributes.hs" 1507 23 1507 24 , SrcSpan "tests/examples/Attributes.hs" 1508 23 1508 24 , SrcSpan "tests/examples/Attributes.hs" 1509 23 1509 24 , SrcSpan "tests/examples/Attributes.hs" 1516 23 1516 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 25 1506 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 25 1506 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 25 1506 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 25 1506 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 25 1506 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 35 1506 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 35 1506 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 35 1506 43 , srcInfoPoints = [] } "PackNode")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 44 1506 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1506 44 1506 50 , srcInfoPoints = [] } "node" "node")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 25 1507 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 25 1507 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 25 1507 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 25 1507 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 25 1507 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 35 1507 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 35 1507 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 35 1507 44 , srcInfoPoints = [] } "PackClust")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 45 1507 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1507 45 1507 52 , srcInfoPoints = [] } "clust" "clust")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 25 1508 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 25 1508 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 25 1508 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 25 1508 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 25 1508 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 35 1508 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 35 1508 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 35 1508 44 , srcInfoPoints = [] } "PackGraph")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 45 1508 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1508 45 1508 52 , srcInfoPoints = [] } "graph" "graph")) , Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 25 1515 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1509 25 1509 27 , SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 28 , SrcSpan "tests/examples/Attributes.hs" 1510 28 1510 28 , SrcSpan "tests/examples/Attributes.hs" 1512 28 1512 28 , SrcSpan "tests/examples/Attributes.hs" 1514 28 1514 28 , SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 28 , SrcSpan "tests/examples/Attributes.hs" 1516 23 1516 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 28 1509 34 , srcInfoPoints = [] } "string"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 35 1509 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1509 35 1509 42 , srcInfoPoints = [] } "array" "array"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 28 1511 69 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1510 32 1510 34 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 28 1510 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 28 1510 31 , srcInfoPoints = [] } "mcu")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 35 1511 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 35 1510 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 35 1510 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 35 1510 43 , srcInfoPoints = [] } "optional"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 44 1510 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 44 1510 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 44 1510 45 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 46 1511 69 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1510 46 1510 48 , SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 49 , SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 49 , SrcSpan "tests/examples/Attributes.hs" 1512 28 1512 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 49 1510 58 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 59 1510 62 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1510 59 1510 62 , srcInfoPoints = [] } '_' "_"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 69 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 49 1511 54 , srcInfoPoints = [] } "many1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 55 1511 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 55 1511 56 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 55 1511 56 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 57 1511 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 57 1511 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 57 1511 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 57 1511 64 , srcInfoPoints = [] } "satisfy"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 65 1511 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 65 1511 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1511 65 1511 69 , srcInfoPoints = [] } "isCU"))))) ])) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 28 1513 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1512 28 1512 31 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 32 1513 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1512 32 1512 32 , SrcSpan "tests/examples/Attributes.hs" 1513 32 1513 32 , SrcSpan "tests/examples/Attributes.hs" 1514 28 1514 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 32 1512 56 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 32 1512 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 32 1512 33 , srcInfoPoints = [] } "c")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 34 1512 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1512 34 1512 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 36 1512 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 36 1512 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 36 1512 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 36 1512 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 36 1512 48 , srcInfoPoints = [] } "hasCharacter"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 49 1512 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 49 1512 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 49 1512 52 , srcInfoPoints = [] } "mcu")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 53 1512 56 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1512 53 1512 56 , srcInfoPoints = [] } 'c' "c")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 32 1513 56 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 32 1513 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 32 1513 33 , srcInfoPoints = [] } "u")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 34 1513 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1513 34 1513 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 36 1513 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 36 1513 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 36 1513 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 36 1513 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 36 1513 48 , srcInfoPoints = [] } "hasCharacter"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 49 1513 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 49 1513 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 49 1513 52 , srcInfoPoints = [] } "mcu")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 53 1513 56 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1513 53 1513 56 , srcInfoPoints = [] } 'u' "u")))) Nothing ]) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 28 1514 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1514 31 1514 33 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 28 1514 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 28 1514 30 , srcInfoPoints = [] } "mi")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 34 1514 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 34 1514 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 34 1514 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 34 1514 42 , srcInfoPoints = [] } "optional"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 43 1514 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 43 1514 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1514 43 1514 52 , srcInfoPoints = [] } "parseUnqt")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 53 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 28 1515 34 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 35 1515 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 35 1515 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 35 1515 36 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 48 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 37 1515 46 , srcInfoPoints = [] } "PackArray"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 47 1515 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 47 1515 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 47 1515 48 , srcInfoPoints = [] } "c")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 49 1515 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 49 1515 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 49 1515 50 , srcInfoPoints = [] } "u")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 51 1515 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 51 1515 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1515 51 1515 53 , srcInfoPoints = [] } "mi"))))) ] ]))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 11 1520 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1518 11 1518 11 , SrcSpan "tests/examples/Attributes.hs" 1520 11 1520 11 , SrcSpan "tests/examples/Attributes.hs" 1524 1 1524 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 11 1518 54 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 11 1518 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 11 1518 23 , srcInfoPoints = [] } "hasCharacter") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 24 1518 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 24 1518 26 , srcInfoPoints = [] } "ms") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 27 1518 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 27 1518 28 , srcInfoPoints = [] } "c") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 29 1518 54 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1518 29 1518 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 31 1518 36 , srcInfoPoints = [] } "maybe"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 37 1518 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 37 1518 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 37 1518 42 , srcInfoPoints = [] } "False")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 43 1518 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1518 43 1518 44 , SrcSpan "tests/examples/Attributes.hs" 1518 50 1518 51 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 44 1518 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 44 1518 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 44 1518 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 44 1518 48 , srcInfoPoints = [] } "elem"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 49 1518 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 49 1518 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 49 1518 50 , srcInfoPoints = [] } "c")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 52 1518 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 52 1518 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1518 52 1518 54 , srcInfoPoints = [] } "ms"))))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 11 1520 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 11 1520 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 11 1520 15 , srcInfoPoints = [] } "isCU")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 16 1520 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1520 16 1520 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 18 1520 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 18 1520 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 18 1520 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 18 1520 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 18 1520 22 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 23 1520 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 23 1520 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 23 1520 27 , srcInfoPoints = [] } "elem")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 28 1520 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1520 28 1520 29 , SrcSpan "tests/examples/Attributes.hs" 1520 32 1520 33 , SrcSpan "tests/examples/Attributes.hs" 1520 37 1520 38 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 29 1520 32 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 29 1520 32 , srcInfoPoints = [] } 'c' "c") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 34 1520 37 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1520 34 1520 37 , srcInfoPoints = [] } 'u' "u") ]))) Nothing ]))) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 1 1526 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1524 10 1524 11 , SrcSpan "tests/examples/Attributes.hs" 1525 10 1525 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 1 1524 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 6 1524 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 6 1524 9 , srcInfoPoints = [] } "Pos")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 12 1524 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 12 1524 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 12 1524 20 , srcInfoPoints = [] } "PointPos") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 21 1524 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 21 1524 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1524 21 1524 26 , srcInfoPoints = [] } "Point")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 12 1525 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 12 1525 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 12 1525 21 , srcInfoPoints = [] } "SplinePos") [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 22 1525 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1525 22 1525 23 , SrcSpan "tests/examples/Attributes.hs" 1525 29 1525 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 23 1525 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 23 1525 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1525 23 1525 29 , srcInfoPoints = [] } "Spline"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 12 1526 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1526 12 1526 20 , SrcSpan "tests/examples/Attributes.hs" 1526 21 1526 22 , SrcSpan "tests/examples/Attributes.hs" 1526 24 1526 25 , SrcSpan "tests/examples/Attributes.hs" 1526 29 1526 30 , SrcSpan "tests/examples/Attributes.hs" 1526 35 1526 36 , SrcSpan "tests/examples/Attributes.hs" 1526 41 1526 42 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 22 1526 24 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 22 1526 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 22 1526 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 22 1526 24 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 26 1526 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 26 1526 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 26 1526 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 26 1526 29 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 31 1526 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 31 1526 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 31 1526 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 31 1526 35 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 37 1526 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 37 1526 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 37 1526 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1526 37 1526 41 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 1 1535 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1528 1 1528 9 , SrcSpan "tests/examples/Attributes.hs" 1528 23 1528 28 , SrcSpan "tests/examples/Attributes.hs" 1529 5 1529 5 , SrcSpan "tests/examples/Attributes.hs" 1530 5 1530 5 , SrcSpan "tests/examples/Attributes.hs" 1532 5 1532 5 , SrcSpan "tests/examples/Attributes.hs" 1533 5 1533 5 , SrcSpan "tests/examples/Attributes.hs" 1535 1 1535 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 10 1528 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 10 1528 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 10 1528 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 10 1528 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 10 1528 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 19 1528 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 19 1528 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1528 19 1528 22 , srcInfoPoints = [] } "Pos"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 5 1530 40 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 5 1530 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 5 1529 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 5 1529 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 13 1529 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1529 13 1529 14 , SrcSpan "tests/examples/Attributes.hs" 1529 24 1529 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 14 1529 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 14 1529 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 14 1529 22 , srcInfoPoints = [] } "PointPos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 23 1529 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 23 1529 24 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 28 1529 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1529 28 1529 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 30 1529 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 30 1529 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 30 1529 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 30 1529 37 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 38 1529 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 38 1529 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1529 38 1529 39 , srcInfoPoints = [] } "p"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 5 1530 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 5 1530 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 13 1530 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1530 13 1530 14 , SrcSpan "tests/examples/Attributes.hs" 1530 26 1530 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 14 1530 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 14 1530 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 14 1530 23 , srcInfoPoints = [] } "SplinePos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 24 1530 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 24 1530 26 , srcInfoPoints = [] } "ss") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 28 1530 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1530 28 1530 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 30 1530 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 30 1530 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 30 1530 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 30 1530 37 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 38 1530 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 38 1530 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1530 38 1530 40 , srcInfoPoints = [] } "ss"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 5 1533 36 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 5 1533 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 5 1532 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 5 1532 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 11 1532 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1532 11 1532 12 , SrcSpan "tests/examples/Attributes.hs" 1532 22 1532 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 12 1532 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 12 1532 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 12 1532 20 , srcInfoPoints = [] } "PointPos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 21 1532 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 21 1532 22 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 26 1532 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1532 26 1532 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 28 1532 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 28 1532 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 28 1532 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 28 1532 33 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 34 1532 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 34 1532 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1532 34 1532 35 , srcInfoPoints = [] } "p"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 5 1533 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 5 1533 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 11 1533 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1533 11 1533 12 , SrcSpan "tests/examples/Attributes.hs" 1533 24 1533 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 12 1533 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 12 1533 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 12 1533 21 , srcInfoPoints = [] } "SplinePos")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 22 1533 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 22 1533 24 , srcInfoPoints = [] } "ss") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 26 1533 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1533 26 1533 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 28 1533 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 28 1533 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 28 1533 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 28 1533 33 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 34 1533 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 34 1533 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1533 34 1533 36 , srcInfoPoints = [] } "ss"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 1 1550 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1535 1 1535 9 , SrcSpan "tests/examples/Attributes.hs" 1535 23 1535 28 , SrcSpan "tests/examples/Attributes.hs" 1540 5 1540 5 , SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 5 , SrcSpan "tests/examples/Attributes.hs" 1550 1 1550 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 10 1535 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 10 1535 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 10 1535 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 10 1535 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 10 1535 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 19 1535 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 19 1535 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1535 19 1535 22 , srcInfoPoints = [] } "Pos"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 5 1543 78 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 5 1543 78 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 5 1540 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 5 1540 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 15 1543 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1540 15 1540 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 17 1543 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1540 17 1540 19 , SrcSpan "tests/examples/Attributes.hs" 1540 20 1540 20 , SrcSpan "tests/examples/Attributes.hs" 1541 20 1541 20 , SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 20 1540 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1540 26 1540 28 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 20 1540 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 20 1540 25 , srcInfoPoints = [] } "splns")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 29 1540 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 29 1540 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1540 29 1540 38 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1541 20 1543 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1541 20 1541 24 , SrcSpan "tests/examples/Attributes.hs" 1541 31 1541 33 , SrcSpan "tests/examples/Attributes.hs" 1542 22 1542 22 , SrcSpan "tests/examples/Attributes.hs" 1543 22 1543 22 , SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 0 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1541 20 1543 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1541 20 1541 24 , SrcSpan "tests/examples/Attributes.hs" 1541 31 1541 33 , SrcSpan "tests/examples/Attributes.hs" 1542 22 1542 22 , SrcSpan "tests/examples/Attributes.hs" 1543 22 1543 22 , SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1541 25 1541 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1541 25 1541 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1541 25 1541 30 , srcInfoPoints = [] } "splns"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 22 1542 73 , srcInfoPoints = [] } (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 22 1542 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1542 22 1542 23 , SrcSpan "tests/examples/Attributes.hs" 1542 49 1542 50 ] } [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 23 1542 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 23 1542 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 23 1542 29 , srcInfoPoints = [] } "Spline")) [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 30 1542 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 30 1542 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 30 1542 37 , srcInfoPoints = [] } "Nothing")) [] , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 38 1542 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 38 1542 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 38 1542 45 , srcInfoPoints = [] } "Nothing")) [] , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 46 1542 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1542 46 1542 47 , SrcSpan "tests/examples/Attributes.hs" 1542 48 1542 49 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 47 1542 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 47 1542 48 , srcInfoPoints = [] } "p") ] ] ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 51 1542 73 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1542 51 1542 53 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 54 1542 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 54 1542 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 54 1542 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 54 1542 60 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 61 1542 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 61 1542 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 61 1542 62 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 63 1542 73 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 63 1542 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 63 1542 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 63 1542 71 , srcInfoPoints = [] } "PointPos"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 72 1542 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 72 1542 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1542 72 1542 73 , srcInfoPoints = [] } "p")))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 22 1543 78 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 22 1543 23 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 51 1543 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1543 51 1543 53 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 54 1543 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 54 1543 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 54 1543 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 54 1543 60 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 61 1543 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 61 1543 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 61 1543 62 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 63 1543 78 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 63 1543 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 63 1543 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 63 1543 72 , srcInfoPoints = [] } "SplinePos"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 73 1543 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 73 1543 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1543 73 1543 78 , srcInfoPoints = [] } "splns")))))) Nothing ]) ])) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 5 1545 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 11 1545 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1545 11 1545 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 13 1545 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 13 1545 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 13 1545 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 13 1545 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 25 1545 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 25 1545 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1545 25 1545 34 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 1 1555 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1550 15 1550 16 , SrcSpan "tests/examples/Attributes.hs" 1551 15 1551 16 , SrcSpan "tests/examples/Attributes.hs" 1552 15 1552 16 , SrcSpan "tests/examples/Attributes.hs" 1553 15 1553 16 , SrcSpan "tests/examples/Attributes.hs" 1554 15 1554 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 1 1550 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 6 1550 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 6 1550 14 , srcInfoPoints = [] } "EdgeType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 17 1550 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 17 1550 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1550 17 1550 28 , srcInfoPoints = [] } "SplineEdges") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1551 17 1551 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1551 17 1551 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1551 17 1551 26 , srcInfoPoints = [] } "LineEdges") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1552 17 1552 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1552 17 1552 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1552 17 1552 24 , srcInfoPoints = [] } "NoEdges") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1553 17 1553 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1553 17 1553 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1553 17 1553 25 , srcInfoPoints = [] } "PolyLine") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1554 17 1554 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1554 17 1554 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1554 17 1554 29 , srcInfoPoints = [] } "CompoundEdge") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 17 1555 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1555 17 1555 25 , SrcSpan "tests/examples/Attributes.hs" 1555 26 1555 27 , SrcSpan "tests/examples/Attributes.hs" 1555 29 1555 30 , SrcSpan "tests/examples/Attributes.hs" 1555 34 1555 35 , SrcSpan "tests/examples/Attributes.hs" 1555 43 1555 44 , SrcSpan "tests/examples/Attributes.hs" 1555 49 1555 50 , SrcSpan "tests/examples/Attributes.hs" 1555 55 1555 56 , SrcSpan "tests/examples/Attributes.hs" 1555 61 1555 62 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 27 1555 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 27 1555 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 27 1555 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 27 1555 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 31 1555 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 31 1555 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 31 1555 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 31 1555 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 36 1555 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 36 1555 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 36 1555 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 36 1555 43 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 45 1555 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 45 1555 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 45 1555 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 45 1555 49 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 51 1555 55 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 51 1555 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 51 1555 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 51 1555 55 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 57 1555 61 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 57 1555 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 57 1555 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1555 57 1555 61 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 1 1567 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1557 1 1557 9 , SrcSpan "tests/examples/Attributes.hs" 1557 28 1557 33 , SrcSpan "tests/examples/Attributes.hs" 1558 5 1558 5 , SrcSpan "tests/examples/Attributes.hs" 1559 5 1559 5 , SrcSpan "tests/examples/Attributes.hs" 1560 5 1560 5 , SrcSpan "tests/examples/Attributes.hs" 1561 5 1561 5 , SrcSpan "tests/examples/Attributes.hs" 1562 5 1562 5 , SrcSpan "tests/examples/Attributes.hs" 1564 5 1564 5 , SrcSpan "tests/examples/Attributes.hs" 1565 5 1565 5 , SrcSpan "tests/examples/Attributes.hs" 1567 1 1567 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 10 1557 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 10 1557 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 10 1557 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 10 1557 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 10 1557 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 19 1557 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 19 1557 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1557 19 1557 27 , srcInfoPoints = [] } "EdgeType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 5 1562 43 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 5 1562 43 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 5 1558 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 5 1558 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 13 1558 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 13 1558 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 13 1558 24 , srcInfoPoints = [] } "SplineEdges")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 26 1558 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1558 26 1558 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 28 1558 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 28 1558 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 28 1558 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 28 1558 33 , srcInfoPoints = [] } "toDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 34 1558 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 34 1558 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1558 34 1558 38 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 5 1559 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 5 1559 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 13 1559 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 13 1559 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 13 1559 22 , srcInfoPoints = [] } "LineEdges")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 26 1559 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1559 26 1559 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 28 1559 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 28 1559 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 28 1559 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 28 1559 33 , srcInfoPoints = [] } "toDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 34 1559 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 34 1559 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1559 34 1559 39 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 5 1560 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 5 1560 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 13 1560 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 13 1560 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 13 1560 20 , srcInfoPoints = [] } "NoEdges")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 26 1560 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1560 26 1560 27 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 28 1560 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 28 1560 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1560 28 1560 33 , srcInfoPoints = [] } "empty")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 5 1561 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 5 1561 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 13 1561 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 13 1561 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 13 1561 21 , srcInfoPoints = [] } "PolyLine")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 26 1561 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1561 26 1561 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 28 1561 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 28 1561 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 28 1561 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 28 1561 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 33 1561 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1561 33 1561 43 , srcInfoPoints = [] } "polyline" "polyline")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 5 1562 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 5 1562 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 13 1562 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 13 1562 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 13 1562 25 , srcInfoPoints = [] } "CompoundEdge")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 26 1562 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1562 26 1562 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 28 1562 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 28 1562 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 28 1562 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 28 1562 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 33 1562 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1562 33 1562 43 , srcInfoPoints = [] } "compound" "compound")))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 5 1565 31 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 5 1565 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 5 1564 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 5 1564 10 , srcInfoPoints = [] } "toDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 11 1564 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 11 1564 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 11 1564 18 , srcInfoPoints = [] } "NoEdges")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 19 1564 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1564 19 1564 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 21 1564 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 21 1564 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 21 1564 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 21 1564 33 , srcInfoPoints = [] } "doubleQuotes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 34 1564 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 34 1564 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1564 34 1564 39 , srcInfoPoints = [] } "empty"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 5 1565 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 5 1565 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 11 1565 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 11 1565 13 , srcInfoPoints = [] } "et") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 19 1565 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1565 19 1565 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 21 1565 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 21 1565 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 21 1565 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 21 1565 28 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 29 1565 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 29 1565 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1565 29 1565 31 , srcInfoPoints = [] } "et"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 1 1584 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1567 1 1567 9 , SrcSpan "tests/examples/Attributes.hs" 1567 28 1567 33 , SrcSpan "tests/examples/Attributes.hs" 1569 5 1569 5 , SrcSpan "tests/examples/Attributes.hs" 1576 5 1576 5 , SrcSpan "tests/examples/Attributes.hs" 1584 1 1584 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 10 1567 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 10 1567 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 10 1567 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 10 1567 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 10 1567 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 19 1567 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 19 1567 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1567 19 1567 27 , srcInfoPoints = [] } "EdgeType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 5 1574 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 5 1574 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 5 1569 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 5 1569 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 15 1574 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1569 15 1569 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 17 1574 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 17 1569 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 17 1569 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 17 1569 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 23 1574 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1569 23 1569 24 , SrcSpan "tests/examples/Attributes.hs" 1570 23 1570 24 , SrcSpan "tests/examples/Attributes.hs" 1571 23 1571 24 , SrcSpan "tests/examples/Attributes.hs" 1572 23 1572 24 , SrcSpan "tests/examples/Attributes.hs" 1573 23 1573 24 , SrcSpan "tests/examples/Attributes.hs" 1574 23 1574 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 25 1569 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 25 1569 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 25 1569 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 25 1569 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 25 1569 30 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 31 1569 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1569 31 1569 32 , SrcSpan "tests/examples/Attributes.hs" 1569 58 1569 59 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 32 1569 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 32 1569 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 32 1569 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 32 1569 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 32 1569 36 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 37 1569 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 37 1569 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 37 1569 46 , srcInfoPoints = [] } "LineEdges")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 47 1569 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 47 1569 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 47 1569 58 , srcInfoPoints = [] } "SplineEdges")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 60 1569 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 60 1569 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1569 60 1569 65 , srcInfoPoints = [] } "parse"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 25 1570 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 25 1570 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 25 1570 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 25 1570 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 25 1570 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 35 1570 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 35 1570 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 35 1570 46 , srcInfoPoints = [] } "SplineEdges")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 47 1570 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1570 47 1570 55 , srcInfoPoints = [] } "spline" "spline")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 25 1571 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 25 1571 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 25 1571 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 25 1571 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 25 1571 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 35 1571 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 35 1571 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 35 1571 44 , srcInfoPoints = [] } "LineEdges")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 45 1571 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1571 45 1571 51 , srcInfoPoints = [] } "line" "line")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 25 1572 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 25 1572 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 25 1572 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 25 1572 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 25 1572 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 35 1572 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 35 1572 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 35 1572 43 , srcInfoPoints = [] } "PolyLine")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 44 1572 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1572 44 1572 54 , srcInfoPoints = [] } "polyline" "polyline")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 25 1573 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 25 1573 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 25 1573 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 25 1573 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 25 1573 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 35 1573 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 35 1573 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 35 1573 47 , srcInfoPoints = [] } "CompoundEdge")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 48 1573 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1573 48 1573 58 , srcInfoPoints = [] } "compound" "compound")) ]))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 5 1578 37 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 5 1578 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 5 1576 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 5 1576 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 11 1578 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1576 11 1576 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1578 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1576 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1576 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1576 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1576 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 13 1576 22 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 23 1576 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 23 1576 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 23 1576 30 , srcInfoPoints = [] } "NoEdges")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 31 1576 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1576 31 1576 37 , srcInfoPoints = [] } "\"\"" "\\\"\\\""))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1577 13 1577 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1577 13 1577 14 , SrcSpan "tests/examples/Attributes.hs" 1577 14 1577 20 , SrcSpan "tests/examples/Attributes.hs" 1577 20 1577 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1577 13 1577 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1577 13 1577 14 , SrcSpan "tests/examples/Attributes.hs" 1577 14 1577 20 , SrcSpan "tests/examples/Attributes.hs" 1577 20 1577 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1577 14 1577 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 13 1578 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 13 1578 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 13 1578 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 13 1578 27 , srcInfoPoints = [] } "optionalQuoted"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 28 1578 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 28 1578 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1578 28 1578 37 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 1 1585 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1584 14 1584 15 , SrcSpan "tests/examples/Attributes.hs" 1584 19 1584 20 , SrcSpan "tests/examples/Attributes.hs" 1584 24 1584 25 , SrcSpan "tests/examples/Attributes.hs" 1584 29 1584 30 , SrcSpan "tests/examples/Attributes.hs" 1584 34 1584 35 , SrcSpan "tests/examples/Attributes.hs" 1584 39 1584 40 , SrcSpan "tests/examples/Attributes.hs" 1584 44 1584 45 , SrcSpan "tests/examples/Attributes.hs" 1584 49 1584 50 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 1 1584 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 6 1584 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 6 1584 13 , srcInfoPoints = [] } "PageDir")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 16 1584 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 16 1584 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 16 1584 18 , srcInfoPoints = [] } "Bl") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 21 1584 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 21 1584 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 21 1584 23 , srcInfoPoints = [] } "Br") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 26 1584 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 26 1584 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 26 1584 28 , srcInfoPoints = [] } "Tl") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 31 1584 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 31 1584 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 31 1584 33 , srcInfoPoints = [] } "Tr") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 36 1584 38 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 36 1584 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 36 1584 38 , srcInfoPoints = [] } "Rb") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 41 1584 43 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 41 1584 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 41 1584 43 , srcInfoPoints = [] } "Rt") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 46 1584 48 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 46 1584 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 46 1584 48 , srcInfoPoints = [] } "Lb") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 51 1584 53 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 51 1584 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1584 51 1584 53 , srcInfoPoints = [] } "Lt") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 16 1585 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1585 16 1585 24 , SrcSpan "tests/examples/Attributes.hs" 1585 25 1585 26 , SrcSpan "tests/examples/Attributes.hs" 1585 28 1585 29 , SrcSpan "tests/examples/Attributes.hs" 1585 33 1585 34 , SrcSpan "tests/examples/Attributes.hs" 1585 42 1585 43 , SrcSpan "tests/examples/Attributes.hs" 1585 48 1585 49 , SrcSpan "tests/examples/Attributes.hs" 1585 54 1585 55 , SrcSpan "tests/examples/Attributes.hs" 1585 60 1585 61 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 26 1585 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 26 1585 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 26 1585 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 26 1585 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 30 1585 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 30 1585 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 30 1585 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 30 1585 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 35 1585 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 35 1585 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 35 1585 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 35 1585 42 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 44 1585 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 44 1585 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 44 1585 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 44 1585 48 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 50 1585 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 50 1585 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 50 1585 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 50 1585 54 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 56 1585 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 56 1585 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 56 1585 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1585 56 1585 60 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 1 1597 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1587 1 1587 9 , SrcSpan "tests/examples/Attributes.hs" 1587 27 1587 32 , SrcSpan "tests/examples/Attributes.hs" 1588 5 1588 5 , SrcSpan "tests/examples/Attributes.hs" 1589 5 1589 5 , SrcSpan "tests/examples/Attributes.hs" 1590 5 1590 5 , SrcSpan "tests/examples/Attributes.hs" 1591 5 1591 5 , SrcSpan "tests/examples/Attributes.hs" 1592 5 1592 5 , SrcSpan "tests/examples/Attributes.hs" 1593 5 1593 5 , SrcSpan "tests/examples/Attributes.hs" 1594 5 1594 5 , SrcSpan "tests/examples/Attributes.hs" 1595 5 1595 5 , SrcSpan "tests/examples/Attributes.hs" 1597 1 1597 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 10 1587 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 10 1587 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 10 1587 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 10 1587 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 10 1587 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 19 1587 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 19 1587 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1587 19 1587 26 , srcInfoPoints = [] } "PageDir"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 5 1595 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 5 1595 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 5 1588 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 5 1588 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 13 1588 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 13 1588 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 13 1588 15 , srcInfoPoints = [] } "Bl")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 16 1588 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1588 16 1588 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 18 1588 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 18 1588 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 18 1588 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 18 1588 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 23 1588 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1588 23 1588 27 , srcInfoPoints = [] } "BL" "BL")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 5 1589 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 5 1589 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 13 1589 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 13 1589 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 13 1589 15 , srcInfoPoints = [] } "Br")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 16 1589 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1589 16 1589 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 18 1589 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 18 1589 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 18 1589 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 18 1589 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 23 1589 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1589 23 1589 27 , srcInfoPoints = [] } "BR" "BR")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 5 1590 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 5 1590 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 13 1590 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 13 1590 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 13 1590 15 , srcInfoPoints = [] } "Tl")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 16 1590 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1590 16 1590 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 18 1590 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 18 1590 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 18 1590 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 18 1590 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 23 1590 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1590 23 1590 27 , srcInfoPoints = [] } "TL" "TL")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 5 1591 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 5 1591 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 13 1591 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 13 1591 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 13 1591 15 , srcInfoPoints = [] } "Tr")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 16 1591 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1591 16 1591 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 18 1591 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 18 1591 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 18 1591 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 18 1591 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 23 1591 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1591 23 1591 27 , srcInfoPoints = [] } "TR" "TR")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 5 1592 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 5 1592 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 13 1592 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 13 1592 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 13 1592 15 , srcInfoPoints = [] } "Rb")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 16 1592 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1592 16 1592 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 18 1592 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 18 1592 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 18 1592 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 18 1592 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 23 1592 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1592 23 1592 27 , srcInfoPoints = [] } "RB" "RB")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 5 1593 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 5 1593 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 13 1593 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 13 1593 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 13 1593 15 , srcInfoPoints = [] } "Rt")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 16 1593 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1593 16 1593 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 18 1593 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 18 1593 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 18 1593 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 18 1593 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 23 1593 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1593 23 1593 27 , srcInfoPoints = [] } "RT" "RT")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 5 1594 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 5 1594 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 13 1594 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 13 1594 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 13 1594 15 , srcInfoPoints = [] } "Lb")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 16 1594 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1594 16 1594 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 18 1594 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 18 1594 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 18 1594 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 18 1594 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 23 1594 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1594 23 1594 27 , srcInfoPoints = [] } "LB" "LB")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 5 1595 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 5 1595 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 13 1595 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 13 1595 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 13 1595 15 , srcInfoPoints = [] } "Lt")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 16 1595 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1595 16 1595 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 18 1595 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 18 1595 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 18 1595 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 18 1595 22 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 23 1595 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1595 23 1595 27 , srcInfoPoints = [] } "LT" "LT")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 1 1612 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1597 1 1597 9 , SrcSpan "tests/examples/Attributes.hs" 1597 27 1597 32 , SrcSpan "tests/examples/Attributes.hs" 1598 5 1598 5 , SrcSpan "tests/examples/Attributes.hs" 1612 1 1612 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 10 1597 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 10 1597 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 10 1597 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 10 1597 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 10 1597 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 19 1597 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 19 1597 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1597 19 1597 26 , srcInfoPoints = [] } "PageDir"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 5 1606 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 5 1606 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 5 1598 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 5 1598 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 15 1606 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1598 15 1598 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 17 1606 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 17 1598 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 17 1598 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 17 1598 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 23 1606 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1598 23 1598 24 , SrcSpan "tests/examples/Attributes.hs" 1599 23 1599 24 , SrcSpan "tests/examples/Attributes.hs" 1600 23 1600 24 , SrcSpan "tests/examples/Attributes.hs" 1601 23 1601 24 , SrcSpan "tests/examples/Attributes.hs" 1602 23 1602 24 , SrcSpan "tests/examples/Attributes.hs" 1603 23 1603 24 , SrcSpan "tests/examples/Attributes.hs" 1604 23 1604 24 , SrcSpan "tests/examples/Attributes.hs" 1605 23 1605 24 , SrcSpan "tests/examples/Attributes.hs" 1606 23 1606 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 25 1598 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 25 1598 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 25 1598 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 25 1598 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 25 1598 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 35 1598 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 35 1598 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 35 1598 37 , srcInfoPoints = [] } "Bl")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 38 1598 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1598 38 1598 42 , srcInfoPoints = [] } "BL" "BL")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 25 1599 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 25 1599 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 25 1599 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 25 1599 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 25 1599 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 35 1599 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 35 1599 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 35 1599 37 , srcInfoPoints = [] } "Br")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 38 1599 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1599 38 1599 42 , srcInfoPoints = [] } "BR" "BR")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 25 1600 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 25 1600 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 25 1600 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 25 1600 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 25 1600 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 35 1600 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 35 1600 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 35 1600 37 , srcInfoPoints = [] } "Tl")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 38 1600 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1600 38 1600 42 , srcInfoPoints = [] } "TL" "TL")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 25 1601 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 25 1601 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 25 1601 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 25 1601 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 25 1601 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 35 1601 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 35 1601 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 35 1601 37 , srcInfoPoints = [] } "Tr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 38 1601 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1601 38 1601 42 , srcInfoPoints = [] } "TR" "TR")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 25 1602 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 25 1602 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 25 1602 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 25 1602 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 25 1602 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 35 1602 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 35 1602 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 35 1602 37 , srcInfoPoints = [] } "Rb")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 38 1602 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1602 38 1602 42 , srcInfoPoints = [] } "RB" "RB")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 25 1603 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 25 1603 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 25 1603 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 25 1603 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 25 1603 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 35 1603 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 35 1603 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 35 1603 37 , srcInfoPoints = [] } "Rt")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 38 1603 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1603 38 1603 42 , srcInfoPoints = [] } "RT" "RT")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 25 1604 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 25 1604 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 25 1604 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 25 1604 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 25 1604 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 35 1604 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 35 1604 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 35 1604 37 , srcInfoPoints = [] } "Lb")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 38 1604 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1604 38 1604 42 , srcInfoPoints = [] } "LB" "LB")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 25 1605 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 25 1605 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 25 1605 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 25 1605 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 25 1605 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 35 1605 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 35 1605 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 35 1605 37 , srcInfoPoints = [] } "Lt")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 38 1605 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1605 38 1605 42 , srcInfoPoints = [] } "LT" "LT")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 1 1613 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1612 13 1612 14 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 1 1612 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 6 1612 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 6 1612 12 , srcInfoPoints = [] } "Spline")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 15 1612 57 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 15 1612 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 15 1612 21 , srcInfoPoints = [] } "Spline") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 22 1612 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1612 22 1612 23 , SrcSpan "tests/examples/Attributes.hs" 1612 34 1612 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 23 1612 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 23 1612 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 23 1612 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 23 1612 28 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 29 1612 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 29 1612 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 29 1612 34 , srcInfoPoints = [] } "Point")))) , TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 36 1612 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1612 36 1612 37 , SrcSpan "tests/examples/Attributes.hs" 1612 48 1612 49 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 37 1612 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 37 1612 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 37 1612 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 37 1612 42 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 43 1612 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 43 1612 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 43 1612 48 , srcInfoPoints = [] } "Point")))) , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 50 1612 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1612 50 1612 51 , SrcSpan "tests/examples/Attributes.hs" 1612 56 1612 57 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 51 1612 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 51 1612 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1612 51 1612 56 , srcInfoPoints = [] } "Point"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 15 1613 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1613 15 1613 23 , SrcSpan "tests/examples/Attributes.hs" 1613 24 1613 25 , SrcSpan "tests/examples/Attributes.hs" 1613 27 1613 28 , SrcSpan "tests/examples/Attributes.hs" 1613 32 1613 33 , SrcSpan "tests/examples/Attributes.hs" 1613 38 1613 39 , SrcSpan "tests/examples/Attributes.hs" 1613 44 1613 45 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 25 1613 27 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 25 1613 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 25 1613 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 25 1613 27 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 29 1613 32 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 29 1613 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 29 1613 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 29 1613 32 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 34 1613 38 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 34 1613 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 34 1613 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 34 1613 38 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 40 1613 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 40 1613 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 40 1613 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1613 40 1613 44 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 1 1630 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1615 1 1615 9 , SrcSpan "tests/examples/Attributes.hs" 1615 26 1615 31 , SrcSpan "tests/examples/Attributes.hs" 1616 5 1616 5 , SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 5 , SrcSpan "tests/examples/Attributes.hs" 1626 5 1626 5 , SrcSpan "tests/examples/Attributes.hs" 1628 5 1628 5 , SrcSpan "tests/examples/Attributes.hs" 1630 1 1630 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 10 1615 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 10 1615 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 10 1615 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 10 1615 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 10 1615 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 19 1615 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 19 1615 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1615 19 1615 25 , srcInfoPoints = [] } "Spline"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 5 1622 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1619 9 1619 14 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 5 1622 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1619 9 1619 14 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 5 1622 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1619 9 1619 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 5 1616 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 13 1616 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1616 13 1616 14 , SrcSpan "tests/examples/Attributes.hs" 1616 29 1616 30 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 14 1616 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 14 1616 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 14 1616 20 , srcInfoPoints = [] } "Spline")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 21 1616 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 21 1616 23 , srcInfoPoints = [] } "ms") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 24 1616 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 24 1616 26 , srcInfoPoints = [] } "me") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 27 1616 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 27 1616 29 , srcInfoPoints = [] } "ps") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 31 1618 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1616 31 1616 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 33 1618 48 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 33 1617 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 33 1616 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 33 1616 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 33 1616 37 , srcInfoPoints = [] } "addS"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 38 1616 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 38 1616 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 38 1616 39 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 40 1617 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 40 1616 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 40 1616 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1616 40 1616 44 , srcInfoPoints = [] } "addE"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 32 1617 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 32 1617 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 32 1617 33 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 34 1617 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 34 1617 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1617 34 1617 38 , srcInfoPoints = [] } "hsep"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 32 1618 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 32 1618 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 32 1618 33 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 34 1618 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 34 1618 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 34 1618 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 34 1618 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 34 1618 37 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 38 1618 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 38 1618 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 38 1618 45 , srcInfoPoints = [] } "unqtDot")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 46 1618 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 46 1618 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1618 46 1618 48 , srcInfoPoints = [] } "ps")))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 11 1622 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1620 11 1620 11 , SrcSpan "tests/examples/Attributes.hs" 1621 11 1621 11 , SrcSpan "tests/examples/Attributes.hs" 1622 11 1622 11 , SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 11 1620 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 11 1620 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 11 1620 15 , srcInfoPoints = [] } "addP") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 16 1620 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 16 1620 17 , srcInfoPoints = [] } "t") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 18 1620 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1620 18 1620 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 20 1620 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 20 1620 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 20 1620 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 20 1620 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 20 1620 25 , srcInfoPoints = [] } "maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 26 1620 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 26 1620 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 26 1620 28 , srcInfoPoints = [] } "id")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 29 1620 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1620 29 1620 30 , SrcSpan "tests/examples/Attributes.hs" 1620 48 1620 49 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 30 1620 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 30 1620 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1620 30 1620 31 , SrcSpan "tests/examples/Attributes.hs" 1620 31 1620 34 , SrcSpan "tests/examples/Attributes.hs" 1620 34 1620 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 30 1620 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1620 30 1620 31 , SrcSpan "tests/examples/Attributes.hs" 1620 31 1620 34 , SrcSpan "tests/examples/Attributes.hs" 1620 34 1620 35 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 31 1620 34 , srcInfoPoints = [] } "<+>"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 36 1620 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 36 1620 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 36 1620 37 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 38 1620 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 38 1620 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 38 1620 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 38 1620 46 , srcInfoPoints = [] } "commaDel"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 47 1620 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 47 1620 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1620 47 1620 48 , srcInfoPoints = [] } "t")))))))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 11 1621 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 11 1621 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 11 1621 15 , srcInfoPoints = [] } "addS")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 16 1621 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1621 16 1621 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 18 1621 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 18 1621 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 18 1621 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 18 1621 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 18 1621 22 , srcInfoPoints = [] } "addP"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 23 1621 26 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 23 1621 26 , srcInfoPoints = [] } 's' "s"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 27 1621 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 27 1621 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1621 27 1621 29 , srcInfoPoints = [] } "ms"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 11 1622 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 11 1622 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 11 1622 15 , srcInfoPoints = [] } "addE")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 16 1622 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1622 16 1622 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 18 1622 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 18 1622 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 18 1622 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 18 1622 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 18 1622 22 , srcInfoPoints = [] } "addP"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 23 1622 26 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 23 1622 26 , srcInfoPoints = [] } 'e' "e"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 27 1622 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 27 1622 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1622 27 1622 29 , srcInfoPoints = [] } "me"))))) Nothing ])) ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 5 1624 10 , srcInfoPoints = [] } "toDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 11 1624 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1624 11 1624 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 13 1624 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 13 1624 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 13 1624 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 13 1624 25 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 26 1624 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 26 1624 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 26 1624 27 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 28 1624 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 28 1624 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1624 28 1624 35 , srcInfoPoints = [] } "unqtDot"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 5 1626 56 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 5 1626 56 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 5 1626 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 5 1626 18 , srcInfoPoints = [] } "unqtListToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 19 1626 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1626 19 1626 20 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 21 1626 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 21 1626 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 21 1626 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 21 1626 25 , srcInfoPoints = [] } "hcat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 26 1626 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 26 1626 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 26 1626 27 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 28 1626 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 28 1626 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 28 1626 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 28 1626 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 28 1626 37 , srcInfoPoints = [] } "punctuate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 38 1626 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 38 1626 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 38 1626 42 , srcInfoPoints = [] } "semi")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 43 1626 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 43 1626 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 43 1626 44 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 45 1626 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 45 1626 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 45 1626 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 45 1626 48 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 49 1626 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 49 1626 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1626 49 1626 56 , srcInfoPoints = [] } "unqtDot"))))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 5 1628 45 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 5 1628 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 5 1628 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 5 1628 14 , srcInfoPoints = [] } "listToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 15 1628 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1628 15 1628 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 17 1628 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 17 1628 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 17 1628 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 17 1628 29 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 30 1628 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 30 1628 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 30 1628 31 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 32 1628 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 32 1628 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1628 32 1628 45 , srcInfoPoints = [] } "unqtListToDot"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 1 1646 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1630 1 1630 9 , SrcSpan "tests/examples/Attributes.hs" 1630 26 1630 31 , SrcSpan "tests/examples/Attributes.hs" 1631 5 1631 5 , SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 5 , SrcSpan "tests/examples/Attributes.hs" 1642 5 1642 5 , SrcSpan "tests/examples/Attributes.hs" 1646 1 1646 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 10 1630 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 10 1630 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 10 1630 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 10 1630 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 10 1630 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 19 1630 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 19 1630 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1630 19 1630 25 , srcInfoPoints = [] } "Spline"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 5 1638 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1635 9 1635 14 ] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 5 1638 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1635 9 1635 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 5 1631 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 5 1631 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 15 1634 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1631 15 1631 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 17 1634 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1631 17 1631 19 , SrcSpan "tests/examples/Attributes.hs" 1631 20 1631 20 , SrcSpan "tests/examples/Attributes.hs" 1632 20 1632 20 , SrcSpan "tests/examples/Attributes.hs" 1633 20 1633 20 , SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 20 , SrcSpan "tests/examples/Attributes.hs" 1635 9 1635 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 20 1631 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1631 23 1631 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 20 1631 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 20 1631 22 , srcInfoPoints = [] } "ms")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 26 1631 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 26 1631 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 26 1631 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 26 1631 32 , srcInfoPoints = [] } "parseP"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 33 1631 36 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1631 33 1631 36 , srcInfoPoints = [] } 's' "s"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 20 1632 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1632 23 1632 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 20 1632 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 20 1632 22 , srcInfoPoints = [] } "me")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 26 1632 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 26 1632 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 26 1632 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 26 1632 32 , srcInfoPoints = [] } "parseP"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 33 1632 36 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1632 33 1632 36 , srcInfoPoints = [] } 'e' "e"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 20 1633 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1633 23 1633 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 20 1633 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 20 1633 22 , srcInfoPoints = [] } "ps")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 26 1633 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 26 1633 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 26 1633 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 26 1633 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 26 1633 32 , srcInfoPoints = [] } "sepBy1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 33 1633 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 33 1633 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 33 1633 42 , srcInfoPoints = [] } "parseUnqt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 43 1633 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 43 1633 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1633 43 1633 53 , srcInfoPoints = [] } "whitespace")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 44 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 20 1634 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 27 1634 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 27 1634 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 27 1634 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 29 1634 35 , srcInfoPoints = [] } "Spline"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 36 1634 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 36 1634 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 36 1634 38 , srcInfoPoints = [] } "ms")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 39 1634 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 39 1634 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 39 1634 41 , srcInfoPoints = [] } "me")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 42 1634 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 42 1634 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1634 42 1634 44 , srcInfoPoints = [] } "ps"))))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 11 1638 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1636 11 1636 11 , SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 11 1638 66 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 11 1638 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 11 1636 17 , srcInfoPoints = [] } "parseP") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 18 1636 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 18 1636 19 , srcInfoPoints = [] } "t") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 20 1638 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1636 20 1636 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 22 1638 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 22 1636 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 22 1636 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 22 1636 30 , srcInfoPoints = [] } "optional"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 31 1636 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 31 1636 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 31 1636 32 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 33 1638 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1636 33 1636 35 , SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 36 , SrcSpan "tests/examples/Attributes.hs" 1637 36 1637 36 , SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 36 , SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 36 1636 45 , srcInfoPoints = [] } "character"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 46 1636 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 46 1636 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1636 46 1636 47 , srcInfoPoints = [] } "t")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1637 36 1637 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1637 36 1637 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1637 36 1637 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1637 36 1637 46 , srcInfoPoints = [] } "parseComma"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 66 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 36 1638 45 , srcInfoPoints = [] } "parseUnqt"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 46 1638 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1638 46 1638 47 , SrcSpan "tests/examples/Attributes.hs" 1638 47 1638 54 , SrcSpan "tests/examples/Attributes.hs" 1638 54 1638 55 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 46 1638 55 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1638 46 1638 47 , SrcSpan "tests/examples/Attributes.hs" 1638 47 1638 54 , SrcSpan "tests/examples/Attributes.hs" 1638 54 1638 55 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 47 1638 54 , srcInfoPoints = [] } "discard"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 56 1638 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 56 1638 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1638 56 1638 66 , srcInfoPoints = [] } "whitespace")))) ]))) Nothing ] ]))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 5 1640 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 11 1640 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1640 11 1640 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 13 1640 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 13 1640 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 13 1640 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 13 1640 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 25 1640 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 25 1640 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1640 25 1640 34 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 5 1642 53 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 5 1642 53 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 5 1642 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 5 1642 18 , srcInfoPoints = [] } "parseUnqtList")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 19 1642 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1642 19 1642 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 21 1642 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 21 1642 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 21 1642 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 21 1642 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 21 1642 27 , srcInfoPoints = [] } "sepBy1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 28 1642 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 28 1642 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 28 1642 37 , srcInfoPoints = [] } "parseUnqt")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 38 1642 53 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1642 38 1642 39 , SrcSpan "tests/examples/Attributes.hs" 1642 52 1642 53 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 39 1642 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 39 1642 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 39 1642 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 39 1642 48 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 49 1642 52 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1642 49 1642 52 , srcInfoPoints = [] } ';' ";")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 1 1649 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1646 15 1646 16 , SrcSpan "tests/examples/Attributes.hs" 1647 15 1647 16 , SrcSpan "tests/examples/Attributes.hs" 1648 15 1648 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 1 1646 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 6 1646 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 6 1646 14 , srcInfoPoints = [] } "QuadType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 17 1646 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 17 1646 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1646 17 1646 25 , srcInfoPoints = [] } "NormalQT") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1647 17 1647 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1647 17 1647 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1647 17 1647 23 , srcInfoPoints = [] } "FastQT") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1648 17 1648 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1648 17 1648 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1648 17 1648 21 , srcInfoPoints = [] } "NoQT") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 17 1649 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1649 17 1649 25 , SrcSpan "tests/examples/Attributes.hs" 1649 26 1649 27 , SrcSpan "tests/examples/Attributes.hs" 1649 29 1649 30 , SrcSpan "tests/examples/Attributes.hs" 1649 34 1649 35 , SrcSpan "tests/examples/Attributes.hs" 1649 43 1649 44 , SrcSpan "tests/examples/Attributes.hs" 1649 49 1649 50 , SrcSpan "tests/examples/Attributes.hs" 1649 55 1649 56 , SrcSpan "tests/examples/Attributes.hs" 1649 61 1649 62 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 27 1649 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 27 1649 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 27 1649 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 27 1649 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 31 1649 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 31 1649 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 31 1649 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 31 1649 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 36 1649 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 36 1649 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 36 1649 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 36 1649 43 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 45 1649 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 45 1649 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 45 1649 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 45 1649 49 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 51 1649 55 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 51 1649 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 51 1649 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 51 1649 55 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 57 1649 61 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 57 1649 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 57 1649 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1649 57 1649 61 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 1 1656 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1651 1 1651 9 , SrcSpan "tests/examples/Attributes.hs" 1651 28 1651 33 , SrcSpan "tests/examples/Attributes.hs" 1652 5 1652 5 , SrcSpan "tests/examples/Attributes.hs" 1653 5 1653 5 , SrcSpan "tests/examples/Attributes.hs" 1654 5 1654 5 , SrcSpan "tests/examples/Attributes.hs" 1656 1 1656 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 10 1651 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 10 1651 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 10 1651 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 10 1651 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 10 1651 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 19 1651 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 19 1651 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1651 19 1651 27 , srcInfoPoints = [] } "QuadType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 5 1654 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 5 1654 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 5 1652 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 5 1652 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 13 1652 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 13 1652 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 13 1652 21 , srcInfoPoints = [] } "NormalQT")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 22 1652 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1652 22 1652 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 24 1652 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 24 1652 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 24 1652 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 24 1652 28 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 29 1652 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1652 29 1652 37 , srcInfoPoints = [] } "normal" "normal")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 5 1653 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 5 1653 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 13 1653 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 13 1653 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 13 1653 19 , srcInfoPoints = [] } "FastQT")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 22 1653 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1653 22 1653 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 24 1653 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 24 1653 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 24 1653 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 24 1653 28 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 29 1653 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1653 29 1653 35 , srcInfoPoints = [] } "fast" "fast")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 5 1654 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 5 1654 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 13 1654 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 13 1654 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 13 1654 17 , srcInfoPoints = [] } "NoQT")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 22 1654 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1654 22 1654 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 24 1654 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 24 1654 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 24 1654 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 24 1654 28 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 29 1654 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1654 29 1654 35 , srcInfoPoints = [] } "none" "none")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 1 1669 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1656 1 1656 9 , SrcSpan "tests/examples/Attributes.hs" 1656 28 1656 33 , SrcSpan "tests/examples/Attributes.hs" 1659 5 1659 5 , SrcSpan "tests/examples/Attributes.hs" 1669 1 1669 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 10 1656 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 10 1656 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 10 1656 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 10 1656 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 10 1656 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 19 1656 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 19 1656 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1656 19 1656 27 , srcInfoPoints = [] } "QuadType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 5 1664 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 5 1664 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 5 1659 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 5 1659 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 15 1664 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1659 15 1659 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 17 1664 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 17 1659 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 17 1659 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 17 1659 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 23 1664 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1659 23 1659 24 , SrcSpan "tests/examples/Attributes.hs" 1660 23 1660 24 , SrcSpan "tests/examples/Attributes.hs" 1661 23 1661 24 , SrcSpan "tests/examples/Attributes.hs" 1662 23 1662 24 , SrcSpan "tests/examples/Attributes.hs" 1663 23 1663 24 , SrcSpan "tests/examples/Attributes.hs" 1664 23 1664 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 25 1659 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 25 1659 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 25 1659 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 25 1659 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 25 1659 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 35 1659 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 35 1659 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 35 1659 43 , srcInfoPoints = [] } "NormalQT")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 44 1659 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1659 44 1659 52 , srcInfoPoints = [] } "normal" "normal")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 25 1660 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 25 1660 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 25 1660 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 25 1660 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 25 1660 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 35 1660 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 35 1660 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 35 1660 41 , srcInfoPoints = [] } "FastQT")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 42 1660 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1660 42 1660 48 , srcInfoPoints = [] } "fast" "fast")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 25 1661 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 25 1661 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 25 1661 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 25 1661 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 25 1661 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 35 1661 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 35 1661 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 35 1661 39 , srcInfoPoints = [] } "NoQT")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 40 1661 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1661 40 1661 46 , srcInfoPoints = [] } "none" "none")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 25 1662 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 25 1662 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 25 1662 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 25 1662 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 25 1662 34 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 35 1662 38 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 35 1662 38 , srcInfoPoints = [] } '2' "2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 41 1662 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 41 1662 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 41 1662 43 , srcInfoPoints = [] } ">>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 44 1662 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 44 1662 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 44 1662 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 44 1662 50 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 51 1662 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 51 1662 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1662 51 1662 57 , srcInfoPoints = [] } "FastQT")))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 25 1663 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 25 1663 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 25 1663 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 25 1663 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 25 1663 30 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 31 1663 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1663 31 1663 32 , SrcSpan "tests/examples/Attributes.hs" 1663 50 1663 51 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 32 1663 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 32 1663 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 32 1663 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 32 1663 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 32 1663 36 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 37 1663 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 37 1663 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 37 1663 41 , srcInfoPoints = [] } "NoQT")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 42 1663 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 42 1663 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 42 1663 50 , srcInfoPoints = [] } "NormalQT")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 52 1663 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 52 1663 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1663 52 1663 57 , srcInfoPoints = [] } "parse"))) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 1 1672 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1669 11 1669 12 , SrcSpan "tests/examples/Attributes.hs" 1670 11 1670 12 , SrcSpan "tests/examples/Attributes.hs" 1671 11 1671 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 1 1669 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 6 1669 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 6 1669 10 , srcInfoPoints = [] } "Root")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 13 1669 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 13 1669 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1669 13 1669 22 , srcInfoPoints = [] } "IsCentral") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1670 13 1670 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1670 13 1670 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1670 13 1670 23 , srcInfoPoints = [] } "NotCentral") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 13 1671 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 13 1671 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 13 1671 21 , srcInfoPoints = [] } "NodeName") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 22 1671 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 22 1671 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1671 22 1671 28 , srcInfoPoints = [] } "String")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 13 1672 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1672 13 1672 21 , SrcSpan "tests/examples/Attributes.hs" 1672 22 1672 23 , SrcSpan "tests/examples/Attributes.hs" 1672 25 1672 26 , SrcSpan "tests/examples/Attributes.hs" 1672 30 1672 31 , SrcSpan "tests/examples/Attributes.hs" 1672 36 1672 37 , SrcSpan "tests/examples/Attributes.hs" 1672 42 1672 43 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 23 1672 25 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 23 1672 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 23 1672 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 23 1672 25 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 27 1672 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 27 1672 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 27 1672 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 27 1672 30 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 32 1672 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 32 1672 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 32 1672 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 32 1672 36 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 38 1672 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 38 1672 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 38 1672 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1672 38 1672 42 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 1 1682 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1674 1 1674 9 , SrcSpan "tests/examples/Attributes.hs" 1674 24 1674 29 , SrcSpan "tests/examples/Attributes.hs" 1675 5 1675 5 , SrcSpan "tests/examples/Attributes.hs" 1676 5 1676 5 , SrcSpan "tests/examples/Attributes.hs" 1677 5 1677 5 , SrcSpan "tests/examples/Attributes.hs" 1679 5 1679 5 , SrcSpan "tests/examples/Attributes.hs" 1680 5 1680 5 , SrcSpan "tests/examples/Attributes.hs" 1682 1 1682 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 10 1674 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 10 1674 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 10 1674 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 10 1674 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 10 1674 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 19 1674 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 19 1674 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1674 19 1674 23 , srcInfoPoints = [] } "Root"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 5 1677 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 5 1677 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 5 1675 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 5 1675 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 13 1675 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 13 1675 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 13 1675 22 , srcInfoPoints = [] } "IsCentral")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 26 1675 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1675 26 1675 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 28 1675 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 28 1675 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 28 1675 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 28 1675 35 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 36 1675 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 36 1675 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1675 36 1675 40 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 5 1676 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 5 1676 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 13 1676 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 13 1676 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 13 1676 23 , srcInfoPoints = [] } "NotCentral")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 26 1676 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1676 26 1676 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 28 1676 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 28 1676 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 28 1676 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 28 1676 35 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 36 1676 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 36 1676 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1676 36 1676 41 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 5 1677 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 5 1677 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 13 1677 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1677 13 1677 14 , SrcSpan "tests/examples/Attributes.hs" 1677 24 1677 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 14 1677 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 14 1677 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 14 1677 22 , srcInfoPoints = [] } "NodeName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 23 1677 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 23 1677 24 , srcInfoPoints = [] } "n") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 26 1677 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1677 26 1677 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 28 1677 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 28 1677 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 28 1677 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 28 1677 35 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 36 1677 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 36 1677 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1677 36 1677 37 , srcInfoPoints = [] } "n"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 5 1680 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 5 1680 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 5 1679 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 5 1679 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 11 1679 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1679 11 1679 12 , SrcSpan "tests/examples/Attributes.hs" 1679 22 1679 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 12 1679 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 12 1679 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 12 1679 20 , srcInfoPoints = [] } "NodeName")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 21 1679 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 21 1679 22 , srcInfoPoints = [] } "n") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 24 1679 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1679 24 1679 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 26 1679 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 26 1679 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 26 1679 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 26 1679 31 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 32 1679 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 32 1679 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1679 32 1679 33 , srcInfoPoints = [] } "n"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 5 1680 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 5 1680 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 11 1680 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 11 1680 12 , srcInfoPoints = [] } "r") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 24 1680 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1680 24 1680 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 26 1680 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 26 1680 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 26 1680 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 26 1680 33 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 34 1680 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 34 1680 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1680 34 1680 35 , srcInfoPoints = [] } "r"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 1 1693 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1682 1 1682 9 , SrcSpan "tests/examples/Attributes.hs" 1682 24 1682 29 , SrcSpan "tests/examples/Attributes.hs" 1683 5 1683 5 , SrcSpan "tests/examples/Attributes.hs" 1687 5 1687 5 , SrcSpan "tests/examples/Attributes.hs" 1693 1 1693 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 10 1682 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 10 1682 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 10 1682 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 10 1682 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 10 1682 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 19 1682 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 19 1682 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1682 19 1682 23 , srcInfoPoints = [] } "Root"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 5 1685 41 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 5 1685 41 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 5 1683 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 5 1683 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 15 1685 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1683 15 1683 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1685 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1683 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1683 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1683 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1683 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 17 1683 22 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 23 1683 50 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1683 23 1683 24 , SrcSpan "tests/examples/Attributes.hs" 1683 49 1683 50 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 24 1683 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 24 1683 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 24 1683 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 24 1683 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 24 1683 28 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 29 1683 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 29 1683 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 29 1683 39 , srcInfoPoints = [] } "NotCentral")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 40 1683 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 40 1683 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 40 1683 49 , srcInfoPoints = [] } "IsCentral")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 51 1683 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 51 1683 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1683 51 1683 59 , srcInfoPoints = [] } "onlyBool")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1684 17 1684 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1684 17 1684 18 , SrcSpan "tests/examples/Attributes.hs" 1684 18 1684 24 , SrcSpan "tests/examples/Attributes.hs" 1684 24 1684 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1684 17 1684 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1684 17 1684 18 , SrcSpan "tests/examples/Attributes.hs" 1684 18 1684 24 , SrcSpan "tests/examples/Attributes.hs" 1684 24 1684 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1684 18 1684 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 17 1685 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 17 1685 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 17 1685 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 17 1685 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 17 1685 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 23 1685 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 23 1685 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 23 1685 31 , srcInfoPoints = [] } "NodeName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 32 1685 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 32 1685 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1685 32 1685 41 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 5 1689 33 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 5 1689 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 5 1687 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 5 1687 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 11 1689 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1687 11 1687 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 13 1689 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 13 1687 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 13 1687 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 13 1687 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 13 1687 27 , srcInfoPoints = [] } "optionalQuoted"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 28 1687 72 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1687 28 1687 29 , SrcSpan "tests/examples/Attributes.hs" 1687 71 1687 72 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 29 1687 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 29 1687 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 29 1687 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 29 1687 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 29 1687 34 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 35 1687 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1687 35 1687 36 , SrcSpan "tests/examples/Attributes.hs" 1687 61 1687 62 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 36 1687 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 36 1687 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 36 1687 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 36 1687 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 36 1687 40 , srcInfoPoints = [] } "bool"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 41 1687 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 41 1687 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 41 1687 51 , srcInfoPoints = [] } "NotCentral")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 52 1687 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 52 1687 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 52 1687 61 , srcInfoPoints = [] } "IsCentral")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 63 1687 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 63 1687 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1687 63 1687 71 , srcInfoPoints = [] } "onlyBool")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1688 13 1688 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1688 13 1688 14 , SrcSpan "tests/examples/Attributes.hs" 1688 14 1688 20 , SrcSpan "tests/examples/Attributes.hs" 1688 20 1688 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1688 13 1688 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1688 13 1688 14 , SrcSpan "tests/examples/Attributes.hs" 1688 14 1688 20 , SrcSpan "tests/examples/Attributes.hs" 1688 20 1688 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1688 14 1688 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 13 1689 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 13 1689 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 13 1689 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 13 1689 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 13 1689 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 19 1689 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 19 1689 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 19 1689 27 , srcInfoPoints = [] } "NodeName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 28 1689 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 28 1689 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1689 28 1689 33 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 1 1698 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1693 15 1693 16 , SrcSpan "tests/examples/Attributes.hs" 1694 15 1694 16 , SrcSpan "tests/examples/Attributes.hs" 1695 15 1695 16 , SrcSpan "tests/examples/Attributes.hs" 1696 15 1696 16 , SrcSpan "tests/examples/Attributes.hs" 1697 15 1697 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 1 1693 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 6 1693 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 6 1693 14 , srcInfoPoints = [] } "RankType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 17 1693 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 17 1693 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1693 17 1693 25 , srcInfoPoints = [] } "SameRank") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1694 17 1694 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1694 17 1694 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1694 17 1694 24 , srcInfoPoints = [] } "MinRank") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1695 17 1695 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1695 17 1695 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1695 17 1695 27 , srcInfoPoints = [] } "SourceRank") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1696 17 1696 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1696 17 1696 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1696 17 1696 24 , srcInfoPoints = [] } "MaxRank") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1697 17 1697 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1697 17 1697 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1697 17 1697 25 , srcInfoPoints = [] } "SinkRank") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 17 1698 62 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1698 17 1698 25 , SrcSpan "tests/examples/Attributes.hs" 1698 26 1698 27 , SrcSpan "tests/examples/Attributes.hs" 1698 29 1698 30 , SrcSpan "tests/examples/Attributes.hs" 1698 34 1698 35 , SrcSpan "tests/examples/Attributes.hs" 1698 43 1698 44 , SrcSpan "tests/examples/Attributes.hs" 1698 49 1698 50 , SrcSpan "tests/examples/Attributes.hs" 1698 55 1698 56 , SrcSpan "tests/examples/Attributes.hs" 1698 61 1698 62 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 27 1698 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 27 1698 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 27 1698 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 27 1698 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 31 1698 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 31 1698 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 31 1698 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 31 1698 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 36 1698 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 36 1698 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 36 1698 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 36 1698 43 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 45 1698 49 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 45 1698 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 45 1698 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 45 1698 49 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 51 1698 55 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 51 1698 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 51 1698 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 51 1698 55 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 57 1698 61 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 57 1698 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 57 1698 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1698 57 1698 61 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 1 1707 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1700 1 1700 9 , SrcSpan "tests/examples/Attributes.hs" 1700 28 1700 33 , SrcSpan "tests/examples/Attributes.hs" 1701 5 1701 5 , SrcSpan "tests/examples/Attributes.hs" 1702 5 1702 5 , SrcSpan "tests/examples/Attributes.hs" 1703 5 1703 5 , SrcSpan "tests/examples/Attributes.hs" 1704 5 1704 5 , SrcSpan "tests/examples/Attributes.hs" 1705 5 1705 5 , SrcSpan "tests/examples/Attributes.hs" 1707 1 1707 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 10 1700 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 10 1700 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 10 1700 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 10 1700 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 10 1700 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 19 1700 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 19 1700 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1700 19 1700 27 , srcInfoPoints = [] } "RankType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 5 1705 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 5 1705 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 5 1701 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 5 1701 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 13 1701 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 13 1701 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 13 1701 21 , srcInfoPoints = [] } "SameRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 24 1701 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1701 24 1701 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 26 1701 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 26 1701 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 26 1701 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 26 1701 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 31 1701 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1701 31 1701 37 , srcInfoPoints = [] } "same" "same")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 5 1702 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 5 1702 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 13 1702 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 13 1702 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 13 1702 20 , srcInfoPoints = [] } "MinRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 24 1702 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1702 24 1702 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 26 1702 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 26 1702 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 26 1702 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 26 1702 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 31 1702 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1702 31 1702 36 , srcInfoPoints = [] } "min" "min")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 5 1703 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 5 1703 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 13 1703 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 13 1703 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 13 1703 23 , srcInfoPoints = [] } "SourceRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 24 1703 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1703 24 1703 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 26 1703 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 26 1703 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 26 1703 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 26 1703 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 31 1703 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1703 31 1703 39 , srcInfoPoints = [] } "source" "source")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 5 1704 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 5 1704 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 13 1704 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 13 1704 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 13 1704 20 , srcInfoPoints = [] } "MaxRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 24 1704 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1704 24 1704 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 26 1704 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 26 1704 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 26 1704 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 26 1704 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 31 1704 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1704 31 1704 36 , srcInfoPoints = [] } "max" "max")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 5 1705 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 5 1705 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 13 1705 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 13 1705 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 13 1705 21 , srcInfoPoints = [] } "SinkRank")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 24 1705 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1705 24 1705 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 26 1705 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 26 1705 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 26 1705 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 26 1705 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 31 1705 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1705 31 1705 37 , srcInfoPoints = [] } "sink" "sink")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 1 1717 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1707 1 1707 9 , SrcSpan "tests/examples/Attributes.hs" 1707 28 1707 33 , SrcSpan "tests/examples/Attributes.hs" 1708 5 1708 5 , SrcSpan "tests/examples/Attributes.hs" 1717 1 1717 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 10 1707 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 10 1707 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 10 1707 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 10 1707 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 10 1707 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 19 1707 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 19 1707 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1707 19 1707 27 , srcInfoPoints = [] } "RankType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 5 1713 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 5 1713 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 5 1708 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 5 1708 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 15 1713 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1708 15 1708 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 17 1713 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 17 1708 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 17 1708 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 17 1708 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 23 1713 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1708 23 1708 24 , SrcSpan "tests/examples/Attributes.hs" 1709 23 1709 24 , SrcSpan "tests/examples/Attributes.hs" 1710 23 1710 24 , SrcSpan "tests/examples/Attributes.hs" 1711 23 1711 24 , SrcSpan "tests/examples/Attributes.hs" 1712 23 1712 24 , SrcSpan "tests/examples/Attributes.hs" 1713 23 1713 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 25 1708 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 25 1708 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 25 1708 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 25 1708 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 25 1708 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 35 1708 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 35 1708 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 35 1708 43 , srcInfoPoints = [] } "SameRank")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 44 1708 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1708 44 1708 50 , srcInfoPoints = [] } "same" "same")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 25 1709 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 25 1709 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 25 1709 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 25 1709 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 25 1709 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 35 1709 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 35 1709 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 35 1709 42 , srcInfoPoints = [] } "MinRank")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 43 1709 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1709 43 1709 48 , srcInfoPoints = [] } "min" "min")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 25 1710 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 25 1710 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 25 1710 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 25 1710 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 25 1710 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 35 1710 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 35 1710 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 35 1710 45 , srcInfoPoints = [] } "SourceRank")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 46 1710 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1710 46 1710 54 , srcInfoPoints = [] } "source" "source")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 25 1711 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 25 1711 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 25 1711 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 25 1711 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 25 1711 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 35 1711 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 35 1711 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 35 1711 42 , srcInfoPoints = [] } "MaxRank")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 43 1711 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1711 43 1711 48 , srcInfoPoints = [] } "max" "max")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 25 1712 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 25 1712 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 25 1712 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 25 1712 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 25 1712 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 35 1712 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 35 1712 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 35 1712 43 , srcInfoPoints = [] } "SinkRank")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 44 1712 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1712 44 1712 50 , srcInfoPoints = [] } "sink" "sink")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 1 1721 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1717 14 1717 15 , SrcSpan "tests/examples/Attributes.hs" 1718 14 1718 15 , SrcSpan "tests/examples/Attributes.hs" 1719 14 1719 15 , SrcSpan "tests/examples/Attributes.hs" 1720 14 1720 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 1 1717 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 6 1717 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 6 1717 13 , srcInfoPoints = [] } "RankDir")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 16 1717 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 16 1717 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1717 16 1717 23 , srcInfoPoints = [] } "FromTop") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1718 16 1718 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1718 16 1718 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1718 16 1718 24 , srcInfoPoints = [] } "FromLeft") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1719 16 1719 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1719 16 1719 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1719 16 1719 26 , srcInfoPoints = [] } "FromBottom") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1720 16 1720 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1720 16 1720 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1720 16 1720 25 , srcInfoPoints = [] } "FromRight") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 16 1721 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1721 16 1721 24 , SrcSpan "tests/examples/Attributes.hs" 1721 25 1721 26 , SrcSpan "tests/examples/Attributes.hs" 1721 28 1721 29 , SrcSpan "tests/examples/Attributes.hs" 1721 33 1721 34 , SrcSpan "tests/examples/Attributes.hs" 1721 42 1721 43 , SrcSpan "tests/examples/Attributes.hs" 1721 48 1721 49 , SrcSpan "tests/examples/Attributes.hs" 1721 54 1721 55 , SrcSpan "tests/examples/Attributes.hs" 1721 60 1721 61 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 26 1721 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 26 1721 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 26 1721 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 26 1721 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 30 1721 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 30 1721 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 30 1721 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 30 1721 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 35 1721 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 35 1721 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 35 1721 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 35 1721 42 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 44 1721 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 44 1721 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 44 1721 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 44 1721 48 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 50 1721 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 50 1721 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 50 1721 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 50 1721 54 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 56 1721 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 56 1721 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 56 1721 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1721 56 1721 60 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 1 1729 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1723 1 1723 9 , SrcSpan "tests/examples/Attributes.hs" 1723 27 1723 32 , SrcSpan "tests/examples/Attributes.hs" 1724 5 1724 5 , SrcSpan "tests/examples/Attributes.hs" 1725 5 1725 5 , SrcSpan "tests/examples/Attributes.hs" 1726 5 1726 5 , SrcSpan "tests/examples/Attributes.hs" 1727 5 1727 5 , SrcSpan "tests/examples/Attributes.hs" 1729 1 1729 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 10 1723 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 10 1723 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 10 1723 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 10 1723 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 10 1723 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 19 1723 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 19 1723 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1723 19 1723 26 , srcInfoPoints = [] } "RankDir"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 5 1727 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 5 1727 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 5 1724 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 5 1724 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 13 1724 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 13 1724 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 13 1724 20 , srcInfoPoints = [] } "FromTop")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 24 1724 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1724 24 1724 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 26 1724 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 26 1724 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 26 1724 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 26 1724 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 31 1724 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1724 31 1724 35 , srcInfoPoints = [] } "TB" "TB")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 5 1725 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 5 1725 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 13 1725 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 13 1725 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 13 1725 21 , srcInfoPoints = [] } "FromLeft")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 24 1725 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1725 24 1725 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 26 1725 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 26 1725 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 26 1725 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 26 1725 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 31 1725 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1725 31 1725 35 , srcInfoPoints = [] } "LR" "LR")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 5 1726 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 5 1726 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 13 1726 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 13 1726 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 13 1726 23 , srcInfoPoints = [] } "FromBottom")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 24 1726 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1726 24 1726 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 26 1726 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 26 1726 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 26 1726 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 26 1726 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 31 1726 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1726 31 1726 35 , srcInfoPoints = [] } "BT" "BT")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 5 1727 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 5 1727 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 13 1727 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 13 1727 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 13 1727 22 , srcInfoPoints = [] } "FromRight")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 24 1727 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1727 24 1727 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 26 1727 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 26 1727 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 26 1727 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 26 1727 30 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 31 1727 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1727 31 1727 35 , srcInfoPoints = [] } "RL" "RL")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 1 1738 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1729 1 1729 9 , SrcSpan "tests/examples/Attributes.hs" 1729 27 1729 32 , SrcSpan "tests/examples/Attributes.hs" 1730 5 1730 5 , SrcSpan "tests/examples/Attributes.hs" 1738 1 1738 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 10 1729 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 10 1729 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 10 1729 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 10 1729 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 10 1729 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 19 1729 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 19 1729 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1729 19 1729 26 , srcInfoPoints = [] } "RankDir"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 5 1734 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 5 1734 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 5 1730 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 5 1730 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 15 1734 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1730 15 1730 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 17 1734 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 17 1730 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 17 1730 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 17 1730 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 23 1734 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1730 23 1730 24 , SrcSpan "tests/examples/Attributes.hs" 1731 23 1731 24 , SrcSpan "tests/examples/Attributes.hs" 1732 23 1732 24 , SrcSpan "tests/examples/Attributes.hs" 1733 23 1733 24 , SrcSpan "tests/examples/Attributes.hs" 1734 23 1734 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 25 1730 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 25 1730 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 25 1730 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 25 1730 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 25 1730 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 35 1730 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 35 1730 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 35 1730 42 , srcInfoPoints = [] } "FromTop")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 43 1730 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1730 43 1730 47 , srcInfoPoints = [] } "TB" "TB")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 25 1731 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 25 1731 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 25 1731 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 25 1731 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 25 1731 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 35 1731 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 35 1731 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 35 1731 43 , srcInfoPoints = [] } "FromLeft")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 44 1731 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1731 44 1731 48 , srcInfoPoints = [] } "LR" "LR")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 25 1732 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 25 1732 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 25 1732 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 25 1732 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 25 1732 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 35 1732 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 35 1732 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 35 1732 45 , srcInfoPoints = [] } "FromBottom")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 46 1732 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1732 46 1732 50 , srcInfoPoints = [] } "BT" "BT")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 25 1733 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 25 1733 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 25 1733 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 25 1733 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 25 1733 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 35 1733 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 35 1733 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 35 1733 44 , srcInfoPoints = [] } "FromRight")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 45 1733 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1733 45 1733 49 , srcInfoPoints = [] } "RL" "RL")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1738 1 1769 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1739 5 1739 6 , SrcSpan "tests/examples/Attributes.hs" 1740 5 1740 6 , SrcSpan "tests/examples/Attributes.hs" 1741 5 1741 6 , SrcSpan "tests/examples/Attributes.hs" 1742 5 1742 6 , SrcSpan "tests/examples/Attributes.hs" 1743 5 1743 6 , SrcSpan "tests/examples/Attributes.hs" 1744 5 1744 6 , SrcSpan "tests/examples/Attributes.hs" 1745 5 1745 6 , SrcSpan "tests/examples/Attributes.hs" 1746 5 1746 6 , SrcSpan "tests/examples/Attributes.hs" 1747 5 1747 6 , SrcSpan "tests/examples/Attributes.hs" 1748 5 1748 6 , SrcSpan "tests/examples/Attributes.hs" 1749 5 1749 6 , SrcSpan "tests/examples/Attributes.hs" 1750 5 1750 6 , SrcSpan "tests/examples/Attributes.hs" 1751 5 1751 6 , SrcSpan "tests/examples/Attributes.hs" 1752 5 1752 6 , SrcSpan "tests/examples/Attributes.hs" 1753 5 1753 6 , SrcSpan "tests/examples/Attributes.hs" 1754 5 1754 6 , SrcSpan "tests/examples/Attributes.hs" 1755 5 1755 6 , SrcSpan "tests/examples/Attributes.hs" 1756 5 1756 6 , SrcSpan "tests/examples/Attributes.hs" 1757 5 1757 6 , SrcSpan "tests/examples/Attributes.hs" 1758 5 1758 6 , SrcSpan "tests/examples/Attributes.hs" 1759 5 1759 6 , SrcSpan "tests/examples/Attributes.hs" 1760 5 1760 6 , SrcSpan "tests/examples/Attributes.hs" 1761 5 1761 6 , SrcSpan "tests/examples/Attributes.hs" 1762 5 1762 6 , SrcSpan "tests/examples/Attributes.hs" 1763 5 1763 6 , SrcSpan "tests/examples/Attributes.hs" 1764 5 1764 6 , SrcSpan "tests/examples/Attributes.hs" 1765 5 1765 6 , SrcSpan "tests/examples/Attributes.hs" 1766 5 1766 6 , SrcSpan "tests/examples/Attributes.hs" 1767 5 1767 6 , SrcSpan "tests/examples/Attributes.hs" 1768 5 1768 6 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1738 1 1738 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1738 6 1738 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1738 6 1738 11 , srcInfoPoints = [] } "Shape")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1739 7 1739 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1739 7 1739 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1739 7 1739 15 , srcInfoPoints = [] } "BoxShape") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1740 7 1740 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1740 7 1740 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1740 7 1740 14 , srcInfoPoints = [] } "Polygon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1741 7 1741 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1741 7 1741 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1741 7 1741 14 , srcInfoPoints = [] } "Ellipse") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1742 7 1742 13 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1742 7 1742 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1742 7 1742 13 , srcInfoPoints = [] } "Circle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1743 7 1743 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1743 7 1743 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1743 7 1743 17 , srcInfoPoints = [] } "PointShape") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1744 7 1744 10 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1744 7 1744 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1744 7 1744 10 , srcInfoPoints = [] } "Egg") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1745 7 1745 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1745 7 1745 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1745 7 1745 15 , srcInfoPoints = [] } "Triangle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1746 7 1746 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1746 7 1746 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1746 7 1746 16 , srcInfoPoints = [] } "PlainText") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1747 7 1747 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1747 7 1747 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1747 7 1747 19 , srcInfoPoints = [] } "DiamondShape") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1748 7 1748 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1748 7 1748 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1748 7 1748 16 , srcInfoPoints = [] } "Trapezium") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1749 7 1749 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1749 7 1749 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1749 7 1749 20 , srcInfoPoints = [] } "Parallelogram") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1750 7 1750 12 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1750 7 1750 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1750 7 1750 12 , srcInfoPoints = [] } "House") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1751 7 1751 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1751 7 1751 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1751 7 1751 15 , srcInfoPoints = [] } "Pentagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1752 7 1752 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1752 7 1752 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1752 7 1752 14 , srcInfoPoints = [] } "Hexagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1753 7 1753 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1753 7 1753 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1753 7 1753 15 , srcInfoPoints = [] } "Septagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1754 7 1754 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1754 7 1754 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1754 7 1754 14 , srcInfoPoints = [] } "Octagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1755 7 1755 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1755 7 1755 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1755 7 1755 19 , srcInfoPoints = [] } "DoubleCircle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1756 7 1756 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1756 7 1756 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1756 7 1756 20 , srcInfoPoints = [] } "DoubleOctagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1757 7 1757 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1757 7 1757 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1757 7 1757 20 , srcInfoPoints = [] } "TripleOctagon") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1758 7 1758 18 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1758 7 1758 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1758 7 1758 18 , srcInfoPoints = [] } "InvTriangle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1759 7 1759 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1759 7 1759 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1759 7 1759 19 , srcInfoPoints = [] } "InvTrapezium") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1760 7 1760 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1760 7 1760 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1760 7 1760 15 , srcInfoPoints = [] } "InvHouse") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1761 7 1761 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1761 7 1761 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1761 7 1761 15 , srcInfoPoints = [] } "MDiamond") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1762 7 1762 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1762 7 1762 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1762 7 1762 14 , srcInfoPoints = [] } "MSquare") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1763 7 1763 14 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1763 7 1763 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1763 7 1763 14 , srcInfoPoints = [] } "MCircle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1764 7 1764 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1764 7 1764 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1764 7 1764 11 , srcInfoPoints = [] } "Note") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1765 7 1765 10 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1765 7 1765 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1765 7 1765 10 , srcInfoPoints = [] } "Tab") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1766 7 1766 13 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1766 7 1766 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1766 7 1766 13 , srcInfoPoints = [] } "Folder") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1767 7 1767 12 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1767 7 1767 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1767 7 1767 12 , srcInfoPoints = [] } "Box3D") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1768 7 1768 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1768 7 1768 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1768 7 1768 16 , srcInfoPoints = [] } "Component") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 7 1769 52 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1769 7 1769 15 , SrcSpan "tests/examples/Attributes.hs" 1769 16 1769 17 , SrcSpan "tests/examples/Attributes.hs" 1769 19 1769 20 , SrcSpan "tests/examples/Attributes.hs" 1769 24 1769 25 , SrcSpan "tests/examples/Attributes.hs" 1769 33 1769 34 , SrcSpan "tests/examples/Attributes.hs" 1769 39 1769 40 , SrcSpan "tests/examples/Attributes.hs" 1769 45 1769 46 , SrcSpan "tests/examples/Attributes.hs" 1769 51 1769 52 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 17 1769 19 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 17 1769 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 17 1769 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 17 1769 19 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 21 1769 24 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 21 1769 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 21 1769 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 21 1769 24 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 26 1769 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 26 1769 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 26 1769 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 26 1769 33 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 35 1769 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 35 1769 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 35 1769 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 35 1769 39 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 41 1769 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 41 1769 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 41 1769 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 41 1769 45 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 47 1769 51 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 47 1769 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 47 1769 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1769 47 1769 51 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 1 1803 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1771 1 1771 9 , SrcSpan "tests/examples/Attributes.hs" 1771 25 1771 30 , SrcSpan "tests/examples/Attributes.hs" 1772 5 1772 5 , SrcSpan "tests/examples/Attributes.hs" 1773 5 1773 5 , SrcSpan "tests/examples/Attributes.hs" 1774 5 1774 5 , SrcSpan "tests/examples/Attributes.hs" 1775 5 1775 5 , SrcSpan "tests/examples/Attributes.hs" 1776 5 1776 5 , SrcSpan "tests/examples/Attributes.hs" 1777 5 1777 5 , SrcSpan "tests/examples/Attributes.hs" 1778 5 1778 5 , SrcSpan "tests/examples/Attributes.hs" 1779 5 1779 5 , SrcSpan "tests/examples/Attributes.hs" 1780 5 1780 5 , SrcSpan "tests/examples/Attributes.hs" 1781 5 1781 5 , SrcSpan "tests/examples/Attributes.hs" 1782 5 1782 5 , SrcSpan "tests/examples/Attributes.hs" 1783 5 1783 5 , SrcSpan "tests/examples/Attributes.hs" 1784 5 1784 5 , SrcSpan "tests/examples/Attributes.hs" 1785 5 1785 5 , SrcSpan "tests/examples/Attributes.hs" 1786 5 1786 5 , SrcSpan "tests/examples/Attributes.hs" 1787 5 1787 5 , SrcSpan "tests/examples/Attributes.hs" 1788 5 1788 5 , SrcSpan "tests/examples/Attributes.hs" 1789 5 1789 5 , SrcSpan "tests/examples/Attributes.hs" 1790 5 1790 5 , SrcSpan "tests/examples/Attributes.hs" 1791 5 1791 5 , SrcSpan "tests/examples/Attributes.hs" 1792 5 1792 5 , SrcSpan "tests/examples/Attributes.hs" 1793 5 1793 5 , SrcSpan "tests/examples/Attributes.hs" 1794 5 1794 5 , SrcSpan "tests/examples/Attributes.hs" 1795 5 1795 5 , SrcSpan "tests/examples/Attributes.hs" 1796 5 1796 5 , SrcSpan "tests/examples/Attributes.hs" 1797 5 1797 5 , SrcSpan "tests/examples/Attributes.hs" 1798 5 1798 5 , SrcSpan "tests/examples/Attributes.hs" 1799 5 1799 5 , SrcSpan "tests/examples/Attributes.hs" 1800 5 1800 5 , SrcSpan "tests/examples/Attributes.hs" 1801 5 1801 5 , SrcSpan "tests/examples/Attributes.hs" 1803 1 1803 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 10 1771 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 10 1771 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 10 1771 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 10 1771 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 10 1771 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 19 1771 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 19 1771 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1771 19 1771 24 , srcInfoPoints = [] } "Shape"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 5 1801 45 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 5 1801 45 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 5 1772 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 5 1772 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 13 1772 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 13 1772 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 13 1772 21 , srcInfoPoints = [] } "BoxShape")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 27 1772 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1772 27 1772 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 29 1772 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 29 1772 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 29 1772 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 29 1772 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 34 1772 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1772 34 1772 39 , srcInfoPoints = [] } "box" "box")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 5 1773 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 5 1773 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 13 1773 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 13 1773 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 13 1773 20 , srcInfoPoints = [] } "Polygon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 27 1773 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1773 27 1773 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 29 1773 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 29 1773 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 29 1773 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 29 1773 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 34 1773 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1773 34 1773 43 , srcInfoPoints = [] } "polygon" "polygon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 5 1774 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 5 1774 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 13 1774 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 13 1774 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 13 1774 20 , srcInfoPoints = [] } "Ellipse")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 27 1774 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1774 27 1774 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 29 1774 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 29 1774 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 29 1774 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 29 1774 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 34 1774 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1774 34 1774 43 , srcInfoPoints = [] } "ellipse" "ellipse")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 5 1775 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 5 1775 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 13 1775 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 13 1775 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 13 1775 19 , srcInfoPoints = [] } "Circle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 27 1775 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1775 27 1775 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 29 1775 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 29 1775 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 29 1775 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 29 1775 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 34 1775 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1775 34 1775 42 , srcInfoPoints = [] } "circle" "circle")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 5 1776 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 5 1776 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 13 1776 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 13 1776 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 13 1776 23 , srcInfoPoints = [] } "PointShape")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 27 1776 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1776 27 1776 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 29 1776 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 29 1776 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 29 1776 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 29 1776 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 34 1776 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1776 34 1776 41 , srcInfoPoints = [] } "point" "point")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 5 1777 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 5 1777 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 13 1777 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 13 1777 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 13 1777 16 , srcInfoPoints = [] } "Egg")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 27 1777 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1777 27 1777 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 29 1777 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 29 1777 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 29 1777 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 29 1777 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 34 1777 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1777 34 1777 39 , srcInfoPoints = [] } "egg" "egg")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 5 1778 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 5 1778 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 13 1778 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 13 1778 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 13 1778 21 , srcInfoPoints = [] } "Triangle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 27 1778 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1778 27 1778 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 29 1778 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 29 1778 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 29 1778 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 29 1778 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 34 1778 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1778 34 1778 44 , srcInfoPoints = [] } "triangle" "triangle")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 5 1779 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 5 1779 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 13 1779 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 13 1779 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 13 1779 22 , srcInfoPoints = [] } "PlainText")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 27 1779 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1779 27 1779 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 29 1779 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 29 1779 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 29 1779 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 29 1779 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 34 1779 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1779 34 1779 45 , srcInfoPoints = [] } "plaintext" "plaintext")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 5 1780 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 5 1780 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 13 1780 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 13 1780 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 13 1780 25 , srcInfoPoints = [] } "DiamondShape")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 27 1780 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1780 27 1780 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 29 1780 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 29 1780 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 29 1780 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 29 1780 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 34 1780 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1780 34 1780 43 , srcInfoPoints = [] } "diamond" "diamond")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 5 1781 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 5 1781 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 13 1781 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 13 1781 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 13 1781 22 , srcInfoPoints = [] } "Trapezium")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 27 1781 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1781 27 1781 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 29 1781 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 29 1781 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 29 1781 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 29 1781 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 34 1781 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1781 34 1781 45 , srcInfoPoints = [] } "trapezium" "trapezium")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 5 1782 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 5 1782 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 13 1782 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 13 1782 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 13 1782 26 , srcInfoPoints = [] } "Parallelogram")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 27 1782 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1782 27 1782 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 29 1782 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 29 1782 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 29 1782 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 29 1782 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 34 1782 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1782 34 1782 49 , srcInfoPoints = [] } "parallelogram" "parallelogram")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 5 1783 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 5 1783 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 13 1783 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 13 1783 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 13 1783 18 , srcInfoPoints = [] } "House")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 27 1783 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1783 27 1783 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 29 1783 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 29 1783 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 29 1783 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 29 1783 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 34 1783 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1783 34 1783 41 , srcInfoPoints = [] } "house" "house")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 5 1784 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 5 1784 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 13 1784 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 13 1784 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 13 1784 21 , srcInfoPoints = [] } "Pentagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 27 1784 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1784 27 1784 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 29 1784 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 29 1784 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 29 1784 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 29 1784 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 34 1784 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1784 34 1784 44 , srcInfoPoints = [] } "pentagon" "pentagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 5 1785 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 5 1785 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 13 1785 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 13 1785 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 13 1785 20 , srcInfoPoints = [] } "Hexagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 27 1785 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1785 27 1785 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 29 1785 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 29 1785 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 29 1785 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 29 1785 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 34 1785 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1785 34 1785 43 , srcInfoPoints = [] } "hexagon" "hexagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 5 1786 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 5 1786 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 13 1786 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 13 1786 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 13 1786 21 , srcInfoPoints = [] } "Septagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 27 1786 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1786 27 1786 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 29 1786 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 29 1786 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 29 1786 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 29 1786 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 34 1786 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1786 34 1786 44 , srcInfoPoints = [] } "septagon" "septagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 5 1787 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 5 1787 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 13 1787 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 13 1787 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 13 1787 20 , srcInfoPoints = [] } "Octagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 27 1787 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1787 27 1787 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 29 1787 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 29 1787 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 29 1787 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 29 1787 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 34 1787 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1787 34 1787 43 , srcInfoPoints = [] } "octagon" "octagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 5 1788 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 5 1788 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 13 1788 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 13 1788 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 13 1788 25 , srcInfoPoints = [] } "DoubleCircle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 27 1788 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1788 27 1788 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 29 1788 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 29 1788 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 29 1788 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 29 1788 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 34 1788 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1788 34 1788 48 , srcInfoPoints = [] } "doublecircle" "doublecircle")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 5 1789 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 5 1789 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 13 1789 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 13 1789 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 13 1789 26 , srcInfoPoints = [] } "DoubleOctagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 27 1789 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1789 27 1789 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 29 1789 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 29 1789 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 29 1789 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 29 1789 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 34 1789 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1789 34 1789 49 , srcInfoPoints = [] } "doubleoctagon" "doubleoctagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 5 1790 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 5 1790 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 13 1790 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 13 1790 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 13 1790 26 , srcInfoPoints = [] } "TripleOctagon")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 27 1790 49 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1790 27 1790 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 29 1790 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 29 1790 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 29 1790 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 29 1790 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 34 1790 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1790 34 1790 49 , srcInfoPoints = [] } "tripleoctagon" "tripleoctagon")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 5 1791 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 5 1791 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 13 1791 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 13 1791 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 13 1791 24 , srcInfoPoints = [] } "InvTriangle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 27 1791 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1791 27 1791 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 29 1791 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 29 1791 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 29 1791 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 29 1791 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 34 1791 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1791 34 1791 47 , srcInfoPoints = [] } "invtriangle" "invtriangle")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 5 1792 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 5 1792 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 13 1792 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 13 1792 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 13 1792 25 , srcInfoPoints = [] } "InvTrapezium")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 27 1792 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1792 27 1792 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 29 1792 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 29 1792 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 29 1792 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 29 1792 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 34 1792 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1792 34 1792 48 , srcInfoPoints = [] } "invtrapezium" "invtrapezium")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 5 1793 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 5 1793 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 13 1793 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 13 1793 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 13 1793 21 , srcInfoPoints = [] } "InvHouse")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 27 1793 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1793 27 1793 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 29 1793 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 29 1793 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 29 1793 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 29 1793 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 34 1793 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1793 34 1793 44 , srcInfoPoints = [] } "invhouse" "invhouse")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 5 1794 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 5 1794 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 13 1794 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 13 1794 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 13 1794 21 , srcInfoPoints = [] } "MDiamond")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 27 1794 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1794 27 1794 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 29 1794 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 29 1794 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 29 1794 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 29 1794 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 34 1794 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1794 34 1794 44 , srcInfoPoints = [] } "Mdiamond" "Mdiamond")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 5 1795 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 5 1795 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 13 1795 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 13 1795 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 13 1795 20 , srcInfoPoints = [] } "MSquare")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 27 1795 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1795 27 1795 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 29 1795 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 29 1795 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 29 1795 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 29 1795 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 34 1795 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1795 34 1795 43 , srcInfoPoints = [] } "Msquare" "Msquare")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 5 1796 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 5 1796 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 13 1796 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 13 1796 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 13 1796 20 , srcInfoPoints = [] } "MCircle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 27 1796 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1796 27 1796 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 29 1796 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 29 1796 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 29 1796 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 29 1796 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 34 1796 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1796 34 1796 43 , srcInfoPoints = [] } "Mcircle" "Mcircle")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 5 1797 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 5 1797 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 13 1797 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 13 1797 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 13 1797 17 , srcInfoPoints = [] } "Note")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 27 1797 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1797 27 1797 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 29 1797 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 29 1797 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 29 1797 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 29 1797 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 34 1797 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1797 34 1797 40 , srcInfoPoints = [] } "note" "note")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 5 1798 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 5 1798 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 13 1798 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 13 1798 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 13 1798 16 , srcInfoPoints = [] } "Tab")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 27 1798 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1798 27 1798 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 29 1798 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 29 1798 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 29 1798 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 29 1798 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 34 1798 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1798 34 1798 39 , srcInfoPoints = [] } "tab" "tab")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 5 1799 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 5 1799 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 13 1799 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 13 1799 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 13 1799 19 , srcInfoPoints = [] } "Folder")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 27 1799 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1799 27 1799 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 29 1799 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 29 1799 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 29 1799 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 29 1799 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 34 1799 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1799 34 1799 42 , srcInfoPoints = [] } "folder" "folder")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 5 1800 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 5 1800 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 13 1800 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 13 1800 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 13 1800 18 , srcInfoPoints = [] } "Box3D")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 27 1800 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1800 27 1800 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 29 1800 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 29 1800 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 29 1800 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 29 1800 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 34 1800 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1800 34 1800 41 , srcInfoPoints = [] } "box3d" "box3d")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 5 1801 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 5 1801 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 13 1801 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 13 1801 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 13 1801 22 , srcInfoPoints = [] } "Component")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 27 1801 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1801 27 1801 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 29 1801 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 29 1801 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 29 1801 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 29 1801 33 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 34 1801 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1801 34 1801 45 , srcInfoPoints = [] } "component" "component")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 1 1838 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1803 1 1803 9 , SrcSpan "tests/examples/Attributes.hs" 1803 25 1803 30 , SrcSpan "tests/examples/Attributes.hs" 1804 5 1804 5 , SrcSpan "tests/examples/Attributes.hs" 1838 1 1838 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 10 1803 24 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 10 1803 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 10 1803 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 10 1803 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 10 1803 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 19 1803 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 19 1803 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1803 19 1803 24 , srcInfoPoints = [] } "Shape"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 5 1834 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 5 1834 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 5 1804 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 5 1804 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 15 1834 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1804 15 1804 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 17 1834 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 17 1804 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 17 1804 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 17 1804 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 23 1834 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1804 23 1804 24 , SrcSpan "tests/examples/Attributes.hs" 1805 23 1805 24 , SrcSpan "tests/examples/Attributes.hs" 1806 23 1806 24 , SrcSpan "tests/examples/Attributes.hs" 1807 23 1807 24 , SrcSpan "tests/examples/Attributes.hs" 1808 23 1808 24 , SrcSpan "tests/examples/Attributes.hs" 1809 23 1809 24 , SrcSpan "tests/examples/Attributes.hs" 1810 23 1810 24 , SrcSpan "tests/examples/Attributes.hs" 1811 23 1811 24 , SrcSpan "tests/examples/Attributes.hs" 1812 23 1812 24 , SrcSpan "tests/examples/Attributes.hs" 1813 23 1813 24 , SrcSpan "tests/examples/Attributes.hs" 1814 23 1814 24 , SrcSpan "tests/examples/Attributes.hs" 1815 23 1815 24 , SrcSpan "tests/examples/Attributes.hs" 1816 23 1816 24 , SrcSpan "tests/examples/Attributes.hs" 1817 23 1817 24 , SrcSpan "tests/examples/Attributes.hs" 1818 23 1818 24 , SrcSpan "tests/examples/Attributes.hs" 1819 23 1819 24 , SrcSpan "tests/examples/Attributes.hs" 1820 23 1820 24 , SrcSpan "tests/examples/Attributes.hs" 1821 23 1821 24 , SrcSpan "tests/examples/Attributes.hs" 1822 23 1822 24 , SrcSpan "tests/examples/Attributes.hs" 1823 23 1823 24 , SrcSpan "tests/examples/Attributes.hs" 1824 23 1824 24 , SrcSpan "tests/examples/Attributes.hs" 1825 23 1825 24 , SrcSpan "tests/examples/Attributes.hs" 1826 23 1826 24 , SrcSpan "tests/examples/Attributes.hs" 1827 23 1827 24 , SrcSpan "tests/examples/Attributes.hs" 1828 23 1828 24 , SrcSpan "tests/examples/Attributes.hs" 1829 23 1829 24 , SrcSpan "tests/examples/Attributes.hs" 1830 23 1830 24 , SrcSpan "tests/examples/Attributes.hs" 1831 23 1831 24 , SrcSpan "tests/examples/Attributes.hs" 1832 23 1832 24 , SrcSpan "tests/examples/Attributes.hs" 1833 23 1833 24 , SrcSpan "tests/examples/Attributes.hs" 1834 23 1834 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 25 1804 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 25 1804 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 25 1804 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 25 1804 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 25 1804 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 35 1804 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 35 1804 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 35 1804 40 , srcInfoPoints = [] } "Box3D")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 41 1804 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1804 41 1804 48 , srcInfoPoints = [] } "box3d" "box3d")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 25 1805 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 25 1805 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 25 1805 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 25 1805 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 25 1805 35 , srcInfoPoints = [] } "stringReps"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 36 1805 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 36 1805 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 36 1805 44 , srcInfoPoints = [] } "BoxShape")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 45 1805 71 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1805 45 1805 46 , SrcSpan "tests/examples/Attributes.hs" 1805 51 1805 52 , SrcSpan "tests/examples/Attributes.hs" 1805 63 1805 64 , SrcSpan "tests/examples/Attributes.hs" 1805 70 1805 71 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 46 1805 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 46 1805 51 , srcInfoPoints = [] } "box" "box") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 52 1805 63 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 52 1805 63 , srcInfoPoints = [] } "rectangle" "rectangle") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 64 1805 70 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1805 64 1805 70 , srcInfoPoints = [] } "rect" "rect") ]) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 25 1806 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 25 1806 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 25 1806 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 25 1806 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 25 1806 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 35 1806 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 35 1806 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 35 1806 42 , srcInfoPoints = [] } "Polygon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 43 1806 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1806 43 1806 52 , srcInfoPoints = [] } "polygon" "polygon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 25 1807 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 25 1807 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 25 1807 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 25 1807 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 25 1807 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 35 1807 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 35 1807 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 35 1807 42 , srcInfoPoints = [] } "Ellipse")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 43 1807 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1807 43 1807 52 , srcInfoPoints = [] } "ellipse" "ellipse")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 25 1808 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 25 1808 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 25 1808 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 25 1808 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 25 1808 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 35 1808 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 35 1808 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 35 1808 41 , srcInfoPoints = [] } "Circle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 42 1808 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1808 42 1808 50 , srcInfoPoints = [] } "circle" "circle")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 25 1809 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 25 1809 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 25 1809 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 25 1809 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 25 1809 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 35 1809 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 35 1809 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 35 1809 45 , srcInfoPoints = [] } "PointShape")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 46 1809 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1809 46 1809 53 , srcInfoPoints = [] } "point" "point")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 25 1810 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 25 1810 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 25 1810 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 25 1810 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 25 1810 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 35 1810 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 35 1810 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 35 1810 38 , srcInfoPoints = [] } "Egg")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 39 1810 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1810 39 1810 44 , srcInfoPoints = [] } "egg" "egg")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 25 1811 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 25 1811 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 25 1811 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 25 1811 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 25 1811 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 35 1811 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 35 1811 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 35 1811 43 , srcInfoPoints = [] } "Triangle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 44 1811 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1811 44 1811 54 , srcInfoPoints = [] } "triangle" "triangle")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 25 1812 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 25 1812 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 25 1812 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 25 1812 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 25 1812 35 , srcInfoPoints = [] } "stringReps"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 36 1812 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 36 1812 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 36 1812 45 , srcInfoPoints = [] } "PlainText")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 46 1812 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1812 46 1812 47 , SrcSpan "tests/examples/Attributes.hs" 1812 58 1812 59 , SrcSpan "tests/examples/Attributes.hs" 1812 65 1812 66 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 47 1812 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 47 1812 58 , srcInfoPoints = [] } "plaintext" "plaintext") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 59 1812 65 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1812 59 1812 65 , srcInfoPoints = [] } "none" "none") ]) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 25 1813 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 25 1813 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 25 1813 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 25 1813 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 25 1813 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 35 1813 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 35 1813 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 35 1813 47 , srcInfoPoints = [] } "DiamondShape")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 48 1813 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1813 48 1813 57 , srcInfoPoints = [] } "diamond" "diamond")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 25 1814 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 25 1814 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 25 1814 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 25 1814 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 25 1814 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 35 1814 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 35 1814 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 35 1814 44 , srcInfoPoints = [] } "Trapezium")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 45 1814 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1814 45 1814 56 , srcInfoPoints = [] } "trapezium" "trapezium")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 25 1815 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 25 1815 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 25 1815 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 25 1815 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 25 1815 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 35 1815 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 35 1815 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 35 1815 48 , srcInfoPoints = [] } "Parallelogram")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 49 1815 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1815 49 1815 64 , srcInfoPoints = [] } "parallelogram" "parallelogram")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 25 1816 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 25 1816 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 25 1816 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 25 1816 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 25 1816 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 35 1816 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 35 1816 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 35 1816 40 , srcInfoPoints = [] } "House")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 41 1816 48 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1816 41 1816 48 , srcInfoPoints = [] } "house" "house")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 25 1817 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 25 1817 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 25 1817 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 25 1817 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 25 1817 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 35 1817 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 35 1817 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 35 1817 43 , srcInfoPoints = [] } "Pentagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 44 1817 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1817 44 1817 54 , srcInfoPoints = [] } "pentagon" "pentagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 25 1818 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 25 1818 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 25 1818 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 25 1818 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 25 1818 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 35 1818 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 35 1818 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 35 1818 42 , srcInfoPoints = [] } "Hexagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 43 1818 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1818 43 1818 52 , srcInfoPoints = [] } "hexagon" "hexagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 25 1819 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 25 1819 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 25 1819 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 25 1819 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 25 1819 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 35 1819 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 35 1819 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 35 1819 43 , srcInfoPoints = [] } "Septagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 44 1819 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1819 44 1819 54 , srcInfoPoints = [] } "septagon" "septagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 25 1820 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 25 1820 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 25 1820 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 25 1820 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 25 1820 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 35 1820 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 35 1820 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 35 1820 42 , srcInfoPoints = [] } "Octagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 43 1820 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1820 43 1820 52 , srcInfoPoints = [] } "octagon" "octagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 25 1821 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 25 1821 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 25 1821 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 25 1821 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 25 1821 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 35 1821 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 35 1821 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 35 1821 47 , srcInfoPoints = [] } "DoubleCircle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 48 1821 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1821 48 1821 62 , srcInfoPoints = [] } "doublecircle" "doublecircle")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 25 1822 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 25 1822 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 25 1822 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 25 1822 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 25 1822 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 35 1822 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 35 1822 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 35 1822 48 , srcInfoPoints = [] } "DoubleOctagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 49 1822 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1822 49 1822 64 , srcInfoPoints = [] } "doubleoctagon" "doubleoctagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 25 1823 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 25 1823 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 25 1823 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 25 1823 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 25 1823 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 35 1823 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 35 1823 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 35 1823 48 , srcInfoPoints = [] } "TripleOctagon")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 49 1823 64 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1823 49 1823 64 , srcInfoPoints = [] } "tripleoctagon" "tripleoctagon")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 25 1824 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 25 1824 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 25 1824 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 25 1824 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 25 1824 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 35 1824 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 35 1824 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 35 1824 46 , srcInfoPoints = [] } "InvTriangle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 47 1824 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1824 47 1824 60 , srcInfoPoints = [] } "invtriangle" "invtriangle")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 25 1825 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 25 1825 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 25 1825 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 25 1825 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 25 1825 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 35 1825 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 35 1825 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 35 1825 47 , srcInfoPoints = [] } "InvTrapezium")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 48 1825 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1825 48 1825 62 , srcInfoPoints = [] } "invtrapezium" "invtrapezium")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 25 1826 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 25 1826 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 25 1826 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 25 1826 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 25 1826 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 35 1826 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 35 1826 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 35 1826 43 , srcInfoPoints = [] } "InvHouse")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 44 1826 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1826 44 1826 54 , srcInfoPoints = [] } "invhouse" "invhouse")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 25 1827 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 25 1827 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 25 1827 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 25 1827 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 25 1827 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 35 1827 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 35 1827 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 35 1827 43 , srcInfoPoints = [] } "MDiamond")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 44 1827 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1827 44 1827 54 , srcInfoPoints = [] } "Mdiamond" "Mdiamond")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 25 1828 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 25 1828 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 25 1828 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 25 1828 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 25 1828 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 35 1828 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 35 1828 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 35 1828 42 , srcInfoPoints = [] } "MSquare")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 43 1828 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1828 43 1828 52 , srcInfoPoints = [] } "Msquare" "Msquare")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 25 1829 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 25 1829 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 25 1829 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 25 1829 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 25 1829 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 35 1829 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 35 1829 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 35 1829 42 , srcInfoPoints = [] } "MCircle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 43 1829 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1829 43 1829 52 , srcInfoPoints = [] } "Mcircle" "Mcircle")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 25 1830 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 25 1830 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 25 1830 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 25 1830 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 25 1830 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 35 1830 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 35 1830 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 35 1830 39 , srcInfoPoints = [] } "Note")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 40 1830 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1830 40 1830 46 , srcInfoPoints = [] } "note" "note")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 25 1831 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 25 1831 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 25 1831 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 25 1831 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 25 1831 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 35 1831 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 35 1831 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 35 1831 38 , srcInfoPoints = [] } "Tab")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 39 1831 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1831 39 1831 44 , srcInfoPoints = [] } "tab" "tab")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 25 1832 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 25 1832 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 25 1832 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 25 1832 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 25 1832 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 35 1832 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 35 1832 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 35 1832 41 , srcInfoPoints = [] } "Folder")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 42 1832 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1832 42 1832 50 , srcInfoPoints = [] } "folder" "folder")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 25 1833 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 25 1833 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 25 1833 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 25 1833 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 25 1833 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 35 1833 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 35 1833 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 35 1833 44 , srcInfoPoints = [] } "Component")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 45 1833 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1833 45 1833 56 , srcInfoPoints = [] } "component" "component")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 1 1845 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1838 17 1838 18 , SrcSpan "tests/examples/Attributes.hs" 1839 17 1839 18 , SrcSpan "tests/examples/Attributes.hs" 1840 17 1840 18 , SrcSpan "tests/examples/Attributes.hs" 1841 17 1841 18 , SrcSpan "tests/examples/Attributes.hs" 1842 17 1842 18 , SrcSpan "tests/examples/Attributes.hs" 1843 17 1843 18 , SrcSpan "tests/examples/Attributes.hs" 1844 17 1844 18 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 1 1838 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 6 1838 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 6 1838 16 , srcInfoPoints = [] } "SmoothType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 19 1838 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 19 1838 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1838 19 1838 27 , srcInfoPoints = [] } "NoSmooth") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1839 19 1839 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1839 19 1839 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1839 19 1839 26 , srcInfoPoints = [] } "AvgDist") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1840 19 1840 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1840 19 1840 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1840 19 1840 28 , srcInfoPoints = [] } "GraphDist") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1841 19 1841 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1841 19 1841 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1841 19 1841 28 , srcInfoPoints = [] } "PowerDist") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1842 19 1842 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1842 19 1842 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1842 19 1842 22 , srcInfoPoints = [] } "RNG") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1843 19 1843 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1843 19 1843 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1843 19 1843 25 , srcInfoPoints = [] } "Spring") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1844 19 1844 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1844 19 1844 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1844 19 1844 33 , srcInfoPoints = [] } "TriangleSmooth") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 19 1845 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1845 19 1845 27 , SrcSpan "tests/examples/Attributes.hs" 1845 28 1845 29 , SrcSpan "tests/examples/Attributes.hs" 1845 31 1845 32 , SrcSpan "tests/examples/Attributes.hs" 1845 36 1845 37 , SrcSpan "tests/examples/Attributes.hs" 1845 45 1845 46 , SrcSpan "tests/examples/Attributes.hs" 1845 51 1845 52 , SrcSpan "tests/examples/Attributes.hs" 1845 57 1845 58 , SrcSpan "tests/examples/Attributes.hs" 1845 63 1845 64 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 29 1845 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 29 1845 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 29 1845 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 29 1845 31 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 33 1845 36 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 33 1845 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 33 1845 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 33 1845 36 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 38 1845 45 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 38 1845 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 38 1845 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 38 1845 45 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 47 1845 51 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 47 1845 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 47 1845 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 47 1845 51 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 53 1845 57 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 53 1845 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 53 1845 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 53 1845 57 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 59 1845 63 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 59 1845 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 59 1845 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1845 59 1845 63 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 1 1856 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1847 1 1847 9 , SrcSpan "tests/examples/Attributes.hs" 1847 30 1847 35 , SrcSpan "tests/examples/Attributes.hs" 1848 5 1848 5 , SrcSpan "tests/examples/Attributes.hs" 1849 5 1849 5 , SrcSpan "tests/examples/Attributes.hs" 1850 5 1850 5 , SrcSpan "tests/examples/Attributes.hs" 1851 5 1851 5 , SrcSpan "tests/examples/Attributes.hs" 1852 5 1852 5 , SrcSpan "tests/examples/Attributes.hs" 1853 5 1853 5 , SrcSpan "tests/examples/Attributes.hs" 1854 5 1854 5 , SrcSpan "tests/examples/Attributes.hs" 1856 1 1856 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 10 1847 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 10 1847 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 10 1847 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 10 1847 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 10 1847 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 19 1847 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 19 1847 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1847 19 1847 29 , srcInfoPoints = [] } "SmoothType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 5 1854 45 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 5 1854 45 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 5 1848 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 5 1848 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 13 1848 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 13 1848 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 13 1848 21 , srcInfoPoints = [] } "NoSmooth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 28 1848 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1848 28 1848 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 30 1848 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 30 1848 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 30 1848 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 30 1848 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 35 1848 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1848 35 1848 41 , srcInfoPoints = [] } "none" "none")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 5 1849 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 5 1849 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 13 1849 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 13 1849 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 13 1849 20 , srcInfoPoints = [] } "AvgDist")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 28 1849 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1849 28 1849 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 30 1849 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 30 1849 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 30 1849 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 30 1849 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 35 1849 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1849 35 1849 45 , srcInfoPoints = [] } "avg_dist" "avg_dist")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 5 1850 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 5 1850 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 13 1850 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 13 1850 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 13 1850 22 , srcInfoPoints = [] } "GraphDist")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 28 1850 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1850 28 1850 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 30 1850 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 30 1850 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 30 1850 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 30 1850 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 35 1850 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1850 35 1850 47 , srcInfoPoints = [] } "graph_dist" "graph_dist")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 5 1851 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 5 1851 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 13 1851 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 13 1851 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 13 1851 22 , srcInfoPoints = [] } "PowerDist")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 28 1851 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1851 28 1851 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 30 1851 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 30 1851 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 30 1851 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 30 1851 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 35 1851 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1851 35 1851 47 , srcInfoPoints = [] } "power_dist" "power_dist")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 5 1852 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 5 1852 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 13 1852 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 13 1852 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 13 1852 16 , srcInfoPoints = [] } "RNG")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 28 1852 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1852 28 1852 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 30 1852 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 30 1852 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 30 1852 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 30 1852 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 35 1852 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1852 35 1852 40 , srcInfoPoints = [] } "rng" "rng")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 5 1853 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 5 1853 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 13 1853 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 13 1853 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 13 1853 19 , srcInfoPoints = [] } "Spring")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 28 1853 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1853 28 1853 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 30 1853 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 30 1853 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 30 1853 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 30 1853 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 35 1853 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1853 35 1853 43 , srcInfoPoints = [] } "spring" "spring")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 5 1854 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 5 1854 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 13 1854 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 13 1854 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 13 1854 27 , srcInfoPoints = [] } "TriangleSmooth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 28 1854 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1854 28 1854 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 30 1854 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 30 1854 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 30 1854 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 30 1854 34 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 35 1854 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1854 35 1854 45 , srcInfoPoints = [] } "triangle" "triangle")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 1 1868 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1856 1 1856 9 , SrcSpan "tests/examples/Attributes.hs" 1856 30 1856 35 , SrcSpan "tests/examples/Attributes.hs" 1857 5 1857 5 , SrcSpan "tests/examples/Attributes.hs" 1868 1 1868 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 10 1856 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 10 1856 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 10 1856 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 10 1856 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 10 1856 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 19 1856 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 19 1856 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1856 19 1856 29 , srcInfoPoints = [] } "SmoothType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 5 1864 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 5 1864 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 5 1857 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 5 1857 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 15 1864 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1857 15 1857 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 17 1864 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 17 1857 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 17 1857 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 17 1857 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 23 1864 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1857 23 1857 24 , SrcSpan "tests/examples/Attributes.hs" 1858 23 1858 24 , SrcSpan "tests/examples/Attributes.hs" 1859 23 1859 24 , SrcSpan "tests/examples/Attributes.hs" 1860 23 1860 24 , SrcSpan "tests/examples/Attributes.hs" 1861 23 1861 24 , SrcSpan "tests/examples/Attributes.hs" 1862 23 1862 24 , SrcSpan "tests/examples/Attributes.hs" 1863 23 1863 24 , SrcSpan "tests/examples/Attributes.hs" 1864 23 1864 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 25 1857 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 25 1857 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 25 1857 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 25 1857 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 25 1857 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 35 1857 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 35 1857 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 35 1857 43 , srcInfoPoints = [] } "NoSmooth")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 44 1857 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1857 44 1857 50 , srcInfoPoints = [] } "none" "none")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 25 1858 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 25 1858 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 25 1858 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 25 1858 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 25 1858 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 35 1858 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 35 1858 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 35 1858 42 , srcInfoPoints = [] } "AvgDist")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 43 1858 53 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1858 43 1858 53 , srcInfoPoints = [] } "avg_dist" "avg_dist")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 25 1859 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 25 1859 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 25 1859 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 25 1859 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 25 1859 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 35 1859 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 35 1859 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 35 1859 44 , srcInfoPoints = [] } "GraphDist")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 45 1859 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1859 45 1859 57 , srcInfoPoints = [] } "graph_dist" "graph_dist")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 25 1860 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 25 1860 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 25 1860 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 25 1860 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 25 1860 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 35 1860 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 35 1860 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 35 1860 44 , srcInfoPoints = [] } "PowerDist")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 45 1860 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1860 45 1860 57 , srcInfoPoints = [] } "power_dist" "power_dist")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 25 1861 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 25 1861 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 25 1861 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 25 1861 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 25 1861 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 35 1861 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 35 1861 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 35 1861 38 , srcInfoPoints = [] } "RNG")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 39 1861 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1861 39 1861 44 , srcInfoPoints = [] } "rng" "rng")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 25 1862 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 25 1862 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 25 1862 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 25 1862 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 25 1862 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 35 1862 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 35 1862 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 35 1862 41 , srcInfoPoints = [] } "Spring")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 42 1862 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1862 42 1862 50 , srcInfoPoints = [] } "spring" "spring")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 25 1863 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 25 1863 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 25 1863 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 25 1863 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 25 1863 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 35 1863 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 35 1863 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 35 1863 49 , srcInfoPoints = [] } "TriangleSmooth")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 50 1863 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1863 50 1863 60 , srcInfoPoints = [] } "triangle" "triangle")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 1 1871 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1868 16 1868 17 , SrcSpan "tests/examples/Attributes.hs" 1869 16 1869 17 , SrcSpan "tests/examples/Attributes.hs" 1870 16 1870 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 1 1868 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 6 1868 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 6 1868 15 , srcInfoPoints = [] } "StartType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 18 1868 36 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 18 1868 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 18 1868 28 , srcInfoPoints = [] } "StartStyle") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 29 1868 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 29 1868 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1868 29 1868 36 , srcInfoPoints = [] } "STStyle")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 18 1869 31 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 18 1869 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 18 1869 27 , srcInfoPoints = [] } "StartSeed") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 28 1869 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 28 1869 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1869 28 1869 31 , srcInfoPoints = [] } "Int")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 18 1870 44 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 18 1870 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 18 1870 32 , srcInfoPoints = [] } "StartStyleSeed") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 33 1870 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 33 1870 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 33 1870 40 , srcInfoPoints = [] } "STStyle")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 41 1870 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 41 1870 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1870 41 1870 44 , srcInfoPoints = [] } "Int")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 18 1871 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1871 18 1871 26 , SrcSpan "tests/examples/Attributes.hs" 1871 27 1871 28 , SrcSpan "tests/examples/Attributes.hs" 1871 30 1871 31 , SrcSpan "tests/examples/Attributes.hs" 1871 35 1871 36 , SrcSpan "tests/examples/Attributes.hs" 1871 41 1871 42 , SrcSpan "tests/examples/Attributes.hs" 1871 47 1871 48 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 28 1871 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 28 1871 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 28 1871 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 28 1871 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 32 1871 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 32 1871 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 32 1871 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 32 1871 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 37 1871 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 37 1871 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 37 1871 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 37 1871 41 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 43 1871 47 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 43 1871 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 43 1871 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1871 43 1871 47 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 1 1878 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1873 1 1873 9 , SrcSpan "tests/examples/Attributes.hs" 1873 29 1873 34 , SrcSpan "tests/examples/Attributes.hs" 1874 5 1874 5 , SrcSpan "tests/examples/Attributes.hs" 1875 5 1875 5 , SrcSpan "tests/examples/Attributes.hs" 1876 5 1876 5 , SrcSpan "tests/examples/Attributes.hs" 1878 1 1878 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 10 1873 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 10 1873 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 10 1873 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 10 1873 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 10 1873 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 19 1873 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 19 1873 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1873 19 1873 28 , srcInfoPoints = [] } "StartType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 5 1876 60 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 5 1876 60 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 5 1874 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 5 1874 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 13 1874 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1874 13 1874 14 , SrcSpan "tests/examples/Attributes.hs" 1874 27 1874 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 14 1874 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 14 1874 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 14 1874 24 , srcInfoPoints = [] } "StartStyle")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 25 1874 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 25 1874 27 , srcInfoPoints = [] } "ss") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 35 1874 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1874 35 1874 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 37 1874 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 37 1874 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 37 1874 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 37 1874 44 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 45 1874 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 45 1874 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1874 45 1874 47 , srcInfoPoints = [] } "ss"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 5 1875 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 5 1875 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 13 1875 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1875 13 1875 14 , SrcSpan "tests/examples/Attributes.hs" 1875 25 1875 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 14 1875 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 14 1875 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 14 1875 23 , srcInfoPoints = [] } "StartSeed")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 24 1875 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 24 1875 25 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 35 1875 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1875 35 1875 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 37 1875 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 37 1875 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 37 1875 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 37 1875 44 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 45 1875 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 45 1875 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1875 45 1875 46 , srcInfoPoints = [] } "s"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 5 1876 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 5 1876 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 13 1876 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1876 13 1876 14 , SrcSpan "tests/examples/Attributes.hs" 1876 33 1876 34 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 14 1876 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 14 1876 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 14 1876 28 , srcInfoPoints = [] } "StartStyleSeed")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 29 1876 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 29 1876 31 , srcInfoPoints = [] } "ss") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 32 1876 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 32 1876 33 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 35 1876 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1876 35 1876 36 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 37 1876 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 37 1876 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 37 1876 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 37 1876 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 37 1876 44 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 45 1876 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 45 1876 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 45 1876 47 , srcInfoPoints = [] } "ss")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 48 1876 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 48 1876 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 48 1876 50 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 51 1876 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 51 1876 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 51 1876 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 51 1876 58 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 59 1876 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 59 1876 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1876 59 1876 60 , srcInfoPoints = [] } "s")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 1 1886 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1878 1 1878 9 , SrcSpan "tests/examples/Attributes.hs" 1878 29 1878 34 , SrcSpan "tests/examples/Attributes.hs" 1879 5 1879 5 , SrcSpan "tests/examples/Attributes.hs" 1886 1 1886 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 10 1878 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 10 1878 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 10 1878 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 10 1878 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 10 1878 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 19 1878 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 19 1878 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1878 19 1878 28 , srcInfoPoints = [] } "StartType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 5 1884 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 5 1884 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 5 1879 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 5 1879 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 15 1884 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1879 15 1879 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 17 1884 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 17 1879 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 17 1879 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 17 1879 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 23 1884 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1879 23 1879 24 , SrcSpan "tests/examples/Attributes.hs" 1882 23 1882 24 , SrcSpan "tests/examples/Attributes.hs" 1883 23 1883 24 , SrcSpan "tests/examples/Attributes.hs" 1884 23 1884 24 ] } [ Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 25 1881 56 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1879 25 1879 27 , SrcSpan "tests/examples/Attributes.hs" 1879 28 1879 28 , SrcSpan "tests/examples/Attributes.hs" 1880 28 1880 28 , SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 28 , SrcSpan "tests/examples/Attributes.hs" 1882 23 1882 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 28 1879 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1879 31 1879 33 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 28 1879 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 28 1879 30 , srcInfoPoints = [] } "ss")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 34 1879 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 34 1879 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1879 34 1879 43 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 28 1880 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1880 31 1880 33 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 28 1880 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 28 1880 29 , srcInfoPoints = [] } "s")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 34 1880 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 34 1880 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1880 34 1880 43 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 56 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 28 1881 34 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 35 1881 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 35 1881 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 35 1881 36 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 37 1881 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 37 1881 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 37 1881 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 37 1881 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 37 1881 51 , srcInfoPoints = [] } "StartStyleSeed"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 52 1881 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 52 1881 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 52 1881 54 , srcInfoPoints = [] } "ss")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 55 1881 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 55 1881 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1881 55 1881 56 , srcInfoPoints = [] } "s"))))) ] , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 25 1882 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 25 1882 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 25 1882 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 25 1882 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 25 1882 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 31 1882 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 31 1882 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 31 1882 41 , srcInfoPoints = [] } "StartStyle")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 42 1882 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 42 1882 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1882 42 1882 51 , srcInfoPoints = [] } "parseUnqt"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 25 1883 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 25 1883 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 25 1883 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 25 1883 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 25 1883 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 31 1883 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 31 1883 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 31 1883 40 , srcInfoPoints = [] } "StartSeed")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 41 1883 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 41 1883 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1883 41 1883 50 , srcInfoPoints = [] } "parseUnqt"))) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 1 1889 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1886 14 1886 15 , SrcSpan "tests/examples/Attributes.hs" 1887 14 1887 15 , SrcSpan "tests/examples/Attributes.hs" 1888 14 1888 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 1 1886 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 6 1886 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 6 1886 13 , srcInfoPoints = [] } "STStyle")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 16 1886 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 16 1886 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1886 16 1886 28 , srcInfoPoints = [] } "RegularStyle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1887 16 1887 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1887 16 1887 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1887 16 1887 25 , srcInfoPoints = [] } "SelfStyle") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1888 16 1888 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1888 16 1888 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1888 16 1888 27 , srcInfoPoints = [] } "RandomStyle") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 16 1889 61 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1889 16 1889 24 , SrcSpan "tests/examples/Attributes.hs" 1889 25 1889 26 , SrcSpan "tests/examples/Attributes.hs" 1889 28 1889 29 , SrcSpan "tests/examples/Attributes.hs" 1889 33 1889 34 , SrcSpan "tests/examples/Attributes.hs" 1889 42 1889 43 , SrcSpan "tests/examples/Attributes.hs" 1889 48 1889 49 , SrcSpan "tests/examples/Attributes.hs" 1889 54 1889 55 , SrcSpan "tests/examples/Attributes.hs" 1889 60 1889 61 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 26 1889 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 26 1889 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 26 1889 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 26 1889 28 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 30 1889 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 30 1889 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 30 1889 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 30 1889 33 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 35 1889 42 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 35 1889 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 35 1889 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 35 1889 42 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 44 1889 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 44 1889 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 44 1889 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 44 1889 48 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 50 1889 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 50 1889 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 50 1889 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 50 1889 54 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 56 1889 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 56 1889 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 56 1889 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1889 56 1889 60 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 1 1896 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1891 1 1891 9 , SrcSpan "tests/examples/Attributes.hs" 1891 27 1891 32 , SrcSpan "tests/examples/Attributes.hs" 1892 5 1892 5 , SrcSpan "tests/examples/Attributes.hs" 1893 5 1893 5 , SrcSpan "tests/examples/Attributes.hs" 1894 5 1894 5 , SrcSpan "tests/examples/Attributes.hs" 1896 1 1896 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 10 1891 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 10 1891 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 10 1891 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 10 1891 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 10 1891 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 19 1891 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 19 1891 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1891 19 1891 26 , srcInfoPoints = [] } "STStyle"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 5 1894 41 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 5 1894 41 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 5 1892 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 5 1892 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 13 1892 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 13 1892 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 13 1892 25 , srcInfoPoints = [] } "RegularStyle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 26 1892 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1892 26 1892 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 28 1892 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 28 1892 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 28 1892 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 28 1892 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 33 1892 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1892 33 1892 42 , srcInfoPoints = [] } "regular" "regular")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 5 1893 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 5 1893 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 13 1893 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 13 1893 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 13 1893 22 , srcInfoPoints = [] } "SelfStyle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 26 1893 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1893 26 1893 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 28 1893 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 28 1893 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 28 1893 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 28 1893 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 33 1893 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1893 33 1893 39 , srcInfoPoints = [] } "self" "self")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 5 1894 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 5 1894 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 13 1894 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 13 1894 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 13 1894 24 , srcInfoPoints = [] } "RandomStyle")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 26 1894 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1894 26 1894 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 28 1894 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 28 1894 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 28 1894 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 28 1894 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 33 1894 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1894 33 1894 41 , srcInfoPoints = [] } "random" "random")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 1 1904 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1896 1 1896 9 , SrcSpan "tests/examples/Attributes.hs" 1896 27 1896 32 , SrcSpan "tests/examples/Attributes.hs" 1897 5 1897 5 , SrcSpan "tests/examples/Attributes.hs" 1904 1 1904 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 10 1896 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 10 1896 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 10 1896 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 10 1896 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 10 1896 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 19 1896 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 19 1896 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1896 19 1896 26 , srcInfoPoints = [] } "STStyle"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 5 1900 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 5 1900 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 5 1897 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 5 1897 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 15 1900 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1897 15 1897 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 17 1900 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 17 1897 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 17 1897 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 17 1897 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 23 1900 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1897 23 1897 24 , SrcSpan "tests/examples/Attributes.hs" 1898 23 1898 24 , SrcSpan "tests/examples/Attributes.hs" 1899 23 1899 24 , SrcSpan "tests/examples/Attributes.hs" 1900 23 1900 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 25 1897 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 25 1897 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 25 1897 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 25 1897 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 25 1897 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 35 1897 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 35 1897 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 35 1897 47 , srcInfoPoints = [] } "RegularStyle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 48 1897 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1897 48 1897 57 , srcInfoPoints = [] } "regular" "regular")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 25 1898 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 25 1898 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 25 1898 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 25 1898 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 25 1898 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 35 1898 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 35 1898 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 35 1898 44 , srcInfoPoints = [] } "SelfStyle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 45 1898 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1898 45 1898 51 , srcInfoPoints = [] } "self" "self")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 25 1899 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 25 1899 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 25 1899 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 25 1899 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 25 1899 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 35 1899 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 35 1899 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 35 1899 46 , srcInfoPoints = [] } "RandomStyle")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 47 1899 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1899 47 1899 55 , srcInfoPoints = [] } "random" "random")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 1 1905 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1904 16 1904 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 1 1904 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 6 1904 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 6 1904 15 , srcInfoPoints = [] } "StyleItem")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 18 1904 42 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 18 1904 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 18 1904 23 , srcInfoPoints = [] } "SItem") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 24 1904 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 24 1904 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 24 1904 33 , srcInfoPoints = [] } "StyleName")) , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 34 1904 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1904 34 1904 35 , SrcSpan "tests/examples/Attributes.hs" 1904 41 1904 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 35 1904 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 35 1904 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1904 35 1904 41 , srcInfoPoints = [] } "String"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 14 1905 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1905 14 1905 22 , SrcSpan "tests/examples/Attributes.hs" 1905 23 1905 24 , SrcSpan "tests/examples/Attributes.hs" 1905 26 1905 27 , SrcSpan "tests/examples/Attributes.hs" 1905 31 1905 32 , SrcSpan "tests/examples/Attributes.hs" 1905 37 1905 38 , SrcSpan "tests/examples/Attributes.hs" 1905 43 1905 44 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 24 1905 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 24 1905 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 24 1905 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 24 1905 26 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 28 1905 31 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 28 1905 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 28 1905 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 28 1905 31 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 33 1905 37 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 33 1905 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 33 1905 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 33 1905 37 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 39 1905 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 39 1905 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 39 1905 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1905 39 1905 43 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 1 1924 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1907 1 1907 9 , SrcSpan "tests/examples/Attributes.hs" 1907 29 1907 34 , SrcSpan "tests/examples/Attributes.hs" 1908 5 1908 5 , SrcSpan "tests/examples/Attributes.hs" 1915 5 1915 5 , SrcSpan "tests/examples/Attributes.hs" 1919 5 1919 5 , SrcSpan "tests/examples/Attributes.hs" 1921 5 1921 5 , SrcSpan "tests/examples/Attributes.hs" 1922 5 1922 5 , SrcSpan "tests/examples/Attributes.hs" 1924 1 1924 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 10 1907 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 10 1907 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 10 1907 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 10 1907 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 10 1907 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 19 1907 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 19 1907 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1907 19 1907 28 , srcInfoPoints = [] } "StyleItem"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 5 1913 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1911 9 1911 14 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 5 1913 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1911 9 1911 14 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 5 1913 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1911 9 1911 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 5 1908 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 13 1908 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1908 13 1908 14 , SrcSpan "tests/examples/Attributes.hs" 1908 27 1908 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 14 1908 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 14 1908 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 14 1908 19 , srcInfoPoints = [] } "SItem")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 20 1908 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 20 1908 22 , srcInfoPoints = [] } "nm") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 23 1908 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1908 23 1908 27 , srcInfoPoints = [] } "args") ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 9 1910 42 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 9 1909 26 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1909 9 1909 10 , SrcSpan "tests/examples/Attributes.hs" 1909 21 1909 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 11 1909 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 11 1909 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 11 1909 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 11 1909 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 11 1909 15 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 16 1909 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 16 1909 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 16 1909 20 , srcInfoPoints = [] } "args")))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 23 1909 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 23 1909 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1909 23 1909 26 , srcInfoPoints = [] } "dnm"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 9 1910 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1910 9 1910 10 , SrcSpan "tests/examples/Attributes.hs" 1910 21 1910 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 11 1910 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 11 1910 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 11 1910 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 11 1910 20 , srcInfoPoints = [] } "otherwise"))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 23 1910 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 23 1910 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 23 1910 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 23 1910 26 , srcInfoPoints = [] } "dnm"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 27 1910 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 27 1910 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 27 1910 29 , srcInfoPoints = [] } "<>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 30 1910 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 30 1910 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 30 1910 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 30 1910 36 , srcInfoPoints = [] } "parens"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 37 1910 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 37 1910 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1910 37 1910 42 , srcInfoPoints = [] } "args'"))))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 11 1913 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1912 11 1912 11 , SrcSpan "tests/examples/Attributes.hs" 1913 11 1913 11 , SrcSpan "tests/examples/Attributes.hs" 1915 5 1915 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 11 1912 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 11 1912 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 11 1912 14 , srcInfoPoints = [] } "dnm")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 15 1912 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1912 15 1912 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 17 1912 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 17 1912 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 17 1912 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 17 1912 24 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 25 1912 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 25 1912 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1912 25 1912 27 , srcInfoPoints = [] } "nm"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 11 1913 60 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 11 1913 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 11 1913 16 , srcInfoPoints = [] } "args'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 17 1913 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1913 17 1913 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 19 1913 60 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 19 1913 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 19 1913 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 19 1913 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 19 1913 23 , srcInfoPoints = [] } "hcat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 24 1913 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 24 1913 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 24 1913 25 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 26 1913 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 26 1913 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 26 1913 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 26 1913 35 , srcInfoPoints = [] } "punctuate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 36 1913 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 36 1913 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 36 1913 41 , srcInfoPoints = [] } "comma"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 42 1913 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 42 1913 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 42 1913 43 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 44 1913 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 44 1913 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 44 1913 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 44 1913 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 44 1913 47 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 48 1913 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 48 1913 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 48 1913 55 , srcInfoPoints = [] } "unqtDot")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 56 1913 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 56 1913 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1913 56 1913 60 , srcInfoPoints = [] } "args")))))) Nothing ])) ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 5 1917 48 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 5 1917 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 5 1917 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 5 1915 10 , srcInfoPoints = [] } "toDot") [ PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 11 1915 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1915 13 1915 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 11 1915 13 , srcInfoPoints = [] } "si") (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 14 1915 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1915 14 1915 15 , SrcSpan "tests/examples/Attributes.hs" 1915 28 1915 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 15 1915 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 15 1915 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 15 1915 20 , srcInfoPoints = [] } "SItem")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 21 1915 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 21 1915 23 , srcInfoPoints = [] } "nm") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 24 1915 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1915 24 1915 28 , srcInfoPoints = [] } "args") ])) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 9 1917 48 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 9 1916 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1916 9 1916 10 , SrcSpan "tests/examples/Attributes.hs" 1916 21 1916 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 11 1916 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 11 1916 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 11 1916 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 11 1916 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 11 1916 15 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 16 1916 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 16 1916 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 16 1916 20 , srcInfoPoints = [] } "args")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 23 1916 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 23 1916 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 23 1916 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 23 1916 28 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 29 1916 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 29 1916 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1916 29 1916 31 , srcInfoPoints = [] } "nm")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 9 1917 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1917 9 1917 10 , SrcSpan "tests/examples/Attributes.hs" 1917 21 1917 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 11 1917 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 11 1917 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 11 1917 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 11 1917 20 , srcInfoPoints = [] } "otherwise"))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 23 1917 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 23 1917 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 23 1917 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 23 1917 35 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 36 1917 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 36 1917 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 36 1917 37 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 38 1917 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 38 1917 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 38 1917 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 38 1917 45 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 46 1917 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 46 1917 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1917 46 1917 48 , srcInfoPoints = [] } "si"))))) ]) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 5 1919 57 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 5 1919 57 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 5 1919 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 5 1919 18 , srcInfoPoints = [] } "unqtListToDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 19 1919 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1919 19 1919 20 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 21 1919 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 21 1919 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 21 1919 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 21 1919 25 , srcInfoPoints = [] } "hcat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 26 1919 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 26 1919 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 26 1919 27 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 28 1919 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 28 1919 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 28 1919 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 28 1919 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 28 1919 37 , srcInfoPoints = [] } "punctuate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 38 1919 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 38 1919 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 38 1919 43 , srcInfoPoints = [] } "comma")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 44 1919 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 44 1919 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 44 1919 45 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 46 1919 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 46 1919 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 46 1919 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 46 1919 49 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 50 1919 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 50 1919 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1919 50 1919 57 , srcInfoPoints = [] } "unqtDot"))))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 5 1922 63 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 5 1922 63 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 5 1921 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 5 1921 14 , srcInfoPoints = [] } "listToDot") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 15 1921 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1921 15 1921 16 , SrcSpan "tests/examples/Attributes.hs" 1921 27 1921 28 ] } [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 16 1921 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 16 1921 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 16 1921 21 , srcInfoPoints = [] } "SItem")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 22 1921 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 22 1921 24 , srcInfoPoints = [] } "nm") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 25 1921 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1921 25 1921 26 , SrcSpan "tests/examples/Attributes.hs" 1921 26 1921 27 ] } [] ] ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 29 1921 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1921 29 1921 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 31 1921 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 31 1921 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 31 1921 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 31 1921 36 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 37 1921 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 37 1921 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1921 37 1921 39 , srcInfoPoints = [] } "nm"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 5 1922 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 5 1922 14 , srcInfoPoints = [] } "listToDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 15 1922 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 15 1922 18 , srcInfoPoints = [] } "sis") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 29 1922 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1922 29 1922 30 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 31 1922 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 31 1922 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 31 1922 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 31 1922 43 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 44 1922 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 44 1922 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 44 1922 45 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 46 1922 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 46 1922 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 46 1922 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 46 1922 59 , srcInfoPoints = [] } "unqtListToDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 60 1922 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 60 1922 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1922 60 1922 63 , srcInfoPoints = [] } "sis")))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 1 1940 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1924 1 1924 9 , SrcSpan "tests/examples/Attributes.hs" 1924 29 1924 34 , SrcSpan "tests/examples/Attributes.hs" 1925 5 1925 5 , SrcSpan "tests/examples/Attributes.hs" 1929 5 1929 5 , SrcSpan "tests/examples/Attributes.hs" 1933 5 1933 5 , SrcSpan "tests/examples/Attributes.hs" 1935 5 1935 5 , SrcSpan "tests/examples/Attributes.hs" 1940 1 1940 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 10 1924 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 10 1924 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 10 1924 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 10 1924 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 10 1924 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 19 1924 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 19 1924 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1924 19 1924 28 , srcInfoPoints = [] } "StyleItem"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 5 1927 42 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 5 1927 42 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 5 1925 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 5 1925 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 15 1927 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1925 15 1925 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 17 1927 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1925 17 1925 19 , SrcSpan "tests/examples/Attributes.hs" 1925 20 1925 20 , SrcSpan "tests/examples/Attributes.hs" 1926 20 1926 20 , SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 20 , SrcSpan "tests/examples/Attributes.hs" 1929 5 1929 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 20 1925 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1925 23 1925 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 20 1925 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 20 1925 22 , srcInfoPoints = [] } "nm")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 26 1925 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 26 1925 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1925 26 1925 35 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 20 1926 51 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1926 25 1926 27 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 20 1926 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 20 1926 24 , srcInfoPoints = [] } "args")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 28 1926 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 28 1926 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 28 1926 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 28 1926 41 , srcInfoPoints = [] } "tryParseList'"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 42 1926 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 42 1926 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1926 42 1926 51 , srcInfoPoints = [] } "parseArgs")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 42 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 20 1927 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 27 1927 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 27 1927 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 27 1927 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 29 1927 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 29 1927 37 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 29 1927 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 29 1927 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 29 1927 34 , srcInfoPoints = [] } "SItem"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 35 1927 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 35 1927 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 35 1927 37 , srcInfoPoints = [] } "nm")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 38 1927 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 38 1927 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1927 38 1927 42 , srcInfoPoints = [] } "args"))))) ])) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 5 1931 40 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 5 1931 40 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 5 1929 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 5 1929 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 11 1931 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1929 11 1929 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 13 1931 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 13 1929 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 13 1929 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 13 1929 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 13 1929 24 , srcInfoPoints = [] } "quotedParse"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 25 1929 59 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1929 25 1929 26 , SrcSpan "tests/examples/Attributes.hs" 1929 58 1929 59 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 26 1929 32 , srcInfoPoints = [] } "liftM2"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 33 1929 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 33 1929 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 33 1929 38 , srcInfoPoints = [] } "SItem")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 39 1929 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 39 1929 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 39 1929 48 , srcInfoPoints = [] } "parseUnqt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 49 1929 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 49 1929 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1929 49 1929 58 , srcInfoPoints = [] } "parseArgs")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1930 13 1930 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1930 13 1930 14 , SrcSpan "tests/examples/Attributes.hs" 1930 14 1930 20 , SrcSpan "tests/examples/Attributes.hs" 1930 20 1930 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1930 13 1930 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1930 13 1930 14 , SrcSpan "tests/examples/Attributes.hs" 1930 14 1930 20 , SrcSpan "tests/examples/Attributes.hs" 1930 20 1930 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1930 14 1930 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 13 1931 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 13 1931 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 13 1931 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 13 1931 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 13 1931 18 , srcInfoPoints = [] } "liftM"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 19 1931 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1931 19 1931 20 , SrcSpan "tests/examples/Attributes.hs" 1931 33 1931 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 20 1931 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 20 1931 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 20 1931 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 20 1931 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 20 1931 24 , srcInfoPoints = [] } "flip"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 25 1931 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 25 1931 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 25 1931 30 , srcInfoPoints = [] } "SItem")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 31 1931 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1931 31 1931 32 , SrcSpan "tests/examples/Attributes.hs" 1931 32 1931 33 ] } [])))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 35 1931 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 35 1931 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1931 35 1931 40 , srcInfoPoints = [] } "parse")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 5 1933 48 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 5 1933 48 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 5 1933 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 5 1933 18 , srcInfoPoints = [] } "parseUnqtList")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 19 1933 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1933 19 1933 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 21 1933 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 21 1933 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 21 1933 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 21 1933 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 21 1933 27 , srcInfoPoints = [] } "sepBy1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 28 1933 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 28 1933 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 28 1933 37 , srcInfoPoints = [] } "parseUnqt")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 38 1933 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 38 1933 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1933 38 1933 48 , srcInfoPoints = [] } "parseComma"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 5 1938 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 5 1938 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 5 1935 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 5 1935 14 , srcInfoPoints = [] } "parseList")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 15 1938 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1935 15 1935 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 17 1938 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 17 1935 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 17 1935 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 17 1935 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 17 1935 28 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 29 1935 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 29 1935 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1935 29 1935 42 , srcInfoPoints = [] } "parseUnqtList")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1936 17 1936 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1936 17 1936 18 , SrcSpan "tests/examples/Attributes.hs" 1936 18 1936 24 , SrcSpan "tests/examples/Attributes.hs" 1936 24 1936 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1936 17 1936 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1936 17 1936 18 , SrcSpan "tests/examples/Attributes.hs" 1936 18 1936 24 , SrcSpan "tests/examples/Attributes.hs" 1936 24 1936 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1936 18 1936 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 17 1938 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 17 1938 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 17 1938 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 17 1938 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 17 1938 22 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 23 1938 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 23 1938 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 23 1938 29 , srcInfoPoints = [] } "return")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 30 1938 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 30 1938 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1938 30 1938 35 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 1 1940 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1940 11 1940 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 1 1940 10 , srcInfoPoints = [] } "parseArgs" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 14 1940 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 14 1940 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 14 1940 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 14 1940 19 , srcInfoPoints = [] } "Parse"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 20 1940 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1940 20 1940 21 , SrcSpan "tests/examples/Attributes.hs" 1940 27 1940 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 21 1940 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 21 1940 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1940 21 1940 27 , srcInfoPoints = [] } "String"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 1 1944 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 1 1941 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 1 1941 10 , srcInfoPoints = [] } "parseArgs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 11 1944 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1941 11 1941 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1944 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1943 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1942 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1941 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1941 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1941 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 13 1941 23 , srcInfoPoints = [] } "bracketSep"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 24 1941 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1941 24 1941 25 , SrcSpan "tests/examples/Attributes.hs" 1941 38 1941 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 25 1941 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 25 1941 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 25 1941 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 25 1941 34 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 35 1941 38 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1941 35 1941 38 , srcInfoPoints = [] } '(' "("))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1942 24 1942 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1942 24 1942 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1942 24 1942 34 , srcInfoPoints = [] } "parseComma")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 24 1943 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1943 24 1943 25 , SrcSpan "tests/examples/Attributes.hs" 1943 38 1943 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 25 1943 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 25 1943 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 25 1943 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 25 1943 34 , srcInfoPoints = [] } "character"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 35 1943 38 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1943 35 1943 38 , srcInfoPoints = [] } ')' ")"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1944 24 1944 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1944 24 1944 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1944 24 1944 38 , srcInfoPoints = [] } "parseStyleName"))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 1 1955 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1946 16 1946 17 , SrcSpan "tests/examples/Attributes.hs" 1947 16 1947 17 , SrcSpan "tests/examples/Attributes.hs" 1948 16 1948 17 , SrcSpan "tests/examples/Attributes.hs" 1949 16 1949 17 , SrcSpan "tests/examples/Attributes.hs" 1950 16 1950 17 , SrcSpan "tests/examples/Attributes.hs" 1951 16 1951 17 , SrcSpan "tests/examples/Attributes.hs" 1952 16 1952 17 , SrcSpan "tests/examples/Attributes.hs" 1953 16 1953 17 , SrcSpan "tests/examples/Attributes.hs" 1954 16 1954 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 1 1946 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 6 1946 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 6 1946 15 , srcInfoPoints = [] } "StyleName")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 18 1946 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 18 1946 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1946 18 1946 24 , srcInfoPoints = [] } "Dashed") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1947 18 1947 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1947 18 1947 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1947 18 1947 24 , srcInfoPoints = [] } "Dotted") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1948 18 1948 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1948 18 1948 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1948 18 1948 23 , srcInfoPoints = [] } "Solid") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1949 18 1949 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1949 18 1949 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1949 18 1949 22 , srcInfoPoints = [] } "Bold") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1950 18 1950 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1950 18 1950 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1950 18 1950 27 , srcInfoPoints = [] } "Invisible") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1951 18 1951 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1951 18 1951 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1951 18 1951 24 , srcInfoPoints = [] } "Filled") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1952 18 1952 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1952 18 1952 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1952 18 1952 27 , srcInfoPoints = [] } "Diagonals") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1953 18 1953 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1953 18 1953 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1953 18 1953 25 , srcInfoPoints = [] } "Rounded") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 18 1954 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 18 1954 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 18 1954 20 , srcInfoPoints = [] } "DD") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 21 1954 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 21 1954 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1954 21 1954 27 , srcInfoPoints = [] } "String")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 18 1955 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1955 18 1955 26 , SrcSpan "tests/examples/Attributes.hs" 1955 27 1955 28 , SrcSpan "tests/examples/Attributes.hs" 1955 30 1955 31 , SrcSpan "tests/examples/Attributes.hs" 1955 35 1955 36 , SrcSpan "tests/examples/Attributes.hs" 1955 41 1955 42 , SrcSpan "tests/examples/Attributes.hs" 1955 47 1955 48 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 28 1955 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 28 1955 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 28 1955 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 28 1955 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 32 1955 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 32 1955 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 32 1955 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 32 1955 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 37 1955 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 37 1955 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 37 1955 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 37 1955 41 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 43 1955 47 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 43 1955 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 43 1955 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1955 43 1955 47 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 1 1971 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1957 1 1957 9 , SrcSpan "tests/examples/Attributes.hs" 1957 29 1957 34 , SrcSpan "tests/examples/Attributes.hs" 1958 5 1958 5 , SrcSpan "tests/examples/Attributes.hs" 1959 5 1959 5 , SrcSpan "tests/examples/Attributes.hs" 1960 5 1960 5 , SrcSpan "tests/examples/Attributes.hs" 1961 5 1961 5 , SrcSpan "tests/examples/Attributes.hs" 1962 5 1962 5 , SrcSpan "tests/examples/Attributes.hs" 1963 5 1963 5 , SrcSpan "tests/examples/Attributes.hs" 1964 5 1964 5 , SrcSpan "tests/examples/Attributes.hs" 1965 5 1965 5 , SrcSpan "tests/examples/Attributes.hs" 1966 5 1966 5 , SrcSpan "tests/examples/Attributes.hs" 1968 5 1968 5 , SrcSpan "tests/examples/Attributes.hs" 1969 5 1969 5 , SrcSpan "tests/examples/Attributes.hs" 1971 1 1971 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 10 1957 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 10 1957 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 10 1957 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 10 1957 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 10 1957 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 19 1957 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 19 1957 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1957 19 1957 28 , srcInfoPoints = [] } "StyleName"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 5 1966 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 5 1966 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 5 1958 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 5 1958 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 13 1958 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 13 1958 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 13 1958 19 , srcInfoPoints = [] } "Dashed")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 23 1958 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1958 23 1958 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 25 1958 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 25 1958 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 25 1958 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 25 1958 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 30 1958 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1958 30 1958 38 , srcInfoPoints = [] } "dashed" "dashed")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 5 1959 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 5 1959 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 13 1959 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 13 1959 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 13 1959 19 , srcInfoPoints = [] } "Dotted")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 23 1959 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1959 23 1959 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 25 1959 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 25 1959 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 25 1959 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 25 1959 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 30 1959 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1959 30 1959 38 , srcInfoPoints = [] } "dotted" "dotted")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 5 1960 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 5 1960 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 13 1960 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 13 1960 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 13 1960 18 , srcInfoPoints = [] } "Solid")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 23 1960 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1960 23 1960 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 25 1960 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 25 1960 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 25 1960 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 25 1960 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 30 1960 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1960 30 1960 37 , srcInfoPoints = [] } "solid" "solid")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 5 1961 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 5 1961 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 13 1961 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 13 1961 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 13 1961 17 , srcInfoPoints = [] } "Bold")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 23 1961 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1961 23 1961 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 25 1961 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 25 1961 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 25 1961 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 25 1961 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 30 1961 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1961 30 1961 36 , srcInfoPoints = [] } "bold" "bold")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 5 1962 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 5 1962 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 13 1962 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 13 1962 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 13 1962 22 , srcInfoPoints = [] } "Invisible")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 23 1962 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1962 23 1962 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 25 1962 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 25 1962 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 25 1962 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 25 1962 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 30 1962 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1962 30 1962 37 , srcInfoPoints = [] } "invis" "invis")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 5 1963 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 5 1963 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 13 1963 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 13 1963 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 13 1963 19 , srcInfoPoints = [] } "Filled")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 23 1963 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1963 23 1963 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 25 1963 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 25 1963 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 25 1963 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 25 1963 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 30 1963 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1963 30 1963 38 , srcInfoPoints = [] } "filled" "filled")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 5 1964 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 5 1964 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 13 1964 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 13 1964 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 13 1964 22 , srcInfoPoints = [] } "Diagonals")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 23 1964 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1964 23 1964 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 25 1964 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 25 1964 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 25 1964 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 25 1964 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 30 1964 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1964 30 1964 41 , srcInfoPoints = [] } "diagonals" "diagonals")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 5 1965 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 5 1965 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 13 1965 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 13 1965 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 13 1965 20 , srcInfoPoints = [] } "Rounded")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 23 1965 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1965 23 1965 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 25 1965 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 25 1965 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 25 1965 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 25 1965 29 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 30 1965 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1965 30 1965 39 , srcInfoPoints = [] } "rounded" "rounded")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 5 1966 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 5 1966 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 13 1966 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1966 13 1966 14 , SrcSpan "tests/examples/Attributes.hs" 1966 19 1966 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 14 1966 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 14 1966 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 14 1966 16 , srcInfoPoints = [] } "DD")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 17 1966 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 17 1966 19 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 23 1966 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1966 23 1966 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 25 1966 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 25 1966 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 25 1966 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 25 1966 32 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 33 1966 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 33 1966 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1966 33 1966 35 , srcInfoPoints = [] } "nm"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 5 1969 31 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 5 1969 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 5 1968 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 5 1968 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 11 1968 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1968 11 1968 12 , SrcSpan "tests/examples/Attributes.hs" 1968 17 1968 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 12 1968 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 12 1968 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 12 1968 14 , srcInfoPoints = [] } "DD")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 15 1968 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 15 1968 17 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 19 1968 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1968 19 1968 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 21 1968 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 21 1968 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 21 1968 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 21 1968 26 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 27 1968 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 27 1968 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1968 27 1968 29 , srcInfoPoints = [] } "nm"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 5 1969 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 5 1969 10 , srcInfoPoints = [] } "toDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 11 1969 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 11 1969 13 , srcInfoPoints = [] } "sn") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 19 1969 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1969 19 1969 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 21 1969 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 21 1969 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 21 1969 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 21 1969 28 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 29 1969 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 29 1969 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1969 29 1969 31 , srcInfoPoints = [] } "sn"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 1 1982 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1971 1 1971 9 , SrcSpan "tests/examples/Attributes.hs" 1971 29 1971 34 , SrcSpan "tests/examples/Attributes.hs" 1972 5 1972 5 , SrcSpan "tests/examples/Attributes.hs" 1974 5 1974 5 , SrcSpan "tests/examples/Attributes.hs" 1982 1 1982 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 10 1971 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 10 1971 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 10 1971 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 10 1971 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 10 1971 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 19 1971 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 19 1971 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1971 19 1971 28 , srcInfoPoints = [] } "StyleName"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 5 1972 45 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 5 1972 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 5 1972 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 5 1972 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 15 1972 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1972 15 1972 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 17 1972 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 17 1972 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 17 1972 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 17 1972 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 17 1972 22 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 23 1972 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 23 1972 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 23 1972 30 , srcInfoPoints = [] } "checkDD")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 31 1972 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 31 1972 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1972 31 1972 45 , srcInfoPoints = [] } "parseStyleName"))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 5 1980 30 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 5 1980 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 5 1974 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 5 1974 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 11 1980 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1974 11 1974 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 13 1980 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 13 1974 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 13 1974 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 13 1974 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 13 1974 18 , srcInfoPoints = [] } "liftM"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 19 1974 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 19 1974 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1974 19 1974 26 , srcInfoPoints = [] } "checkDD")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 13 1975 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 13 1975 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 13 1975 14 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 15 1980 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 15 1975 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 15 1975 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 15 1975 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 15 1975 26 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 27 1975 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 27 1975 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1975 27 1975 41 , srcInfoPoints = [] } "parseStyleName")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1976 15 1976 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1976 15 1976 16 , SrcSpan "tests/examples/Attributes.hs" 1976 16 1976 22 , SrcSpan "tests/examples/Attributes.hs" 1976 22 1976 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1976 15 1976 23 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1976 15 1976 16 , SrcSpan "tests/examples/Attributes.hs" 1976 16 1976 22 , SrcSpan "tests/examples/Attributes.hs" 1976 22 1976 23 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1976 16 1976 22 , srcInfoPoints = [] } "onFail"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 15 1980 30 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1978 15 1978 17 , SrcSpan "tests/examples/Attributes.hs" 1978 18 1978 18 , SrcSpan "tests/examples/Attributes.hs" 1979 18 1979 18 , SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 18 , SrcSpan "tests/examples/Attributes.hs" 1982 1 1982 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 18 1978 76 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1978 20 1978 22 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 18 1978 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 18 1978 19 , srcInfoPoints = [] } "f")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 23 1978 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 23 1978 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 23 1978 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 23 1978 30 , srcInfoPoints = [] } "orQuote"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 31 1978 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 31 1978 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 31 1978 32 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 33 1978 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 33 1978 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 33 1978 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 33 1978 39 , srcInfoPoints = [] } "noneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 40 1978 76 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1978 40 1978 41 , SrcSpan "tests/examples/Attributes.hs" 1978 50 1978 51 , SrcSpan "tests/examples/Attributes.hs" 1978 55 1978 56 , SrcSpan "tests/examples/Attributes.hs" 1978 60 1978 61 , SrcSpan "tests/examples/Attributes.hs" 1978 65 1978 66 , SrcSpan "tests/examples/Attributes.hs" 1978 70 1978 71 , SrcSpan "tests/examples/Attributes.hs" 1978 75 1978 76 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 41 1978 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 41 1978 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 41 1978 50 , srcInfoPoints = [] } "quoteChar")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 52 1978 55 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 52 1978 55 , srcInfoPoints = [] } '(' "(") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 57 1978 60 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 57 1978 60 , srcInfoPoints = [] } ')' ")") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 62 1978 65 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 62 1978 65 , srcInfoPoints = [] } ',' ",") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 67 1978 70 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 67 1978 70 , srcInfoPoints = [] } ' ' " ") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 72 1978 75 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1978 72 1978 75 , srcInfoPoints = [] } ']' "]") ]))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 18 1979 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1979 20 1979 22 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 18 1979 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 18 1979 19 , srcInfoPoints = [] } "r")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 23 1979 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 23 1979 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 23 1979 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 23 1979 27 , srcInfoPoints = [] } "many"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 28 1979 78 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1979 28 1979 29 , SrcSpan "tests/examples/Attributes.hs" 1979 77 1979 78 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 29 1979 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 29 1979 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 29 1979 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 29 1979 36 , srcInfoPoints = [] } "orQuote"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 37 1979 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 37 1979 38 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 37 1979 38 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 39 1979 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 39 1979 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 39 1979 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 39 1979 45 , srcInfoPoints = [] } "noneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 46 1979 77 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1979 46 1979 47 , SrcSpan "tests/examples/Attributes.hs" 1979 56 1979 57 , SrcSpan "tests/examples/Attributes.hs" 1979 61 1979 62 , SrcSpan "tests/examples/Attributes.hs" 1979 66 1979 67 , SrcSpan "tests/examples/Attributes.hs" 1979 71 1979 72 , SrcSpan "tests/examples/Attributes.hs" 1979 76 1979 77 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 47 1979 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 47 1979 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 47 1979 56 , srcInfoPoints = [] } "quoteChar")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 58 1979 61 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 58 1979 61 , srcInfoPoints = [] } '(' "(") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 63 1979 66 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 63 1979 66 , srcInfoPoints = [] } ')' ")") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 68 1979 71 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 68 1979 71 , srcInfoPoints = [] } ',' ",") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 73 1979 76 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1979 73 1979 76 , srcInfoPoints = [] } ']' "]") ]))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 30 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 18 1980 24 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 25 1980 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 25 1980 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 25 1980 26 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 27 1980 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 27 1980 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 27 1980 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 27 1980 28 , srcInfoPoints = [] } "f"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 28 1980 29 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 28 1980 29 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 28 1980 29 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 29 1980 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 29 1980 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1980 29 1980 30 , srcInfoPoints = [] } "r"))))) ])))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 1 1982 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1982 13 1982 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 1 1982 8 , srcInfoPoints = [] } "checkDD" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 16 1982 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1982 23 1982 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 16 1982 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 16 1982 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 16 1982 22 , srcInfoPoints = [] } "String"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 26 1982 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 26 1982 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1982 26 1982 35 , srcInfoPoints = [] } "StyleName")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 1 1992 38 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 1 1992 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 1 1983 8 , srcInfoPoints = [] } "checkDD") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 9 1983 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 9 1983 12 , srcInfoPoints = [] } "str") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 13 1992 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1983 13 1983 14 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 15 1992 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1983 15 1983 19 , SrcSpan "tests/examples/Attributes.hs" 1983 36 1983 38 , SrcSpan "tests/examples/Attributes.hs" 1984 17 1984 17 , SrcSpan "tests/examples/Attributes.hs" 1985 17 1985 17 , SrcSpan "tests/examples/Attributes.hs" 1986 17 1986 17 , SrcSpan "tests/examples/Attributes.hs" 1987 17 1987 17 , SrcSpan "tests/examples/Attributes.hs" 1988 17 1988 17 , SrcSpan "tests/examples/Attributes.hs" 1989 17 1989 17 , SrcSpan "tests/examples/Attributes.hs" 1990 17 1990 17 , SrcSpan "tests/examples/Attributes.hs" 1991 17 1991 17 , SrcSpan "tests/examples/Attributes.hs" 1992 17 1992 17 , SrcSpan "tests/examples/Attributes.hs" 1994 1 1994 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 20 1983 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 20 1983 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 20 1983 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 20 1983 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 20 1983 23 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 24 1983 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 24 1983 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 24 1983 31 , srcInfoPoints = [] } "toLower")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 32 1983 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 32 1983 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1983 32 1983 35 , srcInfoPoints = [] } "str")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 17 1984 38 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 17 1984 25 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 17 1984 25 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 17 1984 25 , srcInfoPoints = [] } "dashed" "dashed")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 29 1984 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1984 29 1984 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 32 1984 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 32 1984 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1984 32 1984 38 , srcInfoPoints = [] } "Dashed")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 17 1985 38 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 17 1985 25 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 17 1985 25 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 17 1985 25 , srcInfoPoints = [] } "dotted" "dotted")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 29 1985 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1985 29 1985 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 32 1985 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 32 1985 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1985 32 1985 38 , srcInfoPoints = [] } "Dotted")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 17 1986 37 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 17 1986 24 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 17 1986 24 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 17 1986 24 , srcInfoPoints = [] } "solid" "solid")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 29 1986 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1986 29 1986 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 32 1986 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 32 1986 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1986 32 1986 37 , srcInfoPoints = [] } "Solid")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 17 1987 36 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 17 1987 23 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 17 1987 23 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 17 1987 23 , srcInfoPoints = [] } "bold" "bold")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 29 1987 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1987 29 1987 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 32 1987 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 32 1987 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1987 32 1987 36 , srcInfoPoints = [] } "Bold")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 17 1988 41 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 17 1988 24 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 17 1988 24 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 17 1988 24 , srcInfoPoints = [] } "invis" "invis")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 29 1988 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1988 29 1988 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 32 1988 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 32 1988 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1988 32 1988 41 , srcInfoPoints = [] } "Invisible")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 17 1989 38 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 17 1989 25 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 17 1989 25 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 17 1989 25 , srcInfoPoints = [] } "filled" "filled")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 29 1989 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1989 29 1989 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 32 1989 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 32 1989 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1989 32 1989 38 , srcInfoPoints = [] } "Filled")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 17 1990 41 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 17 1990 28 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 17 1990 28 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 17 1990 28 , srcInfoPoints = [] } "diagonals" "diagonals")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 29 1990 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1990 29 1990 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 32 1990 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 32 1990 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1990 32 1990 41 , srcInfoPoints = [] } "Diagonals")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 17 1991 39 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 17 1991 26 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 17 1991 26 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 17 1991 26 , srcInfoPoints = [] } "rounded" "rounded")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 29 1991 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1991 29 1991 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 32 1991 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 32 1991 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1991 32 1991 39 , srcInfoPoints = [] } "Rounded")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 17 1992 38 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 17 1992 18 , srcInfoPoints = [] }) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 29 1992 38 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1992 29 1992 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 32 1992 38 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 32 1992 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 32 1992 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 32 1992 34 , srcInfoPoints = [] } "DD"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 35 1992 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 35 1992 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1992 35 1992 38 , srcInfoPoints = [] } "str"))))) Nothing ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 1 1994 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1994 16 1994 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 1 1994 15 , srcInfoPoints = [] } "parseStyleName" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 19 1994 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 19 1994 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 19 1994 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 19 1994 24 , srcInfoPoints = [] } "Parse"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 25 1994 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 25 1994 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1994 25 1994 31 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 1 1997 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 1 1995 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 1 1995 15 , srcInfoPoints = [] } "parseStyleName")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 16 1997 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1995 16 1995 17 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 18 1997 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1995 18 1995 20 , SrcSpan "tests/examples/Attributes.hs" 1995 21 1995 21 , SrcSpan "tests/examples/Attributes.hs" 1996 21 1996 21 , SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 21 , SrcSpan "tests/examples/Attributes.hs" 2001 1 2001 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 21 1995 74 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1995 23 1995 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 21 1995 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 21 1995 22 , srcInfoPoints = [] } "f")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 26 1995 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 26 1995 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 26 1995 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 26 1995 33 , srcInfoPoints = [] } "orQuote"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 34 1995 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 34 1995 35 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 34 1995 35 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 36 1995 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 36 1995 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 36 1995 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 36 1995 42 , srcInfoPoints = [] } "noneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 43 1995 74 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1995 43 1995 44 , SrcSpan "tests/examples/Attributes.hs" 1995 53 1995 54 , SrcSpan "tests/examples/Attributes.hs" 1995 58 1995 59 , SrcSpan "tests/examples/Attributes.hs" 1995 63 1995 64 , SrcSpan "tests/examples/Attributes.hs" 1995 68 1995 69 , SrcSpan "tests/examples/Attributes.hs" 1995 73 1995 74 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 44 1995 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 44 1995 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 44 1995 53 , srcInfoPoints = [] } "quoteChar")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 55 1995 58 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 55 1995 58 , srcInfoPoints = [] } '(' "(") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 60 1995 63 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 60 1995 63 , srcInfoPoints = [] } ')' ")") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 65 1995 68 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 65 1995 68 , srcInfoPoints = [] } ',' ",") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 70 1995 73 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1995 70 1995 73 , srcInfoPoints = [] } ' ' " ") ]))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 21 1996 76 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1996 23 1996 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 21 1996 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 21 1996 22 , srcInfoPoints = [] } "r")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 26 1996 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 26 1996 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 26 1996 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 26 1996 30 , srcInfoPoints = [] } "many"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 31 1996 76 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1996 31 1996 32 , SrcSpan "tests/examples/Attributes.hs" 1996 75 1996 76 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 32 1996 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 32 1996 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 32 1996 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 32 1996 39 , srcInfoPoints = [] } "orQuote"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 40 1996 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 40 1996 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 40 1996 41 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 42 1996 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 42 1996 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 42 1996 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 42 1996 48 , srcInfoPoints = [] } "noneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 49 1996 75 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 1996 49 1996 50 , SrcSpan "tests/examples/Attributes.hs" 1996 59 1996 60 , SrcSpan "tests/examples/Attributes.hs" 1996 64 1996 65 , SrcSpan "tests/examples/Attributes.hs" 1996 69 1996 70 , SrcSpan "tests/examples/Attributes.hs" 1996 74 1996 75 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 50 1996 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 50 1996 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 50 1996 59 , srcInfoPoints = [] } "quoteChar")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 61 1996 64 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 61 1996 64 , srcInfoPoints = [] } '(' "(") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 66 1996 69 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 66 1996 69 , srcInfoPoints = [] } ')' ")") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 71 1996 74 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1996 71 1996 74 , srcInfoPoints = [] } ',' ",") ]))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 33 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 21 1997 27 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 28 1997 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 28 1997 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 28 1997 29 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 30 1997 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 30 1997 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 30 1997 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 30 1997 31 , srcInfoPoints = [] } "f"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 31 1997 32 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 31 1997 32 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 31 1997 32 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 32 1997 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 32 1997 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 1997 32 1997 33 , srcInfoPoints = [] } "r"))))) ])) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 1 2002 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2001 17 2001 18 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 1 2001 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 9 2001 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 9 2001 16 , srcInfoPoints = [] } "PortPos")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 19 2001 34 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 19 2001 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 19 2001 21 , srcInfoPoints = [] } "PP") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 22 2001 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 22 2001 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2001 22 2001 34 , srcInfoPoints = [] } "CompassPoint")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 5 2002 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2002 5 2002 13 , SrcSpan "tests/examples/Attributes.hs" 2002 14 2002 15 , SrcSpan "tests/examples/Attributes.hs" 2002 17 2002 18 , SrcSpan "tests/examples/Attributes.hs" 2002 22 2002 23 , SrcSpan "tests/examples/Attributes.hs" 2002 28 2002 29 , SrcSpan "tests/examples/Attributes.hs" 2002 34 2002 35 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 15 2002 17 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 15 2002 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 15 2002 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 15 2002 17 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 19 2002 22 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 19 2002 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 19 2002 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 19 2002 22 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 24 2002 28 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 24 2002 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 24 2002 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 24 2002 28 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 30 2002 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 30 2002 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 30 2002 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2002 30 2002 34 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 1 2009 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2004 1 2004 9 , SrcSpan "tests/examples/Attributes.hs" 2004 27 2004 32 , SrcSpan "tests/examples/Attributes.hs" 2005 5 2005 5 , SrcSpan "tests/examples/Attributes.hs" 2007 5 2007 5 , SrcSpan "tests/examples/Attributes.hs" 2009 1 2009 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 10 2004 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 10 2004 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 10 2004 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 10 2004 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 10 2004 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 19 2004 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 19 2004 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2004 19 2004 26 , srcInfoPoints = [] } "PortPos"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 5 2005 33 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 5 2005 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 5 2005 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 5 2005 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 13 2005 20 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2005 13 2005 14 , SrcSpan "tests/examples/Attributes.hs" 2005 19 2005 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 14 2005 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 14 2005 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 14 2005 16 , srcInfoPoints = [] } "PP")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 17 2005 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 17 2005 19 , srcInfoPoints = [] } "cp") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 21 2005 33 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2005 21 2005 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 23 2005 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 23 2005 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 23 2005 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 23 2005 30 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 31 2005 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 31 2005 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2005 31 2005 33 , srcInfoPoints = [] } "cp"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 5 2007 29 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 5 2007 29 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 5 2007 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 5 2007 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 11 2007 18 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2007 11 2007 12 , SrcSpan "tests/examples/Attributes.hs" 2007 17 2007 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 12 2007 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 12 2007 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 12 2007 14 , srcInfoPoints = [] } "PP")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 15 2007 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 15 2007 17 , srcInfoPoints = [] } "cp") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 19 2007 29 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2007 19 2007 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 21 2007 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 21 2007 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 21 2007 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 21 2007 26 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 27 2007 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 27 2007 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2007 27 2007 29 , srcInfoPoints = [] } "cp"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 1 2012 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2009 1 2009 9 , SrcSpan "tests/examples/Attributes.hs" 2009 27 2009 32 , SrcSpan "tests/examples/Attributes.hs" 2010 5 2010 5 , SrcSpan "tests/examples/Attributes.hs" 2012 1 2012 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 10 2009 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 10 2009 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 10 2009 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 10 2009 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 10 2009 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 19 2009 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 19 2009 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2009 19 2009 26 , srcInfoPoints = [] } "PortPos"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 5 2010 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 5 2010 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 5 2010 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 5 2010 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 15 2010 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2010 15 2010 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 17 2010 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 17 2010 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 17 2010 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 17 2010 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 17 2010 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 23 2010 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 23 2010 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 23 2010 25 , srcInfoPoints = [] } "PP")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 26 2010 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 26 2010 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2010 26 2010 35 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 1 2022 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2012 19 2012 20 , SrcSpan "tests/examples/Attributes.hs" 2013 19 2013 20 , SrcSpan "tests/examples/Attributes.hs" 2014 19 2014 20 , SrcSpan "tests/examples/Attributes.hs" 2015 19 2015 20 , SrcSpan "tests/examples/Attributes.hs" 2016 19 2016 20 , SrcSpan "tests/examples/Attributes.hs" 2017 19 2017 20 , SrcSpan "tests/examples/Attributes.hs" 2018 19 2018 20 , SrcSpan "tests/examples/Attributes.hs" 2019 19 2019 20 , SrcSpan "tests/examples/Attributes.hs" 2020 19 2020 20 , SrcSpan "tests/examples/Attributes.hs" 2021 19 2021 20 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 1 2012 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 6 2012 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 6 2012 18 , srcInfoPoints = [] } "CompassPoint")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 21 2012 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 21 2012 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2012 21 2012 26 , srcInfoPoints = [] } "North") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2013 21 2013 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2013 21 2013 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2013 21 2013 30 , srcInfoPoints = [] } "NorthEast") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2014 21 2014 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2014 21 2014 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2014 21 2014 25 , srcInfoPoints = [] } "East") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2015 21 2015 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2015 21 2015 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2015 21 2015 30 , srcInfoPoints = [] } "SouthEast") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2016 21 2016 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2016 21 2016 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2016 21 2016 26 , srcInfoPoints = [] } "South") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2017 21 2017 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2017 21 2017 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2017 21 2017 30 , srcInfoPoints = [] } "SouthWest") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2018 21 2018 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2018 21 2018 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2018 21 2018 25 , srcInfoPoints = [] } "West") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2019 21 2019 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2019 21 2019 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2019 21 2019 30 , srcInfoPoints = [] } "NorthWest") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2020 21 2020 32 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2020 21 2020 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2020 21 2020 32 , srcInfoPoints = [] } "CenterPoint") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2021 21 2021 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2021 21 2021 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2021 21 2021 25 , srcInfoPoints = [] } "NoCP") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 21 2022 66 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2022 21 2022 29 , SrcSpan "tests/examples/Attributes.hs" 2022 30 2022 31 , SrcSpan "tests/examples/Attributes.hs" 2022 33 2022 34 , SrcSpan "tests/examples/Attributes.hs" 2022 38 2022 39 , SrcSpan "tests/examples/Attributes.hs" 2022 47 2022 48 , SrcSpan "tests/examples/Attributes.hs" 2022 53 2022 54 , SrcSpan "tests/examples/Attributes.hs" 2022 59 2022 60 , SrcSpan "tests/examples/Attributes.hs" 2022 65 2022 66 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 31 2022 33 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 31 2022 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 31 2022 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 31 2022 33 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 35 2022 38 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 35 2022 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 35 2022 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 35 2022 38 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 40 2022 47 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 40 2022 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 40 2022 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 40 2022 47 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 49 2022 53 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 49 2022 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 49 2022 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 49 2022 53 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 55 2022 59 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 55 2022 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 55 2022 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 55 2022 59 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 61 2022 65 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 61 2022 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 61 2022 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2022 61 2022 65 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 1 2036 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2024 1 2024 9 , SrcSpan "tests/examples/Attributes.hs" 2024 32 2024 37 , SrcSpan "tests/examples/Attributes.hs" 2025 5 2025 5 , SrcSpan "tests/examples/Attributes.hs" 2026 5 2026 5 , SrcSpan "tests/examples/Attributes.hs" 2027 5 2027 5 , SrcSpan "tests/examples/Attributes.hs" 2028 5 2028 5 , SrcSpan "tests/examples/Attributes.hs" 2029 5 2029 5 , SrcSpan "tests/examples/Attributes.hs" 2030 5 2030 5 , SrcSpan "tests/examples/Attributes.hs" 2031 5 2031 5 , SrcSpan "tests/examples/Attributes.hs" 2032 5 2032 5 , SrcSpan "tests/examples/Attributes.hs" 2033 5 2033 5 , SrcSpan "tests/examples/Attributes.hs" 2034 5 2034 5 , SrcSpan "tests/examples/Attributes.hs" 2036 1 2036 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 10 2024 31 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 10 2024 31 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 10 2024 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 10 2024 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 10 2024 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 19 2024 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 19 2024 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2024 19 2024 31 , srcInfoPoints = [] } "CompassPoint"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 5 2034 35 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 5 2034 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 5 2025 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 5 2025 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 13 2025 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 13 2025 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 13 2025 22 , srcInfoPoints = [] } "NorthEast")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 25 2025 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2025 25 2025 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 27 2025 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 27 2025 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 27 2025 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 27 2025 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 32 2025 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2025 32 2025 36 , srcInfoPoints = [] } "ne" "ne")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 5 2026 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 5 2026 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 13 2026 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 13 2026 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 13 2026 22 , srcInfoPoints = [] } "NorthWest")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 25 2026 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2026 25 2026 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 27 2026 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 27 2026 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 27 2026 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 27 2026 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 32 2026 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2026 32 2026 36 , srcInfoPoints = [] } "nw" "nw")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 5 2027 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 5 2027 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 13 2027 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 13 2027 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 13 2027 18 , srcInfoPoints = [] } "North")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 25 2027 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2027 25 2027 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 27 2027 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 27 2027 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 27 2027 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 27 2027 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 32 2027 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2027 32 2027 35 , srcInfoPoints = [] } "n" "n")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 5 2028 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 5 2028 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 13 2028 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 13 2028 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 13 2028 17 , srcInfoPoints = [] } "East")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 25 2028 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2028 25 2028 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 27 2028 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 27 2028 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 27 2028 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 27 2028 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 32 2028 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2028 32 2028 35 , srcInfoPoints = [] } "e" "e")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 5 2029 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 5 2029 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 13 2029 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 13 2029 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 13 2029 22 , srcInfoPoints = [] } "SouthEast")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 25 2029 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2029 25 2029 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 27 2029 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 27 2029 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 27 2029 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 27 2029 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 32 2029 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2029 32 2029 36 , srcInfoPoints = [] } "se" "se")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 5 2030 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 5 2030 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 13 2030 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 13 2030 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 13 2030 22 , srcInfoPoints = [] } "SouthWest")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 25 2030 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2030 25 2030 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 27 2030 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 27 2030 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 27 2030 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 27 2030 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 32 2030 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2030 32 2030 36 , srcInfoPoints = [] } "sw" "sw")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 5 2031 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 5 2031 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 13 2031 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 13 2031 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 13 2031 18 , srcInfoPoints = [] } "South")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 25 2031 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2031 25 2031 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 27 2031 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 27 2031 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 27 2031 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 27 2031 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 32 2031 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2031 32 2031 35 , srcInfoPoints = [] } "s" "s")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 5 2032 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 5 2032 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 13 2032 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 13 2032 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 13 2032 17 , srcInfoPoints = [] } "West")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 25 2032 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2032 25 2032 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 27 2032 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 27 2032 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 27 2032 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 27 2032 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 32 2032 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2032 32 2032 35 , srcInfoPoints = [] } "w" "w")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 5 2033 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 5 2033 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 13 2033 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 13 2033 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 13 2033 24 , srcInfoPoints = [] } "CenterPoint")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 25 2033 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2033 25 2033 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 27 2033 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 27 2033 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 27 2033 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 27 2033 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 32 2033 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2033 32 2033 35 , srcInfoPoints = [] } "c" "c")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 5 2034 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 5 2034 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 13 2034 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 13 2034 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 13 2034 17 , srcInfoPoints = [] } "NoCP")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 25 2034 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2034 25 2034 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 27 2034 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 27 2034 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 27 2034 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 27 2034 31 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 32 2034 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2034 32 2034 35 , srcInfoPoints = [] } "_" "_")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 1 2052 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2036 1 2036 9 , SrcSpan "tests/examples/Attributes.hs" 2036 32 2036 37 , SrcSpan "tests/examples/Attributes.hs" 2038 5 2038 5 , SrcSpan "tests/examples/Attributes.hs" 2052 1 2052 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 10 2036 31 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 10 2036 31 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 10 2036 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 10 2036 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 10 2036 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 19 2036 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 19 2036 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2036 19 2036 31 , srcInfoPoints = [] } "CompassPoint"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 5 2048 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 5 2048 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 5 2038 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 5 2038 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 15 2048 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2038 15 2038 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 17 2048 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 17 2038 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 17 2038 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 17 2038 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 23 2048 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2038 23 2038 24 , SrcSpan "tests/examples/Attributes.hs" 2039 23 2039 24 , SrcSpan "tests/examples/Attributes.hs" 2040 23 2040 24 , SrcSpan "tests/examples/Attributes.hs" 2041 23 2041 24 , SrcSpan "tests/examples/Attributes.hs" 2042 23 2042 24 , SrcSpan "tests/examples/Attributes.hs" 2043 23 2043 24 , SrcSpan "tests/examples/Attributes.hs" 2044 23 2044 24 , SrcSpan "tests/examples/Attributes.hs" 2045 23 2045 24 , SrcSpan "tests/examples/Attributes.hs" 2046 23 2046 24 , SrcSpan "tests/examples/Attributes.hs" 2047 23 2047 24 , SrcSpan "tests/examples/Attributes.hs" 2048 23 2048 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 25 2038 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 25 2038 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 25 2038 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 25 2038 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 25 2038 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 35 2038 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 35 2038 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 35 2038 44 , srcInfoPoints = [] } "NorthEast")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 45 2038 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2038 45 2038 49 , srcInfoPoints = [] } "ne" "ne")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 25 2039 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 25 2039 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 25 2039 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 25 2039 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 25 2039 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 35 2039 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 35 2039 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 35 2039 44 , srcInfoPoints = [] } "NorthWest")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 45 2039 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2039 45 2039 49 , srcInfoPoints = [] } "nw" "nw")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 25 2040 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 25 2040 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 25 2040 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 25 2040 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 25 2040 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 35 2040 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 35 2040 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 35 2040 40 , srcInfoPoints = [] } "North")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 41 2040 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2040 41 2040 44 , srcInfoPoints = [] } "n" "n")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 25 2041 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 25 2041 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 25 2041 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 25 2041 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 25 2041 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 35 2041 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 35 2041 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 35 2041 44 , srcInfoPoints = [] } "SouthEast")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 45 2041 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2041 45 2041 49 , srcInfoPoints = [] } "se" "se")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 25 2042 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 25 2042 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 25 2042 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 25 2042 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 25 2042 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 35 2042 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 35 2042 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 35 2042 44 , srcInfoPoints = [] } "SouthWest")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 45 2042 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2042 45 2042 49 , srcInfoPoints = [] } "sw" "sw")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 25 2043 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 25 2043 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 25 2043 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 25 2043 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 25 2043 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 35 2043 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 35 2043 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 35 2043 40 , srcInfoPoints = [] } "South")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 41 2043 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2043 41 2043 44 , srcInfoPoints = [] } "s" "s")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 25 2044 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 25 2044 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 25 2044 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 25 2044 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 25 2044 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 35 2044 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 35 2044 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 35 2044 39 , srcInfoPoints = [] } "East")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 40 2044 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2044 40 2044 43 , srcInfoPoints = [] } "e" "e")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 25 2045 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 25 2045 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 25 2045 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 25 2045 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 25 2045 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 35 2045 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 35 2045 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 35 2045 39 , srcInfoPoints = [] } "West")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 40 2045 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2045 40 2045 43 , srcInfoPoints = [] } "w" "w")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 25 2046 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 25 2046 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 25 2046 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 25 2046 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 25 2046 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 35 2046 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 35 2046 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 35 2046 46 , srcInfoPoints = [] } "CenterPoint")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 47 2046 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2046 47 2046 50 , srcInfoPoints = [] } "c" "c")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 25 2047 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 25 2047 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 25 2047 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 25 2047 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 25 2047 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 35 2047 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 35 2047 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 35 2047 39 , srcInfoPoints = [] } "NoCP")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 40 2047 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2047 40 2047 43 , srcInfoPoints = [] } "_" "_")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 1 2057 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2052 15 2052 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 1 2052 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 6 2052 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 6 2052 14 , srcInfoPoints = [] } "ViewPort")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 17 2056 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2052 20 2052 21 , SrcSpan "tests/examples/Attributes.hs" 2053 20 2053 21 , SrcSpan "tests/examples/Attributes.hs" 2054 20 2054 21 , SrcSpan "tests/examples/Attributes.hs" 2055 20 2055 21 , SrcSpan "tests/examples/Attributes.hs" 2056 20 2056 21 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 17 2056 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2052 20 2052 21 , SrcSpan "tests/examples/Attributes.hs" 2053 20 2053 21 , SrcSpan "tests/examples/Attributes.hs" 2054 20 2054 21 , SrcSpan "tests/examples/Attributes.hs" 2055 20 2055 21 , SrcSpan "tests/examples/Attributes.hs" 2056 20 2056 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 17 2052 19 , srcInfoPoints = [] } "VP") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 22 2052 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2052 28 2052 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 22 2052 26 , srcInfoPoints = [] } "wVal" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 31 2052 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 31 2052 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2052 31 2052 37 , srcInfoPoints = [] } "Double"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2053 22 2053 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2053 28 2053 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2053 22 2053 26 , srcInfoPoints = [] } "hVal" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2053 31 2053 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2053 31 2053 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2053 31 2053 37 , srcInfoPoints = [] } "Double"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2054 22 2054 37 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2054 28 2054 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2054 22 2054 26 , srcInfoPoints = [] } "zVal" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2054 31 2054 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2054 31 2054 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2054 31 2054 37 , srcInfoPoints = [] } "Double"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 22 2055 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2055 28 2055 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 22 2055 27 , srcInfoPoints = [] } "focus" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 31 2055 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 31 2055 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 31 2055 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 31 2055 36 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 37 2055 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 37 2055 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2055 37 2055 46 , srcInfoPoints = [] } "FocusType")))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 17 2057 47 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2057 17 2057 25 , SrcSpan "tests/examples/Attributes.hs" 2057 26 2057 27 , SrcSpan "tests/examples/Attributes.hs" 2057 29 2057 30 , SrcSpan "tests/examples/Attributes.hs" 2057 34 2057 35 , SrcSpan "tests/examples/Attributes.hs" 2057 40 2057 41 , SrcSpan "tests/examples/Attributes.hs" 2057 46 2057 47 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 27 2057 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 27 2057 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 27 2057 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 27 2057 29 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 31 2057 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 31 2057 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 31 2057 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 31 2057 34 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 36 2057 40 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 36 2057 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 36 2057 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 36 2057 40 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 42 2057 46 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 42 2057 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 42 2057 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2057 42 2057 46 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 1 2068 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2059 1 2059 9 , SrcSpan "tests/examples/Attributes.hs" 2059 28 2059 33 , SrcSpan "tests/examples/Attributes.hs" 2060 5 2060 5 , SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 5 , SrcSpan "tests/examples/Attributes.hs" 2068 1 2068 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 10 2059 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 10 2059 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 10 2059 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 10 2059 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 10 2059 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 19 2059 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 19 2059 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2059 19 2059 27 , srcInfoPoints = [] } "ViewPort"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 5 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2062 9 2062 14 ] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 5 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2062 9 2062 14 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 5 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2062 9 2062 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 5 2060 12 , srcInfoPoints = [] } "unqtDot") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 13 2060 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 13 2060 15 , srcInfoPoints = [] } "vp") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 16 2061 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2060 16 2060 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2061 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2060 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2060 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2060 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2060 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 18 2060 23 , srcInfoPoints = [] } "maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 24 2060 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 24 2060 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 24 2060 26 , srcInfoPoints = [] } "vs")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 27 2060 57 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2060 27 2060 28 , SrcSpan "tests/examples/Attributes.hs" 2060 56 2060 57 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 29 , SrcSpan "tests/examples/Attributes.hs" 2060 29 2060 31 , SrcSpan "tests/examples/Attributes.hs" 2060 31 2060 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 32 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2060 28 2060 29 , SrcSpan "tests/examples/Attributes.hs" 2060 29 2060 31 , SrcSpan "tests/examples/Attributes.hs" 2060 31 2060 32 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 29 2060 31 , srcInfoPoints = [] } "<>"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 33 2060 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2060 33 2060 34 , SrcSpan "tests/examples/Attributes.hs" 2060 45 2060 46 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 34 2060 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 34 2060 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 34 2060 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 34 2060 36 , srcInfoPoints = [] } "vs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 37 2060 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 37 2060 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 37 2060 39 , srcInfoPoints = [] } "<>"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 40 2060 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 40 2060 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 40 2060 45 , srcInfoPoints = [] } "comma")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 47 2060 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 47 2060 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 47 2060 48 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 49 2060 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 49 2060 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2060 49 2060 56 , srcInfoPoints = [] } "unqtDot")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 18 2061 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 18 2061 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 18 2061 19 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 20 2061 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 20 2061 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 20 2061 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 20 2061 25 , srcInfoPoints = [] } "focus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 26 2061 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 26 2061 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2061 26 2061 28 , srcInfoPoints = [] } "vp")))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 11 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2063 11 2063 11 , SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 11 2064 64 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 11 2063 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 11 2063 13 , srcInfoPoints = [] } "vs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 14 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2063 14 2063 15 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 16 2064 64 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 16 2063 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 16 2063 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 16 2063 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 16 2063 20 , srcInfoPoints = [] } "hcat"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 21 2063 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 21 2063 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 21 2063 22 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 23 2063 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 23 2063 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 23 2063 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 23 2063 32 , srcInfoPoints = [] } "punctuate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 33 2063 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 33 2063 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2063 33 2063 38 , srcInfoPoints = [] } "comma"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 16 2064 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 16 2064 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 16 2064 17 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 18 2064 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 18 2064 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 18 2064 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 18 2064 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 18 2064 21 , srcInfoPoints = [] } "map"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 22 2064 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2064 22 2064 23 , SrcSpan "tests/examples/Attributes.hs" 2064 44 2064 45 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 23 2064 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 23 2064 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 23 2064 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 23 2064 30 , srcInfoPoints = [] } "unqtDot"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 31 2064 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 31 2064 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 31 2064 32 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 33 2064 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 33 2064 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 33 2064 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 33 2064 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 33 2064 37 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 38 2064 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2064 38 2064 39 , SrcSpan "tests/examples/Attributes.hs" 2064 39 2064 40 , SrcSpan "tests/examples/Attributes.hs" 2064 40 2064 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 38 2064 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2064 38 2064 39 , SrcSpan "tests/examples/Attributes.hs" 2064 39 2064 40 , SrcSpan "tests/examples/Attributes.hs" 2064 40 2064 41 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 39 2064 40 , srcInfoPoints = [] } "$")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 42 2064 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 42 2064 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 42 2064 44 , srcInfoPoints = [] } "vp"))))))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 46 2064 64 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2064 46 2064 47 , SrcSpan "tests/examples/Attributes.hs" 2064 51 2064 52 , SrcSpan "tests/examples/Attributes.hs" 2064 57 2064 58 , SrcSpan "tests/examples/Attributes.hs" 2064 63 2064 64 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 47 2064 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 47 2064 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 47 2064 51 , srcInfoPoints = [] } "wVal")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 53 2064 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 53 2064 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 53 2064 57 , srcInfoPoints = [] } "hVal")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 59 2064 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 59 2064 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2064 59 2064 63 , srcInfoPoints = [] } "zVal")) ])))) Nothing ])) ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 35 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 5 2066 10 , srcInfoPoints = [] } "toDot")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 11 2066 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2066 11 2066 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 13 2066 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 13 2066 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 13 2066 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 13 2066 25 , srcInfoPoints = [] } "doubleQuotes"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 26 2066 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 26 2066 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 26 2066 27 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 28 2066 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 28 2066 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2066 28 2066 35 , srcInfoPoints = [] } "unqtDot"))))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 1 2079 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2068 1 2068 9 , SrcSpan "tests/examples/Attributes.hs" 2068 28 2068 33 , SrcSpan "tests/examples/Attributes.hs" 2069 5 2069 5 , SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 5 , SrcSpan "tests/examples/Attributes.hs" 2079 1 2079 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 10 2068 27 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 10 2068 27 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 10 2068 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 10 2068 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 10 2068 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 19 2068 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 19 2068 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2068 19 2068 27 , srcInfoPoints = [] } "ViewPort"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 5 2075 43 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 5 2075 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 5 2069 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 5 2069 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 15 2075 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2069 15 2069 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 17 2075 43 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2069 17 2069 19 , SrcSpan "tests/examples/Attributes.hs" 2069 20 2069 20 , SrcSpan "tests/examples/Attributes.hs" 2070 20 2070 20 , SrcSpan "tests/examples/Attributes.hs" 2071 20 2071 20 , SrcSpan "tests/examples/Attributes.hs" 2072 20 2072 20 , SrcSpan "tests/examples/Attributes.hs" 2073 20 2073 20 , SrcSpan "tests/examples/Attributes.hs" 2074 20 2074 20 , SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 20 , SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 20 2069 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2069 23 2069 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 20 2069 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 20 2069 22 , srcInfoPoints = [] } "wv")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 26 2069 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 26 2069 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2069 26 2069 35 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2070 20 2070 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2070 20 2070 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2070 20 2070 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2070 20 2070 30 , srcInfoPoints = [] } "parseComma"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 20 2071 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2071 23 2071 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 20 2071 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 20 2071 22 , srcInfoPoints = [] } "hv")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 26 2071 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 26 2071 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2071 26 2071 35 , srcInfoPoints = [] } "parseUnqt"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2072 20 2072 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2072 20 2072 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2072 20 2072 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2072 20 2072 30 , srcInfoPoints = [] } "parseComma"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 20 2073 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2073 23 2073 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 20 2073 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 20 2073 22 , srcInfoPoints = [] } "zv")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 26 2073 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 26 2073 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2073 26 2073 35 , srcInfoPoints = [] } "parseUnqt"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 20 2074 60 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2074 23 2074 25 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 20 2074 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 20 2074 22 , srcInfoPoints = [] } "mf")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 26 2074 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 26 2074 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 26 2074 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 26 2074 34 , srcInfoPoints = [] } "optional"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 35 2074 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 35 2074 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 35 2074 36 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 37 2074 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 37 2074 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 37 2074 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 37 2074 47 , srcInfoPoints = [] } "parseComma"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 48 2074 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 48 2074 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 48 2074 50 , srcInfoPoints = [] } ">>"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 51 2074 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 51 2074 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2074 51 2074 60 , srcInfoPoints = [] } "parseUnqt"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 43 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 20 2075 26 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 27 2075 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 27 2075 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 27 2075 28 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 34 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 29 2075 31 , srcInfoPoints = [] } "VP"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 32 2075 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 32 2075 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 32 2075 34 , srcInfoPoints = [] } "wv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 35 2075 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 35 2075 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 35 2075 37 , srcInfoPoints = [] } "hv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 38 2075 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 38 2075 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 38 2075 40 , srcInfoPoints = [] } "zv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 41 2075 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 41 2075 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2075 41 2075 43 , srcInfoPoints = [] } "mf"))))) ])) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 5 2077 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 11 2077 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2077 11 2077 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 13 2077 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 13 2077 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 13 2077 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 13 2077 24 , srcInfoPoints = [] } "quotedParse"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 25 2077 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 25 2077 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2077 25 2077 34 , srcInfoPoints = [] } "parseUnqt"))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 1 2081 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2079 16 2079 17 , SrcSpan "tests/examples/Attributes.hs" 2080 16 2080 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 1 2079 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 6 2079 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 6 2079 15 , srcInfoPoints = [] } "FocusType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 18 2079 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 18 2079 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 18 2079 20 , srcInfoPoints = [] } "XY") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 21 2079 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 21 2079 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2079 21 2079 26 , srcInfoPoints = [] } "Point")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 18 2080 34 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 18 2080 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 18 2080 27 , srcInfoPoints = [] } "NodeFocus") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 28 2080 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 28 2080 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2080 28 2080 34 , srcInfoPoints = [] } "String")) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 18 2081 48 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2081 18 2081 26 , SrcSpan "tests/examples/Attributes.hs" 2081 27 2081 28 , SrcSpan "tests/examples/Attributes.hs" 2081 30 2081 31 , SrcSpan "tests/examples/Attributes.hs" 2081 35 2081 36 , SrcSpan "tests/examples/Attributes.hs" 2081 41 2081 42 , SrcSpan "tests/examples/Attributes.hs" 2081 47 2081 48 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 28 2081 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 28 2081 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 28 2081 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 28 2081 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 32 2081 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 32 2081 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 32 2081 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 32 2081 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 37 2081 41 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 37 2081 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 37 2081 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 37 2081 41 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 43 2081 47 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 43 2081 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 43 2081 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2081 43 2081 47 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 1 2090 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2083 1 2083 9 , SrcSpan "tests/examples/Attributes.hs" 2083 29 2083 34 , SrcSpan "tests/examples/Attributes.hs" 2084 5 2084 5 , SrcSpan "tests/examples/Attributes.hs" 2085 5 2085 5 , SrcSpan "tests/examples/Attributes.hs" 2087 5 2087 5 , SrcSpan "tests/examples/Attributes.hs" 2088 5 2088 5 , SrcSpan "tests/examples/Attributes.hs" 2090 1 2090 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 10 2083 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 10 2083 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 10 2083 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 10 2083 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 10 2083 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 19 2083 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 19 2083 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2083 19 2083 28 , srcInfoPoints = [] } "FocusType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 5 2085 40 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 5 2085 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 5 2084 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 5 2084 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 13 2084 19 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2084 13 2084 14 , SrcSpan "tests/examples/Attributes.hs" 2084 18 2084 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 14 2084 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 14 2084 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 14 2084 16 , srcInfoPoints = [] } "XY")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 17 2084 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 17 2084 18 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 28 2084 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2084 28 2084 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 30 2084 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 30 2084 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 30 2084 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 30 2084 37 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 38 2084 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 38 2084 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2084 38 2084 39 , srcInfoPoints = [] } "p"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 5 2085 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 5 2085 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 13 2085 27 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2085 13 2085 14 , SrcSpan "tests/examples/Attributes.hs" 2085 26 2085 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 14 2085 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 14 2085 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 14 2085 23 , srcInfoPoints = [] } "NodeFocus")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 24 2085 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 24 2085 26 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 28 2085 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2085 28 2085 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 30 2085 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 30 2085 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 30 2085 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 30 2085 37 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 38 2085 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 38 2085 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2085 38 2085 40 , srcInfoPoints = [] } "nm"))))) Nothing ]) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 5 2088 36 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 5 2088 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 5 2087 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 5 2087 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 11 2087 17 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2087 11 2087 12 , SrcSpan "tests/examples/Attributes.hs" 2087 16 2087 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 12 2087 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 12 2087 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 12 2087 14 , srcInfoPoints = [] } "XY")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 15 2087 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 15 2087 16 , srcInfoPoints = [] } "p") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 26 2087 35 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2087 26 2087 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 28 2087 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 28 2087 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 28 2087 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 28 2087 33 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 34 2087 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 34 2087 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2087 34 2087 35 , srcInfoPoints = [] } "p"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 5 2088 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 5 2088 10 , srcInfoPoints = [] } "toDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 11 2088 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2088 11 2088 12 , SrcSpan "tests/examples/Attributes.hs" 2088 24 2088 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 12 2088 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 12 2088 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 12 2088 21 , srcInfoPoints = [] } "NodeFocus")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 22 2088 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 22 2088 24 , srcInfoPoints = [] } "nm") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 26 2088 36 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2088 26 2088 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 28 2088 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 28 2088 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 28 2088 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 28 2088 33 , srcInfoPoints = [] } "toDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 34 2088 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 34 2088 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2088 34 2088 36 , srcInfoPoints = [] } "nm"))))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 1 2101 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2090 1 2090 9 , SrcSpan "tests/examples/Attributes.hs" 2090 29 2090 34 , SrcSpan "tests/examples/Attributes.hs" 2091 5 2091 5 , SrcSpan "tests/examples/Attributes.hs" 2095 5 2095 5 , SrcSpan "tests/examples/Attributes.hs" 2101 1 2101 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 10 2090 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 10 2090 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 10 2090 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 10 2090 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 10 2090 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 19 2090 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 19 2090 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2090 19 2090 28 , srcInfoPoints = [] } "FocusType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 5 2093 42 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 5 2093 42 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 5 2091 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 5 2091 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 15 2093 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2091 15 2091 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2093 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2091 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2091 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2091 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2091 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 17 2091 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 23 2091 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 23 2091 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 23 2091 25 , srcInfoPoints = [] } "XY")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 26 2091 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 26 2091 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2091 26 2091 35 , srcInfoPoints = [] } "parseUnqt")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2092 17 2092 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2092 17 2092 18 , SrcSpan "tests/examples/Attributes.hs" 2092 18 2092 24 , SrcSpan "tests/examples/Attributes.hs" 2092 24 2092 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2092 17 2092 25 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2092 17 2092 18 , SrcSpan "tests/examples/Attributes.hs" 2092 18 2092 24 , SrcSpan "tests/examples/Attributes.hs" 2092 24 2092 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2092 18 2092 24 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 17 2093 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 17 2093 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 17 2093 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 17 2093 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 17 2093 22 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 23 2093 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 23 2093 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 23 2093 32 , srcInfoPoints = [] } "NodeFocus")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 33 2093 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 33 2093 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2093 33 2093 42 , srcInfoPoints = [] } "parseUnqt")))))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 5 2097 34 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 5 2097 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 5 2095 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 5 2095 10 , srcInfoPoints = [] } "parse")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 11 2097 34 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2095 11 2095 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2097 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2095 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2095 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2095 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2095 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 13 2095 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 19 2095 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 19 2095 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 19 2095 21 , srcInfoPoints = [] } "XY")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 22 2095 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 22 2095 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2095 22 2095 27 , srcInfoPoints = [] } "parse")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2096 13 2096 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2096 13 2096 14 , SrcSpan "tests/examples/Attributes.hs" 2096 14 2096 20 , SrcSpan "tests/examples/Attributes.hs" 2096 20 2096 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2096 13 2096 21 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2096 13 2096 14 , SrcSpan "tests/examples/Attributes.hs" 2096 14 2096 20 , SrcSpan "tests/examples/Attributes.hs" 2096 20 2096 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2096 14 2096 20 , srcInfoPoints = [] } "onFail"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 13 2097 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 13 2097 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 13 2097 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 13 2097 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 13 2097 18 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 19 2097 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 19 2097 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 19 2097 28 , srcInfoPoints = [] } "NodeFocus")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 29 2097 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 29 2097 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2097 29 2097 34 , srcInfoPoints = [] } "parse")))))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 1 2104 71 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2101 24 2101 25 , SrcSpan "tests/examples/Attributes.hs" 2102 24 2102 25 , SrcSpan "tests/examples/Attributes.hs" 2103 24 2103 25 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 1 2101 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 6 2101 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 6 2101 23 , srcInfoPoints = [] } "VerticalPlacement")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 26 2101 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 26 2101 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2101 26 2101 30 , srcInfoPoints = [] } "VTop") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2102 26 2102 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2102 26 2102 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2102 26 2102 33 , srcInfoPoints = [] } "VCenter") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2103 26 2103 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2103 26 2103 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2103 26 2103 33 , srcInfoPoints = [] } "VBottom") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 26 2104 71 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2104 26 2104 34 , SrcSpan "tests/examples/Attributes.hs" 2104 35 2104 36 , SrcSpan "tests/examples/Attributes.hs" 2104 38 2104 39 , SrcSpan "tests/examples/Attributes.hs" 2104 43 2104 44 , SrcSpan "tests/examples/Attributes.hs" 2104 52 2104 53 , SrcSpan "tests/examples/Attributes.hs" 2104 58 2104 59 , SrcSpan "tests/examples/Attributes.hs" 2104 64 2104 65 , SrcSpan "tests/examples/Attributes.hs" 2104 70 2104 71 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 36 2104 38 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 36 2104 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 36 2104 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 36 2104 38 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 40 2104 43 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 40 2104 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 40 2104 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 40 2104 43 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 45 2104 52 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 45 2104 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 45 2104 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 45 2104 52 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 54 2104 58 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 54 2104 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 54 2104 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 54 2104 58 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 60 2104 64 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 60 2104 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 60 2104 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 60 2104 64 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 66 2104 70 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 66 2104 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 66 2104 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2104 66 2104 70 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 1 2111 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2106 1 2106 9 , SrcSpan "tests/examples/Attributes.hs" 2106 37 2106 42 , SrcSpan "tests/examples/Attributes.hs" 2107 5 2107 5 , SrcSpan "tests/examples/Attributes.hs" 2108 5 2108 5 , SrcSpan "tests/examples/Attributes.hs" 2109 5 2109 5 , SrcSpan "tests/examples/Attributes.hs" 2111 1 2111 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 10 2106 36 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 10 2106 36 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 10 2106 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 10 2106 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 10 2106 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 19 2106 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 19 2106 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2106 19 2106 36 , srcInfoPoints = [] } "VerticalPlacement"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 5 2109 31 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 5 2109 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 5 2107 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 5 2107 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 13 2107 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 13 2107 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 13 2107 17 , srcInfoPoints = [] } "VTop")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 21 2107 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2107 21 2107 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 23 2107 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 23 2107 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 23 2107 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 23 2107 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 28 2107 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2107 28 2107 31 , srcInfoPoints = [] } 't' "t")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 5 2108 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 5 2108 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 13 2108 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 13 2108 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 13 2108 20 , srcInfoPoints = [] } "VCenter")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 21 2108 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2108 21 2108 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 23 2108 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 23 2108 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 23 2108 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 23 2108 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 28 2108 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2108 28 2108 31 , srcInfoPoints = [] } 'c' "c")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 5 2109 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 5 2109 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 13 2109 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 13 2109 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 13 2109 20 , srcInfoPoints = [] } "VBottom")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 21 2109 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2109 21 2109 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 23 2109 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 23 2109 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 23 2109 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 23 2109 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 28 2109 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2109 28 2109 31 , srcInfoPoints = [] } 'b' "b")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 1 2119 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2111 1 2111 9 , SrcSpan "tests/examples/Attributes.hs" 2111 37 2111 42 , SrcSpan "tests/examples/Attributes.hs" 2112 5 2112 5 , SrcSpan "tests/examples/Attributes.hs" 2119 1 2119 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 10 2111 36 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 10 2111 36 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 10 2111 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 10 2111 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 10 2111 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 19 2111 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 19 2111 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2111 19 2111 36 , srcInfoPoints = [] } "VerticalPlacement"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 5 2115 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 5 2115 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 5 2112 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 5 2112 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 15 2115 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2112 15 2112 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 17 2115 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 17 2112 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 17 2112 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 17 2112 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 23 2115 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2112 23 2112 24 , SrcSpan "tests/examples/Attributes.hs" 2113 23 2113 24 , SrcSpan "tests/examples/Attributes.hs" 2114 23 2114 24 , SrcSpan "tests/examples/Attributes.hs" 2115 23 2115 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 25 2112 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 25 2112 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 25 2112 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 25 2112 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 25 2112 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 35 2112 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 35 2112 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 35 2112 39 , srcInfoPoints = [] } "VTop")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 40 2112 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2112 40 2112 43 , srcInfoPoints = [] } "t" "t")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 25 2113 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 25 2113 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 25 2113 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 25 2113 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 25 2113 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 35 2113 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 35 2113 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 35 2113 42 , srcInfoPoints = [] } "VCenter")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 43 2113 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2113 43 2113 46 , srcInfoPoints = [] } "c" "c")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 25 2114 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 25 2114 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 25 2114 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 25 2114 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 25 2114 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 35 2114 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 35 2114 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 35 2114 42 , srcInfoPoints = [] } "VBottom")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 43 2114 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2114 43 2114 46 , srcInfoPoints = [] } "b" "b")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 1 2124 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2119 16 2119 17 , SrcSpan "tests/examples/Attributes.hs" 2120 16 2120 17 , SrcSpan "tests/examples/Attributes.hs" 2121 16 2121 17 , SrcSpan "tests/examples/Attributes.hs" 2122 16 2122 17 , SrcSpan "tests/examples/Attributes.hs" 2123 16 2123 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 1 2119 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 6 2119 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 6 2119 15 , srcInfoPoints = [] } "ScaleType")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 18 2119 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 18 2119 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2119 18 2119 30 , srcInfoPoints = [] } "UniformScale") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2120 18 2120 25 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2120 18 2120 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2120 18 2120 25 , srcInfoPoints = [] } "NoScale") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2121 18 2121 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2121 18 2121 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2121 18 2121 27 , srcInfoPoints = [] } "FillWidth") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2122 18 2122 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2122 18 2122 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2122 18 2122 28 , srcInfoPoints = [] } "FillHeight") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2123 18 2123 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2123 18 2123 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2123 18 2123 26 , srcInfoPoints = [] } "FillBoth") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 18 2124 63 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2124 18 2124 26 , SrcSpan "tests/examples/Attributes.hs" 2124 27 2124 28 , SrcSpan "tests/examples/Attributes.hs" 2124 30 2124 31 , SrcSpan "tests/examples/Attributes.hs" 2124 35 2124 36 , SrcSpan "tests/examples/Attributes.hs" 2124 44 2124 45 , SrcSpan "tests/examples/Attributes.hs" 2124 50 2124 51 , SrcSpan "tests/examples/Attributes.hs" 2124 56 2124 57 , SrcSpan "tests/examples/Attributes.hs" 2124 62 2124 63 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 28 2124 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 28 2124 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 28 2124 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 28 2124 30 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 32 2124 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 32 2124 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 32 2124 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 32 2124 35 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 37 2124 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 37 2124 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 37 2124 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 37 2124 44 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 46 2124 50 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 46 2124 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 46 2124 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 46 2124 50 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 52 2124 56 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 52 2124 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 52 2124 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 52 2124 56 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 58 2124 62 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 58 2124 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 58 2124 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2124 58 2124 62 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 1 2133 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2126 1 2126 9 , SrcSpan "tests/examples/Attributes.hs" 2126 29 2126 34 , SrcSpan "tests/examples/Attributes.hs" 2127 5 2127 5 , SrcSpan "tests/examples/Attributes.hs" 2128 5 2128 5 , SrcSpan "tests/examples/Attributes.hs" 2129 5 2129 5 , SrcSpan "tests/examples/Attributes.hs" 2130 5 2130 5 , SrcSpan "tests/examples/Attributes.hs" 2131 5 2131 5 , SrcSpan "tests/examples/Attributes.hs" 2133 1 2133 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 10 2126 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 10 2126 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 10 2126 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 10 2126 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 10 2126 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 19 2126 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 19 2126 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2126 19 2126 28 , srcInfoPoints = [] } "ScaleType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 5 2131 39 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 5 2131 39 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 5 2127 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 5 2127 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 13 2127 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 13 2127 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 13 2127 25 , srcInfoPoints = [] } "UniformScale")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 26 2127 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2127 26 2127 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 28 2127 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 28 2127 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 28 2127 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 28 2127 35 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 36 2127 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 36 2127 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2127 36 2127 40 , srcInfoPoints = [] } "True"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 5 2128 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 5 2128 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 13 2128 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 13 2128 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 13 2128 20 , srcInfoPoints = [] } "NoScale")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 26 2128 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2128 26 2128 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 28 2128 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 28 2128 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 28 2128 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 28 2128 35 , srcInfoPoints = [] } "unqtDot"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 36 2128 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 36 2128 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2128 36 2128 41 , srcInfoPoints = [] } "False"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 5 2129 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 5 2129 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 13 2129 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 13 2129 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 13 2129 22 , srcInfoPoints = [] } "FillWidth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 26 2129 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2129 26 2129 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 28 2129 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 28 2129 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 28 2129 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 28 2129 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 33 2129 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2129 33 2129 40 , srcInfoPoints = [] } "width" "width")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 5 2130 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 5 2130 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 13 2130 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 13 2130 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 13 2130 23 , srcInfoPoints = [] } "FillHeight")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 26 2130 41 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2130 26 2130 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 28 2130 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 28 2130 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 28 2130 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 28 2130 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 33 2130 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2130 33 2130 41 , srcInfoPoints = [] } "height" "height")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 5 2131 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 5 2131 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 13 2131 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 13 2131 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 13 2131 21 , srcInfoPoints = [] } "FillBoth")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 26 2131 39 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2131 26 2131 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 28 2131 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 28 2131 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 28 2131 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 28 2131 32 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 33 2131 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2131 33 2131 39 , srcInfoPoints = [] } "both" "both")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 1 2143 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2133 1 2133 9 , SrcSpan "tests/examples/Attributes.hs" 2133 29 2133 34 , SrcSpan "tests/examples/Attributes.hs" 2134 5 2134 5 , SrcSpan "tests/examples/Attributes.hs" 2143 1 2143 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 10 2133 28 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 10 2133 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 10 2133 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 10 2133 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 10 2133 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 19 2133 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 19 2133 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2133 19 2133 28 , srcInfoPoints = [] } "ScaleType"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 5 2139 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 5 2139 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 5 2134 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 5 2134 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 15 2139 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2134 15 2134 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 17 2139 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 17 2134 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 17 2134 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 17 2134 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 23 2139 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2134 23 2134 24 , SrcSpan "tests/examples/Attributes.hs" 2135 23 2135 24 , SrcSpan "tests/examples/Attributes.hs" 2136 23 2136 24 , SrcSpan "tests/examples/Attributes.hs" 2137 23 2137 24 , SrcSpan "tests/examples/Attributes.hs" 2138 23 2138 24 , SrcSpan "tests/examples/Attributes.hs" 2139 23 2139 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 25 2134 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 25 2134 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 25 2134 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 25 2134 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 25 2134 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 35 2134 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 35 2134 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 35 2134 47 , srcInfoPoints = [] } "UniformScale")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 48 2134 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2134 48 2134 54 , srcInfoPoints = [] } "true" "true")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 25 2135 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 25 2135 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 25 2135 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 25 2135 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 25 2135 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 35 2135 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 35 2135 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 35 2135 42 , srcInfoPoints = [] } "NoScale")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 43 2135 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2135 43 2135 50 , srcInfoPoints = [] } "false" "false")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 25 2136 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 25 2136 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 25 2136 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 25 2136 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 25 2136 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 35 2136 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 35 2136 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 35 2136 44 , srcInfoPoints = [] } "FillWidth")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 45 2136 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2136 45 2136 52 , srcInfoPoints = [] } "width" "width")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 25 2137 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 25 2137 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 25 2137 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 25 2137 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 25 2137 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 35 2137 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 35 2137 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 35 2137 45 , srcInfoPoints = [] } "FillHeight")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 46 2137 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2137 46 2137 54 , srcInfoPoints = [] } "height" "height")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 25 2138 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 25 2138 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 25 2138 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 25 2138 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 25 2138 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 35 2138 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 35 2138 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 35 2138 43 , srcInfoPoints = [] } "FillBoth")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 44 2138 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2138 44 2138 50 , srcInfoPoints = [] } "both" "both")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 1 2146 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2143 20 2143 21 , SrcSpan "tests/examples/Attributes.hs" 2144 20 2144 21 , SrcSpan "tests/examples/Attributes.hs" 2145 20 2145 21 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 1 2143 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 6 2143 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 6 2143 19 , srcInfoPoints = [] } "Justification")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 22 2143 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 22 2143 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2143 22 2143 27 , srcInfoPoints = [] } "JLeft") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2144 22 2144 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2144 22 2144 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2144 22 2144 28 , srcInfoPoints = [] } "JRight") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2145 22 2145 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2145 22 2145 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2145 22 2145 29 , srcInfoPoints = [] } "JCenter") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 22 2146 67 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2146 22 2146 30 , SrcSpan "tests/examples/Attributes.hs" 2146 31 2146 32 , SrcSpan "tests/examples/Attributes.hs" 2146 34 2146 35 , SrcSpan "tests/examples/Attributes.hs" 2146 39 2146 40 , SrcSpan "tests/examples/Attributes.hs" 2146 48 2146 49 , SrcSpan "tests/examples/Attributes.hs" 2146 54 2146 55 , SrcSpan "tests/examples/Attributes.hs" 2146 60 2146 61 , SrcSpan "tests/examples/Attributes.hs" 2146 66 2146 67 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 32 2146 34 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 32 2146 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 32 2146 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 32 2146 34 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 36 2146 39 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 36 2146 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 36 2146 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 36 2146 39 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 41 2146 48 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 41 2146 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 41 2146 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 41 2146 48 , srcInfoPoints = [] } "Bounded"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 50 2146 54 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 50 2146 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 50 2146 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 50 2146 54 , srcInfoPoints = [] } "Enum"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 56 2146 60 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 56 2146 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 56 2146 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 56 2146 60 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 62 2146 66 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 62 2146 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 62 2146 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2146 62 2146 66 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 1 2153 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2148 1 2148 9 , SrcSpan "tests/examples/Attributes.hs" 2148 33 2148 38 , SrcSpan "tests/examples/Attributes.hs" 2149 5 2149 5 , SrcSpan "tests/examples/Attributes.hs" 2150 5 2150 5 , SrcSpan "tests/examples/Attributes.hs" 2151 5 2151 5 , SrcSpan "tests/examples/Attributes.hs" 2153 1 2153 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 10 2148 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 10 2148 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 10 2148 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 10 2148 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 10 2148 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 19 2148 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 19 2148 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2148 19 2148 32 , srcInfoPoints = [] } "Justification"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 5 2151 31 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 5 2151 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 5 2149 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 5 2149 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 13 2149 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 13 2149 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 13 2149 18 , srcInfoPoints = [] } "JLeft")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 21 2149 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2149 21 2149 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 23 2149 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 23 2149 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 23 2149 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 23 2149 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 28 2149 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2149 28 2149 31 , srcInfoPoints = [] } 'l' "l")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 5 2150 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 5 2150 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 13 2150 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 13 2150 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 13 2150 19 , srcInfoPoints = [] } "JRight")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 21 2150 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2150 21 2150 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 23 2150 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 23 2150 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 23 2150 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 23 2150 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 28 2150 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2150 28 2150 31 , srcInfoPoints = [] } 'r' "r")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 5 2151 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 5 2151 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 13 2151 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 13 2151 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 13 2151 20 , srcInfoPoints = [] } "JCenter")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 21 2151 31 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2151 21 2151 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 23 2151 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 23 2151 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 23 2151 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 23 2151 27 , srcInfoPoints = [] } "char"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 28 2151 31 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2151 28 2151 31 , srcInfoPoints = [] } 'c' "c")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 1 2161 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2153 1 2153 9 , SrcSpan "tests/examples/Attributes.hs" 2153 33 2153 38 , SrcSpan "tests/examples/Attributes.hs" 2154 5 2154 5 , SrcSpan "tests/examples/Attributes.hs" 2161 1 2161 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 10 2153 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 10 2153 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 10 2153 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 10 2153 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 10 2153 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 19 2153 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 19 2153 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2153 19 2153 32 , srcInfoPoints = [] } "Justification"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 5 2157 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 5 2157 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 5 2154 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 5 2154 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 15 2157 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2154 15 2154 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 17 2157 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 17 2154 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 17 2154 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 17 2154 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 23 2157 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2154 23 2154 24 , SrcSpan "tests/examples/Attributes.hs" 2155 23 2155 24 , SrcSpan "tests/examples/Attributes.hs" 2156 23 2156 24 , SrcSpan "tests/examples/Attributes.hs" 2157 23 2157 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 25 2154 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 25 2154 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 25 2154 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 25 2154 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 25 2154 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 35 2154 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 35 2154 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 35 2154 40 , srcInfoPoints = [] } "JLeft")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 41 2154 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2154 41 2154 44 , srcInfoPoints = [] } "l" "l")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 25 2155 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 25 2155 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 25 2155 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 25 2155 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 25 2155 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 35 2155 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 35 2155 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 35 2155 41 , srcInfoPoints = [] } "JRight")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 42 2155 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2155 42 2155 45 , srcInfoPoints = [] } "r" "r")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 25 2156 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 25 2156 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 25 2156 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 25 2156 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 25 2156 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 35 2156 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 35 2156 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 35 2156 42 , srcInfoPoints = [] } "JCenter")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 43 2156 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2156 43 2156 46 , srcInfoPoints = [] } "c" "c")) ]))) Nothing) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 1 2166 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2161 13 2161 14 , SrcSpan "tests/examples/Attributes.hs" 2162 13 2162 14 , SrcSpan "tests/examples/Attributes.hs" 2163 13 2163 14 , SrcSpan "tests/examples/Attributes.hs" 2164 13 2164 14 , SrcSpan "tests/examples/Attributes.hs" 2165 13 2165 14 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 1 2161 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 6 2161 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 6 2161 12 , srcInfoPoints = [] } "Ratios")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 15 2161 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 15 2161 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 15 2161 26 , srcInfoPoints = [] } "AspectRatio") [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 27 2161 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 27 2161 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2161 27 2161 33 , srcInfoPoints = [] } "Double")) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2162 15 2162 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2162 15 2162 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2162 15 2162 24 , srcInfoPoints = [] } "FillRatio") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2163 15 2163 28 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2163 15 2163 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2163 15 2163 28 , srcInfoPoints = [] } "CompressRatio") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2164 15 2164 26 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2164 15 2164 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2164 15 2164 26 , srcInfoPoints = [] } "ExpandRatio") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2165 15 2165 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2165 15 2165 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2165 15 2165 24 , srcInfoPoints = [] } "AutoRatio") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 15 2166 45 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2166 15 2166 23 , SrcSpan "tests/examples/Attributes.hs" 2166 24 2166 25 , SrcSpan "tests/examples/Attributes.hs" 2166 27 2166 28 , SrcSpan "tests/examples/Attributes.hs" 2166 32 2166 33 , SrcSpan "tests/examples/Attributes.hs" 2166 38 2166 39 , SrcSpan "tests/examples/Attributes.hs" 2166 44 2166 45 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 25 2166 27 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 25 2166 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 25 2166 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 25 2166 27 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 29 2166 32 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 29 2166 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 29 2166 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 29 2166 32 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 34 2166 38 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 34 2166 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 34 2166 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 34 2166 38 , srcInfoPoints = [] } "Show"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 40 2166 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 40 2166 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 40 2166 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2166 40 2166 44 , srcInfoPoints = [] } "Read"))) ] ] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 1 2175 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2168 1 2168 9 , SrcSpan "tests/examples/Attributes.hs" 2168 26 2168 31 , SrcSpan "tests/examples/Attributes.hs" 2169 5 2169 5 , SrcSpan "tests/examples/Attributes.hs" 2170 5 2170 5 , SrcSpan "tests/examples/Attributes.hs" 2171 5 2171 5 , SrcSpan "tests/examples/Attributes.hs" 2172 5 2172 5 , SrcSpan "tests/examples/Attributes.hs" 2173 5 2173 5 , SrcSpan "tests/examples/Attributes.hs" 2175 1 2175 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 10 2168 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 10 2168 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 10 2168 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 10 2168 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 10 2168 18 , srcInfoPoints = [] } "PrintDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 19 2168 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 19 2168 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2168 19 2168 25 , srcInfoPoints = [] } "Ratios"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 5 2173 42 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 5 2173 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 5 2169 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 5 2169 12 , srcInfoPoints = [] } "unqtDot") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 13 2169 28 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2169 13 2169 14 , SrcSpan "tests/examples/Attributes.hs" 2169 27 2169 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 14 2169 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 14 2169 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 14 2169 25 , srcInfoPoints = [] } "AspectRatio")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 26 2169 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 26 2169 27 , srcInfoPoints = [] } "r") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 29 2169 40 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2169 29 2169 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 31 2169 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 31 2169 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 31 2169 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 31 2169 38 , srcInfoPoints = [] } "unqtDot"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 39 2169 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 39 2169 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2169 39 2169 40 , srcInfoPoints = [] } "r"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 5 2170 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 5 2170 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 13 2170 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 13 2170 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 13 2170 22 , srcInfoPoints = [] } "FillRatio")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 29 2170 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2170 29 2170 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 31 2170 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 31 2170 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 31 2170 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 31 2170 35 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 36 2170 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2170 36 2170 42 , srcInfoPoints = [] } "fill" "fill")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 5 2171 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 5 2171 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 13 2171 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 13 2171 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 13 2171 26 , srcInfoPoints = [] } "CompressRatio")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 29 2171 46 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2171 29 2171 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 31 2171 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 31 2171 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 31 2171 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 31 2171 35 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 36 2171 46 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2171 36 2171 46 , srcInfoPoints = [] } "compress" "compress")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 5 2172 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 5 2172 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 13 2172 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 13 2172 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 13 2172 24 , srcInfoPoints = [] } "ExpandRatio")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 29 2172 44 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2172 29 2172 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 31 2172 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 31 2172 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 31 2172 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 31 2172 35 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 36 2172 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2172 36 2172 44 , srcInfoPoints = [] } "expand" "expand")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 5 2173 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 5 2173 12 , srcInfoPoints = [] } "unqtDot") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 13 2173 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 13 2173 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 13 2173 22 , srcInfoPoints = [] } "AutoRatio")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 29 2173 42 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2173 29 2173 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 31 2173 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 31 2173 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 31 2173 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 31 2173 35 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 36 2173 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2173 36 2173 42 , srcInfoPoints = [] } "auto" "auto")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 1 2182 0 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2175 1 2175 9 , SrcSpan "tests/examples/Attributes.hs" 2175 26 2175 31 , SrcSpan "tests/examples/Attributes.hs" 2176 5 2176 5 , SrcSpan "tests/examples/Attributes.hs" 2182 1 2182 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 10 2175 25 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 10 2175 25 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 10 2175 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 10 2175 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 10 2175 18 , srcInfoPoints = [] } "ParseDot"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 19 2175 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 19 2175 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2175 19 2175 25 , srcInfoPoints = [] } "Ratios"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 5 2181 24 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 5 2181 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 5 2176 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 5 2176 14 , srcInfoPoints = [] } "parseUnqt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 15 2181 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2176 15 2176 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 17 2181 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 17 2176 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 17 2176 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 17 2176 22 , srcInfoPoints = [] } "oneOf"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 23 2181 24 , srcInfoPoints = [ SrcSpan "tests/examples/Attributes.hs" 2176 23 2176 24 , SrcSpan "tests/examples/Attributes.hs" 2177 23 2177 24 , SrcSpan "tests/examples/Attributes.hs" 2178 23 2178 24 , SrcSpan "tests/examples/Attributes.hs" 2179 23 2179 24 , SrcSpan "tests/examples/Attributes.hs" 2180 23 2180 24 , SrcSpan "tests/examples/Attributes.hs" 2181 23 2181 24 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 25 2176 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 25 2176 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 25 2176 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 25 2176 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 25 2176 30 , srcInfoPoints = [] } "liftM"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 31 2176 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 31 2176 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 31 2176 42 , srcInfoPoints = [] } "AspectRatio")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 43 2176 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 43 2176 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2176 43 2176 52 , srcInfoPoints = [] } "parseUnqt"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 25 2177 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 25 2177 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 25 2177 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 25 2177 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 25 2177 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 35 2177 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 35 2177 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 35 2177 44 , srcInfoPoints = [] } "FillRatio")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 45 2177 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2177 45 2177 51 , srcInfoPoints = [] } "fill" "fill")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 25 2178 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 25 2178 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 25 2178 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 25 2178 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 25 2178 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 35 2178 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 35 2178 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 35 2178 48 , srcInfoPoints = [] } "CompressRatio")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 49 2178 59 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2178 49 2178 59 , srcInfoPoints = [] } "compress" "compress")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 25 2179 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 25 2179 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 25 2179 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 25 2179 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 25 2179 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 35 2179 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 35 2179 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 35 2179 46 , srcInfoPoints = [] } "ExpandRatio")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 47 2179 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2179 47 2179 55 , srcInfoPoints = [] } "expand" "expand")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 25 2180 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 25 2180 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 25 2180 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 25 2180 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 25 2180 34 , srcInfoPoints = [] } "stringRep"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 35 2180 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 35 2180 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 35 2180 44 , srcInfoPoints = [] } "AutoRatio")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 45 2180 51 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Attributes.hs" 2180 45 2180 51 , srcInfoPoints = [] } "auto" "auto")) ]))) Nothing) ]) ] , [ Comment True (SrcSpan "tests/examples/Attributes.hs" 1 1 74 4) " |\n Module : Data.GraphViz.Attributes\n Description : Definition of the Graphviz attributes.\n Copyright : (c) Matthew Sackman, Ivan Lazar Miljenovic\n License : 3-Clause BSD-style\n Maintainer : Ivan.Miljenovic@gmail.com\n\n This module defines the various attributes that different parts of\n a Graphviz graph can have. These attributes are based on the\n documentation found at:\n \n\n For more information on usage, etc. please see that document.\n\n A summary of known current constraints\\/limitations\\/differences:\n\n * There might still be a few cases where quotes are still not\n escaped/parsed correctly; if you find such a situation, please\n let me know; however, you should be able to use 'String' values\n directly without having to worry about when quotes are required\n or extra escaping of quote characters as 'PrintDot' and\n 'ParseDot' instances for 'String' should take care of that\n for you.\n\n * Note that for an edge, in /Dot/ parlance if the edge goes from\n /A/ to /B/, then /A/ is the tail node and /B/ is the head node\n (since /A/ is at the tail end of the arrow).\n\n * ColorList and PointfList are defined as actual lists (but\n 'LayerList' is not). Note that for the Color 'Attribute' for\n node values, only a single Color is valid; edges are allowed\n multiple colors with one spline/arrow per color in the list (but\n you must have at least one 'Color' in the list). This might be\n changed in future.\n\n * Style is implemented as a list of 'StyleItem' values; note that\n empty lists are not allowed.\n\n * A lot of values have a possible value of @none@. These now\n have custom constructors. In fact, most constructors have been\n expanded upon to give an idea of what they represent rather than\n using generic terms.\n\n * @PointF@ and 'Point' have been combined, and feature support for pure\n 'Int'-based co-ordinates as well as 'Double' ones (i.e. no floating\n point-only points for Point). The optional '!' and third value\n for Point are not available.\n\n * 'Rect' uses two 'Point' values to denote the lower-left and\n top-right corners.\n\n * The two 'LabelLoc' attributes have been combined.\n\n * The defined 'LayerSep' is not used to parse 'LayerRange' or\n 'LayerList'; the default (@[' ', ':', '\\t']@) is instead used.\n\n * @SplineType@ has been replaced with @['Spline']@.\n\n * Only polygon-based 'Shape's are available.\n\n * 'PortPos' only has the 'CompassPoint' option, not\n @PortName[:CompassPoint]@ (since record shapes aren't allowed,\n and parsing HTML-like labels could be problematic).\n\n * Not every 'Attribute' is fully documented/described. However,\n all those which have specific allowed values should be covered.\n\n * Deprecated 'Overlap' algorithms are not defined.\n\n * The global @Orientation@ attribute is not defined, as it is\n difficult to distinguish from the node-based 'Orientation'\n 'Attribute'; also, its behaviour is duplicated by 'Rotate'.\n\n " , Comment False (SrcSpan "tests/examples/Attributes.hs" 76 7 76 40) " * The actual /Dot/ attributes." , Comment False (SrcSpan "tests/examples/Attributes.hs" 79 7 79 54) " ** Validity functions on @Attribute@ values." , Comment False (SrcSpan "tests/examples/Attributes.hs" 85 7 85 41) " * Value types for @Attribute@s." , Comment False (SrcSpan "tests/examples/Attributes.hs" 129 7 129 63) " * Types representing the Dot grammar for @ArrowType@." , Comment False (SrcSpan "tests/examples/Attributes.hs" 134 7 134 41) " ** Default @ArrowType@ aliases." , Comment False (SrcSpan "tests/examples/Attributes.hs" 135 7 135 44) " *** The 9 primitive @ArrowShape@s." , Comment False (SrcSpan "tests/examples/Attributes.hs" 145 7 145 31) " *** 5 derived Arrows." , Comment False (SrcSpan "tests/examples/Attributes.hs" 151 7 151 59) " *** 5 supported cases for backwards compatibility" , Comment False (SrcSpan "tests/examples/Attributes.hs" 157 7 157 38) " ** @ArrowModifier@ instances" , Comment False (SrcSpan "tests/examples/Attributes.hs" 160 7 160 44) " * Other exported functions\\/values" , Comment False (SrcSpan "tests/examples/Attributes.hs" 175 1 175 81) " -----------------------------------------------------------------------------" , Comment True (SrcSpan "tests/examples/Attributes.hs" 177 1 203 3) " |\n\n These attributes have been implemented in a /permissive/ manner:\n that is, rather than split them up based on which type of value\n they are allowed, they have all been included in the one data type,\n with functions to determine if they are indeed valid for what\n they're being applied to.\n\n To interpret the /Valid for/ listings:\n\n [@G@] Valid for Graphs.\n\n [@C@] Valid for Clusters.\n\n [@S@] Valid for Sub-Graphs (and also Clusters).\n\n [@N@] Valid for Nodes.\n\n [@E@] Valid for Edges.\n\n The /Default/ listings are those that the various Graphviz commands\n use if that 'Attribute' isn't specified (in cases where this is\n /none/, this is equivalent to a 'Nothing' value; that is, no value\n is used). The /Parsing Default/ listings represent what value is\n used (i.e. corresponds to 'True') when the 'Attribute' name is\n listed on its own in /Dot/ source code.\n" , Comment False (SrcSpan "tests/examples/Attributes.hs" 205 40 205 117) " ^ /Valid for/: G; /Default/: @0.99@; /Minimum/: @0.0@; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 206 40 206 119) " ^ /Valid for/: GC; /Default/: @0.3@; /Minimum/: @0@; /Notes/: sfdp, fdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 207 40 207 115) " ^ /Valid for/: ENGC; /Default/: none; /Notes/: svg, postscript, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 208 40 208 82) " ^ /Valid for/: E; /Default/: @'normal'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 209 40 209 95) " ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 210 40 210 82) " ^ /Valid for/: E; /Default/: @'normal'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 211 40 211 78) " ^ /Valid for/: G; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 212 40 212 80) " ^ /Valid for/: G; /Notes/: write only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 213 40 213 95) " ^ /Valid for/: GC; /Default/: X11Color 'Transparent'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 214 40 214 108) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 215 40 215 83) " ^ /Valid for/: G; /Default/: @\\\"UTF-8\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 216 40 216 100) " ^ /Valid for/: G; /Default/: @'Local'@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 217 40 217 82) " ^ /Valid for/: ENCG; /Default/: @'X11'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 218 40 218 92) " ^ /Valid for/: ENC; /Default/: @X11Color 'Black'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 219 40 219 80) " ^ /Valid for/: ENG; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 220 40 220 127) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 221 40 221 108) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 222 40 222 126) " ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True'; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 223 40 223 108) " ^ /Valid for/: E; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 224 40 224 139) " ^ /Valid for/: G; /Default/: @1+(avg. len)*sqrt(|V|)@; /Minimum/: @epsilon@; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 225 40 225 123) " ^ /Valid for/: G; /Default/: @2@; /Minimum/: @2@; /Notes/: sfdp, fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 226 40 226 123) " ^ /Valid for/: G; /Default/: @2@; /Minimum/: @2@; /Notes/: sfdp, fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 227 40 227 118) " ^ /Valid for/: E; /Default/: @'Forward'@ (directed), @'NoDir'@ (undirected)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 228 40 228 148) " ^ /Valid for/: G; /Default/: @'NoConstraints'@; /Parsing Default/: 'EdgeConstraints'; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 229 40 229 98) " ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-100.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 230 40 230 148) " ^ /Valid for/: G; /Default/: @96.0@, @0.0@; /Notes/: svg, bitmap output only; \\\"resolution\\\" is a synonym" , Comment False (SrcSpan "tests/examples/Attributes.hs" 231 40 231 102) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 232 40 232 100) " ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 233 40 233 103) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, cmap only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 234 40 234 156) " ^ /Valid for/: G; /Default/: @.0001 * # nodes@ (@mode == 'KK'@), @.0001@ (@mode == 'Major'@); /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 235 40 235 94) " ^ /Valid for/: G; /Default/: @+3@; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 236 40 236 134) " ^ /Valid for/: NC; /Default/: @X11Color 'LightGray'@ (nodes), @X11Color 'Black'@ (clusters)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 237 40 237 108) " ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 238 40 238 93) " ^ /Valid for/: ENGC; /Default/: @X11Color 'Black'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 239 40 239 92) " ^ /Valid for/: ENGC; /Default/: @\\\"Times-Roman\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 240 40 240 97) " ^ /Valid for/: G; /Default/: @\\\"\\\"@; /Notes/: svg only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 241 40 241 88) " ^ /Valid for/: G; /Default/: system-dependent" , Comment False (SrcSpan "tests/examples/Attributes.hs" 242 40 242 99) " ^ /Valid for/: ENGC; /Default/: @14.0@; /Minimum/: @1.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 243 40 243 97) " ^ /Valid for/: N; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 244 40 244 102) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 245 40 245 107) " ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 246 40 246 78) " ^ /Valid for/: E; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 247 40 247 92) " ^ /Valid for/: E; /Default/: @'PP' 'CenterPoint'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 248 40 248 100) " ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 249 40 249 103) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, cmap only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 250 40 250 96) " ^ /Valid for/: N; /Default/: @0.5@; /Minimum/: @0.02@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 251 40 251 116) " ^ /Valid for/: GNE; /Default/: @\\\"\\\"@; /Notes/: svg, postscript, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 252 40 252 78) " ^ /Valid for/: N; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 253 40 253 118) " ^ /Valid for/: N; /Default/: @'NoScale'@; /Parsing Default/: 'UniformScale'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 254 40 254 102) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 255 40 255 100) " ^ /Valid for/: E; /Default/: @-25.0@; /Minimum/: @-180.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 256 40 256 95) " ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 257 40 257 108) " ^ /Valid for/: E; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 258 40 258 90) " ^ /Valid for/: E; /Default/: @X11Color 'Black'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 259 40 259 89) " ^ /Valid for/: E; /Default/: @\\\"Times-Roman\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 260 40 260 96) " ^ /Valid for/: E; /Default/: @14.0@; /Minimum/: @1.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 261 40 261 84) " ^ /Valid for/: GC; /Default/: @'JCenter'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 262 40 262 141) " ^ /Valid for/: GCN; /Default/: @'VTop'@ (clusters), @'VBottom'@ (root graphs), @'VCenter'@ (nodes)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 263 40 263 100) " ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 264 40 264 103) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, cmap only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 265 40 265 133) " ^ /Valid for/: ENGC; /Default/: @'StrLabel' \\\"\\N\\\"@ (nodes), @'StrLabel' \\\"\\\"@ (otherwise)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 266 40 266 108) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 267 40 267 82) " ^ /Valid for/: G; /Default/: @\\\" :\\t\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 268 40 268 78) " ^ /Valid for/: G; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 269 40 269 79) " ^ /Valid for/: EN; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 270 40 270 78) " ^ /Valid for/: G; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 271 40 271 124) " ^ /Valid for/: E; /Default/: @1.0@ (neato), @0.3@ (fdp); /Notes/: fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 272 40 272 98) " ^ /Valid for/: G; /Default/: @0.0@; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 273 40 273 116) " ^ /Valid for/: G; /Default/: @MAXINT@; /Minimum/: @0@; /Notes/: sfdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 274 40 274 97) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 275 40 275 82) " ^ /Valid for/: EGC; /Notes/: write only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 276 40 276 97) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 277 40 277 89) " ^ /Valid for/: NG; /Default/: device-dependent" , Comment False (SrcSpan "tests/examples/Attributes.hs" 278 40 278 170) " ^ /Valid for/: G; /Default/: @100 * # nodes@ (@mode == 'KK'@), @200@ (@mode == 'Major'@), @600@ (fdp); /Notes/: fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 279 40 279 96) " ^ /Valid for/: G; /Default/: @1.0@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 280 40 280 116) " ^ /Valid for/: G; /Default/: @1.0@; /Minimum/: @0.0@; /Notes/: circo only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 281 40 281 110) " ^ /Valid for/: E; /Default/: @1@; /Minimum/: @0@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 282 40 282 106) " ^ /Valid for/: G; /Default/: @'ShortPath'@; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 283 40 283 102) " ^ /Valid for/: G; /Default/: @'Major'@; /Notes/: neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 284 40 284 158) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: neato only; requires the Mosek software" , Comment False (SrcSpan "tests/examples/Attributes.hs" 285 40 285 116) " ^ /Valid for/: G; /Default/: @0.25@; /Minimum/: @0.02@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 286 40 286 111) " ^ /Valid for/: GCNE; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 287 40 287 126) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 288 40 288 78) " ^ /Valid for/: G; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 289 40 289 78) " ^ /Valid for/: G; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 290 40 290 97) " ^ /Valid for/: G; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 291 40 291 97) " ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @360.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 292 40 292 88) " ^ /Valid for/: G; /Default/: @'BreadthFirst'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 293 40 293 119) " ^ /Valid for/: G; /Default/: @-4@; /Minimum/: @-1.0e10@; /Notes/: prism only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 294 40 294 141) " ^ /Valid for/: G; /Default/: @'KeepOverlaps'@; /Parsing Default/: 'KeepOverlaps'; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 295 40 295 102) " ^ /Valid for/: G; /Default/: @'PackNode'@; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 296 40 296 128) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'DoPack'; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 297 40 297 98) " ^ /Valid for/: G; /Default/: @'DVal' 0.0555@ (4 points)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 298 40 298 78) " ^ /Valid for/: G; /Default/: @'BL'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 299 40 299 59) " ^ /Valid for/: G" , Comment False (SrcSpan "tests/examples/Attributes.hs" 300 40 300 90) " ^ /Valid for/: C; /Default/: @X11Color 'Black'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 301 40 301 97) " ^ /Valid for/: CNE; /Default/: @1.0@; /Minimum/: @0.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 302 40 302 124) " ^ /Valid for/: NC; /Default/: shape default (nodes), @1@ (clusters); /Minimum/: 0" , Comment False (SrcSpan "tests/examples/Attributes.hs" 303 40 303 134) " ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 304 40 304 60) " ^ /Valid for/: EN" , Comment False (SrcSpan "tests/examples/Attributes.hs" 305 40 305 135) " ^ /Valid for/: G; /Default/: @'NormalQT'@; /Parsing Default/: 'NormalQT'; /Notes/: sfdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 306 40 306 95) " ^ /Valid for/: G; /Default/: @0.0@; /Minimum/: @0.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 307 40 307 97) " ^ /Valid for/: G; /Default/: @'TB'@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 308 40 308 141) " ^ /Valid for/: G; /Default/: @0.5@ (dot), @1.0@ (twopi); /Minimum/: 0.02; /Notes/: twopi, dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 309 40 309 78) " ^ /Valid for/: S; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 310 40 310 59) " ^ /Valid for/: G" , Comment False (SrcSpan "tests/examples/Attributes.hs" 311 40 311 80) " ^ /Valid for/: N; /Notes/: write only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 312 40 312 108) " ^ /Valid for/: N; /Default/: @'False'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 313 40 313 127) " ^ /Valid for/: G; /Default/: @'False'@; /Parsing Default/: 'True'; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 314 40 314 115) " ^ /Valid for/: G; /Default/: @1.0@; /Minimum/: @0.0@; /Notes/: sfdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 315 40 315 183) " ^ /Valid for/: GN; /Default/: @'NodeName' \\\"\\\"@ (graphs), @'NotCentral'@ (nodes); /Parsing Default/: 'IsCentral'; /Notes/: circo, twopi only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 316 40 316 75) " ^ /Valid for/: G; /Default/: @0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 317 40 317 97) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 318 40 318 97) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 319 40 319 115) " ^ /Valid for/: N; /Default/: @8@ (output), @20@ (overlap and image maps)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 320 40 320 95) " ^ /Valid for/: G; /Default/: @30@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 321 40 321 94) " ^ /Valid for/: G; /Default/: @+4@; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 322 40 322 78) " ^ /Valid for/: N; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 323 40 323 83) " ^ /Valid for/: N; /Default/: @'Ellipse'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 324 40 324 112) " ^ /Valid for/: ENG; /Default/: @0@; /Minimum/: @0@; /Notes/: dot only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 325 40 325 91) " ^ /Valid for/: N; /Default/: @4@; /Minimum/: @0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 326 40 326 59) " ^ /Valid for/: G" , Comment False (SrcSpan "tests/examples/Attributes.hs" 327 40 327 98) " ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-100.0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 328 40 328 104) " ^ /Valid for/: G; /Default/: @'NoSmooth'@; /Notes/: sfdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 329 40 329 93) " ^ /Valid for/: GCN; /Default/: @0@; /Minimum/: @0@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 330 40 330 93) " ^ /Valid for/: G; /Parsing Default/: 'SplineEdges'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 331 40 331 104) " ^ /Valid for/: G; /Default/: @\\\"\\\"@; /Notes/: fdp, neato only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 332 40 332 97) " ^ /Valid for/: G; /Default/: @\\\"\\\"@; /Notes/: svg only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 333 40 333 61) " ^ /Valid for/: ENC" , Comment False (SrcSpan "tests/examples/Attributes.hs" 334 40 334 102) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 335 40 335 107) " ^ /Valid for/: E; /Default/: @'True'@; /Parsing Default/: 'True'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 336 40 336 78) " ^ /Valid for/: E; /Default/: @\\\"\\\"@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 337 40 337 78) " ^ /Valid for/: E; /Default/: center" , Comment False (SrcSpan "tests/examples/Attributes.hs" 338 40 338 100) " ^ /Valid for/: E; /Default/: none; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 339 40 339 103) " ^ /Valid for/: E; /Default/: @\\\"\\\"@; /Notes/: svg, cmap only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 340 40 340 103) " ^ /Valid for/: ENGC; /Default/: none; /Notes/: svg, map only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 341 40 341 105) " ^ /Valid for/: NEC; /Default/: @\\\"\\\"@; /Notes/: svg, cmap only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 342 40 342 115) " ^ /Valid for/: G; /Parsing Default/: 'True'; /Notes/: bitmap output only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 343 40 343 80) " ^ /Valid for/: N; /Notes/: write only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 344 40 344 76) " ^ /Valid for/: G; /Default/: none" , Comment False (SrcSpan "tests/examples/Attributes.hs" 345 40 345 114) " ^ /Valid for/: G; /Default/: @0.05@; /Minimum/: @0.0@; /Notes/: not dot" , Comment False (SrcSpan "tests/examples/Attributes.hs" 346 40 346 121) " ^ /Valid for/: E; /Default/: @1.0@; /Minimum/: @0@ (dot), @1@ (neato,fdp,sfdp)" , Comment False (SrcSpan "tests/examples/Attributes.hs" 347 40 347 97) " ^ /Valid for/: N; /Default/: @0.75@; /Minimum/: @0.01@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 348 40 348 110) " ^ /Valid for/: N; /Default/: @0.0@; /Minimum/: @-MAXFLOAT@, @-1000@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 652 1 652 63) " | Determine if this Attribute is valid for use with Graphs." , Comment False (SrcSpan "tests/examples/Attributes.hs" 735 1 735 65) " | Determine if this Attribute is valid for use with Clusters." , Comment False (SrcSpan "tests/examples/Attributes.hs" 761 1 761 66) " | Determine if this Attribute is valid for use with SubGraphs." , Comment False (SrcSpan "tests/examples/Attributes.hs" 766 1 766 62) " | Determine if this Attribute is valid for use with Nodes." , Comment False (SrcSpan "tests/examples/Attributes.hs" 811 1 811 62) " | Determine if this Attribute is valid for use with Edges." , Comment True (SrcSpan "tests/examples/Attributes.hs" 870 1 870 21) " Delete to here " , Comment False (SrcSpan "tests/examples/Attributes.hs" 871 1 871 81) " -----------------------------------------------------------------------------" , Comment True (SrcSpan "tests/examples/Attributes.hs" 873 1 905 4) " |\n\n Some 'Attribute's (mainly label-like ones) take a 'String' argument\n that allows for extra escape codes. This library doesn't do any\n extra checks or special parsing for these escape codes, but usage\n of 'EscString' rather than 'String' indicates that the Graphviz\n tools will recognise these extra escape codes for these\n 'Attribute's.\n\n The extra escape codes include (note that these are all 'String's):\n\n [@\\\\N@] Replace with the name of the node (for Node 'Attribute's).\n\n [@\\\\G@] Replace with the name of the graph (for Node 'Attribute's)\n or the name of the graph or cluster, whichever is\n applicable (for Graph, Cluster and Edge 'Attribute's).\n\n [@\\\\E@] Replace with the name of the edge, formed by the two\n adjoining nodes and the edge type (for Edge 'Attribute's).\n\n [@\\\\T@] Replace with the name of the tail node (for Edge\n 'Attribute's).\n\n [@\\\\H@] Replace with the name of the head node (for Edge\n 'Attribute's).\n\n [@\\\\L@] Replace with the object's label (for all 'Attribute's).\n\n Also, if the 'Attribute' in question is 'Label', 'HeadLabel' or\n 'TailLabel', then @\\\\n@, @\\\\l@ and @\\\\r@ split the label into lines\n centered, left-justified and right-justified respectively.\n\n " , Comment False (SrcSpan "tests/examples/Attributes.hs" 908 1 908 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 910 1 910 68) " | No checks are placed on the content of a 'URL' value; however," , Comment False (SrcSpan "tests/examples/Attributes.hs" 911 1 911 71) " you should ensure that it does not contain any \\'@>@\\' or \\'@<@\\'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 912 1 912 69) " characters; Graphviz might care about escaping other characters" , Comment False (SrcSpan "tests/examples/Attributes.hs" 913 1 913 68) " properly, but for the purposes of this library the presence of" , Comment False (SrcSpan "tests/examples/Attributes.hs" 914 1 914 57) " these characters will make it harder to parse URLs." , Comment False (SrcSpan "tests/examples/Attributes.hs" 920 15 920 56) " Explicitly use text here... no quotes!" , Comment False (SrcSpan "tests/examples/Attributes.hs" 932 5 932 17) " No quotes" , Comment False (SrcSpan "tests/examples/Attributes.hs" 935 1 935 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 937 1 937 69) " | /Dot/ has a basic grammar of arrow shapes which allows usage of" , Comment False (SrcSpan "tests/examples/Attributes.hs" 938 1 938 61) " up to 1,544,761 different shapes from 9 different basic" , Comment False (SrcSpan "tests/examples/Attributes.hs" 939 1 939 70) " 'ArrowShape's. Note that whilst an explicit list is used in the" , Comment False (SrcSpan "tests/examples/Attributes.hs" 940 1 940 71) " definition of 'ArrowType', there must be at least one tuple and a" , Comment False (SrcSpan "tests/examples/Attributes.hs" 941 1 941 69) " maximum of 4 (since that is what is required by Dot). For more" , Comment False (SrcSpan "tests/examples/Attributes.hs" 942 1 942 66) " information, see: " , Comment False (SrcSpan "tests/examples/Attributes.hs" 943 1 943 3) "" , Comment False (SrcSpan "tests/examples/Attributes.hs" 944 1 944 67) " The 19 basic arrows shown on the overall attributes page have" , Comment False (SrcSpan "tests/examples/Attributes.hs" 945 1 945 60) " been defined below as a convenience. Parsing of the 5" , Comment False (SrcSpan "tests/examples/Attributes.hs" 946 1 946 58) " backward-compatible special cases is also supported." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1032 1 1032 53) " | What modifications to apply to an 'ArrowShape'." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1038 1 1038 48) " | Apply no modifications to an 'ArrowShape'." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1042 1 1042 33) " | 'OpenArrow' and 'BothSides'" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1066 5 1066 29) " Not used individually" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1069 1 1069 71) " | Represents which side (when looking towards the node the arrow is" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1070 1 1070 28) " pointing to) is drawn." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1088 5 1088 29) " Not used individually" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1091 1 1091 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1114 1 1114 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1129 1 1129 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1149 1 1149 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1167 1 1167 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1169 1 1169 34) " | Only when @mode == 'IpSep'@." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1185 1 1185 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1187 1 1187 37) " | Either a 'Double' or a 'Point'." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1208 1 1208 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1229 1 1229 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1247 1 1247 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1269 1 1269 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1286 5 1286 71) " Need to take into account the situation where first value is an" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1287 5 1287 71) " integer, second a double: if Point parsing first, then it won't" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1288 5 1288 69) " parse the second number properly; but if PointD first then it" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1289 5 1289 44) " will treat Int/Int as Double/Double." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1305 1 1305 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1311 41 1311 96) " ^ Only when sfdp is available, 'Int' is non-negative" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1314 29 1314 61) " ^ Only when @mode == 'IpSep'@" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1338 1 1338 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1387 1 1387 71) " | You should not have any quote characters for the 'LRName' option," , Comment False (SrcSpan "tests/examples/Attributes.hs" 1388 1 1388 31) " as it won't be parseable." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1400 5 1400 35) " Other two don't need quotes" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1404 53 1404 77) " tests for Int and All" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1407 39 1407 67) " Mainly for unquoted case." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1417 1 1417 68) " | The list represent (Separator, Name). You should not have any" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1418 1 1418 64) " quote characters for any of the 'String's, since there are" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1419 1 1419 33) " parsing problems with them." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1429 5 1429 49) " Might not need quotes, but probably will." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1443 1 1443 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1459 1 1459 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1463 28 1463 80) " ^ If non-negative, then packs; otherwise doesn't." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1472 5 1472 76) " What happens if it parses 0? It's non-negative, but parses as False" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1477 1 1477 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1482 49 1482 72) " ^ Sort by cols, sort" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1483 49 1483 70) " by user, number of" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1484 49 1484 61) " rows/cols" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1519 11 1519 54) " Also checks and removes quote characters" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1522 1 1522 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1536 5 1536 70) " Have to be careful with this: if we try to parse points first," , Comment False (SrcSpan "tests/examples/Attributes.hs" 1537 5 1537 71) " then a spline with no start and end points will erroneously get" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1538 5 1538 70) " parsed as a point and then the parser will crash as it expects" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1539 5 1539 36) " a closing quote character..." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1547 1 1547 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1549 1 1549 50) " | Controls how (and if) edges are represented." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1554 30 1554 43) " ^ fdp only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1568 5 1568 43) " Can't parse NoEdges without quotes." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1580 1 1580 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1582 1 1582 48) " | Upper-case first character is major order;" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1583 1 1583 49) " lower-case second character is minor order." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1608 1 1608 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1610 1 1610 69) " | The number of points in the list must be equivalent to 1 mod 3;" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1611 1 1611 36) " note that this is not checked." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1644 1 1644 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1657 5 1657 71) " Have to take into account the slightly different interpretation" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1658 5 1658 54) " of Bool used as an option for parsing QuadType" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1662 58 1662 71) " weird bool" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1666 1 1666 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1668 1 1668 76) " | Specify the root node either as a Node attribute or a Graph attribute." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1669 29 1669 48) " ^ For Nodes only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1670 29 1670 48) " ^ For Nodes only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1671 29 1671 49) " ^ For Graphs only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1691 1 1691 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1715 1 1715 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1736 1 1736 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1739 16 1739 60) " ^ Has synonyms of /rect/ and /rectangle/." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1746 17 1746 44) " ^ Has synonym of /none/." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1804 49 1804 75) " Parse this before \"box\"" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1836 1 1836 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1866 1 1866 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1902 1 1902 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1937 17 1937 77) " Might not necessarily need to be quoted if a singleton..." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1946 28 1946 48) " ^ Nodes and Edges" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1947 28 1947 48) " ^ Nodes and Edges" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1948 28 1948 48) " ^ Nodes and Edges" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1949 28 1949 48) " ^ Nodes and Edges" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1950 28 1950 48) " ^ Nodes and Edges" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1951 28 1951 51) " ^ Nodes and Clusters" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1952 28 1952 43) " ^ Nodes only" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1953 28 1953 51) " ^ Nodes and Clusters" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1954 28 1954 49) " ^ Device Dependent" , Comment False (SrcSpan "tests/examples/Attributes.hs" 1977 15 1977 76) " In case a singleton DD is at the end of an attribute list." , Comment False (SrcSpan "tests/examples/Attributes.hs" 1999 1 1999 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 2037 5 2037 57) " Have to take care of longer parsing values first." , Comment False (SrcSpan "tests/examples/Attributes.hs" 2050 1 2050 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 2099 1 2099 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 2102 34 2102 60) " ^ Only valid for Nodes." , Comment False (SrcSpan "tests/examples/Attributes.hs" 2117 1 2117 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 2141 1 2141 81) " -----------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Attributes.hs" 2159 1 2159 81) " -----------------------------------------------------------------------------" ] ) haskell-src-exts-1.23.1/tests/examples/InlineConlike.hs.parser.golden0000644000000000000000000000721313534314633023766 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/InlineConlike.hs" 1 1 1 1 , SrcSpan "tests/examples/InlineConlike.hs" 1 1 1 1 , SrcSpan "tests/examples/InlineConlike.hs" 1 1 1 1 , SrcSpan "tests/examples/InlineConlike.hs" 2 1 2 1 , SrcSpan "tests/examples/InlineConlike.hs" 3 1 3 1 , SrcSpan "tests/examples/InlineConlike.hs" 4 1 4 1 , SrcSpan "tests/examples/InlineConlike.hs" 4 1 4 1 ] } Nothing [] [] [ InlineConlikeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/InlineConlike.hs" 1 1 1 19 , SrcSpan "tests/examples/InlineConlike.hs" 1 25 1 28 ] } Nothing (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 1 20 1 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 1 20 1 24 , srcInfoPoints = [] } "size")) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 2 1 2 12 , srcInfoPoints = [ SrcSpan "tests/examples/InlineConlike.hs" 2 6 2 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 2 1 2 5 , srcInfoPoints = [] } "size" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 2 9 2 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 2 9 2 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 2 9 2 12 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 1 3 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 1 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 1 3 5 , srcInfoPoints = [] } "size")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 6 3 10 , srcInfoPoints = [ SrcSpan "tests/examples/InlineConlike.hs" 3 6 3 7 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 8 3 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InlineConlike.hs" 3 8 3 10 , srcInfoPoints = [] } 64 "64"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/InfixApp.hs.parser.golden0000644000000000000000000000706113534314633022762 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/InfixApp.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixApp.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixApp.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixApp.hs" 3 1 3 1 , SrcSpan "tests/examples/InfixApp.hs" 3 1 3 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 1 1 9 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 1 1 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 1 1 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 3 1 9 , srcInfoPoints = [ SrcSpan "tests/examples/InfixApp.hs" 1 3 1 4 ] } (NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 5 1 9 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 6 1 9 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 6 1 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 6 1 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 6 1 7 , srcInfoPoints = [] } "w"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 7 1 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 7 1 8 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 7 1 8 , srcInfoPoints = [] } "/"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 8 1 9 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixApp.hs" 1 8 1 9 , srcInfoPoints = [] } 2 "2"))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/GenericTree.hs.parser.golden0000644000000000000000000005517213556712523023452 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 1 1 1 1 , SrcSpan "tests/examples/GenericTree.hs" 2 1 2 1 , SrcSpan "tests/examples/GenericTree.hs" 2 1 2 1 , SrcSpan "tests/examples/GenericTree.hs" 4 1 4 1 , SrcSpan "tests/examples/GenericTree.hs" 6 1 6 1 , SrcSpan "tests/examples/GenericTree.hs" 7 1 7 1 , SrcSpan "tests/examples/GenericTree.hs" 8 1 8 1 , SrcSpan "tests/examples/GenericTree.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 2 1 2 7 , SrcSpan "tests/examples/GenericTree.hs" 2 20 2 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 2 8 2 19 , srcInfoPoints = [] } "GenericTree") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 1 1 1 13 , SrcSpan "tests/examples/GenericTree.hs" 1 25 1 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 1 14 1 24 , srcInfoPoints = [] } "RankNTypes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 4 8 4 21 , srcInfoPoints = [] } "Data.Typeable" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 1 6 83 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 8 6 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 1 6 7 , srcInfoPoints = [] } "dynRep" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 11 6 83 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 11 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 11 6 12 , SrcSpan "tests/examples/GenericTree.hs" 6 22 6 23 , SrcSpan "tests/examples/GenericTree.hs" 6 24 6 26 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 11 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 11 6 12 , SrcSpan "tests/examples/GenericTree.hs" 6 22 6 23 , SrcSpan "tests/examples/GenericTree.hs" 6 24 6 26 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 12 6 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 12 6 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 12 6 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 12 6 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 12 6 20 , srcInfoPoints = [] } "Typeable"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 21 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 21 6 22 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 27 6 83 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 29 6 31 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 27 6 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 27 6 28 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 32 6 83 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 32 6 33 , SrcSpan "tests/examples/GenericTree.hs" 6 40 6 41 , SrcSpan "tests/examples/GenericTree.hs" 6 82 6 83 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 33 6 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 33 6 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 33 6 40 , srcInfoPoints = [] } "TypeRep")) , TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 42 6 82 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 42 6 48 , SrcSpan "tests/examples/GenericTree.hs" 6 50 6 51 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 49 6 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 49 6 50 , srcInfoPoints = [] } "b") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 52 6 67 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 52 6 53 , SrcSpan "tests/examples/GenericTree.hs" 6 63 6 64 , SrcSpan "tests/examples/GenericTree.hs" 6 65 6 67 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 52 6 67 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 52 6 53 , SrcSpan "tests/examples/GenericTree.hs" 6 63 6 64 , SrcSpan "tests/examples/GenericTree.hs" 6 65 6 67 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 53 6 63 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 53 6 63 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 53 6 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 53 6 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 53 6 61 , srcInfoPoints = [] } "Typeable"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 62 6 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 62 6 63 , srcInfoPoints = [] } "b"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 68 6 82 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 70 6 72 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 68 6 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 68 6 69 , srcInfoPoints = [] } "b")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 73 6 82 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 6 73 6 74 , SrcSpan "tests/examples/GenericTree.hs" 6 81 6 82 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 74 6 81 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 74 6 79 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 74 6 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 74 6 79 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 80 6 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 6 80 6 81 , srcInfoPoints = [] } "b"))))) ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 1 7 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 1 7 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 1 7 7 , srcInfoPoints = [] } "dynRep") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 8 7 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 8 7 9 , srcInfoPoints = [] } "a") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 10 7 36 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 7 10 7 11 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 12 7 36 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 7 12 7 13 , SrcSpan "tests/examples/GenericTree.hs" 7 21 7 22 , SrcSpan "tests/examples/GenericTree.hs" 7 35 7 36 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 13 7 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 13 7 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 13 7 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 13 7 19 , srcInfoPoints = [] } "typeOf"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 20 7 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 20 7 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 20 7 21 , srcInfoPoints = [] } "a"))) , Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 23 7 35 , srcInfoPoints = [ SrcSpan "tests/examples/GenericTree.hs" 7 23 7 24 , SrcSpan "tests/examples/GenericTree.hs" 7 26 7 28 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 24 7 25 , srcInfoPoints = [] } ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 29 7 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 29 7 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 29 7 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 29 7 33 , srcInfoPoints = [] } "cast"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 34 7 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 34 7 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GenericTree.hs" 7 34 7 35 , srcInfoPoints = [] } "a")))) ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatSynFix.hs.parser.golden0000644000000000000000000004117513534314633023135 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 1 1 1 1 , SrcSpan "tests/examples/PatSynFix.hs" 2 1 2 1 , SrcSpan "tests/examples/PatSynFix.hs" 2 1 2 1 , SrcSpan "tests/examples/PatSynFix.hs" 2 1 2 1 , SrcSpan "tests/examples/PatSynFix.hs" 3 1 3 1 , SrcSpan "tests/examples/PatSynFix.hs" 4 1 4 1 , SrcSpan "tests/examples/PatSynFix.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 1 1 1 13 , SrcSpan "tests/examples/PatSynFix.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 1 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 2 1 2 8 , SrcSpan "tests/examples/PatSynFix.hs" 2 11 2 13 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 9 2 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 9 2 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 9 2 10 , srcInfoPoints = [] } "A")) []) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 14 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 2 14 2 15 , SrcSpan "tests/examples/PatSynFix.hs" 2 19 2 20 , SrcSpan "tests/examples/PatSynFix.hs" 2 25 2 26 ] } Boxed [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 15 2 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 15 2 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 15 2 19 , srcInfoPoints = [] } "True")) [] , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 21 2 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 21 2 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 21 2 25 , srcInfoPoints = [] } "True")) [] ]) (ExplicitBidirectional SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 27 3 0 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 2 27 2 32 , SrcSpan "tests/examples/PatSynFix.hs" 2 33 2 33 , SrcSpan "tests/examples/PatSynFix.hs" 3 1 3 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 33 2 64 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 33 2 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 33 2 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 33 2 34 , srcInfoPoints = [] } "A")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 35 2 64 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 2 35 2 36 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 37 2 64 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 2 37 2 38 , SrcSpan "tests/examples/PatSynFix.hs" 2 57 2 58 , SrcSpan "tests/examples/PatSynFix.hs" 2 63 2 64 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 38 2 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 38 2 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 38 2 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 38 2 41 , srcInfoPoints = [] } "not"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 42 2 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 42 2 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 42 2 43 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 44 2 57 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 44 2 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 44 2 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 44 2 49 , srcInfoPoints = [] } "False"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 50 2 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 50 2 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 50 2 52 , srcInfoPoints = [] } "&&"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 53 2 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 53 2 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 53 2 57 , srcInfoPoints = [] } "True")))) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 59 2 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 59 2 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 2 59 2 63 , srcInfoPoints = [] } "True")) ])) Nothing ]) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 1 3 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 1 3 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 1 3 4 , srcInfoPoints = [] } "exp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 5 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatSynFix.hs" 3 5 3 6 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 7 3 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 7 3 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 7 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 7 3 10 , srcInfoPoints = [] } "not"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 11 3 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 11 3 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 11 3 12 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 13 3 26 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 13 3 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 13 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 13 3 18 , srcInfoPoints = [] } "False"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 19 3 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 19 3 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 19 3 21 , srcInfoPoints = [] } "&&"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 22 3 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 22 3 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatSynFix.hs" 3 22 3 26 , srcInfoPoints = [] } "True")))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/AtOperator.hs.parser.golden0000644000000000000000000002705213534314632023325 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 1 1 1 1 , SrcSpan "tests/examples/AtOperator.hs" 2 1 2 1 , SrcSpan "tests/examples/AtOperator.hs" 4 1 4 1 , SrcSpan "tests/examples/AtOperator.hs" 4 1 4 1 , SrcSpan "tests/examples/AtOperator.hs" 4 1 4 1 , SrcSpan "tests/examples/AtOperator.hs" 6 1 6 1 , SrcSpan "tests/examples/AtOperator.hs" 8 1 8 1 , SrcSpan "tests/examples/AtOperator.hs" 9 1 9 1 , SrcSpan "tests/examples/AtOperator.hs" 9 1 9 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 1 1 1 13 , SrcSpan "tests/examples/AtOperator.hs" 1 31 1 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 1 14 1 30 , srcInfoPoints = [] } "TypeApplications" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 2 1 2 13 , SrcSpan "tests/examples/AtOperator.hs" 2 28 2 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 2 14 2 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 4 14 4 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 1 4 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 6 4 13 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 6 4 13 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 6 4 7 , srcInfoPoints = [] } "a")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 8 4 11 , srcInfoPoints = [] } ":+:")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 12 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 12 4 13 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 16 4 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 16 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 4 16 4 21 , srcInfoPoints = [] } "Proxy") []) ] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 1 6 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 1 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 1 6 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 5 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 6 5 6 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 7 6 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 7 6 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 7 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 7 6 9 , srcInfoPoints = [] } "id"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 10 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 6 10 6 11 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 11 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 6 11 6 12 , SrcSpan "tests/examples/AtOperator.hs" 6 23 6 24 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 12 6 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 12 6 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 12 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 12 6 15 , srcInfoPoints = [] } "Int"))) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 16 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 16 6 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 16 6 19 , srcInfoPoints = [] } ":+:"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 20 6 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 20 6 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 6 20 6 23 , srcInfoPoints = [] } "Int")))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 1 8 11 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 1 8 11 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 1 8 2 , srcInfoPoints = [] }) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 3 8 5 , srcInfoPoints = [] } "@>") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 6 8 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 6 8 7 , srcInfoPoints = [] } "m") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 8 8 11 , srcInfoPoints = [ SrcSpan "tests/examples/AtOperator.hs" 8 8 8 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 10 8 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 10 8 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtOperator.hs" 8 10 8 11 , srcInfoPoints = [] } "m")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ConstructorAndClassOperators.hs.parser.golden0000644000000000000000000003566213556712523027115 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 1 1 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 1 3 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 1 3 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 1 3 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 1 5 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 6 1 6 1 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 1 1 54 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 1 1 13 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 27 1 28 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 51 1 54 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 1 29 1 50 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 1 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 5 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 1 3 4 , srcInfoPoints = [] } "ins" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 27 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 18 3 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 18 3 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 18 3 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 18 3 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 18 3 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 13 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 8 3 9 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 9 3 12 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 12 3 13 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 9 3 12 , srcInfoPoints = [] } ":=>"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 14 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 14 3 15 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 16 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 16 3 17 , srcInfoPoints = [] } "h")))))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 21 3 27 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 21 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 21 3 22 , srcInfoPoints = [] } "b")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 23 3 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 23 3 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 23 3 25 , srcInfoPoints = [] } ":-"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 26 3 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 3 26 3 27 , srcInfoPoints = [] } "h")))) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 1 5 29 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 17 5 18 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 6 5 16 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 6 5 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 6 5 12 , srcInfoPoints = [ SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 6 5 7 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 7 5 11 , SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 11 5 12 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 7 5 11 , srcInfoPoints = [] } ":><:")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 13 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 13 5 14 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 15 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 15 5 16 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 19 5 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 19 5 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 20 5 24 , srcInfoPoints = [] } ":><:") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 26 5 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 26 5 27 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 28 5 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstructorAndClassOperators.hs" 5 28 5 29 , srcInfoPoints = [] } "b") ]) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/IndentedModule2.hs.parser.golden0000644000000000000000000001027713534314633024231 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule2.hs" 1 1 1 1 , SrcSpan "tests/examples/IndentedModule2.hs" 2 7 2 7 , SrcSpan "tests/examples/IndentedModule2.hs" 3 1 3 1 , SrcSpan "tests/examples/IndentedModule2.hs" 4 1 4 1 , SrcSpan "tests/examples/IndentedModule2.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 2 7 2 24 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule2.hs" 2 7 2 13 , SrcSpan "tests/examples/IndentedModule2.hs" 2 19 2 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 2 14 2 18 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule2.hs" 1 1 1 13 , SrcSpan "tests/examples/IndentedModule2.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 1 14 1 28 , srcInfoPoints = [] } "NamedFieldPuns" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 1 3 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 1 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 1 3 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 6 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule2.hs" 3 6 3 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 8 3 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 8 3 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 8 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 8 3 14 , srcInfoPoints = [] } "putStr"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 15 3 20 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule2.hs" 3 15 3 20 , srcInfoPoints = [] } "foo" "foo")))) Nothing ] , [ Comment True (SrcSpan "tests/examples/IndentedModule2.hs" 2 1 2 6) " " ] ) haskell-src-exts-1.23.1/tests/examples/AtSign.hs.parser.golden0000644000000000000000000007317413534314632022440 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 1 1 18 1 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 1 1 1 1 , SrcSpan "tests/examples/AtSign.hs" 2 1 2 1 , SrcSpan "tests/examples/AtSign.hs" 3 1 3 1 , SrcSpan "tests/examples/AtSign.hs" 8 1 8 1 , SrcSpan "tests/examples/AtSign.hs" 8 1 8 1 , SrcSpan "tests/examples/AtSign.hs" 11 1 11 1 , SrcSpan "tests/examples/AtSign.hs" 18 1 18 1 , SrcSpan "tests/examples/AtSign.hs" 18 1 18 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 8 1 8 49 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 8 1 8 7 , SrcSpan "tests/examples/AtSign.hs" 8 44 8 49 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 8 8 8 43 , srcInfoPoints = [] } "Data.Array.Accelerate.CUFFT.Private") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 1 1 1 13 , SrcSpan "tests/examples/AtSign.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 2 1 2 13 , SrcSpan "tests/examples/AtSign.hs" 2 28 2 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 2 14 2 27 , srcInfoPoints = [] } "TypeOperators" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 3 1 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 3 1 3 13 , SrcSpan "tests/examples/AtSign.hs" 3 31 3 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 3 14 3 30 , srcInfoPoints = [] } "TypeApplications" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 1 15 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 1 15 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 1 11 10 , srcInfoPoints = [] } "transform") [ PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 11 11 46 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 11 15 11 16 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 11 11 15 , srcInfoPoints = [] } "hndl") (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 16 11 46 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 11 16 11 17 , SrcSpan "tests/examples/AtSign.hs" 11 45 11 46 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 17 11 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 17 11 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 17 11 23 , srcInfoPoints = [] } "Handle")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 24 11 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 24 11 32 , srcInfoPoints = [] } "fallback") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 33 11 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 33 11 37 , srcInfoPoints = [] } "mode") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 38 11 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 38 11 43 , srcInfoPoints = [] } "width") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 44 11 45 , srcInfoPoints = [] } ])) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 11 47 15 48 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 11 47 11 48 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 15 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 12 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 12 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 12 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 12 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 4 12 8 , srcInfoPoints = [] } "wrap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 9 12 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 9 12 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 9 12 13 , srcInfoPoints = [] } "mode")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 14 12 32 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 12 14 12 15 , SrcSpan "tests/examples/AtSign.hs" 12 31 12 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 15 12 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 15 12 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 15 12 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 15 12 25 , srcInfoPoints = [] } "A") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 15 12 25 , srcInfoPoints = [] } "constant"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 26 12 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 26 12 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 26 12 31 , srcInfoPoints = [] } "width")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 33 12 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 33 12 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 12 33 12 34 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 15 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 14 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 13 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 13 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 13 16 , srcInfoPoints = [] } "A") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 13 4 13 16 , srcInfoPoints = [] } "foreignAcc"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 7 14 69 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 14 7 14 8 , SrcSpan "tests/examples/AtSign.hs" 14 68 14 69 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 44 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 25 , srcInfoPoints = [] } "AF") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 8 14 25 , srcInfoPoints = [] } "CUDAForeignAcc"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 26 14 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 26 14 44 , srcInfoPoints = [] } "transformForeign" "transformForeign"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 45 14 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 45 14 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 45 14 46 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 47 14 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 47 14 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 47 14 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 47 14 63 , srcInfoPoints = [] } "transformForeign"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 64 14 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 64 14 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 14 64 14 68 , srcInfoPoints = [] } "hndl"))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 7 15 48 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 15 7 15 8 , SrcSpan "tests/examples/AtSign.hs" 15 47 15 48 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 8 15 14 , srcInfoPoints = [] } "unwrap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 15 15 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 15 15 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 15 15 19 , srcInfoPoints = [] } "mode")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 20 15 38 , srcInfoPoints = [ SrcSpan "tests/examples/AtSign.hs" 15 20 15 21 , SrcSpan "tests/examples/AtSign.hs" 15 37 15 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 21 15 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 21 15 31 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 21 15 31 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 21 15 31 , srcInfoPoints = [] } "A") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 21 15 31 , srcInfoPoints = [] } "constant"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 32 15 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 32 15 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 32 15 37 , srcInfoPoints = [] } "width")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 39 15 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 39 15 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/AtSign.hs" 15 39 15 47 , srcInfoPoints = [] } "fallback")))))))) Nothing ] ] , [ Comment True (SrcSpan "tests/examples/AtSign.hs" 4 1 7 3) " |\nAccelerate interface to the native CUDA implementation\nof the Fourier Transform provided by the CUFFT library.\n" ] ) haskell-src-exts-1.23.1/tests/examples/DsStrictData.hs.parser.golden0000644000000000000000000056667013534314633023615 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 1 1 49 1 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 1 1 1 1 , SrcSpan "tests/examples/DsStrictData.hs" 4 1 4 1 , SrcSpan "tests/examples/DsStrictData.hs" 4 1 4 1 , SrcSpan "tests/examples/DsStrictData.hs" 6 1 6 1 , SrcSpan "tests/examples/DsStrictData.hs" 7 1 7 1 , SrcSpan "tests/examples/DsStrictData.hs" 9 1 9 1 , SrcSpan "tests/examples/DsStrictData.hs" 10 1 10 1 , SrcSpan "tests/examples/DsStrictData.hs" 11 1 11 1 , SrcSpan "tests/examples/DsStrictData.hs" 14 1 14 1 , SrcSpan "tests/examples/DsStrictData.hs" 16 1 16 1 , SrcSpan "tests/examples/DsStrictData.hs" 17 1 17 1 , SrcSpan "tests/examples/DsStrictData.hs" 20 1 20 1 , SrcSpan "tests/examples/DsStrictData.hs" 21 1 21 1 , SrcSpan "tests/examples/DsStrictData.hs" 34 1 34 1 , SrcSpan "tests/examples/DsStrictData.hs" 35 1 35 1 , SrcSpan "tests/examples/DsStrictData.hs" 37 1 37 1 , SrcSpan "tests/examples/DsStrictData.hs" 38 1 38 1 , SrcSpan "tests/examples/DsStrictData.hs" 49 1 49 1 , SrcSpan "tests/examples/DsStrictData.hs" 49 1 49 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 4 1 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 4 1 4 7 , SrcSpan "tests/examples/DsStrictData.hs" 4 13 4 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 4 8 4 12 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 1 1 1 56 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 1 1 1 13 , SrcSpan "tests/examples/DsStrictData.hs" 1 33 1 34 , SrcSpan "tests/examples/DsStrictData.hs" 1 45 1 46 , SrcSpan "tests/examples/DsStrictData.hs" 1 53 1 56 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 1 14 1 33 , srcInfoPoints = [] } "ScopedTypeVariables" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 1 35 1 45 , srcInfoPoints = [] } "StrictData" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 1 47 1 52 , srcInfoPoints = [] } "GADTs" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 6 1 6 40 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 6 1 6 7 , SrcSpan "tests/examples/DsStrictData.hs" 6 8 6 17 , SrcSpan "tests/examples/DsStrictData.hs" 6 36 6 38 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 6 18 6 35 , srcInfoPoints = [] } "Control.Exception" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 6 39 6 40 , srcInfoPoints = [] } "E") , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 7 1 7 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 7 1 7 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 7 8 7 24 , srcInfoPoints = [] } "System.IO.Unsafe" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 7 25 7 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 7 25 7 26 , SrcSpan "tests/examples/DsStrictData.hs" 7 41 7 42 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 7 26 7 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 7 26 7 41 , srcInfoPoints = [] } "unsafePerformIO") ]) } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 1 9 20 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 9 15 9 16 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 1 9 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 6 9 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 6 9 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 6 9 12 , srcInfoPoints = [] } "Strict")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 13 9 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 13 9 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 17 9 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 17 9 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 17 9 18 , srcInfoPoints = [] } "S") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 19 9 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 9 19 9 20 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 1 10 23 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 10 16 10 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 1 10 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 6 10 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 6 10 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 6 10 13 , srcInfoPoints = [] } "Strict2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 14 10 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 14 10 15 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 18 10 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 18 10 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 18 10 20 , srcInfoPoints = [] } "S2") [ TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 21 10 23 , srcInfoPoints = [] } (BangedTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 21 10 22 , srcInfoPoints = [] }) (NoUnpackPragma SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 22 10 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 10 22 10 23 , srcInfoPoints = [] } "b")) ]) ] [] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 1 14 0 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 11 16 11 21 , SrcSpan "tests/examples/DsStrictData.hs" 12 3 12 3 , SrcSpan "tests/examples/DsStrictData.hs" 14 1 14 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 1 11 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 6 11 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 6 11 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 6 11 13 , srcInfoPoints = [] } "Strict3")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 14 11 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 11 14 11 15 , srcInfoPoints = [] } "c"))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 3 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 12 6 12 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 3 12 5 , srcInfoPoints = [] } "S3") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 9 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 12 11 12 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 9 12 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 9 12 10 , srcInfoPoints = [] } "c")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 14 12 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 14 12 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 14 12 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 14 12 21 , srcInfoPoints = [] } "Strict3"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 22 12 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 12 22 12 23 , srcInfoPoints = [] } "c")))) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 1 14 37 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 14 14 14 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 1 14 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 6 14 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 6 14 13 , srcInfoPoints = [] } "UStrict")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 16 14 37 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 16 14 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 16 14 18 , srcInfoPoints = [] } "US") [ TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 19 14 37 , srcInfoPoints = [] } (NoStrictAnnot SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (Unpack SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 19 14 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 14 19 14 29 , SrcSpan "tests/examples/DsStrictData.hs" 14 30 14 33 ] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 34 14 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 34 14 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 14 34 14 37 , srcInfoPoints = [] } "Int"))) ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 1 16 19 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 16 13 16 14 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 1 16 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 6 16 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 6 16 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 6 16 10 , srcInfoPoints = [] } "Lazy")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 11 16 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 11 16 12 , srcInfoPoints = [] } "d"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 15 16 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 15 16 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 15 16 16 , srcInfoPoints = [] } "L") [ TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 17 16 19 , srcInfoPoints = [] } (LazyTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 17 16 18 , srcInfoPoints = [] }) (NoUnpackPragma SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 18 16 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 16 18 16 19 , srcInfoPoints = [] } "d")) ]) ] [] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 1 20 0 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 17 14 17 19 , SrcSpan "tests/examples/DsStrictData.hs" 18 3 18 3 , SrcSpan "tests/examples/DsStrictData.hs" 20 1 20 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 1 17 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 6 17 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 6 17 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 6 17 11 , srcInfoPoints = [] } "Lazy2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 12 17 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 17 12 17 13 , srcInfoPoints = [] } "e"))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 3 18 22 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 18 6 18 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 3 18 5 , srcInfoPoints = [] } "L2") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 9 18 22 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 18 12 18 14 ] } (TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 9 18 11 , srcInfoPoints = [] } (LazyTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 9 18 10 , srcInfoPoints = [] }) (NoUnpackPragma SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 10 18 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 10 18 11 , srcInfoPoints = [] } "e"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 15 18 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 15 18 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 15 18 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 15 18 20 , srcInfoPoints = [] } "Lazy2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 21 18 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 18 21 18 22 , srcInfoPoints = [] } "e")))) ] [] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 1 20 14 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 20 6 20 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 1 20 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 9 20 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 9 20 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 9 20 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 9 20 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 14 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 13 , SrcSpan "tests/examples/DsStrictData.hs" 20 13 20 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 14 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 13 , SrcSpan "tests/examples/DsStrictData.hs" 20 13 20 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 14 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 20 12 20 13 , SrcSpan "tests/examples/DsStrictData.hs" 20 13 20 14 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 21 1 29 42 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 21 1 21 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 21 1 21 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 21 6 29 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 21 6 21 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 3 29 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 22 3 22 5 , SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 6 , SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 6 , SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 6 , SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 6 , SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 6 , SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 6 , SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 6 , SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 6 , SrcSpan "tests/examples/DsStrictData.hs" 34 1 34 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 6 22 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 12 22 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 22 12 22 13 , SrcSpan "tests/examples/DsStrictData.hs" 22 32 22 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 13 22 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 13 22 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 13 22 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 13 22 21 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 22 22 32 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 22 22 22 23 , SrcSpan "tests/examples/DsStrictData.hs" 22 31 22 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 23 22 31 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 23 22 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 23 22 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 23 22 24 , srcInfoPoints = [] } "S"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 25 22 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 25 22 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 22 25 22 31 , srcInfoPoints = [] } "bottom")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 6 23 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 12 23 34 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 23 12 23 13 , SrcSpan "tests/examples/DsStrictData.hs" 23 33 23 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 13 23 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 13 23 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 13 23 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 13 23 21 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 22 23 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 23 22 23 23 , SrcSpan "tests/examples/DsStrictData.hs" 23 32 23 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 23 23 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 23 23 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 23 23 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 23 23 25 , srcInfoPoints = [] } "S2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 26 23 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 26 23 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 23 26 23 32 , srcInfoPoints = [] } "bottom")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 6 24 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 12 24 34 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 24 12 24 13 , SrcSpan "tests/examples/DsStrictData.hs" 24 33 24 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 13 24 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 13 24 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 13 24 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 13 24 21 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 22 24 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 24 22 24 23 , SrcSpan "tests/examples/DsStrictData.hs" 24 32 24 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 23 24 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 23 24 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 23 24 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 23 24 25 , srcInfoPoints = [] } "US"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 26 24 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 26 24 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 24 26 24 32 , srcInfoPoints = [] } "bottom")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 6 25 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 12 25 34 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 25 12 25 13 , SrcSpan "tests/examples/DsStrictData.hs" 25 33 25 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 13 25 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 13 25 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 13 25 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 13 25 21 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 22 25 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 25 22 25 23 , SrcSpan "tests/examples/DsStrictData.hs" 25 32 25 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 23 25 32 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 23 25 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 23 25 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 23 25 25 , srcInfoPoints = [] } "S3"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 26 25 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 26 25 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 25 26 25 32 , srcInfoPoints = [] } "bottom")))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 6 26 14 , srcInfoPoints = [] } "putStrLn"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 15 26 17 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 26 15 26 17 , srcInfoPoints = [] } "" ""))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 6 27 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 12 27 39 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 27 12 27 13 , SrcSpan "tests/examples/DsStrictData.hs" 27 38 27 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 13 27 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 13 27 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 13 27 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 13 27 16 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 17 27 38 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 27 17 27 18 , SrcSpan "tests/examples/DsStrictData.hs" 27 37 27 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 18 27 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 18 27 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 18 27 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 18 27 26 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 27 27 37 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 27 27 27 28 , SrcSpan "tests/examples/DsStrictData.hs" 27 36 27 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 28 27 36 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 28 27 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 28 27 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 28 27 29 , srcInfoPoints = [] } "L"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 30 27 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 30 27 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 27 30 27 36 , srcInfoPoints = [] } "bottom")))))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 6 28 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 12 28 40 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 28 12 28 13 , SrcSpan "tests/examples/DsStrictData.hs" 28 39 28 40 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 13 28 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 13 28 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 13 28 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 13 28 16 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 17 28 39 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 28 17 28 18 , SrcSpan "tests/examples/DsStrictData.hs" 28 38 28 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 18 28 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 18 28 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 18 28 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 18 28 26 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 27 28 38 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 28 27 28 28 , SrcSpan "tests/examples/DsStrictData.hs" 28 37 28 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 28 28 37 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 28 28 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 28 28 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 28 28 30 , srcInfoPoints = [] } "L2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 31 28 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 31 28 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 28 31 28 37 , srcInfoPoints = [] } "bottom")))))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 6 29 11 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 12 29 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 29 12 29 13 , SrcSpan "tests/examples/DsStrictData.hs" 29 41 29 42 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 13 29 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 13 29 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 13 29 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 13 29 16 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 17 29 41 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 29 17 29 18 , SrcSpan "tests/examples/DsStrictData.hs" 29 40 29 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 18 29 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 18 29 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 18 29 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 18 29 26 , srcInfoPoints = [] } "isBottom"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 27 29 40 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 29 27 29 28 , SrcSpan "tests/examples/DsStrictData.hs" 29 39 29 40 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 28 29 39 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 28 29 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 28 29 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 28 29 32 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 33 29 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 33 29 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 29 33 29 39 , srcInfoPoints = [] } "bottom")))))))))) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 34 1 34 12 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 34 8 34 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 34 1 34 7 , srcInfoPoints = [] } "bottom" ] (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 34 11 34 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 34 11 34 12 , srcInfoPoints = [] } "a")) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 1 35 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 1 35 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 1 35 7 , srcInfoPoints = [] } "bottom")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 8 35 21 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 35 8 35 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 10 35 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 10 35 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 10 35 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 10 35 15 , srcInfoPoints = [] } "error"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 16 35 21 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 35 16 35 21 , srcInfoPoints = [] } "_|_" "_|_")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 1 37 22 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 37 10 37 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 1 37 9 , srcInfoPoints = [] } "isBottom" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 13 37 22 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 37 15 37 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 13 37 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 13 37 14 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 18 37 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 18 37 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 37 18 37 22 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 1 48 6 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 1 48 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 1 38 9 , srcInfoPoints = [] } "isBottom") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 10 38 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 10 38 11 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 12 48 6 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 38 12 38 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 14 48 6 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 14 38 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 14 38 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 14 38 29 , srcInfoPoints = [] } "unsafePerformIO"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 30 38 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 30 38 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 38 30 38 31 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 3 48 6 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 3 39 33 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 39 3 39 4 , SrcSpan "tests/examples/DsStrictData.hs" 39 32 39 33 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 14 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 14 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 14 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 4 39 14 , srcInfoPoints = [] } "evaluate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 15 39 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 15 39 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 15 39 16 , srcInfoPoints = [] } "f")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 17 39 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 17 39 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 17 39 19 , srcInfoPoints = [] } ">>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 20 39 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 20 39 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 20 39 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 20 39 26 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 27 39 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 27 39 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 27 39 32 , srcInfoPoints = [] } "False")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 34 39 45 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 39 34 39 35 , SrcSpan "tests/examples/DsStrictData.hs" 39 35 39 44 , SrcSpan "tests/examples/DsStrictData.hs" 39 44 39 45 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 34 39 45 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 39 34 39 35 , SrcSpan "tests/examples/DsStrictData.hs" 39 35 39 44 , SrcSpan "tests/examples/DsStrictData.hs" 39 44 39 45 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 35 39 44 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 39 35 39 44 , srcInfoPoints = [] } "catches"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 5 48 6 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 40 5 40 6 , SrcSpan "tests/examples/DsStrictData.hs" 41 5 41 6 , SrcSpan "tests/examples/DsStrictData.hs" 42 5 42 6 , SrcSpan "tests/examples/DsStrictData.hs" 43 5 43 6 , SrcSpan "tests/examples/DsStrictData.hs" 44 5 44 6 , SrcSpan "tests/examples/DsStrictData.hs" 45 5 45 6 , SrcSpan "tests/examples/DsStrictData.hs" 46 5 46 6 , SrcSpan "tests/examples/DsStrictData.hs" 47 5 47 6 , SrcSpan "tests/examples/DsStrictData.hs" 48 5 48 6 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 7 40 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 7 40 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 7 40 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 7 40 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 7 40 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 17 40 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 40 17 40 18 , SrcSpan "tests/examples/DsStrictData.hs" 40 59 40 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 18 40 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 40 18 40 19 , SrcSpan "tests/examples/DsStrictData.hs" 40 45 40 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 19 40 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 40 19 40 20 , SrcSpan "tests/examples/DsStrictData.hs" 40 41 40 42 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 20 40 41 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 40 22 40 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 20 40 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 25 40 41 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 25 40 41 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 25 40 41 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 25 40 41 , srcInfoPoints = [] } "ArrayException")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 48 40 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 48 40 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 48 40 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 48 40 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 55 40 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 55 40 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 40 55 40 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 7 41 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 7 41 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 7 41 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 7 41 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 7 41 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 17 41 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 41 17 41 18 , SrcSpan "tests/examples/DsStrictData.hs" 41 59 41 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 18 41 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 41 18 41 19 , SrcSpan "tests/examples/DsStrictData.hs" 41 45 41 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 19 41 37 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 41 19 41 20 , SrcSpan "tests/examples/DsStrictData.hs" 41 36 41 37 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 20 41 36 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 41 22 41 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 20 41 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 25 41 36 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 25 41 36 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 25 41 36 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 25 41 36 , srcInfoPoints = [] } "ErrorCall")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 48 41 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 48 41 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 48 41 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 48 41 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 55 41 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 55 41 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 41 55 41 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 7 42 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 7 42 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 7 42 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 7 42 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 7 42 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 17 42 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 42 17 42 18 , SrcSpan "tests/examples/DsStrictData.hs" 42 59 42 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 18 42 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 42 18 42 19 , SrcSpan "tests/examples/DsStrictData.hs" 42 45 42 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 19 42 41 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 42 19 42 20 , SrcSpan "tests/examples/DsStrictData.hs" 42 40 42 41 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 20 42 40 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 42 22 42 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 20 42 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 25 42 40 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 25 42 40 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 25 42 40 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 25 42 40 , srcInfoPoints = [] } "NoMethodError")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 48 42 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 48 42 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 48 42 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 48 42 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 55 42 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 55 42 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 42 55 42 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 7 43 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 7 43 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 7 43 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 7 43 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 7 43 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 17 43 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 43 17 43 18 , SrcSpan "tests/examples/DsStrictData.hs" 43 59 43 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 18 43 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 43 18 43 19 , SrcSpan "tests/examples/DsStrictData.hs" 43 45 43 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 19 43 42 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 43 19 43 20 , SrcSpan "tests/examples/DsStrictData.hs" 43 41 43 42 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 20 43 41 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 43 22 43 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 20 43 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 25 43 41 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 25 43 41 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 25 43 41 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 25 43 41 , srcInfoPoints = [] } "NonTermination")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 48 43 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 48 43 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 48 43 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 48 43 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 55 43 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 55 43 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 43 55 43 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 7 44 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 7 44 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 7 44 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 7 44 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 7 44 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 17 44 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 44 17 44 18 , SrcSpan "tests/examples/DsStrictData.hs" 44 59 44 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 18 44 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 44 18 44 19 , SrcSpan "tests/examples/DsStrictData.hs" 44 45 44 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 19 44 44 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 44 19 44 20 , SrcSpan "tests/examples/DsStrictData.hs" 44 43 44 44 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 20 44 43 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 44 22 44 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 20 44 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 25 44 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 25 44 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 25 44 43 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 25 44 43 , srcInfoPoints = [] } "PatternMatchFail")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 48 44 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 48 44 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 48 44 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 48 44 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 55 44 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 55 44 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 44 55 44 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 7 45 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 7 45 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 7 45 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 7 45 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 7 45 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 17 45 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 45 17 45 18 , SrcSpan "tests/examples/DsStrictData.hs" 45 59 45 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 18 45 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 45 18 45 19 , SrcSpan "tests/examples/DsStrictData.hs" 45 45 45 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 19 45 39 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 45 19 45 20 , SrcSpan "tests/examples/DsStrictData.hs" 45 38 45 39 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 20 45 38 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 45 22 45 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 20 45 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 25 45 38 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 25 45 38 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 25 45 38 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 25 45 38 , srcInfoPoints = [] } "RecConError")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 48 45 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 48 45 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 48 45 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 48 45 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 55 45 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 55 45 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 45 55 45 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 7 46 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 7 46 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 7 46 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 7 46 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 7 46 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 17 46 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 46 17 46 18 , SrcSpan "tests/examples/DsStrictData.hs" 46 59 46 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 18 46 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 46 18 46 19 , SrcSpan "tests/examples/DsStrictData.hs" 46 45 46 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 19 46 39 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 46 19 46 20 , SrcSpan "tests/examples/DsStrictData.hs" 46 38 46 39 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 20 46 38 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 46 22 46 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 20 46 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 25 46 38 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 25 46 38 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 25 46 38 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 25 46 38 , srcInfoPoints = [] } "RecSelError")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 48 46 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 48 46 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 48 46 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 48 46 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 55 46 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 55 46 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 46 55 46 59 , srcInfoPoints = [] } "True")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 7 47 60 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 7 47 16 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 7 47 16 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 7 47 16 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 7 47 16 , srcInfoPoints = [] } "Handler"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 17 47 60 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 47 17 47 18 , SrcSpan "tests/examples/DsStrictData.hs" 47 59 47 60 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 18 47 59 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 47 18 47 19 , SrcSpan "tests/examples/DsStrictData.hs" 47 45 47 47 ] } [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 19 47 39 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 47 19 47 20 , SrcSpan "tests/examples/DsStrictData.hs" 47 38 47 39 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 20 47 38 , srcInfoPoints = [ SrcSpan "tests/examples/DsStrictData.hs" 47 22 47 24 ] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 20 47 21 , srcInfoPoints = [] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 25 47 38 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 25 47 38 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 25 47 38 , srcInfoPoints = [] } "E") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 25 47 38 , srcInfoPoints = [] } "RecUpdError")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 48 47 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 48 47 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 48 47 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 48 47 54 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 55 47 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 55 47 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DsStrictData.hs" 47 55 47 59 , srcInfoPoints = [] } "True")))))) ])))) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/DsStrictData.hs" 3 1 3 43) " | Tests the StrictData LANGUAGE pragma." , Comment False (SrcSpan "tests/examples/DsStrictData.hs" 29 43 29 58) " sanity check" , Comment False (SrcSpan "tests/examples/DsStrictData.hs" 31 1 31 73) "----------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/DsStrictData.hs" 32 1 32 34) " Support for testing for bottom" ] ) haskell-src-exts-1.23.1/tests/examples/ConstraintKinds2.hs.parser.golden0000644000000000000000000002032513556712523024445 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 1 1 1 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 2 1 2 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 3 1 3 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 5 1 5 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 5 1 5 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 5 1 5 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 7 1 7 1 , SrcSpan "tests/examples/ConstraintKinds2.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 1 1 1 13 , SrcSpan "tests/examples/ConstraintKinds2.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 1 14 1 29 , srcInfoPoints = [] } "ConstraintKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 2 1 2 23 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 2 1 2 13 , SrcSpan "tests/examples/ConstraintKinds2.hs" 2 20 2 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 2 14 2 19 , srcInfoPoints = [] } "GADTs" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 3 1 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 3 1 3 13 , SrcSpan "tests/examples/ConstraintKinds2.hs" 3 25 3 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 3 14 3 24 , srcInfoPoints = [] } "RankNTypes" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 1 7 0 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 5 13 5 18 , SrcSpan "tests/examples/ConstraintKinds2.hs" 6 5 6 5 , SrcSpan "tests/examples/ConstraintKinds2.hs" 7 1 7 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 6 5 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 6 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 6 5 10 , srcInfoPoints = [] } "Dict")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 11 5 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 5 11 5 12 , srcInfoPoints = [] } "p"))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 5 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 6 10 6 12 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 5 6 9 , srcInfoPoints = [] } "Dict") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 13 6 24 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 13 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 6 15 6 17 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 13 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 6 15 6 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 13 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds2.hs" 6 15 6 17 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 13 6 14 , srcInfoPoints = [] } "p"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 18 6 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 18 6 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 18 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 18 6 22 , srcInfoPoints = [] } "Dict"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 23 6 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds2.hs" 6 23 6 24 , srcInfoPoints = [] } "p")))) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/WhereBlock.hs.parser.golden0000644000000000000000000003572213534314633023276 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 1 1 1 1 , SrcSpan "tests/examples/WhereBlock.hs" 1 1 1 1 , SrcSpan "tests/examples/WhereBlock.hs" 1 1 1 1 , SrcSpan "tests/examples/WhereBlock.hs" 4 1 4 1 , SrcSpan "tests/examples/WhereBlock.hs" 4 1 4 1 ] } Nothing [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 2 2 2 7 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 2 2 2 7 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 1 1 5 , srcInfoPoints = [] } "hash") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 6 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 6 1 9 , srcInfoPoints = [] } "ptr") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 10 1 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 10 1 13 , srcInfoPoints = [] } "len") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 14 1 21 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 1 14 1 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 16 1 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 16 1 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 16 1 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 16 1 17 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 18 1 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 18 1 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 1 18 1 21 , srcInfoPoints = [] } "len"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 8 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 2 8 2 8 , SrcSpan "tests/examples/WhereBlock.hs" 3 8 3 8 , SrcSpan "tests/examples/WhereBlock.hs" 4 1 4 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 8 3 32 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 8 2 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 8 2 9 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 10 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 10 2 11 , srcInfoPoints = [] } "h") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 12 2 22 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 2 12 2 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 14 2 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 14 2 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 14 2 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 14 2 20 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 21 2 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 21 2 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 2 21 2 22 , srcInfoPoints = [] } "h"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 8 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 8 3 9 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 10 3 11 , srcInfoPoints = [] } "p") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 12 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 3 12 3 13 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 14 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 3 14 3 15 , SrcSpan "tests/examples/WhereBlock.hs" 3 31 3 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 15 3 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 15 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 15 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 15 3 16 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 17 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 3 17 3 18 , SrcSpan "tests/examples/WhereBlock.hs" 3 18 3 28 , SrcSpan "tests/examples/WhereBlock.hs" 3 28 3 29 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 17 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/WhereBlock.hs" 3 17 3 18 , SrcSpan "tests/examples/WhereBlock.hs" 3 18 3 28 , SrcSpan "tests/examples/WhereBlock.hs" 3 28 3 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 18 3 28 , srcInfoPoints = [] } "advancePtr"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 30 3 31 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WhereBlock.hs" 3 30 3 31 , srcInfoPoints = [] } 1 "1"))))) Nothing ] ])) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteToplevel.hs.parser.golden0000644000000000000000000000346513534314633025063 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 9 1 9 1 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 9 1 9 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [] [ SpliceDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 8 3 , srcInfoPoints = [] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 8 3 , srcInfoPoints = [] } "undefined" "\nthis quasiquote is acceptable to ghc's\nparser. Previously hse would reject this\nbecause -XTemplateHaskell is not enabled\nto allow \"expressions\" at top-level\n") ] , [] ) haskell-src-exts-1.23.1/tests/examples/RCategory2.hs.parser.golden0000644000000000000000000001750413534314633023230 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 1 1 1 1 , SrcSpan "tests/examples/RCategory2.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory2.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory2.hs" 3 1 3 1 , SrcSpan "tests/examples/RCategory2.hs" 5 1 5 1 , SrcSpan "tests/examples/RCategory2.hs" 7 1 7 1 , SrcSpan "tests/examples/RCategory2.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 1 1 1 47 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 1 1 1 13 , SrcSpan "tests/examples/RCategory2.hs" 1 26 1 27 , SrcSpan "tests/examples/RCategory2.hs" 1 44 1 47 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 1 28 1 43 , srcInfoPoints = [] } "ConstraintKinds" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 3 1 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 3 8 3 16 , srcInfoPoints = [] } "GHC.Prim" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 1 6 43 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 5 1 5 6 , SrcSpan "tests/examples/RCategory2.hs" 5 21 5 26 , SrcSpan "tests/examples/RCategory2.hs" 6 3 6 3 , SrcSpan "tests/examples/RCategory2.hs" 7 1 7 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 7 5 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 7 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 7 5 16 , srcInfoPoints = [] } "RCategory")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 17 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 5 17 5 20 , srcInfoPoints = [] } "cat"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 3 6 43 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 6 3 6 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 8 6 29 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 8 6 27 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 8 6 25 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 8 6 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 8 6 21 , srcInfoPoints = [] } "RCategoryCtxt")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 22 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 22 6 25 , srcInfoPoints = [] } "cat"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 26 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 26 6 27 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 28 6 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 28 6 29 , srcInfoPoints = [] } "b"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 30 6 43 , srcInfoPoints = [ SrcSpan "tests/examples/RCategory2.hs" 6 30 6 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 33 6 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 33 6 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RCategory2.hs" 6 33 6 43 , srcInfoPoints = [] } "Constraint"))))) Nothing ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExtraEndBrace.hs.parser.golden0000644000000000000000000000011513534314633023704 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ExtraEndBrace.hs" 3 20) "Unexpected }" haskell-src-exts-1.23.1/tests/examples/OptionsPragma.hs.parser.golden0000644000000000000000000000161113534314633024022 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OptionsPragma.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/OptionsPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/OptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/OptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/OptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/OptionsPragma.hs" 3 1 3 1 ] } Nothing [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OptionsPragma.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/OptionsPragma.hs" 1 1 1 31 , SrcSpan "tests/examples/OptionsPragma.hs" 1 31 1 34 ] } Nothing "-fno-warn-orphans " ] [] [] , [] ) haskell-src-exts-1.23.1/tests/examples/EmptyContext.hs.parser.golden0000644000000000000000000000570713534314633023714 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyContext.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyContext.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyContext.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyContext.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyContext.hs" 2 1 2 1 ] } Nothing [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyContext.hs" 1 11 1 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 1 1 10 , srcInfoPoints = [] } "happyThen" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 14 1 23 , srcInfoPoints = [] } Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 14 1 19 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyContext.hs" 1 14 1 15 , SrcSpan "tests/examples/EmptyContext.hs" 1 15 1 16 , SrcSpan "tests/examples/EmptyContext.hs" 1 17 1 19 ] })) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 20 1 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 20 1 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 20 1 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 20 1 21 , srcInfoPoints = [] } "P"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 22 1 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyContext.hs" 1 22 1 23 , srcInfoPoints = [] } "a")))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/GADTRecord2.hs.parser.golden0000644000000000000000000001243413534314633023204 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 1 1 1 1 , SrcSpan "tests/examples/GADTRecord2.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord2.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord2.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord2.hs" 5 1 5 1 , SrcSpan "tests/examples/GADTRecord2.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 1 1 1 13 , SrcSpan "tests/examples/GADTRecord2.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 3 1 5 0 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 3 8 3 13 , SrcSpan "tests/examples/GADTRecord2.hs" 4 3 4 3 , SrcSpan "tests/examples/GADTRecord2.hs" 5 1 5 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 3 6 3 7 , srcInfoPoints = [] } "T")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 3 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 4 5 4 7 , SrcSpan "tests/examples/GADTRecord2.hs" 4 14 4 15 , SrcSpan "tests/examples/GADTRecord2.hs" 4 29 4 30 , SrcSpan "tests/examples/GADTRecord2.hs" 4 31 4 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 3 4 4 , srcInfoPoints = [] } "T") Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 8 4 13 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 4 8 4 9 , SrcSpan "tests/examples/GADTRecord2.hs" 4 9 4 10 , SrcSpan "tests/examples/GADTRecord2.hs" 4 11 4 13 ] })) (Just [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 16 4 28 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord2.hs" 4 22 4 24 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 16 4 21 , srcInfoPoints = [] } "field" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 25 4 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 25 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 25 4 28 , srcInfoPoints = [] } "Int"))) ]) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 34 4 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 34 4 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord2.hs" 4 34 4 35 , srcInfoPoints = [] } "T"))) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/TySplice3.hs.parser.golden0000644000000000000000000000271013534314633023057 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice3.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice3.hs" 1 1 1 1 , SrcSpan "tests/examples/TySplice3.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice3.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice3.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice3.hs" 3 1 3 1 , SrcSpan "tests/examples/TySplice3.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice3.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice3.hs" 1 1 1 13 , SrcSpan "tests/examples/TySplice3.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice3.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [] [ SpliceDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice3.hs" 2 1 2 12 , srcInfoPoints = [] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice3.hs" 2 1 2 12 , srcInfoPoints = [] } "qq" " abc ") ] , [] ) haskell-src-exts-1.23.1/tests/examples/EmptyAnn.hs.parser.golden0000644000000000000000000000320313534314633022771 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyAnn.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyAnn.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyAnn.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyAnn.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyAnn.hs" 2 1 2 1 ] } Nothing [ AnnModulePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 1 1 38 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyAnn.hs" 1 1 1 8 , SrcSpan "tests/examples/EmptyAnn.hs" 1 35 1 38 ] } (Ann SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 9 1 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 9 1 12 , srcInfoPoints = [] } "foo") (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 13 1 34 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyAnn.hs" 1 13 1 34 , srcInfoPoints = [] } "Hlint: ignore Test4" "Hlint: ignore Test4"))) ] [] [] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeListCons.hs.parser.golden0000644000000000000000000004240013534314633023640 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeListCons.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeListCons.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeListCons.hs" 5 1 5 1 , SrcSpan "tests/examples/TypeListCons.hs" 6 1 6 1 , SrcSpan "tests/examples/TypeListCons.hs" 7 1 7 1 , SrcSpan "tests/examples/TypeListCons.hs" 8 1 8 1 , SrcSpan "tests/examples/TypeListCons.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 3 1 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 3 1 3 7 , SrcSpan "tests/examples/TypeListCons.hs" 3 21 3 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 3 8 3 20 , srcInfoPoints = [] } "TypeListCons") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 1 1 1 42 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeListCons.hs" 1 23 1 24 , SrcSpan "tests/examples/TypeListCons.hs" 1 39 1 42 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 1 14 1 23 , srcInfoPoints = [] } "DataKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 1 25 1 38 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 1 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 5 1 5 5 , SrcSpan "tests/examples/TypeListCons.hs" 5 14 5 15 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 6 5 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 6 5 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 6 5 11 , srcInfoPoints = [] } "List1")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 12 5 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 12 5 13 , srcInfoPoints = [] } "a"))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 16 5 24 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 16 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 16 5 17 , srcInfoPoints = [] } "a")) (PromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 18 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 5 18 5 19 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 19 5 20 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 19 5 20 , srcInfoPoints = [] }))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 21 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 5 21 5 22 , SrcSpan "tests/examples/TypeListCons.hs" 5 23 5 24 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 5 21 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 5 21 5 22 , SrcSpan "tests/examples/TypeListCons.hs" 5 23 5 24 ] } True []))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 1 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 6 1 6 5 , SrcSpan "tests/examples/TypeListCons.hs" 6 16 6 17 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 6 6 15 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 6 6 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 6 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 6 6 11 , srcInfoPoints = [] } "List2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 12 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 12 6 13 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 14 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 14 6 15 , srcInfoPoints = [] } "b"))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 18 6 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 18 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 18 6 19 , srcInfoPoints = [] } "a")) (PromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 20 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 6 20 6 21 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 21 6 22 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 21 6 22 , srcInfoPoints = [] }))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 23 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 6 23 6 24 , SrcSpan "tests/examples/TypeListCons.hs" 6 25 6 26 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 6 23 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 6 23 6 24 , SrcSpan "tests/examples/TypeListCons.hs" 6 25 6 26 ] } True []))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 1 7 38 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 1 7 5 , SrcSpan "tests/examples/TypeListCons.hs" 7 18 7 19 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 6 7 17 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 6 7 15 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 6 7 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 6 7 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 6 7 11 , srcInfoPoints = [] } "List3")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 12 7 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 12 7 13 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 14 7 15 , srcInfoPoints = [] } "b"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 16 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 16 7 17 , srcInfoPoints = [] } "c"))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 20 7 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 20 7 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 20 7 21 , srcInfoPoints = [] } "a")) (PromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 22 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 22 7 23 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 23 7 24 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 23 7 24 , srcInfoPoints = [] }))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 25 7 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 25 7 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 25 7 26 , srcInfoPoints = [] } "b")) (PromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 27 7 29 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 27 7 28 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 28 7 29 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 28 7 29 , srcInfoPoints = [] }))) (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 30 7 38 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 30 7 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 30 7 31 , srcInfoPoints = [] } "c")) (PromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 32 7 34 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 32 7 33 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 33 7 34 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 33 7 34 , srcInfoPoints = [] }))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 35 7 38 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 35 7 36 , SrcSpan "tests/examples/TypeListCons.hs" 7 37 7 38 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeListCons.hs" 7 35 7 38 , srcInfoPoints = [ SrcSpan "tests/examples/TypeListCons.hs" 7 35 7 36 , SrcSpan "tests/examples/TypeListCons.hs" 7 37 7 38 ] } True []))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/GADTRecord.hs.parser.golden0000644000000000000000000001144513534314633023123 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord.hs" 1 1 1 1 , SrcSpan "tests/examples/GADTRecord.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord.hs" 3 1 3 1 , SrcSpan "tests/examples/GADTRecord.hs" 5 1 5 1 , SrcSpan "tests/examples/GADTRecord.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord.hs" 1 1 1 13 , SrcSpan "tests/examples/GADTRecord.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 3 1 5 0 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord.hs" 3 8 3 13 , SrcSpan "tests/examples/GADTRecord.hs" 4 3 4 3 , SrcSpan "tests/examples/GADTRecord.hs" 5 1 5 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 3 6 3 7 , srcInfoPoints = [] } "T")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 3 4 29 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord.hs" 4 5 4 7 , SrcSpan "tests/examples/GADTRecord.hs" 4 8 4 9 , SrcSpan "tests/examples/GADTRecord.hs" 4 23 4 24 , SrcSpan "tests/examples/GADTRecord.hs" 4 25 4 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 3 4 4 , srcInfoPoints = [] } "T") Nothing Nothing (Just [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 10 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/GADTRecord.hs" 4 16 4 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 10 4 15 , srcInfoPoints = [] } "field" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 19 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 19 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 19 4 22 , srcInfoPoints = [] } "Int"))) ]) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 28 4 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 28 4 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GADTRecord.hs" 4 28 4 29 , srcInfoPoints = [] } "T"))) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/Nounpack2.hs.parser.golden0000644000000000000000000000707713534314633023113 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1 , SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1 , SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1 , SrcSpan "tests/examples/Nounpack2.hs" 4 1 4 1 , SrcSpan "tests/examples/Nounpack2.hs" 4 1 4 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 36 , srcInfoPoints = [ SrcSpan "tests/examples/Nounpack2.hs" 3 10 3 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 6 3 9 , srcInfoPoints = [] } "Foo")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 36 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 15 , srcInfoPoints = [] } "Foo") [ TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 36 , srcInfoPoints = [] } (NoStrictAnnot SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (NoUnpack SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 28 , SrcSpan "tests/examples/Nounpack2.hs" 3 29 3 32 ] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36 , srcInfoPoints = [] } "Int"))) ]) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PolyKinds.hs.parser.golden0000644000000000000000000004427513534314633023170 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 1 1 1 1 , SrcSpan "tests/examples/PolyKinds.hs" 2 1 2 1 , SrcSpan "tests/examples/PolyKinds.hs" 2 1 2 1 , SrcSpan "tests/examples/PolyKinds.hs" 2 1 2 1 , SrcSpan "tests/examples/PolyKinds.hs" 4 1 4 1 , SrcSpan "tests/examples/PolyKinds.hs" 7 1 7 1 , SrcSpan "tests/examples/PolyKinds.hs" 8 1 8 1 , SrcSpan "tests/examples/PolyKinds.hs" 9 1 9 1 , SrcSpan "tests/examples/PolyKinds.hs" 9 1 9 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 1 1 1 13 , SrcSpan "tests/examples/PolyKinds.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 1 14 1 23 , srcInfoPoints = [] } "PolyKinds" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 1 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 2 14 2 15 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 1 2 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 6 2 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 6 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 6 2 11 , srcInfoPoints = [] } "Proxy")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 12 2 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 12 2 13 , srcInfoPoints = [] } "t"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 16 2 21 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 16 2 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 2 16 2 21 , srcInfoPoints = [] } "Proxy") []) ] [] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 1 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 4 1 4 6 , SrcSpan "tests/examples/PolyKinds.hs" 4 18 4 23 , SrcSpan "tests/examples/PolyKinds.hs" 5 3 5 3 , SrcSpan "tests/examples/PolyKinds.hs" 7 1 7 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 7 4 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 7 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 7 4 15 , srcInfoPoints = [] } "Typeable")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 16 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 4 16 4 17 , srcInfoPoints = [] } "t"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 3 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 5 10 5 12 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 3 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 5 10 5 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 3 5 9 , srcInfoPoints = [] } "typeOf" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 13 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 5 21 5 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 13 5 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 13 5 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 13 5 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 13 5 18 , srcInfoPoints = [] } "Proxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 19 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 19 5 20 , srcInfoPoints = [] } "t"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 24 5 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 24 5 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 5 24 5 31 , srcInfoPoints = [] } "TypeRep"))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 1 8 0 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 7 1 7 9 , SrcSpan "tests/examples/PolyKinds.hs" 7 24 7 29 , SrcSpan "tests/examples/PolyKinds.hs" 7 30 7 30 , SrcSpan "tests/examples/PolyKinds.hs" 8 1 8 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 10 7 22 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 10 7 22 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 10 7 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 10 7 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 10 7 18 , srcInfoPoints = [] } "Typeable"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 19 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 19 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 19 7 22 , srcInfoPoints = [] } "Int"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 30 7 48 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 30 7 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 30 7 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 30 7 36 , srcInfoPoints = [] } "typeOf") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 37 7 38 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 39 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 7 39 7 40 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 41 7 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 41 7 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 7 41 7 48 , srcInfoPoints = [] } "TypeRep")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 1 9 0 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 8 1 8 9 , SrcSpan "tests/examples/PolyKinds.hs" 8 24 8 29 , SrcSpan "tests/examples/PolyKinds.hs" 8 30 8 30 , SrcSpan "tests/examples/PolyKinds.hs" 9 1 9 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 10 8 21 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 10 8 21 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 10 8 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 10 8 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 10 8 18 , srcInfoPoints = [] } "Typeable"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 20 , SrcSpan "tests/examples/PolyKinds.hs" 8 20 8 21 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 20 , SrcSpan "tests/examples/PolyKinds.hs" 8 20 8 21 ] } (ListCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 8 19 8 20 , SrcSpan "tests/examples/PolyKinds.hs" 8 20 8 21 ] }))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 30 8 48 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 30 8 48 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 30 8 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 30 8 36 , srcInfoPoints = [] } "typeOf") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 37 8 38 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 39 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKinds.hs" 8 39 8 40 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 41 8 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 41 8 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKinds.hs" 8 41 8 48 , srcInfoPoints = [] } "TypeRep")))) Nothing ]) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/Directory.hs.parser.golden0000644000000000000000000711615513556712523023230 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 1 1 914 1 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 1 1 1 1 , SrcSpan "tests/examples/Directory.hs" 17 1 17 1 , SrcSpan "tests/examples/Directory.hs" 17 1 17 1 , SrcSpan "tests/examples/Directory.hs" 72 1 72 1 , SrcSpan "tests/examples/Directory.hs" 73 1 73 1 , SrcSpan "tests/examples/Directory.hs" 75 1 75 1 , SrcSpan "tests/examples/Directory.hs" 76 1 76 1 , SrcSpan "tests/examples/Directory.hs" 77 1 77 1 , SrcSpan "tests/examples/Directory.hs" 78 1 78 1 , SrcSpan "tests/examples/Directory.hs" 79 1 79 1 , SrcSpan "tests/examples/Directory.hs" 80 1 80 1 , SrcSpan "tests/examples/Directory.hs" 81 1 81 1 , SrcSpan "tests/examples/Directory.hs" 83 1 83 1 , SrcSpan "tests/examples/Directory.hs" 84 1 84 1 , SrcSpan "tests/examples/Directory.hs" 88 1 88 1 , SrcSpan "tests/examples/Directory.hs" 90 1 90 1 , SrcSpan "tests/examples/Directory.hs" 92 1 92 1 , SrcSpan "tests/examples/Directory.hs" 93 1 93 1 , SrcSpan "tests/examples/Directory.hs" 94 1 94 1 , SrcSpan "tests/examples/Directory.hs" 134 1 134 1 , SrcSpan "tests/examples/Directory.hs" 152 1 152 1 , SrcSpan "tests/examples/Directory.hs" 153 1 153 1 , SrcSpan "tests/examples/Directory.hs" 189 1 189 1 , SrcSpan "tests/examples/Directory.hs" 190 1 190 1 , SrcSpan "tests/examples/Directory.hs" 205 1 205 1 , SrcSpan "tests/examples/Directory.hs" 208 1 208 1 , SrcSpan "tests/examples/Directory.hs" 209 1 209 1 , SrcSpan "tests/examples/Directory.hs" 257 1 257 1 , SrcSpan "tests/examples/Directory.hs" 258 1 258 1 , SrcSpan "tests/examples/Directory.hs" 264 1 264 1 , SrcSpan "tests/examples/Directory.hs" 267 1 267 1 , SrcSpan "tests/examples/Directory.hs" 343 1 343 1 , SrcSpan "tests/examples/Directory.hs" 344 1 344 1 , SrcSpan "tests/examples/Directory.hs" 350 1 350 1 , SrcSpan "tests/examples/Directory.hs" 351 1 351 1 , SrcSpan "tests/examples/Directory.hs" 399 1 399 1 , SrcSpan "tests/examples/Directory.hs" 400 1 400 1 , SrcSpan "tests/examples/Directory.hs" 452 1 452 1 , SrcSpan "tests/examples/Directory.hs" 453 1 453 1 , SrcSpan "tests/examples/Directory.hs" 509 1 509 1 , SrcSpan "tests/examples/Directory.hs" 510 1 510 1 , SrcSpan "tests/examples/Directory.hs" 528 1 528 1 , SrcSpan "tests/examples/Directory.hs" 529 1 529 1 , SrcSpan "tests/examples/Directory.hs" 560 1 560 1 , SrcSpan "tests/examples/Directory.hs" 561 1 561 1 , SrcSpan "tests/examples/Directory.hs" 568 1 568 1 , SrcSpan "tests/examples/Directory.hs" 569 1 569 1 , SrcSpan "tests/examples/Directory.hs" 591 1 591 1 , SrcSpan "tests/examples/Directory.hs" 592 1 592 1 , SrcSpan "tests/examples/Directory.hs" 627 1 627 1 , SrcSpan "tests/examples/Directory.hs" 628 1 628 1 , SrcSpan "tests/examples/Directory.hs" 672 1 672 1 , SrcSpan "tests/examples/Directory.hs" 673 1 673 1 , SrcSpan "tests/examples/Directory.hs" 708 1 708 1 , SrcSpan "tests/examples/Directory.hs" 709 1 709 1 , SrcSpan "tests/examples/Directory.hs" 716 1 716 1 , SrcSpan "tests/examples/Directory.hs" 717 1 717 1 , SrcSpan "tests/examples/Directory.hs" 725 1 725 1 , SrcSpan "tests/examples/Directory.hs" 726 1 726 1 , SrcSpan "tests/examples/Directory.hs" 742 1 742 1 , SrcSpan "tests/examples/Directory.hs" 743 1 743 1 , SrcSpan "tests/examples/Directory.hs" 749 1 749 1 , SrcSpan "tests/examples/Directory.hs" 750 1 750 1 , SrcSpan "tests/examples/Directory.hs" 756 1 756 1 , SrcSpan "tests/examples/Directory.hs" 757 1 757 1 , SrcSpan "tests/examples/Directory.hs" 763 1 763 1 , SrcSpan "tests/examples/Directory.hs" 764 1 764 1 , SrcSpan "tests/examples/Directory.hs" 769 1 769 1 , SrcSpan "tests/examples/Directory.hs" 770 1 770 1 , SrcSpan "tests/examples/Directory.hs" 774 1 774 1 , SrcSpan "tests/examples/Directory.hs" 775 1 775 1 , SrcSpan "tests/examples/Directory.hs" 778 1 778 1 , SrcSpan "tests/examples/Directory.hs" 779 1 779 1 , SrcSpan "tests/examples/Directory.hs" 780 1 780 1 , SrcSpan "tests/examples/Directory.hs" 781 1 781 1 , SrcSpan "tests/examples/Directory.hs" 784 1 784 1 , SrcSpan "tests/examples/Directory.hs" 808 1 808 1 , SrcSpan "tests/examples/Directory.hs" 809 1 809 1 , SrcSpan "tests/examples/Directory.hs" 847 1 847 1 , SrcSpan "tests/examples/Directory.hs" 848 1 848 1 , SrcSpan "tests/examples/Directory.hs" 874 1 874 1 , SrcSpan "tests/examples/Directory.hs" 875 1 875 1 , SrcSpan "tests/examples/Directory.hs" 905 1 905 1 , SrcSpan "tests/examples/Directory.hs" 906 1 906 1 , SrcSpan "tests/examples/Directory.hs" 912 1 912 1 , SrcSpan "tests/examples/Directory.hs" 913 1 913 1 , SrcSpan "tests/examples/Directory.hs" 914 1 914 1 , SrcSpan "tests/examples/Directory.hs" 914 1 914 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 17 1 70 11 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 17 1 17 7 , SrcSpan "tests/examples/Directory.hs" 70 6 70 11 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 17 8 17 24 , srcInfoPoints = [] } "System.Directory") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 18 4 70 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 18 4 18 5 , SrcSpan "tests/examples/Directory.hs" 23 5 23 6 , SrcSpan "tests/examples/Directory.hs" 24 5 24 6 , SrcSpan "tests/examples/Directory.hs" 25 5 25 6 , SrcSpan "tests/examples/Directory.hs" 26 5 26 6 , SrcSpan "tests/examples/Directory.hs" 28 5 28 6 , SrcSpan "tests/examples/Directory.hs" 29 5 29 6 , SrcSpan "tests/examples/Directory.hs" 30 5 30 6 , SrcSpan "tests/examples/Directory.hs" 33 5 33 6 , SrcSpan "tests/examples/Directory.hs" 34 5 34 6 , SrcSpan "tests/examples/Directory.hs" 35 5 35 6 , SrcSpan "tests/examples/Directory.hs" 36 5 36 6 , SrcSpan "tests/examples/Directory.hs" 39 5 39 6 , SrcSpan "tests/examples/Directory.hs" 40 5 40 6 , SrcSpan "tests/examples/Directory.hs" 41 5 41 6 , SrcSpan "tests/examples/Directory.hs" 43 5 43 6 , SrcSpan "tests/examples/Directory.hs" 44 5 44 6 , SrcSpan "tests/examples/Directory.hs" 45 5 45 6 , SrcSpan "tests/examples/Directory.hs" 48 5 48 6 , SrcSpan "tests/examples/Directory.hs" 49 5 49 6 , SrcSpan "tests/examples/Directory.hs" 55 5 55 6 , SrcSpan "tests/examples/Directory.hs" 63 5 63 6 , SrcSpan "tests/examples/Directory.hs" 64 5 64 6 , SrcSpan "tests/examples/Directory.hs" 65 5 65 6 , SrcSpan "tests/examples/Directory.hs" 69 5 69 6 , SrcSpan "tests/examples/Directory.hs" 70 4 70 5 ] } [ EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 22 7 22 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 22 7 22 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 22 7 22 22 , srcInfoPoints = [] } "createDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 23 7 23 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 23 7 23 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 23 7 23 31 , srcInfoPoints = [] } "createDirectoryIfMissing")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 24 7 24 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 24 7 24 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 24 7 24 22 , srcInfoPoints = [] } "removeDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 25 7 25 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 25 7 25 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 25 7 25 31 , srcInfoPoints = [] } "removeDirectoryRecursive")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 26 7 26 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 26 7 26 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 26 7 26 22 , srcInfoPoints = [] } "renameDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 28 7 28 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 28 7 28 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 28 7 28 27 , srcInfoPoints = [] } "getDirectoryContents")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 29 7 29 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 29 7 29 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 29 7 29 26 , srcInfoPoints = [] } "getCurrentDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 30 7 30 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 30 7 30 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 30 7 30 26 , srcInfoPoints = [] } "setCurrentDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 33 7 33 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 33 7 33 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 33 7 33 23 , srcInfoPoints = [] } "getHomeDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 34 7 34 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 34 7 34 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 34 7 34 30 , srcInfoPoints = [] } "getAppUserDataDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 35 7 35 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 35 7 35 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 35 7 35 32 , srcInfoPoints = [] } "getUserDocumentsDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 36 7 36 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 36 7 36 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 36 7 36 28 , srcInfoPoints = [] } "getTemporaryDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 39 7 39 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 39 7 39 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 39 7 39 17 , srcInfoPoints = [] } "removeFile")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 40 7 40 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 40 7 40 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 40 7 40 17 , srcInfoPoints = [] } "renameFile")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 41 7 41 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 41 7 41 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 41 7 41 15 , srcInfoPoints = [] } "copyFile")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 43 7 43 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 43 7 43 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 43 7 43 23 , srcInfoPoints = [] } "canonicalizePath")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 44 7 44 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 44 7 44 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 44 7 44 37 , srcInfoPoints = [] } "makeRelativeToCurrentDirectory")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 45 7 45 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 45 7 45 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 45 7 45 21 , srcInfoPoints = [] } "findExecutable")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 48 7 48 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 48 7 48 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 48 7 48 20 , srcInfoPoints = [] } "doesFileExist")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 49 7 49 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 49 7 49 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 49 7 49 25 , srcInfoPoints = [] } "doesDirectoryExist")) , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 55 7 61 8 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 55 18 55 19 , SrcSpan "tests/examples/Directory.hs" 56 16 56 17 , SrcSpan "tests/examples/Directory.hs" 57 13 57 14 , SrcSpan "tests/examples/Directory.hs" 58 13 58 14 , SrcSpan "tests/examples/Directory.hs" 59 15 59 16 , SrcSpan "tests/examples/Directory.hs" 61 7 61 8 ] } (NoWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 55 7 55 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 55 7 55 18 , srcInfoPoints = [] } "Permissions")) [ ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 56 5 56 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 56 5 56 16 , srcInfoPoints = [] } "Permissions") , VarName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 57 5 57 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 57 5 57 13 , srcInfoPoints = [] } "readable") , VarName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 58 5 58 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 58 5 58 13 , srcInfoPoints = [] } "writable") , VarName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 59 5 59 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 59 5 59 15 , srcInfoPoints = [] } "executable") , VarName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 60 5 60 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 60 5 60 15 , srcInfoPoints = [] } "searchable") ] , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 63 7 63 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 63 7 63 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 63 7 63 21 , srcInfoPoints = [] } "getPermissions")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 64 7 64 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 64 7 64 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 64 7 64 21 , srcInfoPoints = [] } "setPermissions")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 65 7 65 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 65 7 65 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 65 7 65 22 , srcInfoPoints = [] } "copyPermissions")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 69 7 69 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 69 7 69 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 69 7 69 26 , srcInfoPoints = [] } "getModificationTime")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 1 1 1 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 1 1 1 13 , SrcSpan "tests/examples/Directory.hs" 1 38 1 39 , SrcSpan "tests/examples/Directory.hs" 1 65 1 68 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 1 14 1 38 , srcInfoPoints = [] } "ForeignFunctionInterface" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 1 40 1 64 , srcInfoPoints = [] } "NondecreasingIndentation" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 72 1 72 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 72 1 72 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 72 8 72 15 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 72 16 72 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 72 16 72 22 , SrcSpan "tests/examples/Directory.hs" 72 23 72 24 , SrcSpan "tests/examples/Directory.hs" 72 31 72 32 ] } True [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 72 25 72 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 72 25 72 30 , srcInfoPoints = [] } "catch") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 73 1 73 25 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 73 1 73 7 , SrcSpan "tests/examples/Directory.hs" 73 8 73 17 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 73 18 73 25 , srcInfoPoints = [] } "Prelude" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 75 1 75 29 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 75 1 75 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 75 8 75 21 , srcInfoPoints = [] } "Control.Monad" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 75 22 75 29 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 75 22 75 23 , SrcSpan "tests/examples/Directory.hs" 75 28 75 29 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 75 23 75 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 75 23 75 28 , srcInfoPoints = [] } "guard") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 76 1 76 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 76 1 76 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 76 8 76 26 , srcInfoPoints = [] } "System.Environment" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 76 32 76 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 76 32 76 33 , SrcSpan "tests/examples/Directory.hs" 76 41 76 42 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 76 34 76 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 76 34 76 40 , srcInfoPoints = [] } "getEnv") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 77 1 77 23 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 77 1 77 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 77 8 77 23 , srcInfoPoints = [] } "System.FilePath" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 78 1 78 17 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 78 1 78 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 78 8 78 17 , srcInfoPoints = [] } "System.IO" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 1 79 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 79 1 79 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 8 79 23 , srcInfoPoints = [] } "System.IO.Error" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 24 79 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 79 24 79 30 , SrcSpan "tests/examples/Directory.hs" 79 31 79 32 , SrcSpan "tests/examples/Directory.hs" 79 38 79 39 , SrcSpan "tests/examples/Directory.hs" 79 44 79 45 ] } True [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 33 79 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 33 79 38 , srcInfoPoints = [] } "catch") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 40 79 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 79 40 79 43 , srcInfoPoints = [] } "try") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 1 80 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 80 1 80 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 8 80 21 , srcInfoPoints = [] } "Control.Monad" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 32 80 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 80 32 80 33 , SrcSpan "tests/examples/Directory.hs" 80 38 80 39 , SrcSpan "tests/examples/Directory.hs" 80 47 80 48 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 34 80 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 34 80 38 , srcInfoPoints = [] } "when") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 40 80 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 80 40 80 46 , srcInfoPoints = [] } "unless") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 81 1 81 30 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 81 1 81 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 81 8 81 30 , srcInfoPoints = [] } "Control.Exception.Base" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 83 1 83 15 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 83 1 83 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 83 8 83 15 , srcInfoPoints = [] } "Foreign" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 84 1 84 17 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 84 1 84 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 84 8 84 17 , srcInfoPoints = [] } "Foreign.C" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 88 1 88 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 88 1 88 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 88 8 88 19 , srcInfoPoints = [] } "System.Time" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 88 32 88 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 88 32 88 33 , SrcSpan "tests/examples/Directory.hs" 88 48 88 49 ] } False [ IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 88 34 88 47 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 88 43 88 44 , SrcSpan "tests/examples/Directory.hs" 88 44 88 46 , SrcSpan "tests/examples/Directory.hs" 88 46 88 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 88 34 88 43 , srcInfoPoints = [] } "ClockTime") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 1 90 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 90 1 90 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 8 90 24 , srcInfoPoints = [] } "GHC.IO.Exception" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 25 90 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 90 25 90 26 , SrcSpan "tests/examples/Directory.hs" 90 42 90 43 , SrcSpan "tests/examples/Directory.hs" 90 59 90 60 , SrcSpan "tests/examples/Directory.hs" 90 73 90 74 ] } False [ IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 27 90 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 90 38 90 39 , SrcSpan "tests/examples/Directory.hs" 90 39 90 41 , SrcSpan "tests/examples/Directory.hs" 90 41 90 42 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 27 90 38 , srcInfoPoints = [] } "IOException") , IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 44 90 59 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 90 55 90 56 , SrcSpan "tests/examples/Directory.hs" 90 56 90 58 , SrcSpan "tests/examples/Directory.hs" 90 58 90 59 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 44 90 55 , srcInfoPoints = [] } "IOErrorType") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 61 90 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 90 61 90 72 , srcInfoPoints = [] } "ioException") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 92 1 92 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 92 1 92 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 92 8 92 26 , srcInfoPoints = [] } "System.Posix.Types" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 93 1 93 30 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 93 1 93 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 93 8 93 30 , srcInfoPoints = [] } "System.Posix.Internals" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 94 1 94 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 94 1 94 7 , SrcSpan "tests/examples/Directory.hs" 94 8 94 17 , SrcSpan "tests/examples/Directory.hs" 94 31 94 33 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 94 18 94 30 , srcInfoPoints = [] } "System.Win32" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 94 34 94 39 , srcInfoPoints = [] } "Win32") , importSpecs = Nothing } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 134 1 138 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 135 2 135 3 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 134 1 134 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 134 6 134 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 134 6 134 17 , srcInfoPoints = [] } "Permissions")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 135 4 138 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 135 16 135 17 , SrcSpan "tests/examples/Directory.hs" 138 4 138 5 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 135 4 138 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 135 16 135 17 , SrcSpan "tests/examples/Directory.hs" 138 4 138 5 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 135 4 135 15 , srcInfoPoints = [] } "Permissions") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 136 5 137 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 136 13 136 14 , SrcSpan "tests/examples/Directory.hs" 136 25 136 26 , SrcSpan "tests/examples/Directory.hs" 137 15 137 16 , SrcSpan "tests/examples/Directory.hs" 137 28 137 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 136 5 136 13 , srcInfoPoints = [] } "readable" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 136 17 136 25 , srcInfoPoints = [] } "writable" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 137 5 137 15 , srcInfoPoints = [] } "executable" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 137 17 137 27 , srcInfoPoints = [] } "searchable" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 137 31 137 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 137 31 137 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 137 31 137 35 , srcInfoPoints = [] } "Bool"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 6 138 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 138 6 138 14 , SrcSpan "tests/examples/Directory.hs" 138 15 138 16 , SrcSpan "tests/examples/Directory.hs" 138 18 138 19 , SrcSpan "tests/examples/Directory.hs" 138 23 138 24 , SrcSpan "tests/examples/Directory.hs" 138 29 138 30 , SrcSpan "tests/examples/Directory.hs" 138 35 138 36 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 16 138 18 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 16 138 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 16 138 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 16 138 18 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 20 138 23 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 20 138 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 20 138 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 20 138 23 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 25 138 29 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 25 138 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 25 138 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 25 138 29 , srcInfoPoints = [] } "Read"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 31 138 35 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 31 138 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 31 138 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 138 31 138 35 , srcInfoPoints = [] } "Show"))) ] ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 1 152 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 152 16 152 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 1 152 15 , srcInfoPoints = [] } "getPermissions" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 19 152 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 152 28 152 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 19 152 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 19 152 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 19 152 27 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 31 152 45 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 31 152 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 31 152 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 31 152 33 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 34 152 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 34 152 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 152 34 152 45 , srcInfoPoints = [] } "Permissions"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 1 175 5 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 1 175 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 1 153 15 , srcInfoPoints = [] } "getPermissions") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 16 153 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 16 153 20 , srcInfoPoints = [] } "name") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 21 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 153 21 153 22 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 153 23 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 153 23 153 25 , SrcSpan "tests/examples/Directory.hs" 154 3 154 3 , SrcSpan "tests/examples/Directory.hs" 189 1 189 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 175 5 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 175 5 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 154 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 154 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 154 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 3 154 15 , srcInfoPoints = [] } "withFilePath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 16 154 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 16 154 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 16 154 20 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 21 154 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 21 154 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 21 154 22 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 23 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 154 23 154 24 , SrcSpan "tests/examples/Directory.hs" 154 26 154 28 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 24 154 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 24 154 25 , srcInfoPoints = [] } "s") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 154 29 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 154 29 154 31 , SrcSpan "tests/examples/Directory.hs" 161 3 161 3 , SrcSpan "tests/examples/Directory.hs" 161 3 161 3 , SrcSpan "tests/examples/Directory.hs" 189 1 189 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 175 5 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 175 5 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 161 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 161 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 161 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 3 161 14 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 15 161 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 15 161 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 15 161 26 , srcInfoPoints = [] } "sizeof_stat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 27 161 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 27 161 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 27 161 28 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 29 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 161 29 161 30 , SrcSpan "tests/examples/Directory.hs" 161 38 161 40 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 31 161 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 31 161 37 , srcInfoPoints = [] } "p_stat") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 161 41 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 161 41 161 43 , SrcSpan "tests/examples/Directory.hs" 162 3 162 3 , SrcSpan "tests/examples/Directory.hs" 162 3 162 3 , SrcSpan "tests/examples/Directory.hs" 163 3 163 3 , SrcSpan "tests/examples/Directory.hs" 164 3 164 3 , SrcSpan "tests/examples/Directory.hs" 165 3 165 3 , SrcSpan "tests/examples/Directory.hs" 166 3 166 3 , SrcSpan "tests/examples/Directory.hs" 167 3 167 3 , SrcSpan "tests/examples/Directory.hs" 168 3 168 3 , SrcSpan "tests/examples/Directory.hs" 189 1 189 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 57 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 3 162 22 , srcInfoPoints = [] } "throwErrnoIfMinus1_"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 23 162 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 23 162 39 , srcInfoPoints = [] } "getPermissions" "getPermissions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 40 162 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 40 162 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 40 162 41 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 42 162 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 42 162 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 42 162 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 42 162 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 42 162 48 , srcInfoPoints = [] } "c_stat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 49 162 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 49 162 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 49 162 50 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 51 162 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 51 162 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 162 51 162 57 , srcInfoPoints = [] } "p_stat"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 3 163 25 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 163 8 163 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 3 163 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 3 163 7 , srcInfoPoints = [] } "mode")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 11 163 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 11 163 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 11 163 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 11 163 18 , srcInfoPoints = [] } "st_mode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 19 163 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 19 163 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 163 19 163 25 , srcInfoPoints = [] } "p_stat")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 3 164 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 164 3 164 6 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 7 164 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 164 7 164 7 , SrcSpan "tests/examples/Directory.hs" 165 3 165 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 7 164 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 7 164 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 7 164 15 , srcInfoPoints = [] } "usr_read")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 18 164 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 164 18 164 19 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 20 164 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 20 164 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 20 164 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 20 164 24 , srcInfoPoints = [] } "mode"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 25 164 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 25 164 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 25 164 28 , srcInfoPoints = [] } ".&."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 29 164 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 29 164 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 164 29 164 36 , srcInfoPoints = [] } "s_IRUSR"))))) Nothing ]) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 3 165 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 165 3 165 6 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 7 165 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 165 7 165 7 , SrcSpan "tests/examples/Directory.hs" 166 3 166 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 7 165 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 7 165 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 7 165 16 , srcInfoPoints = [] } "usr_write")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 18 165 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 165 18 165 19 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 20 165 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 20 165 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 20 165 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 20 165 24 , srcInfoPoints = [] } "mode"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 25 165 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 25 165 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 25 165 28 , srcInfoPoints = [] } ".&."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 29 165 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 29 165 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 165 29 165 36 , srcInfoPoints = [] } "s_IWUSR"))))) Nothing ]) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 3 166 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 166 3 166 6 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 7 166 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 166 7 166 7 , SrcSpan "tests/examples/Directory.hs" 167 3 167 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 7 166 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 7 166 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 7 166 15 , srcInfoPoints = [] } "usr_exec")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 18 166 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 166 18 166 19 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 20 166 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 20 166 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 20 166 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 20 166 24 , srcInfoPoints = [] } "mode"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 25 166 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 25 166 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 25 166 28 , srcInfoPoints = [] } ".&."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 29 166 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 29 166 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 166 29 166 36 , srcInfoPoints = [] } "s_IXUSR"))))) Nothing ]) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 3 167 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 167 3 167 6 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 7 167 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 167 7 167 7 , SrcSpan "tests/examples/Directory.hs" 168 3 168 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 7 167 32 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 7 167 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 7 167 13 , srcInfoPoints = [] } "is_dir")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 14 167 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 167 14 167 15 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 16 167 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 16 167 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 16 167 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 16 167 20 , srcInfoPoints = [] } "mode"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 21 167 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 21 167 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 21 167 24 , srcInfoPoints = [] } ".&."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 25 167 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 25 167 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 167 25 167 32 , srcInfoPoints = [] } "s_IFDIR"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 3 175 5 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 3 175 5 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 3 168 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 3 168 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 3 168 9 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 168 10 175 5 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 168 10 168 11 , SrcSpan "tests/examples/Directory.hs" 175 4 175 5 ] } (RecConstr SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 169 5 174 6 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 169 17 169 18 , SrcSpan "tests/examples/Directory.hs" 170 34 170 35 , SrcSpan "tests/examples/Directory.hs" 171 34 171 35 , SrcSpan "tests/examples/Directory.hs" 172 48 172 49 , SrcSpan "tests/examples/Directory.hs" 174 5 174 6 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 169 5 169 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 169 5 169 16 , srcInfoPoints = [] } "Permissions")) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 7 170 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 170 18 170 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 7 170 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 7 170 15 , srcInfoPoints = [] } "readable")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 20 170 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 20 170 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 20 170 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 20 170 28 , srcInfoPoints = [] } "usr_read"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 30 170 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 30 170 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 30 170 32 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 33 170 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 170 33 170 34 , srcInfoPoints = [] } 0 "0"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 7 171 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 171 18 171 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 7 171 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 7 171 15 , srcInfoPoints = [] } "writable")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 20 171 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 20 171 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 20 171 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 20 171 29 , srcInfoPoints = [] } "usr_write"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 30 171 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 30 171 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 30 171 32 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 33 171 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 171 33 171 34 , srcInfoPoints = [] } 0 "0"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 7 172 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 172 18 172 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 7 172 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 7 172 17 , srcInfoPoints = [] } "executable")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 20 172 48 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 20 172 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 20 172 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 20 172 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 20 172 26 , srcInfoPoints = [] } "is_dir"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 27 172 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 27 172 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 27 172 29 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 30 172 31 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 30 172 31 , srcInfoPoints = [] } 0 "0"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 32 172 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 32 172 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 32 172 34 , srcInfoPoints = [] } "&&"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 35 172 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 35 172 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 35 172 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 35 172 43 , srcInfoPoints = [] } "usr_exec"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 44 172 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 44 172 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 44 172 46 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 47 172 48 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 172 47 172 48 , srcInfoPoints = [] } 0 "0")))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 7 173 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 173 18 173 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 7 173 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 7 173 17 , srcInfoPoints = [] } "searchable")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 20 173 48 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 20 173 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 20 173 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 20 173 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 20 173 26 , srcInfoPoints = [] } "is_dir"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 27 173 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 27 173 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 27 173 29 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 30 173 31 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 30 173 31 , srcInfoPoints = [] } 0 "0"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 32 173 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 32 173 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 32 173 34 , srcInfoPoints = [] } "&&"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 35 173 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 35 173 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 35 173 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 35 173 43 , srcInfoPoints = [] } "usr_exec"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 44 173 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 44 173 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 44 173 46 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 47 173 48 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 173 47 173 48 , srcInfoPoints = [] } 0 "0")))) ]))) ]))) ]))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 1 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 16 189 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 1 189 15 , srcInfoPoints = [] } "setPermissions" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 19 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 28 189 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 19 189 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 19 189 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 19 189 27 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 31 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 43 189 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 31 189 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 31 189 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 31 189 42 , srcInfoPoints = [] } "Permissions"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 46 189 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 46 189 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 46 189 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 46 189 48 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 49 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 49 189 50 , SrcSpan "tests/examples/Directory.hs" 189 50 189 51 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 49 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 49 189 50 , SrcSpan "tests/examples/Directory.hs" 189 50 189 51 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 189 49 189 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 189 49 189 50 , SrcSpan "tests/examples/Directory.hs" 189 50 189 51 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 1 203 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 200 2 200 7 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 1 203 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 200 2 200 7 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 1 190 15 , srcInfoPoints = [] } "setPermissions") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 16 190 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 16 190 20 , srcInfoPoints = [] } "name") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 21 190 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 190 21 190 22 , SrcSpan "tests/examples/Directory.hs" 190 41 190 42 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 22 190 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 22 190 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 22 190 33 , srcInfoPoints = [] } "Permissions")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 34 190 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 34 190 35 , srcInfoPoints = [] } "r") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 36 190 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 36 190 37 , srcInfoPoints = [] } "w") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 38 190 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 38 190 39 , srcInfoPoints = [] } "e") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 40 190 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 40 190 41 , srcInfoPoints = [] } "s") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 43 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 190 43 190 44 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 190 45 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 190 45 190 47 , SrcSpan "tests/examples/Directory.hs" 191 3 191 3 , SrcSpan "tests/examples/Directory.hs" 200 2 200 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 199 28 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 199 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 191 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 191 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 191 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 3 191 14 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 15 191 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 15 191 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 15 191 26 , srcInfoPoints = [] } "sizeof_stat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 27 191 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 27 191 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 27 191 28 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 29 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 191 29 191 30 , SrcSpan "tests/examples/Directory.hs" 191 38 191 40 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 31 191 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 31 191 37 , srcInfoPoints = [] } "p_stat") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 191 41 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 191 41 191 43 , SrcSpan "tests/examples/Directory.hs" 192 3 192 3 , SrcSpan "tests/examples/Directory.hs" 192 3 192 3 , SrcSpan "tests/examples/Directory.hs" 200 2 200 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 199 28 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 199 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 192 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 192 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 192 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 3 192 15 , srcInfoPoints = [] } "withFilePath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 16 192 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 16 192 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 16 192 20 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 21 192 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 21 192 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 21 192 22 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 23 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 192 23 192 24 , SrcSpan "tests/examples/Directory.hs" 192 31 192 33 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 24 192 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 24 192 30 , srcInfoPoints = [] } "p_name") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 192 34 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 192 34 192 36 , SrcSpan "tests/examples/Directory.hs" 193 5 193 5 , SrcSpan "tests/examples/Directory.hs" 200 2 200 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 199 28 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 199 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 193 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 193 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 193 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 5 193 24 , srcInfoPoints = [] } "throwErrnoIfMinus1_"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 25 193 41 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 25 193 41 , srcInfoPoints = [] } "setPermissions" "setPermissions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 42 193 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 42 193 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 42 193 43 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 193 44 199 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 193 44 193 46 , SrcSpan "tests/examples/Directory.hs" 194 7 194 7 , SrcSpan "tests/examples/Directory.hs" 195 7 195 7 , SrcSpan "tests/examples/Directory.hs" 196 7 196 7 , SrcSpan "tests/examples/Directory.hs" 197 7 197 7 , SrcSpan "tests/examples/Directory.hs" 198 7 198 7 , SrcSpan "tests/examples/Directory.hs" 199 7 199 7 , SrcSpan "tests/examples/Directory.hs" 200 2 200 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 7 194 13 , srcInfoPoints = [] } "c_stat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 14 194 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 14 194 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 14 194 20 , srcInfoPoints = [] } "p_name")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 21 194 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 21 194 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 194 21 194 27 , srcInfoPoints = [] } "p_stat")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 7 195 29 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 195 12 195 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 7 195 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 7 195 11 , srcInfoPoints = [] } "mode")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 15 195 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 15 195 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 15 195 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 15 195 22 , srcInfoPoints = [] } "st_mode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 23 195 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 23 195 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 195 23 195 29 , srcInfoPoints = [] } "p_stat")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 7 196 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 196 7 196 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 11 196 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 196 11 196 11 , SrcSpan "tests/examples/Directory.hs" 197 7 197 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 11 196 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 11 196 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 11 196 16 , srcInfoPoints = [] } "mode1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 17 196 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 196 17 196 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 19 196 28 , srcInfoPoints = [] } "modifyBit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 29 196 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 29 196 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 29 196 30 , srcInfoPoints = [] } "r")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 31 196 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 31 196 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 31 196 35 , srcInfoPoints = [] } "mode")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 36 196 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 36 196 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 196 36 196 43 , srcInfoPoints = [] } "s_IRUSR"))))) Nothing ]) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 7 197 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 197 7 197 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 11 197 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 197 11 197 11 , SrcSpan "tests/examples/Directory.hs" 198 7 198 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 11 197 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 11 197 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 11 197 16 , srcInfoPoints = [] } "mode2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 17 197 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 197 17 197 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 19 197 28 , srcInfoPoints = [] } "modifyBit"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 29 197 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 29 197 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 29 197 30 , srcInfoPoints = [] } "w")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 31 197 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 31 197 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 31 197 36 , srcInfoPoints = [] } "mode1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 37 197 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 37 197 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 197 37 197 44 , srcInfoPoints = [] } "s_IWUSR"))))) Nothing ]) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 7 198 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 198 7 198 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 11 198 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 198 11 198 11 , SrcSpan "tests/examples/Directory.hs" 199 7 199 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 11 198 51 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 11 198 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 11 198 16 , srcInfoPoints = [] } "mode3")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 17 198 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 198 17 198 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 19 198 28 , srcInfoPoints = [] } "modifyBit"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 29 198 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 198 29 198 30 , SrcSpan "tests/examples/Directory.hs" 198 36 198 37 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 30 198 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 30 198 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 30 198 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 30 198 31 , srcInfoPoints = [] } "e"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 32 198 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 32 198 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 32 198 34 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 35 198 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 35 198 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 35 198 36 , srcInfoPoints = [] } "s")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 38 198 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 38 198 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 38 198 43 , srcInfoPoints = [] } "mode2")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 44 198 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 44 198 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 198 44 198 51 , srcInfoPoints = [] } "s_IXUSR"))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 7 199 15 , srcInfoPoints = [] } "c_wchmod"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 16 199 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 16 199 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 16 199 22 , srcInfoPoints = [] } "p_name")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 23 199 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 23 199 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 199 23 199 28 , srcInfoPoints = [] } "mode3")))) ])) ]))) ]))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 4 203 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 201 4 201 4 , SrcSpan "tests/examples/Directory.hs" 202 4 202 4 , SrcSpan "tests/examples/Directory.hs" 203 4 203 4 , SrcSpan "tests/examples/Directory.hs" 205 1 205 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 4 201 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 201 14 201 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 4 201 13 , srcInfoPoints = [] } "modifyBit" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 17 201 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 201 22 201 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 17 201 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 17 201 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 17 201 21 , srcInfoPoints = [] } "Bool"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 25 201 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 201 31 201 33 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 25 201 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 25 201 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 25 201 30 , srcInfoPoints = [] } "CMode"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 34 201 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 201 40 201 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 34 201 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 34 201 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 34 201 39 , srcInfoPoints = [] } "CMode"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 43 201 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 43 201 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 201 43 201 48 , srcInfoPoints = [] } "CMode")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 4 203 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 4 202 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 4 202 13 , srcInfoPoints = [] } "modifyBit") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 14 202 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 14 202 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 14 202 19 , srcInfoPoints = [] } "False")) [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 20 202 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 20 202 21 , srcInfoPoints = [] } "m") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 22 202 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 22 202 23 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 24 202 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 202 24 202 25 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 26 202 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 26 202 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 26 202 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 26 202 27 , srcInfoPoints = [] } "m"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 28 202 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 28 202 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 28 202 31 , srcInfoPoints = [] } ".&."))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 32 202 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 202 32 202 33 , SrcSpan "tests/examples/Directory.hs" 202 45 202 46 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 33 202 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 33 202 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 33 202 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 33 202 43 , srcInfoPoints = [] } "complement"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 44 202 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 44 202 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 202 44 202 45 , srcInfoPoints = [] } "b"))))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 4 203 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 4 203 13 , srcInfoPoints = [] } "modifyBit") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 14 203 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 14 203 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 14 203 18 , srcInfoPoints = [] } "True")) [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 20 203 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 20 203 21 , srcInfoPoints = [] } "m") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 22 203 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 22 203 23 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 24 203 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 203 24 203 25 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 26 203 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 26 203 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 26 203 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 26 203 27 , srcInfoPoints = [] } "m"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 28 203 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 28 203 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 28 203 31 , srcInfoPoints = [] } ".|."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 32 203 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 32 203 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 203 32 203 33 , srcInfoPoints = [] } "b"))))) Nothing ] ])) ] , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 205 1 206 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 205 1 205 8 , SrcSpan "tests/examples/Directory.hs" 205 9 205 15 , SrcSpan "tests/examples/Directory.hs" 205 29 205 38 , SrcSpan "tests/examples/Directory.hs" 206 13 206 15 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 205 16 205 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 205 22 205 28 , srcInfoPoints = [] })) (Just "_wchmod") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 4 206 12 , srcInfoPoints = [] } "c_wchmod") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 16 206 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 206 25 206 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 16 206 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 16 206 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 16 206 24 , srcInfoPoints = [] } "CWString"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 28 206 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 206 34 206 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 28 206 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 28 206 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 28 206 33 , srcInfoPoints = [] } "CMode"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 37 206 44 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 37 206 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 37 206 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 37 206 39 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 40 206 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 40 206 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 206 40 206 44 , srcInfoPoints = [] } "CInt")))))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 1 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 17 208 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 1 208 16 , srcInfoPoints = [] } "copyPermissions" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 20 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 29 208 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 20 208 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 20 208 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 20 208 28 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 32 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 41 208 43 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 32 208 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 32 208 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 32 208 40 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 44 208 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 44 208 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 44 208 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 44 208 46 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 47 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 47 208 48 , SrcSpan "tests/examples/Directory.hs" 208 48 208 49 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 47 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 47 208 48 , SrcSpan "tests/examples/Directory.hs" 208 48 208 49 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 208 47 208 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 208 47 208 48 , SrcSpan "tests/examples/Directory.hs" 208 48 208 49 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 1 215 65 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 1 215 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 1 209 16 , srcInfoPoints = [] } "copyPermissions") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 17 209 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 17 209 23 , srcInfoPoints = [] } "source") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 24 209 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 24 209 28 , srcInfoPoints = [] } "dest") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 29 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 209 29 209 30 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 209 31 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 209 31 209 33 , SrcSpan "tests/examples/Directory.hs" 210 3 210 3 , SrcSpan "tests/examples/Directory.hs" 257 1 257 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 215 65 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 215 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 210 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 210 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 210 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 3 210 14 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 15 210 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 15 210 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 15 210 26 , srcInfoPoints = [] } "sizeof_stat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 27 210 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 27 210 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 27 210 28 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 29 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 210 29 210 30 , SrcSpan "tests/examples/Directory.hs" 210 38 210 40 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 31 210 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 31 210 37 , srcInfoPoints = [] } "p_stat") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 210 41 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 210 41 210 43 , SrcSpan "tests/examples/Directory.hs" 211 3 211 3 , SrcSpan "tests/examples/Directory.hs" 211 3 211 3 , SrcSpan "tests/examples/Directory.hs" 257 1 257 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 215 65 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 215 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 211 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 211 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 211 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 3 211 15 , srcInfoPoints = [] } "withFilePath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 16 211 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 16 211 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 16 211 22 , srcInfoPoints = [] } "source")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 23 211 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 23 211 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 23 211 24 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 25 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 211 25 211 26 , SrcSpan "tests/examples/Directory.hs" 211 35 211 37 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 26 211 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 26 211 34 , srcInfoPoints = [] } "p_source") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 211 38 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 211 38 211 40 , SrcSpan "tests/examples/Directory.hs" 212 3 212 3 , SrcSpan "tests/examples/Directory.hs" 212 3 212 3 , SrcSpan "tests/examples/Directory.hs" 257 1 257 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 215 65 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 215 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 212 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 212 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 212 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 3 212 15 , srcInfoPoints = [] } "withFilePath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 16 212 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 16 212 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 16 212 20 , srcInfoPoints = [] } "dest")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 21 212 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 21 212 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 21 212 22 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 23 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 212 23 212 24 , SrcSpan "tests/examples/Directory.hs" 212 31 212 33 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 24 212 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 24 212 30 , srcInfoPoints = [] } "p_dest") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 212 34 215 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 212 34 212 36 , SrcSpan "tests/examples/Directory.hs" 213 5 213 5 , SrcSpan "tests/examples/Directory.hs" 214 5 214 5 , SrcSpan "tests/examples/Directory.hs" 215 5 215 5 , SrcSpan "tests/examples/Directory.hs" 257 1 257 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 67 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 5 213 24 , srcInfoPoints = [] } "throwErrnoIfMinus1_"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 25 213 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 25 213 42 , srcInfoPoints = [] } "copyPermissions" "copyPermissions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 43 213 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 43 213 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 43 213 44 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 45 213 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 45 213 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 45 213 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 45 213 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 45 213 51 , srcInfoPoints = [] } "c_stat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 52 213 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 52 213 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 52 213 60 , srcInfoPoints = [] } "p_source")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 61 213 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 61 213 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 213 61 213 67 , srcInfoPoints = [] } "p_stat"))))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 5 214 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 214 10 214 12 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 5 214 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 5 214 9 , srcInfoPoints = [] } "mode")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 13 214 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 13 214 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 13 214 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 13 214 20 , srcInfoPoints = [] } "st_mode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 21 214 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 21 214 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 214 21 214 27 , srcInfoPoints = [] } "p_stat")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 65 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 5 215 24 , srcInfoPoints = [] } "throwErrnoIfMinus1_"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 25 215 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 25 215 42 , srcInfoPoints = [] } "copyPermissions" "copyPermissions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 43 215 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 43 215 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 43 215 44 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 45 215 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 45 215 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 45 215 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 45 215 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 45 215 53 , srcInfoPoints = [] } "c_wchmod"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 54 215 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 54 215 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 54 215 60 , srcInfoPoints = [] } "p_dest")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 61 215 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 61 215 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 215 61 215 65 , srcInfoPoints = [] } "mode"))))) ]))) ]))) ]))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 1 257 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 257 17 257 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 1 257 16 , srcInfoPoints = [] } "createDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 20 257 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 257 29 257 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 20 257 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 20 257 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 20 257 28 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 32 257 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 32 257 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 32 257 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 32 257 34 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 35 257 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 257 35 257 36 , SrcSpan "tests/examples/Directory.hs" 257 36 257 37 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 35 257 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 257 35 257 36 , SrcSpan "tests/examples/Directory.hs" 257 36 257 37 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 257 35 257 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 257 35 257 36 , SrcSpan "tests/examples/Directory.hs" 257 36 257 37 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 1 259 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 1 259 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 1 258 16 , srcInfoPoints = [] } "createDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 17 258 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 17 258 21 , srcInfoPoints = [] } "path") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 22 259 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 258 22 258 23 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 258 24 259 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 258 24 258 26 , SrcSpan "tests/examples/Directory.hs" 259 3 259 3 , SrcSpan "tests/examples/Directory.hs" 264 1 264 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 24 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 3 259 24 , srcInfoPoints = [] } "createDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 25 259 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 25 259 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 25 259 29 , srcInfoPoints = [] } "path")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 30 259 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 30 259 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 259 30 259 37 , srcInfoPoints = [] } "Nothing")))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 1 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 264 26 264 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 1 264 25 , srcInfoPoints = [] } "createDirectoryIfMissing" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 29 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 265 18 265 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 29 264 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 29 264 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 264 29 264 33 , srcInfoPoints = [] } "Bool"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 265 21 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 266 18 266 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 265 21 265 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 265 21 265 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 265 21 265 29 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 21 266 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 21 266 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 21 266 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 21 266 23 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 24 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 266 24 266 25 , SrcSpan "tests/examples/Directory.hs" 266 25 266 26 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 24 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 266 24 266 25 , SrcSpan "tests/examples/Directory.hs" 266 25 266 26 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 266 24 266 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 266 24 266 25 , SrcSpan "tests/examples/Directory.hs" 266 25 266 26 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 1 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 270 3 270 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 1 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 270 3 270 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 1 267 25 , srcInfoPoints = [] } "createDirectoryIfMissing") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 26 267 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 26 267 40 , srcInfoPoints = [] } "create_parents") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 41 267 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 267 41 267 46 , srcInfoPoints = [] } "path0") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 3 269 57 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 3 268 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 268 3 268 4 , SrcSpan "tests/examples/Directory.hs" 268 20 268 21 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 5 268 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 5 268 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 5 268 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 5 268 19 , srcInfoPoints = [] } "create_parents"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 22 268 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 22 268 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 22 268 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 22 268 32 , srcInfoPoints = [] } "createDirs"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 33 268 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 268 33 268 34 , SrcSpan "tests/examples/Directory.hs" 268 47 268 48 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 34 268 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 34 268 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 34 268 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 34 268 41 , srcInfoPoints = [] } "parents"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 42 268 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 42 268 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 268 42 268 47 , srcInfoPoints = [] } "path0")))))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 3 269 57 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 269 3 269 4 , SrcSpan "tests/examples/Directory.hs" 269 20 269 21 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 5 269 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 5 269 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 5 269 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 5 269 14 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 22 269 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 22 269 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 22 269 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 22 269 32 , srcInfoPoints = [] } "createDirs"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 33 269 57 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 269 33 269 34 , SrcSpan "tests/examples/Directory.hs" 269 56 269 57 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 34 269 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 34 269 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 34 269 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 34 269 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 34 269 38 , srcInfoPoints = [] } "take"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 39 269 40 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 39 269 40 , srcInfoPoints = [] } 1 "1"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 41 269 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 269 41 269 42 , SrcSpan "tests/examples/Directory.hs" 269 55 269 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 42 269 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 42 269 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 42 269 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 42 269 49 , srcInfoPoints = [] } "parents"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 50 269 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 50 269 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 269 50 269 55 , srcInfoPoints = [] } "path0")))))))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 5 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 271 5 271 5 , SrcSpan "tests/examples/Directory.hs" 273 5 273 5 , SrcSpan "tests/examples/Directory.hs" 274 5 274 5 , SrcSpan "tests/examples/Directory.hs" 275 5 275 5 , SrcSpan "tests/examples/Directory.hs" 280 5 280 5 , SrcSpan "tests/examples/Directory.hs" 281 5 281 5 , SrcSpan "tests/examples/Directory.hs" 343 1 343 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 5 271 68 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 5 271 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 5 271 12 , srcInfoPoints = [] } "parents")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 13 271 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 271 13 271 14 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 15 271 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 15 271 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 15 271 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 15 271 22 , srcInfoPoints = [] } "reverse"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 23 271 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 23 271 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 23 271 24 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 25 271 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 25 271 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 25 271 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 25 271 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 25 271 31 , srcInfoPoints = [] } "scanl1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 32 271 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 271 32 271 33 , SrcSpan "tests/examples/Directory.hs" 271 33 271 36 , SrcSpan "tests/examples/Directory.hs" 271 36 271 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 32 271 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 271 32 271 33 , SrcSpan "tests/examples/Directory.hs" 271 33 271 36 , SrcSpan "tests/examples/Directory.hs" 271 36 271 37 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 33 271 36 , srcInfoPoints = [] } "")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 38 271 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 38 271 39 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 38 271 39 , srcInfoPoints = [] } "."))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 40 271 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 40 271 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 40 271 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 40 271 56 , srcInfoPoints = [] } "splitDirectories"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 57 271 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 57 271 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 57 271 58 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 59 271 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 59 271 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 271 59 271 68 , srcInfoPoints = [] } "normalise"))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 5 278 28 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 5 273 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 5 273 15 , srcInfoPoints = [] } "createDirs") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 16 273 18 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 273 16 273 17 , SrcSpan "tests/examples/Directory.hs" 273 17 273 18 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 27 273 38 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 273 27 273 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 29 273 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 29 273 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 29 273 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 29 273 35 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 36 273 38 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 273 36 273 37 , SrcSpan "tests/examples/Directory.hs" 273 37 273 38 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 36 273 38 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 273 36 273 37 , SrcSpan "tests/examples/Directory.hs" 273 37 273 38 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 273 36 273 38 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 273 36 273 37 , SrcSpan "tests/examples/Directory.hs" 273 37 273 38 ] }))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 5 274 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 5 274 15 , srcInfoPoints = [] } "createDirs") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 16 274 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 274 16 274 17 , SrcSpan "tests/examples/Directory.hs" 274 23 274 24 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 17 274 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 17 274 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 17 274 20 , srcInfoPoints = [] } "dir")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 20 274 21 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 20 274 21 , srcInfoPoints = [] })) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 21 274 23 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 274 21 274 22 , SrcSpan "tests/examples/Directory.hs" 274 22 274 23 ] } [])) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 27 274 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 274 27 274 28 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 29 274 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 29 274 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 29 274 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 29 274 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 29 274 38 , srcInfoPoints = [] } "createDir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 39 274 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 39 274 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 39 274 42 , srcInfoPoints = [] } "dir")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 43 274 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 43 274 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 274 43 274 48 , srcInfoPoints = [] } "throw"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 5 278 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 5 275 15 , srcInfoPoints = [] } "createDirs") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 16 275 26 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 275 16 275 17 , SrcSpan "tests/examples/Directory.hs" 275 25 275 26 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 17 275 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 17 275 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 17 275 20 , srcInfoPoints = [] } "dir")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 20 275 21 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 20 275 21 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 21 275 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 21 275 25 , srcInfoPoints = [] } "dirs"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 275 27 278 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 275 27 275 28 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 7 278 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 7 276 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 7 276 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 7 276 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 7 276 16 , srcInfoPoints = [] } "createDir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 17 276 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 17 276 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 17 276 20 , srcInfoPoints = [] } "dir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 21 276 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 21 276 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 21 276 22 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 23 278 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 276 23 276 24 , SrcSpan "tests/examples/Directory.hs" 276 26 276 28 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 24 276 25 , srcInfoPoints = [] } ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 276 29 278 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 276 29 276 31 , SrcSpan "tests/examples/Directory.hs" 277 9 277 9 , SrcSpan "tests/examples/Directory.hs" 278 9 278 9 , SrcSpan "tests/examples/Directory.hs" 280 5 280 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 9 277 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 9 277 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 9 277 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 9 277 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 9 277 19 , srcInfoPoints = [] } "createDirs"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 20 277 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 20 277 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 277 20 277 24 , srcInfoPoints = [] } "dirs")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 9 278 18 , srcInfoPoints = [] } "createDir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 19 278 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 19 278 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 19 278 22 , srcInfoPoints = [] } "dir")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 23 278 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 23 278 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 278 23 278 28 , srcInfoPoints = [] } "throw")))) ])))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 5 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 15 280 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 5 280 14 , srcInfoPoints = [] } "createDir" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 18 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 27 280 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 18 280 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 18 280 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 18 280 26 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 30 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 53 280 55 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 30 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 30 280 31 , SrcSpan "tests/examples/Directory.hs" 280 51 280 52 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 31 280 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 43 280 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 31 280 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 31 280 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 31 280 42 , srcInfoPoints = [] } "IOException"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 46 280 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 46 280 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 46 280 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 46 280 48 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 49 280 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 49 280 50 , SrcSpan "tests/examples/Directory.hs" 280 50 280 51 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 49 280 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 49 280 50 , SrcSpan "tests/examples/Directory.hs" 280 50 280 51 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 49 280 51 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 49 280 50 , SrcSpan "tests/examples/Directory.hs" 280 50 280 51 ] })))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 56 280 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 56 280 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 56 280 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 56 280 58 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 59 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 59 280 60 , SrcSpan "tests/examples/Directory.hs" 280 60 280 61 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 59 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 59 280 60 , SrcSpan "tests/examples/Directory.hs" 280 60 280 61 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 280 59 280 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 280 59 280 60 , SrcSpan "tests/examples/Directory.hs" 280 60 280 61 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 5 300 46 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 5 300 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 5 281 14 , srcInfoPoints = [] } "createDir") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 15 281 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 15 281 18 , srcInfoPoints = [] } "dir") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 19 281 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 19 281 34 , srcInfoPoints = [] } "notExistHandler") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 35 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 281 35 281 36 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 281 37 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 281 37 281 39 , SrcSpan "tests/examples/Directory.hs" 282 7 282 7 , SrcSpan "tests/examples/Directory.hs" 283 7 283 7 , SrcSpan "tests/examples/Directory.hs" 343 1 343 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 7 282 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 282 9 282 11 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 7 282 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 7 282 8 , srcInfoPoints = [] } "r")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 12 282 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 12 282 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 12 282 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 12 282 15 , srcInfoPoints = [] } "try"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 16 282 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 16 282 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 16 282 17 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 18 282 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 18 282 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 18 282 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 18 282 33 , srcInfoPoints = [] } "createDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 34 282 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 34 282 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 282 34 282 37 , srcInfoPoints = [] } "dir"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 7 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 7 283 11 , SrcSpan "tests/examples/Directory.hs" 283 41 283 43 , SrcSpan "tests/examples/Directory.hs" 284 9 284 9 , SrcSpan "tests/examples/Directory.hs" 285 9 285 9 , SrcSpan "tests/examples/Directory.hs" 343 1 343 0 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 7 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 7 283 11 , SrcSpan "tests/examples/Directory.hs" 283 41 283 43 , SrcSpan "tests/examples/Directory.hs" 284 9 284 9 , SrcSpan "tests/examples/Directory.hs" 285 9 285 9 , SrcSpan "tests/examples/Directory.hs" 343 1 343 0 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 12 283 40 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 12 283 13 , SrcSpan "tests/examples/Directory.hs" 283 39 283 40 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 13 283 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 15 283 17 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 13 283 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 13 283 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 13 283 14 , srcInfoPoints = [] } "r"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 18 283 39 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 18 283 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 18 283 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 18 283 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 18 283 24 , srcInfoPoints = [] } "Either"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 25 283 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 25 283 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 25 283 36 , srcInfoPoints = [] } "IOException")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 37 283 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 37 283 38 , SrcSpan "tests/examples/Directory.hs" 283 38 283 39 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 37 283 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 37 283 38 , SrcSpan "tests/examples/Directory.hs" 283 38 283 39 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 283 37 283 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 283 37 283 38 , SrcSpan "tests/examples/Directory.hs" 283 38 283 39 ] })))))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 9 284 48 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 9 284 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 9 284 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 9 284 14 , srcInfoPoints = [] } "Right")) [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 15 284 17 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 15 284 16 , SrcSpan "tests/examples/Directory.hs" 284 16 284 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 15 284 17 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 15 284 16 , SrcSpan "tests/examples/Directory.hs" 284 16 284 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 15 284 17 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 15 284 16 , SrcSpan "tests/examples/Directory.hs" 284 16 284 17 ] })) [] ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 36 284 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 36 284 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 39 284 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 39 284 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 39 284 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 39 284 45 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 46 284 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 46 284 47 , SrcSpan "tests/examples/Directory.hs" 284 47 284 48 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 46 284 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 46 284 47 , SrcSpan "tests/examples/Directory.hs" 284 47 284 48 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 284 46 284 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 284 46 284 47 , SrcSpan "tests/examples/Directory.hs" 284 47 284 48 ] }))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 9 300 46 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 9 285 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 9 285 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 9 285 13 , srcInfoPoints = [] } "Left")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 15 285 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 285 15 285 16 , srcInfoPoints = [] } "e") ]) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 11 300 46 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 11 286 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 286 11 286 12 , SrcSpan "tests/examples/Directory.hs" 286 36 286 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 13 286 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 13 286 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 13 286 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 13 286 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 13 286 32 , srcInfoPoints = [] } "isDoesNotExistError"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 34 286 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 34 286 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 34 286 35 , srcInfoPoints = [] } "e")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 39 286 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 39 286 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 39 286 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 39 286 54 , srcInfoPoints = [] } "notExistHandler"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 55 286 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 55 286 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 286 55 286 56 , srcInfoPoints = [] } "e")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 11 299 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 294 11 294 12 , SrcSpan "tests/examples/Directory.hs" 294 36 294 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 13 294 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 13 294 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 13 294 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 13 294 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 13 294 33 , srcInfoPoints = [] } "isAlreadyExistsError"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 34 294 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 34 294 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 34 294 35 , srcInfoPoints = [] } "e")))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 39 299 68 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 39 299 16 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 294 39 294 40 , SrcSpan "tests/examples/Directory.hs" 299 15 299 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 294 40 298 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 294 40 294 42 , SrcSpan "tests/examples/Directory.hs" 295 15 295 15 , SrcSpan "tests/examples/Directory.hs" 299 15 299 15 , SrcSpan "tests/examples/Directory.hs" 299 15 299 15 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 298 39 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 298 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 295 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 295 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 295 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 295 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 15 295 29 , srcInfoPoints = [] } "withFileStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 30 295 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 30 295 56 , srcInfoPoints = [] } "createDirectoryIfMissing" "createDirectoryIfMissing"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 57 295 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 57 295 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 57 295 60 , srcInfoPoints = [] } "dir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 61 295 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 61 295 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 61 295 62 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 63 298 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 295 63 295 64 , SrcSpan "tests/examples/Directory.hs" 295 67 295 69 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 64 295 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 64 295 66 , srcInfoPoints = [] } "st") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 295 70 298 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 295 70 295 72 , SrcSpan "tests/examples/Directory.hs" 296 18 296 18 , SrcSpan "tests/examples/Directory.hs" 297 18 297 18 , SrcSpan "tests/examples/Directory.hs" 299 15 299 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 18 296 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 296 24 296 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 18 296 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 18 296 23 , srcInfoPoints = [] } "isDir")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 27 296 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 27 296 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 27 296 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 27 296 38 , srcInfoPoints = [] } "isDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 39 296 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 39 296 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 296 39 296 41 , srcInfoPoints = [] } "st")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 18 298 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 297 18 297 20 , SrcSpan "tests/examples/Directory.hs" 297 27 297 31 , SrcSpan "tests/examples/Directory.hs" 298 27 298 31 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 18 298 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 297 18 297 20 , SrcSpan "tests/examples/Directory.hs" 297 27 297 31 , SrcSpan "tests/examples/Directory.hs" 298 27 298 31 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 21 297 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 21 297 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 21 297 26 , srcInfoPoints = [] } "isDir"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 32 297 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 32 297 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 32 297 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 32 297 38 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 39 297 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 297 39 297 40 , SrcSpan "tests/examples/Directory.hs" 297 40 297 41 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 39 297 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 297 39 297 40 , SrcSpan "tests/examples/Directory.hs" 297 40 297 41 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 297 39 297 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 297 39 297 40 , SrcSpan "tests/examples/Directory.hs" 297 40 297 41 ] })))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 32 298 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 32 298 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 32 298 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 32 298 37 , srcInfoPoints = [] } "throw"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 38 298 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 38 298 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 298 38 298 39 , srcInfoPoints = [] } "e"))))) ]))) ])) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 17 299 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 17 299 18 , SrcSpan "tests/examples/Directory.hs" 299 18 299 23 , SrcSpan "tests/examples/Directory.hs" 299 23 299 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 17 299 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 17 299 18 , SrcSpan "tests/examples/Directory.hs" 299 18 299 23 , SrcSpan "tests/examples/Directory.hs" 299 23 299 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 18 299 23 , srcInfoPoints = [] } "catch"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 25 299 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 25 299 26 , SrcSpan "tests/examples/Directory.hs" 299 67 299 68 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 26 299 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 44 299 46 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 26 299 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 26 299 27 , SrcSpan "tests/examples/Directory.hs" 299 42 299 43 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 27 299 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 27 299 28 , SrcSpan "tests/examples/Directory.hs" 299 30 299 32 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 28 299 29 , srcInfoPoints = [] } ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 33 299 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 33 299 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 33 299 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 33 299 39 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 40 299 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 40 299 41 , SrcSpan "tests/examples/Directory.hs" 299 41 299 42 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 40 299 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 40 299 41 , SrcSpan "tests/examples/Directory.hs" 299 41 299 42 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 40 299 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 40 299 41 , SrcSpan "tests/examples/Directory.hs" 299 41 299 42 ] })))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 47 299 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 59 299 61 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 47 299 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 47 299 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 47 299 58 , srcInfoPoints = [] } "IOException"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 62 299 67 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 62 299 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 62 299 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 62 299 64 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 65 299 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 65 299 66 , SrcSpan "tests/examples/Directory.hs" 299 66 299 67 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 65 299 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 65 299 66 , SrcSpan "tests/examples/Directory.hs" 299 66 299 67 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 299 65 299 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 299 65 299 66 , SrcSpan "tests/examples/Directory.hs" 299 66 299 67 ] })))))))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 11 300 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 300 11 300 12 , SrcSpan "tests/examples/Directory.hs" 300 36 300 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 13 300 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 13 300 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 13 300 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 13 300 22 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 39 300 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 39 300 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 39 300 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 39 300 44 , srcInfoPoints = [] } "throw"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 45 300 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 45 300 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 300 45 300 46 , srcInfoPoints = [] } "e")))) ]) Nothing ]) ])) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 1 343 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 343 17 343 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 1 343 16 , srcInfoPoints = [] } "removeDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 20 343 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 343 29 343 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 20 343 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 20 343 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 20 343 28 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 32 343 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 32 343 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 32 343 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 32 343 34 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 35 343 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 343 35 343 36 , SrcSpan "tests/examples/Directory.hs" 343 36 343 37 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 35 343 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 343 35 343 36 , SrcSpan "tests/examples/Directory.hs" 343 36 343 37 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 343 35 343 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 343 35 343 36 , SrcSpan "tests/examples/Directory.hs" 343 36 343 37 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 1 345 29 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 1 345 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 1 344 16 , srcInfoPoints = [] } "removeDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 17 344 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 17 344 21 , srcInfoPoints = [] } "path") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 344 22 345 29 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 344 22 344 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 3 345 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 3 345 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 3 345 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 3 345 24 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 3 345 24 , srcInfoPoints = [] } "removeDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 25 345 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 25 345 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 345 25 345 29 , srcInfoPoints = [] } "path"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 1 350 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 350 26 350 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 1 350 25 , srcInfoPoints = [] } "removeDirectoryRecursive" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 29 350 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 350 38 350 40 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 29 350 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 29 350 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 29 350 37 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 41 350 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 41 350 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 41 350 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 41 350 43 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 44 350 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 350 44 350 45 , SrcSpan "tests/examples/Directory.hs" 350 45 350 46 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 44 350 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 350 44 350 45 , SrcSpan "tests/examples/Directory.hs" 350 45 350 46 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 350 44 350 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 350 44 350 45 , SrcSpan "tests/examples/Directory.hs" 350 45 350 46 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 1 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 355 3 355 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 1 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 355 3 355 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 1 351 25 , srcInfoPoints = [] } "removeDirectoryRecursive") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 26 351 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 26 351 34 , srcInfoPoints = [] } "startLoc") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 35 354 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 351 35 351 36 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 351 37 354 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 351 37 351 39 , SrcSpan "tests/examples/Directory.hs" 352 3 352 3 , SrcSpan "tests/examples/Directory.hs" 353 3 353 3 , SrcSpan "tests/examples/Directory.hs" 354 3 354 3 , SrcSpan "tests/examples/Directory.hs" 355 3 355 3 , SrcSpan "tests/examples/Directory.hs" 355 3 355 3 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 3 352 40 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 352 8 352 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 3 352 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 3 352 7 , srcInfoPoints = [] } "cont")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 11 352 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 11 352 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 11 352 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 11 352 31 , srcInfoPoints = [] } "getDirectoryContents"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 32 352 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 32 352 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 352 32 352 40 , srcInfoPoints = [] } "startLoc")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 3 353 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 3 353 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 3 353 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 3 353 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 3 353 12 , srcInfoPoints = [] } "sequence_"))) (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 13 353 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 353 13 353 14 , SrcSpan "tests/examples/Directory.hs" 353 34 353 35 , SrcSpan "tests/examples/Directory.hs" 353 45 353 46 , SrcSpan "tests/examples/Directory.hs" 353 68 353 69 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 14 353 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 14 353 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 14 353 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 14 353 16 , srcInfoPoints = [] } "rm"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 17 353 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 353 17 353 18 , SrcSpan "tests/examples/Directory.hs" 353 32 353 33 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 18 353 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 18 353 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 18 353 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 18 353 26 , srcInfoPoints = [] } "startLoc"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 27 353 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 27 353 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 27 353 30 , srcInfoPoints = [] } ""))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 31 353 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 31 353 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 31 353 32 , srcInfoPoints = [] } "x")))))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 36 353 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 353 38 353 40 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 36 353 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 353 38 353 40 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 36 353 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 36 353 37 , srcInfoPoints = [] } "x")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 41 353 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 41 353 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 41 353 45 , srcInfoPoints = [] } "cont")))) , QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 68 , srcInfoPoints = [] } (Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 68 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 68 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 47 353 48 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 49 353 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 49 353 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 49 353 51 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 52 353 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 52 353 55 , srcInfoPoints = [] } "." "."))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 56 353 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 56 353 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 56 353 58 , srcInfoPoints = [] } "&&"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 59 353 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 59 353 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 59 353 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 59 353 60 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 61 353 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 61 353 63 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 61 353 63 , srcInfoPoints = [] } "/="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 64 353 68 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 353 64 353 68 , srcInfoPoints = [] } ".." ".."))))) ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 3 354 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 3 354 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 3 354 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 3 354 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 3 354 18 , srcInfoPoints = [] } "removeDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 19 354 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 19 354 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 354 19 354 27 , srcInfoPoints = [] } "startLoc")))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 5 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 5 356 5 , SrcSpan "tests/examples/Directory.hs" 357 5 357 5 , SrcSpan "tests/examples/Directory.hs" 399 1 399 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 5 356 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 8 356 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 5 356 7 , srcInfoPoints = [] } "rm" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 11 356 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 20 356 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 11 356 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 11 356 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 11 356 19 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 23 356 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 23 356 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 23 356 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 23 356 25 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 26 356 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 26 356 27 , SrcSpan "tests/examples/Directory.hs" 356 27 356 28 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 26 356 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 26 356 27 , SrcSpan "tests/examples/Directory.hs" 356 27 356 28 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 356 26 356 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 356 26 356 27 , SrcSpan "tests/examples/Directory.hs" 356 27 356 28 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 5 363 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 5 363 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 5 357 7 , srcInfoPoints = [] } "rm") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 8 357 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 8 357 9 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 10 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 357 10 357 11 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 12 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 357 12 357 14 , SrcSpan "tests/examples/Directory.hs" 357 15 357 15 , SrcSpan "tests/examples/Directory.hs" 358 15 358 15 , SrcSpan "tests/examples/Directory.hs" 399 1 399 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 15 357 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 357 20 357 22 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 15 357 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 15 357 19 , srcInfoPoints = [] } "temp")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 23 357 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 23 357 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 23 357 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 23 357 26 , srcInfoPoints = [] } "try"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 27 357 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 357 27 357 28 , SrcSpan "tests/examples/Directory.hs" 357 40 357 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 28 357 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 28 357 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 28 357 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 28 357 38 , srcInfoPoints = [] } "removeFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 39 357 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 39 357 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 357 39 357 40 , srcInfoPoints = [] } "f")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 358 15 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 358 15 358 19 , SrcSpan "tests/examples/Directory.hs" 358 25 358 27 , SrcSpan "tests/examples/Directory.hs" 359 17 359 17 , SrcSpan "tests/examples/Directory.hs" 363 17 363 17 , SrcSpan "tests/examples/Directory.hs" 399 1 399 0 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 358 15 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 358 15 358 19 , SrcSpan "tests/examples/Directory.hs" 358 25 358 27 , SrcSpan "tests/examples/Directory.hs" 359 17 359 17 , SrcSpan "tests/examples/Directory.hs" 363 17 363 17 , SrcSpan "tests/examples/Directory.hs" 399 1 399 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 358 20 358 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 358 20 358 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 358 20 358 24 , srcInfoPoints = [] } "temp"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 17 362 57 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 17 359 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 17 359 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 17 359 21 , srcInfoPoints = [] } "Left")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 22 359 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 22 359 23 , srcInfoPoints = [] } "e") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 25 362 57 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 359 25 359 27 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 28 362 57 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 359 28 359 30 , SrcSpan "tests/examples/Directory.hs" 359 31 359 31 , SrcSpan "tests/examples/Directory.hs" 361 31 361 31 , SrcSpan "tests/examples/Directory.hs" 362 31 362 31 , SrcSpan "tests/examples/Directory.hs" 363 17 363 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 31 359 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 359 37 359 39 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 31 359 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 31 359 36 , srcInfoPoints = [] } "isDir")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 40 359 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 40 359 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 40 359 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 40 359 58 , srcInfoPoints = [] } "doesDirectoryExist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 59 359 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 59 359 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 359 59 359 60 , srcInfoPoints = [] } "f")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 72 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 31 361 37 , srcInfoPoints = [] } "unless"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 38 361 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 38 361 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 38 361 43 , srcInfoPoints = [] } "isDir")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 44 361 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 44 361 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 44 361 45 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 46 361 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 46 361 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 46 361 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 46 361 51 , srcInfoPoints = [] } "throw"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 52 361 72 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 361 52 361 53 , SrcSpan "tests/examples/Directory.hs" 361 71 361 72 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 53 361 71 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 361 55 361 57 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 53 361 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 53 361 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 53 361 54 , srcInfoPoints = [] } "e"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 58 361 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 58 361 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 361 58 361 71 , srcInfoPoints = [] } "SomeException"))))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 31 362 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 31 362 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 31 362 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 31 362 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 31 362 55 , srcInfoPoints = [] } "removeDirectoryRecursive"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 56 362 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 56 362 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 362 56 362 57 , srcInfoPoints = [] } "f")))) ])) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 17 363 37 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 17 363 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 17 363 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 17 363 22 , srcInfoPoints = [] } "Right")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 23 363 24 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 25 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 363 25 363 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 28 363 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 28 363 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 28 363 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 28 363 34 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 35 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 363 35 363 36 , SrcSpan "tests/examples/Directory.hs" 363 36 363 37 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 35 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 363 35 363 36 , SrcSpan "tests/examples/Directory.hs" 363 36 363 37 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 363 35 363 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 363 35 363 36 , SrcSpan "tests/examples/Directory.hs" 363 36 363 37 ] }))))) Nothing ]) ])) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 1 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 399 12 399 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 1 399 11 , srcInfoPoints = [] } "removeFile" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 15 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 399 24 399 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 15 399 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 15 399 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 15 399 23 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 27 399 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 27 399 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 27 399 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 27 399 29 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 30 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 399 30 399 31 , SrcSpan "tests/examples/Directory.hs" 399 31 399 32 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 30 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 399 30 399 31 , SrcSpan "tests/examples/Directory.hs" 399 31 399 32 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 399 30 399 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 399 30 399 31 , SrcSpan "tests/examples/Directory.hs" 399 31 399 32 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 1 401 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 1 401 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 1 400 11 , srcInfoPoints = [] } "removeFile") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 12 400 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 12 400 16 , srcInfoPoints = [] } "path") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 400 17 401 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 400 17 400 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 3 401 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 3 401 19 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 3 401 19 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 3 401 19 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 3 401 19 , srcInfoPoints = [] } "deleteFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 20 401 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 20 401 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 401 20 401 24 , srcInfoPoints = [] } "path"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 1 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 17 452 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 1 452 16 , srcInfoPoints = [] } "renameDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 20 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 29 452 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 20 452 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 20 452 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 20 452 28 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 32 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 41 452 43 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 32 452 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 32 452 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 32 452 40 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 44 452 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 44 452 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 44 452 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 44 452 46 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 47 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 47 452 48 , SrcSpan "tests/examples/Directory.hs" 452 48 452 49 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 47 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 47 452 48 , SrcSpan "tests/examples/Directory.hs" 452 48 452 49 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 452 47 452 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 452 47 452 48 , SrcSpan "tests/examples/Directory.hs" 452 48 452 49 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 1 463 64 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 1 463 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 1 453 16 , srcInfoPoints = [] } "renameDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 17 453 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 17 453 22 , srcInfoPoints = [] } "opath") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 23 453 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 23 453 28 , srcInfoPoints = [] } "npath") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 29 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 453 29 453 30 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 453 31 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 453 31 453 33 , SrcSpan "tests/examples/Directory.hs" 456 4 456 4 , SrcSpan "tests/examples/Directory.hs" 509 1 509 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 463 64 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 463 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 456 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 456 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 456 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 456 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 4 456 18 , srcInfoPoints = [] } "withFileStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 19 456 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 19 456 36 , srcInfoPoints = [] } "renameDirectory" "renameDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 37 456 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 37 456 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 37 456 42 , srcInfoPoints = [] } "opath")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 43 456 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 43 456 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 43 456 44 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 45 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 456 45 456 46 , SrcSpan "tests/examples/Directory.hs" 456 49 456 51 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 46 456 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 46 456 48 , srcInfoPoints = [] } "st") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 456 52 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 456 52 456 54 , SrcSpan "tests/examples/Directory.hs" 457 4 457 4 , SrcSpan "tests/examples/Directory.hs" 457 4 457 4 , SrcSpan "tests/examples/Directory.hs" 458 4 458 4 , SrcSpan "tests/examples/Directory.hs" 509 1 509 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 4 457 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 457 11 457 13 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 4 457 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 4 457 10 , srcInfoPoints = [] } "is_dir")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 14 457 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 14 457 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 14 457 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 14 457 25 , srcInfoPoints = [] } "isDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 26 457 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 26 457 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 457 26 457 28 , srcInfoPoints = [] } "st")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 4 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 458 4 458 6 , SrcSpan "tests/examples/Directory.hs" 459 5 459 9 , SrcSpan "tests/examples/Directory.hs" 462 5 462 9 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 4 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 458 4 458 6 , SrcSpan "tests/examples/Directory.hs" 459 5 459 9 , SrcSpan "tests/examples/Directory.hs" 462 5 462 9 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 7 458 19 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 458 7 458 8 , SrcSpan "tests/examples/Directory.hs" 458 18 458 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 8 458 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 8 458 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 8 458 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 8 458 11 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 12 458 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 12 458 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 458 12 458 18 , srcInfoPoints = [] } "is_dir"))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 10 461 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 10 459 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 10 459 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 10 459 21 , srcInfoPoints = [] } "ioException"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 22 461 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 459 22 459 23 , SrcSpan "tests/examples/Directory.hs" 461 44 461 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 23 461 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 23 460 95 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 23 459 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 23 459 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 459 23 459 40 , srcInfoPoints = [] } "ioeSetErrorString"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 27 460 95 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 460 27 460 28 , SrcSpan "tests/examples/Directory.hs" 460 94 460 95 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 94 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 81 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 28 460 37 , srcInfoPoints = [] } "mkIOError"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 38 460 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 38 460 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 38 460 55 , srcInfoPoints = [] } "InappropriateType")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 56 460 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 56 460 73 , srcInfoPoints = [] } "renameDirectory" "renameDirectory"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 74 460 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 74 460 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 74 460 81 , srcInfoPoints = [] } "Nothing")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 82 460 94 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 460 82 460 83 , SrcSpan "tests/examples/Directory.hs" 460 93 460 94 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 83 460 93 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 83 460 87 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 83 460 87 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 83 460 87 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 88 460 93 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 88 460 93 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 460 88 460 93 , srcInfoPoints = [] } "opath")))))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 461 27 461 44 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 461 27 461 44 , srcInfoPoints = [] } "not a directory" "not a directory"))))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 462 10 463 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 462 10 462 12 , SrcSpan "tests/examples/Directory.hs" 463 4 463 4 , SrcSpan "tests/examples/Directory.hs" 463 4 463 4 , SrcSpan "tests/examples/Directory.hs" 509 1 509 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 20 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 20 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 20 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 4 463 20 , srcInfoPoints = [] } "moveFileEx"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 21 463 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 21 463 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 21 463 26 , srcInfoPoints = [] } "opath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 27 463 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 27 463 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 27 463 32 , srcInfoPoints = [] } "npath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 33 463 64 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 33 463 64 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 33 463 64 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 463 33 463 64 , srcInfoPoints = [] } "mOVEFILE_REPLACE_EXISTING")))) ])) ]))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 1 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 12 509 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 1 509 11 , srcInfoPoints = [] } "renameFile" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 15 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 24 509 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 15 509 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 15 509 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 15 509 23 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 27 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 36 509 38 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 27 509 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 27 509 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 27 509 35 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 39 509 44 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 39 509 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 39 509 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 39 509 41 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 42 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 42 509 43 , SrcSpan "tests/examples/Directory.hs" 509 43 509 44 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 42 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 42 509 43 , SrcSpan "tests/examples/Directory.hs" 509 43 509 44 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 509 42 509 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 509 42 509 43 , SrcSpan "tests/examples/Directory.hs" 509 43 509 44 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 1 520 64 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 1 520 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 1 510 11 , srcInfoPoints = [] } "renameFile") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 12 510 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 12 510 17 , srcInfoPoints = [] } "opath") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 18 510 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 18 510 23 , srcInfoPoints = [] } "npath") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 24 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 510 24 510 25 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 510 26 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 510 26 510 28 , SrcSpan "tests/examples/Directory.hs" 513 4 513 4 , SrcSpan "tests/examples/Directory.hs" 528 1 528 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 520 64 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 520 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 513 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 513 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 513 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 513 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 4 513 27 , srcInfoPoints = [] } "withFileOrSymlinkStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 28 513 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 28 513 40 , srcInfoPoints = [] } "renameFile" "renameFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 41 513 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 41 513 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 41 513 46 , srcInfoPoints = [] } "opath")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 47 513 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 47 513 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 47 513 48 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 49 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 513 49 513 50 , SrcSpan "tests/examples/Directory.hs" 513 53 513 55 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 50 513 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 50 513 52 , srcInfoPoints = [] } "st") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 513 56 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 513 56 513 58 , SrcSpan "tests/examples/Directory.hs" 514 4 514 4 , SrcSpan "tests/examples/Directory.hs" 514 4 514 4 , SrcSpan "tests/examples/Directory.hs" 515 4 515 4 , SrcSpan "tests/examples/Directory.hs" 528 1 528 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 4 514 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 514 11 514 13 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 4 514 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 4 514 10 , srcInfoPoints = [] } "is_dir")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 14 514 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 14 514 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 14 514 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 14 514 25 , srcInfoPoints = [] } "isDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 26 514 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 26 514 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 514 26 514 28 , srcInfoPoints = [] } "st")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 515 4 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 515 4 515 6 , SrcSpan "tests/examples/Directory.hs" 516 5 516 9 , SrcSpan "tests/examples/Directory.hs" 519 5 519 9 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 515 4 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 515 4 515 6 , SrcSpan "tests/examples/Directory.hs" 516 5 516 9 , SrcSpan "tests/examples/Directory.hs" 519 5 519 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 515 7 515 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 515 7 515 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 515 7 515 13 , srcInfoPoints = [] } "is_dir"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 10 518 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 10 516 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 10 516 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 10 516 21 , srcInfoPoints = [] } "ioException"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 22 518 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 516 22 516 23 , SrcSpan "tests/examples/Directory.hs" 518 31 518 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 23 518 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 23 517 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 23 516 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 23 516 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 516 23 516 40 , srcInfoPoints = [] } "ioeSetErrorString"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 15 517 78 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 517 15 517 16 , SrcSpan "tests/examples/Directory.hs" 517 77 517 78 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 16 517 25 , srcInfoPoints = [] } "mkIOError"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 26 517 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 26 517 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 26 517 43 , srcInfoPoints = [] } "InappropriateType")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 44 517 56 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 44 517 56 , srcInfoPoints = [] } "renameFile" "renameFile"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 57 517 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 57 517 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 57 517 64 , srcInfoPoints = [] } "Nothing")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 65 517 77 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 517 65 517 66 , SrcSpan "tests/examples/Directory.hs" 517 76 517 77 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 66 517 76 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 66 517 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 66 517 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 66 517 70 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 71 517 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 71 517 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 517 71 517 76 , srcInfoPoints = [] } "opath")))))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 518 15 518 31 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 518 15 518 31 , srcInfoPoints = [] } "is a directory" "is a directory"))))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 519 10 520 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 519 10 519 12 , SrcSpan "tests/examples/Directory.hs" 520 4 520 4 , SrcSpan "tests/examples/Directory.hs" 520 4 520 4 , SrcSpan "tests/examples/Directory.hs" 528 1 528 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 20 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 20 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 20 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 4 520 20 , srcInfoPoints = [] } "moveFileEx"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 21 520 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 21 520 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 21 520 26 , srcInfoPoints = [] } "opath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 27 520 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 27 520 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 27 520 32 , srcInfoPoints = [] } "npath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 33 520 64 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 33 520 64 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 33 520 64 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 520 33 520 64 , srcInfoPoints = [] } "mOVEFILE_REPLACE_EXISTING")))) ])) ]))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 1 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 10 528 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 1 528 9 , srcInfoPoints = [] } "copyFile" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 13 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 22 528 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 13 528 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 13 528 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 13 528 21 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 25 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 34 528 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 25 528 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 25 528 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 25 528 33 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 37 528 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 37 528 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 37 528 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 37 528 39 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 40 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 40 528 41 , SrcSpan "tests/examples/Directory.hs" 528 41 528 42 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 40 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 40 528 41 , SrcSpan "tests/examples/Directory.hs" 528 41 528 42 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 528 40 528 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 528 40 528 41 , SrcSpan "tests/examples/Directory.hs" 528 41 528 42 ] })))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 1 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 5 531 10 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 1 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 5 531 10 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 1 529 9 , srcInfoPoints = [] } "copyFile") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 10 529 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 10 529 19 , srcInfoPoints = [] } "fromFPath") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 20 529 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 20 529 27 , srcInfoPoints = [] } "toFPath") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 529 28 530 73 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 529 28 529 29 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 5 530 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 5 530 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 5 530 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 5 530 9 , srcInfoPoints = [] } "copy"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 10 530 25 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 530 10 530 11 , SrcSpan "tests/examples/Directory.hs" 530 11 530 24 , SrcSpan "tests/examples/Directory.hs" 530 24 530 25 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 10 530 25 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 530 10 530 11 , SrcSpan "tests/examples/Directory.hs" 530 11 530 24 , SrcSpan "tests/examples/Directory.hs" 530 24 530 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 11 530 24 , srcInfoPoints = [] } "Prelude") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 11 530 24 , srcInfoPoints = [] } "catch"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 26 530 73 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 530 26 530 27 , SrcSpan "tests/examples/Directory.hs" 530 72 530 73 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 27 530 72 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 530 27 530 28 , SrcSpan "tests/examples/Directory.hs" 530 32 530 34 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 28 530 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 28 530 31 , srcInfoPoints = [] } "exc") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 35 530 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 35 530 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 35 530 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 35 530 40 , srcInfoPoints = [] } "throw"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 41 530 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 41 530 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 41 530 42 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 43 530 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 43 530 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 43 530 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 43 530 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 43 530 57 , srcInfoPoints = [] } "ioeSetLocation"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 58 530 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 58 530 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 58 530 61 , srcInfoPoints = [] } "exc")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 62 530 72 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 530 62 530 72 , srcInfoPoints = [] } "copyFile" "copyFile")))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 11 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 11 531 11 , SrcSpan "tests/examples/Directory.hs" 537 11 537 11 , SrcSpan "tests/examples/Directory.hs" 538 11 538 11 , SrcSpan "tests/examples/Directory.hs" 541 11 541 11 , SrcSpan "tests/examples/Directory.hs" 543 11 543 11 , SrcSpan "tests/examples/Directory.hs" 549 11 549 11 , SrcSpan "tests/examples/Directory.hs" 550 11 550 11 , SrcSpan "tests/examples/Directory.hs" 551 11 551 11 , SrcSpan "tests/examples/Directory.hs" 560 1 560 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 11 536 48 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 11 531 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 11 531 15 , srcInfoPoints = [] } "copy")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 16 536 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 16 531 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 536 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 531 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 531 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 531 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 531 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 18 531 25 , srcInfoPoints = [] } "bracket"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 26 531 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 26 531 27 , SrcSpan "tests/examples/Directory.hs" 531 60 531 61 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 27 531 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 27 531 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 27 531 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 27 531 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 27 531 41 , srcInfoPoints = [] } "openBinaryFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 42 531 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 42 531 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 42 531 51 , srcInfoPoints = [] } "fromFPath")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 52 531 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 52 531 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 52 531 60 , srcInfoPoints = [] } "ReadMode")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 62 531 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 62 531 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 62 531 68 , srcInfoPoints = [] } "hClose")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 69 531 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 69 531 70 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 69 531 70 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 71 536 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 531 71 531 72 , SrcSpan "tests/examples/Directory.hs" 531 78 531 80 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 72 531 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 531 72 531 77 , srcInfoPoints = [] } "hFrom") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 536 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 532 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 532 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 532 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 532 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 18 532 32 , srcInfoPoints = [] } "bracketOnError"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 33 532 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 33 532 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 33 532 40 , srcInfoPoints = [] } "openTmp")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 41 532 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 41 532 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 41 532 49 , srcInfoPoints = [] } "cleanTmp")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 50 532 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 50 532 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 50 532 51 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 52 536 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 532 52 532 53 , SrcSpan "tests/examples/Directory.hs" 532 70 532 72 ] } [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 53 532 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 532 53 532 54 , SrcSpan "tests/examples/Directory.hs" 532 62 532 63 , SrcSpan "tests/examples/Directory.hs" 532 68 532 69 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 54 532 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 54 532 62 , srcInfoPoints = [] } "tmpFPath") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 64 532 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 532 64 532 68 , srcInfoPoints = [] } "hTmp") ] ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 18 536 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 533 18 533 20 , SrcSpan "tests/examples/Directory.hs" 533 21 533 21 , SrcSpan "tests/examples/Directory.hs" 534 21 534 21 , SrcSpan "tests/examples/Directory.hs" 535 21 535 21 , SrcSpan "tests/examples/Directory.hs" 536 21 536 21 , SrcSpan "tests/examples/Directory.hs" 537 11 537 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 69 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 21 533 32 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 33 533 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 33 533 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 33 533 43 , srcInfoPoints = [] } "bufferSize")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 44 533 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 44 533 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 44 533 45 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 46 533 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 46 533 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 46 533 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 46 533 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 46 533 58 , srcInfoPoints = [] } "copyContents"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 59 533 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 59 533 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 59 533 64 , srcInfoPoints = [] } "hFrom")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 65 533 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 65 533 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 533 65 533 69 , srcInfoPoints = [] } "hTmp"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 21 534 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 21 534 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 21 534 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 21 534 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 21 534 27 , srcInfoPoints = [] } "hClose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 28 534 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 28 534 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 534 28 534 32 , srcInfoPoints = [] } "hTmp")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 21 535 76 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 21 535 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 21 535 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 21 535 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 21 535 39 , srcInfoPoints = [] } "ignoreIOExceptions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 40 535 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 40 535 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 40 535 41 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 42 535 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 42 535 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 42 535 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 42 535 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 42 535 57 , srcInfoPoints = [] } "copyPermissions"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 58 535 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 58 535 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 58 535 67 , srcInfoPoints = [] } "fromFPath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 68 535 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 68 535 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 535 68 535 76 , srcInfoPoints = [] } "tmpFPath"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 21 536 31 , srcInfoPoints = [] } "renameFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 32 536 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 32 536 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 32 536 40 , srcInfoPoints = [] } "tmpFPath")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 41 536 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 41 536 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 536 41 536 48 , srcInfoPoints = [] } "toFPath")))) ])))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 11 537 79 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 11 537 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 11 537 18 , srcInfoPoints = [] } "openTmp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 19 537 79 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 537 19 537 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 21 537 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 21 537 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 21 537 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 21 537 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 21 537 39 , srcInfoPoints = [] } "openBinaryTempFile"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 40 537 63 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 537 40 537 41 , SrcSpan "tests/examples/Directory.hs" 537 62 537 63 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 41 537 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 41 537 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 41 537 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 41 537 54 , srcInfoPoints = [] } "takeDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 55 537 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 55 537 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 55 537 62 , srcInfoPoints = [] } "toFPath")))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 64 537 79 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 537 64 537 79 , srcInfoPoints = [] } ".copyFile.tmp" ".copyFile.tmp")))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 11 540 60 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 11 540 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 11 538 19 , srcInfoPoints = [] } "cleanTmp") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 20 538 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 538 20 538 21 , SrcSpan "tests/examples/Directory.hs" 538 29 538 30 , SrcSpan "tests/examples/Directory.hs" 538 35 538 36 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 21 538 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 21 538 29 , srcInfoPoints = [] } "tmpFPath") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 31 538 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 538 31 538 35 , srcInfoPoints = [] } "hTmp") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 15 540 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 539 15 539 16 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 17 540 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 539 17 539 19 , SrcSpan "tests/examples/Directory.hs" 539 20 539 20 , SrcSpan "tests/examples/Directory.hs" 540 20 540 20 , SrcSpan "tests/examples/Directory.hs" 541 11 541 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 20 539 52 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 20 539 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 20 539 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 20 539 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 20 539 38 , srcInfoPoints = [] } "ignoreIOExceptions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 39 539 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 39 539 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 39 539 40 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 41 539 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 41 539 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 41 539 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 41 539 47 , srcInfoPoints = [] } "hClose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 48 539 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 48 539 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 539 48 539 52 , srcInfoPoints = [] } "hTmp"))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 20 540 60 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 20 540 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 20 540 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 20 540 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 20 540 38 , srcInfoPoints = [] } "ignoreIOExceptions"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 39 540 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 39 540 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 39 540 40 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 41 540 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 41 540 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 41 540 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 41 540 51 , srcInfoPoints = [] } "removeFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 52 540 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 52 540 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 540 52 540 60 , srcInfoPoints = [] } "tmpFPath"))))) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 11 541 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 11 541 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 11 541 21 , srcInfoPoints = [] } "bufferSize")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 22 541 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 541 22 541 23 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 24 541 28 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 541 24 541 28 , srcInfoPoints = [] } 1024 "1024"))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 11 547 56 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 11 547 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 11 543 23 , srcInfoPoints = [] } "copyContents") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 24 543 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 24 543 29 , srcInfoPoints = [] } "hFrom") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 30 543 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 30 543 33 , srcInfoPoints = [] } "hTo") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 34 543 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 34 543 40 , srcInfoPoints = [] } "buffer") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 41 547 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 543 41 543 42 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 543 43 547 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 543 43 543 45 , SrcSpan "tests/examples/Directory.hs" 544 19 544 19 , SrcSpan "tests/examples/Directory.hs" 545 19 545 19 , SrcSpan "tests/examples/Directory.hs" 549 11 549 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 19 544 59 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 544 25 544 27 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 19 544 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 19 544 24 , srcInfoPoints = [] } "count")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 28 544 35 , srcInfoPoints = [] } "hGetBuf"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 36 544 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 36 544 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 36 544 41 , srcInfoPoints = [] } "hFrom")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 42 544 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 42 544 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 42 544 48 , srcInfoPoints = [] } "buffer")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 49 544 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 49 544 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 544 49 544 59 , srcInfoPoints = [] } "bufferSize")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 547 56 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 547 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 545 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 545 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 545 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 19 545 23 , srcInfoPoints = [] } "when"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 24 545 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 545 24 545 25 , SrcSpan "tests/examples/Directory.hs" 545 34 545 35 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 25 545 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 25 545 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 25 545 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 25 545 30 , srcInfoPoints = [] } "count"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 31 545 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 31 545 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 31 545 32 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 33 545 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 33 545 34 , srcInfoPoints = [] } 0 "0"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 36 545 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 36 545 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 36 545 37 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 545 38 547 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 545 38 545 40 , SrcSpan "tests/examples/Directory.hs" 546 27 546 27 , SrcSpan "tests/examples/Directory.hs" 547 27 547 27 , SrcSpan "tests/examples/Directory.hs" 549 11 549 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 27 546 34 , srcInfoPoints = [] } "hPutBuf"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 35 546 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 35 546 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 35 546 38 , srcInfoPoints = [] } "hTo")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 39 546 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 39 546 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 39 546 45 , srcInfoPoints = [] } "buffer")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 46 546 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 46 546 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 546 46 546 51 , srcInfoPoints = [] } "count")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 27 547 39 , srcInfoPoints = [] } "copyContents"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 40 547 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 40 547 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 40 547 45 , srcInfoPoints = [] } "hFrom")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 46 547 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 46 547 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 46 547 49 , srcInfoPoints = [] } "hTo")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 50 547 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 50 547 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 547 50 547 56 , srcInfoPoints = [] } "buffer")))) ])) ])) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 11 549 64 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 11 549 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 11 549 29 , srcInfoPoints = [] } "ignoreIOExceptions") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 30 549 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 30 549 32 , srcInfoPoints = [] } "io") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 33 549 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 549 33 549 34 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 35 549 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 35 549 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 35 549 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 35 549 37 , srcInfoPoints = [] } "io"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 38 549 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 549 38 549 39 , SrcSpan "tests/examples/Directory.hs" 549 39 549 44 , SrcSpan "tests/examples/Directory.hs" 549 44 549 45 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 38 549 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 549 38 549 39 , SrcSpan "tests/examples/Directory.hs" 549 39 549 44 , SrcSpan "tests/examples/Directory.hs" 549 44 549 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 39 549 44 , srcInfoPoints = [] } "catch"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 46 549 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 46 549 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 549 46 549 64 , srcInfoPoints = [] } "ioExceptionIgnorer"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 11 550 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 550 30 550 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 11 550 29 , srcInfoPoints = [] } "ioExceptionIgnorer" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 33 550 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 550 45 550 47 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 33 550 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 33 550 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 33 550 44 , srcInfoPoints = [] } "IOException"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 48 550 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 48 550 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 48 550 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 48 550 50 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 51 550 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 550 51 550 52 , SrcSpan "tests/examples/Directory.hs" 550 52 550 53 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 51 550 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 550 51 550 52 , SrcSpan "tests/examples/Directory.hs" 550 52 550 53 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 550 51 550 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 550 51 550 52 , SrcSpan "tests/examples/Directory.hs" 550 52 550 53 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 11 551 43 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 11 551 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 11 551 29 , srcInfoPoints = [] } "ioExceptionIgnorer") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 30 551 31 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 32 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 551 32 551 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 34 551 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 34 551 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 34 551 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 34 551 40 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 41 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 551 41 551 42 , SrcSpan "tests/examples/Directory.hs" 551 42 551 43 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 41 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 551 41 551 42 , SrcSpan "tests/examples/Directory.hs" 551 42 551 43 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 551 41 551 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 551 41 551 42 , SrcSpan "tests/examples/Directory.hs" 551 42 551 43 ] }))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 1 560 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 560 18 560 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 1 560 17 , srcInfoPoints = [] } "canonicalizePath" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 21 560 44 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 560 30 560 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 21 560 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 21 560 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 21 560 29 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 33 560 44 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 33 560 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 33 560 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 33 560 35 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 36 560 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 36 560 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 560 36 560 44 , srcInfoPoints = [] } "FilePath"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 1 563 31 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 1 563 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 1 561 17 , srcInfoPoints = [] } "canonicalizePath") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 18 561 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 18 561 23 , srcInfoPoints = [] } "fpath") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 561 24 563 31 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 561 24 561 25 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 5 563 31 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 562 5 562 7 , SrcSpan "tests/examples/Directory.hs" 562 8 562 8 , SrcSpan "tests/examples/Directory.hs" 563 8 563 8 , SrcSpan "tests/examples/Directory.hs" 568 1 568 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 8 562 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 562 13 562 15 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 8 562 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 8 562 12 , srcInfoPoints = [] } "path")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 16 562 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 16 562 37 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 16 562 37 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 16 562 37 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 16 562 37 , srcInfoPoints = [] } "getFullPathName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 38 562 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 38 562 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 562 38 562 43 , srcInfoPoints = [] } "fpath")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 8 563 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 8 563 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 8 563 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 8 563 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 8 563 14 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 15 563 31 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 563 15 563 16 , SrcSpan "tests/examples/Directory.hs" 563 30 563 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 16 563 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 16 563 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 16 563 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 16 563 25 , srcInfoPoints = [] } "normalise"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 26 563 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 26 563 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 563 26 563 30 , srcInfoPoints = [] } "path")))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 1 568 58 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 568 32 568 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 1 568 31 , srcInfoPoints = [] } "makeRelativeToCurrentDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 35 568 58 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 568 44 568 46 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 35 568 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 35 568 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 35 568 43 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 47 568 58 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 47 568 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 47 568 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 47 568 49 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 50 568 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 50 568 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 568 50 568 58 , srcInfoPoints = [] } "FilePath"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 1 571 32 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 1 571 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 1 569 31 , srcInfoPoints = [] } "makeRelativeToCurrentDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 32 569 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 32 569 33 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 34 571 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 569 34 569 35 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 569 36 571 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 569 36 569 38 , SrcSpan "tests/examples/Directory.hs" 570 5 570 5 , SrcSpan "tests/examples/Directory.hs" 571 5 571 5 , SrcSpan "tests/examples/Directory.hs" 591 1 591 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 5 570 31 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 570 9 570 11 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 5 570 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 5 570 8 , srcInfoPoints = [] } "cur")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 12 570 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 12 570 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 570 12 570 31 , srcInfoPoints = [] } "getCurrentDirectory"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 5 571 32 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 5 571 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 5 571 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 5 571 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 5 571 11 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 12 571 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 12 571 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 12 571 13 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 14 571 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 14 571 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 14 571 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 14 571 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 14 571 26 , srcInfoPoints = [] } "makeRelative"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 27 571 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 27 571 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 27 571 30 , srcInfoPoints = [] } "cur")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 31 571 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 31 571 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 571 31 571 32 , srcInfoPoints = [] } "x"))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 1 591 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 591 16 591 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 1 591 15 , srcInfoPoints = [] } "findExecutable" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 19 591 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 591 26 591 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 19 591 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 19 591 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 19 591 25 , srcInfoPoints = [] } "String"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 29 591 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 29 591 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 29 591 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 29 591 31 , srcInfoPoints = [] } "IO"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 32 591 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 591 32 591 33 , SrcSpan "tests/examples/Directory.hs" 591 47 591 48 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 33 591 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 33 591 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 33 591 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 33 591 38 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 39 591 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 39 591 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 591 39 591 47 , srcInfoPoints = [] } "FilePath"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 1 593 53 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 1 593 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 1 592 15 , srcInfoPoints = [] } "findExecutable") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 16 592 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 16 592 22 , srcInfoPoints = [] } "binary") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 592 23 593 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 592 23 592 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 19 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 19 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 19 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 3 593 19 , srcInfoPoints = [] } "searchPath"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 20 593 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 20 593 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 20 593 27 , srcInfoPoints = [] } "Nothing")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 28 593 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 28 593 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 28 593 34 , srcInfoPoints = [] } "binary")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 35 593 53 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 593 35 593 36 , SrcSpan "tests/examples/Directory.hs" 593 52 593 53 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 36 593 52 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 36 593 39 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 36 593 39 , srcInfoPoints = [] } '.' ".")) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 39 593 40 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 39 593 40 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 39 593 40 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 40 593 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 40 593 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 593 40 593 52 , srcInfoPoints = [] } "exeExtension"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 1 627 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 627 22 627 24 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 1 627 21 , srcInfoPoints = [] } "getDirectoryContents" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 25 627 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 627 34 627 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 25 627 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 25 627 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 25 627 33 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 37 627 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 37 627 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 37 627 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 37 627 39 , srcInfoPoints = [] } "IO"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 40 627 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 627 40 627 41 , SrcSpan "tests/examples/Directory.hs" 627 49 627 50 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 41 627 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 41 627 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 627 41 627 49 , srcInfoPoints = [] } "FilePath")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 1 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 635 3 635 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 1 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 635 3 635 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 1 628 21 , srcInfoPoints = [] } "getDirectoryContents") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 22 628 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 22 628 26 , srcInfoPoints = [] } "path") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 628 27 634 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 628 27 628 28 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 3 634 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 3 630 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 3 629 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 3 629 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 3 629 16 , srcInfoPoints = [] } "modifyIOError"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 17 630 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 629 17 629 18 , SrcSpan "tests/examples/Directory.hs" 630 59 630 60 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 18 630 59 , srcInfoPoints = [] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 18 629 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 629 18 629 19 , SrcSpan "tests/examples/Directory.hs" 629 40 629 41 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 19 629 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 629 19 629 20 , SrcSpan "tests/examples/Directory.hs" 629 20 629 34 , SrcSpan "tests/examples/Directory.hs" 629 34 629 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 19 629 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 629 19 629 20 , SrcSpan "tests/examples/Directory.hs" 629 20 629 34 , SrcSpan "tests/examples/Directory.hs" 629 34 629 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 20 629 34 , srcInfoPoints = [] } "ioeSetFileName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 36 629 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 36 629 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 36 629 40 , srcInfoPoints = [] } "path")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 42 629 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 42 629 43 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 629 42 629 43 , srcInfoPoints = [] } "."))) (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 18 630 59 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 630 18 630 19 , SrcSpan "tests/examples/Directory.hs" 630 58 630 59 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 19 630 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 630 19 630 20 , SrcSpan "tests/examples/Directory.hs" 630 20 630 34 , SrcSpan "tests/examples/Directory.hs" 630 34 630 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 19 630 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 630 19 630 20 , SrcSpan "tests/examples/Directory.hs" 630 20 630 34 , SrcSpan "tests/examples/Directory.hs" 630 34 630 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 20 630 34 , srcInfoPoints = [] } "ioeSetLocation"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 36 630 58 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 36 630 58 , srcInfoPoints = [] } "getDirectoryContents" "getDirectoryContents")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 61 630 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 61 630 62 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 61 630 62 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 630 63 634 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 630 63 630 65 , SrcSpan "tests/examples/Directory.hs" 631 3 631 3 , SrcSpan "tests/examples/Directory.hs" 635 3 635 3 , SrcSpan "tests/examples/Directory.hs" 635 3 635 3 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 634 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 634 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 633 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 632 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 631 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 631 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 631 3 631 10 , srcInfoPoints = [] } "bracket"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 6 632 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 632 6 632 7 , SrcSpan "tests/examples/Directory.hs" 632 41 632 42 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 7 632 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 7 632 26 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 7 632 26 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 7 632 26 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 7 632 26 , srcInfoPoints = [] } "findFirstFile"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 27 632 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 632 27 632 28 , SrcSpan "tests/examples/Directory.hs" 632 40 632 41 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 28 632 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 28 632 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 28 632 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 28 632 32 , srcInfoPoints = [] } "path"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 33 632 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 33 632 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 33 632 36 , srcInfoPoints = [] } ""))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 37 632 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 632 37 632 40 , srcInfoPoints = [] } "*" "*"))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 6 633 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 633 6 633 7 , SrcSpan "tests/examples/Directory.hs" 633 34 633 35 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 7 633 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 633 7 633 8 , SrcSpan "tests/examples/Directory.hs" 633 14 633 16 ] } [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 8 633 13 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 633 8 633 9 , SrcSpan "tests/examples/Directory.hs" 633 10 633 11 , SrcSpan "tests/examples/Directory.hs" 633 12 633 13 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 9 633 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 9 633 10 , srcInfoPoints = [] } "h") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 11 633 12 , srcInfoPoints = [] } ] ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 17 633 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 17 633 32 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 17 633 32 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 17 633 32 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 17 633 32 , srcInfoPoints = [] } "findClose"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 33 633 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 33 633 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 633 33 633 34 , srcInfoPoints = [] } "h"))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 6 634 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 634 6 634 7 , SrcSpan "tests/examples/Directory.hs" 634 34 634 35 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 7 634 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 634 7 634 8 , SrcSpan "tests/examples/Directory.hs" 634 17 634 19 ] } [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 8 634 16 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 634 8 634 9 , SrcSpan "tests/examples/Directory.hs" 634 10 634 11 , SrcSpan "tests/examples/Directory.hs" 634 15 634 16 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 9 634 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 9 634 10 , srcInfoPoints = [] } "h") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 11 634 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 11 634 15 , srcInfoPoints = [] } "fdat") ] ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 20 634 24 , srcInfoPoints = [] } "loop"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 25 634 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 25 634 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 25 634 26 , srcInfoPoints = [] } "h")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 27 634 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 27 634 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 27 634 31 , srcInfoPoints = [] } "fdat")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 634 32 634 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 634 32 634 33 , SrcSpan "tests/examples/Directory.hs" 634 33 634 34 ] } []))))) ]))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 5 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 5 638 5 , SrcSpan "tests/examples/Directory.hs" 639 5 639 5 , SrcSpan "tests/examples/Directory.hs" 672 1 672 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 5 638 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 10 638 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 5 638 9 , srcInfoPoints = [] } "loop" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 13 638 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 26 638 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 13 638 25 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 13 638 25 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 13 638 25 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 13 638 25 , srcInfoPoints = [] } "HANDLE"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 29 638 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 44 638 46 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 29 638 43 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 29 638 43 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 29 638 43 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 29 638 43 , srcInfoPoints = [] } "FindData"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 47 638 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 58 638 60 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 47 638 57 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 47 638 48 , SrcSpan "tests/examples/Directory.hs" 638 56 638 57 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 48 638 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 48 638 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 48 638 56 , srcInfoPoints = [] } "FilePath")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 61 638 74 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 61 638 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 61 638 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 61 638 63 , srcInfoPoints = [] } "IO"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 64 638 74 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 638 64 638 65 , SrcSpan "tests/examples/Directory.hs" 638 73 638 74 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 65 638 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 65 638 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 638 65 638 73 , srcInfoPoints = [] } "FilePath")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 5 644 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 5 644 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 5 639 9 , srcInfoPoints = [] } "loop") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 10 639 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 10 639 11 , srcInfoPoints = [] } "h") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 12 639 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 12 639 16 , srcInfoPoints = [] } "fdat") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 17 639 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 17 639 20 , srcInfoPoints = [] } "acc") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 21 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 639 21 639 22 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 639 23 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 639 23 639 25 , SrcSpan "tests/examples/Directory.hs" 640 8 640 8 , SrcSpan "tests/examples/Directory.hs" 641 8 641 8 , SrcSpan "tests/examples/Directory.hs" 642 8 642 8 , SrcSpan "tests/examples/Directory.hs" 672 1 672 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 8 640 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 640 17 640 19 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 8 640 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 8 640 16 , srcInfoPoints = [] } "filename")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 20 640 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 20 640 45 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 20 640 45 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 20 640 45 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 20 640 45 , srcInfoPoints = [] } "getFindDataFileName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 46 640 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 46 640 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 640 46 640 50 , srcInfoPoints = [] } "fdat")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 8 641 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 641 13 641 15 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 8 641 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 8 641 12 , srcInfoPoints = [] } "more")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 34 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 34 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 34 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 16 641 34 , srcInfoPoints = [] } "findNextFile"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 35 641 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 35 641 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 35 641 36 , srcInfoPoints = [] } "h")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 37 641 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 37 641 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 641 37 641 41 , srcInfoPoints = [] } "fdat")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 642 8 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 642 8 642 10 , SrcSpan "tests/examples/Directory.hs" 643 11 643 15 , SrcSpan "tests/examples/Directory.hs" 644 11 644 15 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 642 8 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 642 8 642 10 , SrcSpan "tests/examples/Directory.hs" 643 11 643 15 , SrcSpan "tests/examples/Directory.hs" 644 11 644 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 642 11 642 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 642 11 642 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 642 11 642 15 , srcInfoPoints = [] } "more"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 16 643 20 , srcInfoPoints = [] } "loop"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 21 643 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 21 643 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 21 643 22 , srcInfoPoints = [] } "h")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 23 643 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 23 643 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 23 643 27 , srcInfoPoints = [] } "fdat")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 28 643 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 643 28 643 29 , SrcSpan "tests/examples/Directory.hs" 643 41 643 42 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 29 643 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 29 643 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 29 643 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 29 643 37 , srcInfoPoints = [] } "filename"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 37 643 38 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 37 643 38 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 37 643 38 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 38 643 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 38 643 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 643 38 643 41 , srcInfoPoints = [] } "acc")))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 16 644 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 16 644 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 16 644 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 16 644 22 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 23 644 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 644 23 644 24 , SrcSpan "tests/examples/Directory.hs" 644 36 644 37 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 24 644 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 24 644 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 24 644 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 24 644 32 , srcInfoPoints = [] } "filename"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 32 644 33 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 32 644 33 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 32 644 33 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 33 644 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 33 644 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 644 33 644 36 , srcInfoPoints = [] } "acc"))))))) ])) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 1 672 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 672 21 672 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 1 672 20 , srcInfoPoints = [] } "getCurrentDirectory" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 24 672 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 24 672 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 24 672 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 24 672 26 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 27 672 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 27 672 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 672 27 672 35 , srcInfoPoints = [] } "FilePath")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 673 1 674 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 673 1 673 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 673 1 673 20 , srcInfoPoints = [] } "getCurrentDirectory")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 673 21 674 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 673 21 673 22 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 673 23 674 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 673 23 673 25 , SrcSpan "tests/examples/Directory.hs" 674 3 674 3 , SrcSpan "tests/examples/Directory.hs" 708 1 708 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 674 3 674 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 674 3 674 28 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 674 3 674 28 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 674 3 674 28 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 674 3 674 28 , srcInfoPoints = [] } "getCurrentDirectory"))) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 1 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 708 21 708 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 1 708 20 , srcInfoPoints = [] } "setCurrentDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 24 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 708 33 708 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 24 708 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 24 708 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 24 708 32 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 36 708 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 36 708 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 36 708 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 36 708 38 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 39 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 708 39 708 40 , SrcSpan "tests/examples/Directory.hs" 708 40 708 41 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 39 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 708 39 708 40 , SrcSpan "tests/examples/Directory.hs" 708 40 708 41 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 708 39 708 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 708 39 708 40 , SrcSpan "tests/examples/Directory.hs" 708 40 708 41 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 1 710 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 1 710 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 1 709 20 , srcInfoPoints = [] } "setCurrentDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 21 709 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 21 709 25 , srcInfoPoints = [] } "path") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 709 26 710 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 709 26 709 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 3 710 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 3 710 28 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 3 710 28 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 3 710 28 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 3 710 28 , srcInfoPoints = [] } "setCurrentDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 29 710 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 29 710 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 710 29 710 33 , srcInfoPoints = [] } "path"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 1 716 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 716 20 716 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 1 716 19 , srcInfoPoints = [] } "doesDirectoryExist" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 23 716 42 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 716 32 716 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 23 716 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 23 716 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 23 716 31 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 35 716 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 35 716 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 35 716 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 35 716 37 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 38 716 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 38 716 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 716 38 716 42 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 1 719 61 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 1 719 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 1 717 19 , srcInfoPoints = [] } "doesDirectoryExist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 20 717 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 20 717 24 , srcInfoPoints = [] } "name") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 717 25 719 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 717 25 717 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 4 719 61 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 4 718 70 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 718 4 718 5 , SrcSpan "tests/examples/Directory.hs" 718 69 718 70 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 5 718 19 , srcInfoPoints = [] } "withFileStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 20 718 40 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 20 718 40 , srcInfoPoints = [] } "doesDirectoryExist" "doesDirectoryExist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 41 718 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 41 718 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 41 718 45 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 46 718 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 46 718 47 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 46 718 47 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 48 718 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 718 48 718 49 , SrcSpan "tests/examples/Directory.hs" 718 52 718 54 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 49 718 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 49 718 51 , srcInfoPoints = [] } "st") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 55 718 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 55 718 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 55 718 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 55 718 66 , srcInfoPoints = [] } "isDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 67 718 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 67 718 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 718 67 718 69 , srcInfoPoints = [] } "st"))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 4 719 11 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 4 719 5 , SrcSpan "tests/examples/Directory.hs" 719 5 719 10 , SrcSpan "tests/examples/Directory.hs" 719 10 719 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 4 719 11 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 4 719 5 , SrcSpan "tests/examples/Directory.hs" 719 5 719 10 , SrcSpan "tests/examples/Directory.hs" 719 10 719 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 5 719 10 , srcInfoPoints = [] } "catch"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 12 719 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 12 719 13 , SrcSpan "tests/examples/Directory.hs" 719 60 719 61 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 13 719 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 35 719 37 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 13 719 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 13 719 14 , SrcSpan "tests/examples/Directory.hs" 719 33 719 34 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 14 719 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 14 719 15 , SrcSpan "tests/examples/Directory.hs" 719 18 719 20 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 16 719 17 , srcInfoPoints = [] } ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 21 719 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 21 719 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 21 719 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 21 719 27 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 28 719 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 28 719 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 28 719 33 , srcInfoPoints = [] } "False")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 38 719 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 719 50 719 52 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 38 719 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 38 719 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 38 719 49 , srcInfoPoints = [] } "IOException"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 53 719 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 53 719 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 53 719 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 53 719 55 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 56 719 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 56 719 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 719 56 719 60 , srcInfoPoints = [] } "Bool"))))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 1 725 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 725 15 725 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 1 725 14 , srcInfoPoints = [] } "doesFileExist" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 18 725 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 725 27 725 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 18 725 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 18 725 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 18 725 26 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 30 725 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 30 725 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 30 725 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 30 725 32 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 33 725 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 33 725 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 725 33 725 37 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 1 728 61 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 1 728 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 1 726 14 , srcInfoPoints = [] } "doesFileExist") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 15 726 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 15 726 19 , srcInfoPoints = [] } "name") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 726 20 728 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 726 20 726 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 4 728 61 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 4 727 89 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 727 4 727 5 , SrcSpan "tests/examples/Directory.hs" 727 88 727 89 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 88 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 5 727 19 , srcInfoPoints = [] } "withFileStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 20 727 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 20 727 35 , srcInfoPoints = [] } "doesFileExist" "doesFileExist"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 36 727 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 36 727 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 36 727 40 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 41 727 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 41 727 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 41 727 42 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 43 727 88 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 727 43 727 44 , SrcSpan "tests/examples/Directory.hs" 727 47 727 49 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 44 727 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 44 727 46 , srcInfoPoints = [] } "st") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 50 727 88 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 727 50 727 52 , SrcSpan "tests/examples/Directory.hs" 727 53 727 53 , SrcSpan "tests/examples/Directory.hs" 727 72 727 73 , SrcSpan "tests/examples/Directory.hs" 727 88 727 88 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 53 727 72 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 727 55 727 57 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 53 727 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 53 727 54 , srcInfoPoints = [] } "b")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 58 727 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 58 727 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 58 727 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 58 727 69 , srcInfoPoints = [] } "isDirectory"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 70 727 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 70 727 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 70 727 72 , srcInfoPoints = [] } "st")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 74 727 88 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 74 727 88 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 74 727 80 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 74 727 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 74 727 80 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 81 727 88 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 727 81 727 82 , SrcSpan "tests/examples/Directory.hs" 727 87 727 88 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 82 727 87 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 82 727 85 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 82 727 85 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 82 727 85 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 86 727 87 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 86 727 87 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 727 86 727 87 , srcInfoPoints = [] } "b")))))) ])))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 4 728 11 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 4 728 5 , SrcSpan "tests/examples/Directory.hs" 728 5 728 10 , SrcSpan "tests/examples/Directory.hs" 728 10 728 11 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 4 728 11 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 4 728 5 , SrcSpan "tests/examples/Directory.hs" 728 5 728 10 , SrcSpan "tests/examples/Directory.hs" 728 10 728 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 5 728 10 , srcInfoPoints = [] } "catch"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 12 728 61 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 12 728 13 , SrcSpan "tests/examples/Directory.hs" 728 60 728 61 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 13 728 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 35 728 37 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 13 728 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 13 728 14 , SrcSpan "tests/examples/Directory.hs" 728 33 728 34 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 14 728 33 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 14 728 15 , SrcSpan "tests/examples/Directory.hs" 728 18 728 20 ] } [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 16 728 17 , srcInfoPoints = [] } ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 21 728 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 21 728 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 21 728 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 21 728 27 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 28 728 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 28 728 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 28 728 33 , srcInfoPoints = [] } "False")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 38 728 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 728 50 728 52 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 38 728 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 38 728 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 38 728 49 , srcInfoPoints = [] } "IOException"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 53 728 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 53 728 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 53 728 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 53 728 55 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 56 728 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 56 728 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 728 56 728 60 , srcInfoPoints = [] } "Bool"))))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 1 742 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 742 21 742 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 1 742 20 , srcInfoPoints = [] } "getModificationTime" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 24 742 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 742 33 742 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 24 742 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 24 742 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 24 742 32 , srcInfoPoints = [] } "FilePath"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 36 742 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 36 742 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 36 742 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 36 742 38 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 39 742 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 39 742 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 742 39 742 48 , srcInfoPoints = [] } "ClockTime"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 1 746 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 1 746 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 1 743 20 , srcInfoPoints = [] } "getModificationTime") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 21 743 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 21 743 25 , srcInfoPoints = [] } "name") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 26 746 21 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 743 26 743 27 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 743 28 746 21 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 743 28 743 30 , SrcSpan "tests/examples/Directory.hs" 745 2 745 2 , SrcSpan "tests/examples/Directory.hs" 749 1 749 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 746 21 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 746 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 745 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 745 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 745 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 745 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 2 745 16 , srcInfoPoints = [] } "withFileStatus"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 17 745 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 17 745 38 , srcInfoPoints = [] } "getModificationTime" "getModificationTime"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 39 745 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 39 745 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 39 745 43 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 44 745 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 44 745 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 44 745 45 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 46 746 21 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 745 46 745 47 , SrcSpan "tests/examples/Directory.hs" 745 51 745 53 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 48 745 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 48 745 50 , srcInfoPoints = [] } "st") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 745 54 746 21 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 745 54 745 56 , SrcSpan "tests/examples/Directory.hs" 746 2 746 2 , SrcSpan "tests/examples/Directory.hs" 746 2 746 2 , SrcSpan "tests/examples/Directory.hs" 749 1 749 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 2 746 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 2 746 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 2 746 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 2 746 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 2 746 18 , srcInfoPoints = [] } "modificationTime"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 19 746 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 19 746 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 746 19 746 21 , srcInfoPoints = [] } "st")))) ]))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 1 749 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 16 749 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 1 749 15 , srcInfoPoints = [] } "withFileStatus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 19 749 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 26 749 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 19 749 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 19 749 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 19 749 25 , srcInfoPoints = [] } "String"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 29 749 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 38 749 40 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 29 749 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 29 749 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 29 749 37 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 41 749 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 61 749 63 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 41 749 60 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 41 749 42 , SrcSpan "tests/examples/Directory.hs" 749 59 749 60 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 42 749 59 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 749 52 749 54 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 42 749 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 42 749 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 42 749 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 42 749 45 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 46 749 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 46 749 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 46 749 51 , srcInfoPoints = [] } "CStat")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 55 749 59 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 55 749 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 55 749 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 55 749 57 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 58 749 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 58 749 59 , srcInfoPoints = [] } "a"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 64 749 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 64 749 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 64 749 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 64 749 66 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 67 749 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 749 67 749 68 , srcInfoPoints = [] } "a")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 1 754 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 1 754 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 1 750 15 , srcInfoPoints = [] } "withFileStatus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 16 750 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 16 750 19 , srcInfoPoints = [] } "loc") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 20 750 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 20 750 24 , srcInfoPoints = [] } "name") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 25 750 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 25 750 26 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 27 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 750 27 750 28 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 750 29 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 750 29 750 31 , SrcSpan "tests/examples/Directory.hs" 751 3 751 3 , SrcSpan "tests/examples/Directory.hs" 756 1 756 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 754 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 754 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 751 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 751 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 751 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 3 751 16 , srcInfoPoints = [] } "modifyIOError"))) (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 17 751 40 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 751 17 751 18 , SrcSpan "tests/examples/Directory.hs" 751 39 751 40 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 18 751 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 751 18 751 19 , SrcSpan "tests/examples/Directory.hs" 751 19 751 33 , SrcSpan "tests/examples/Directory.hs" 751 33 751 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 18 751 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 751 18 751 19 , SrcSpan "tests/examples/Directory.hs" 751 19 751 33 , SrcSpan "tests/examples/Directory.hs" 751 33 751 34 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 19 751 33 , srcInfoPoints = [] } "ioeSetFileName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 35 751 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 35 751 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 35 751 39 , srcInfoPoints = [] } "name"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 41 751 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 41 751 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 751 41 751 42 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 5 754 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 5 752 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 5 752 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 5 752 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 5 752 16 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 17 752 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 17 752 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 17 752 28 , srcInfoPoints = [] } "sizeof_stat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 29 752 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 29 752 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 29 752 30 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 31 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 752 31 752 32 , SrcSpan "tests/examples/Directory.hs" 752 34 752 36 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 32 752 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 752 32 752 33 , srcInfoPoints = [] } "p") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 7 754 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 7 753 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 7 753 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 7 753 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 7 753 19 , srcInfoPoints = [] } "withFilePath"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 20 753 43 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 753 20 753 21 , SrcSpan "tests/examples/Directory.hs" 753 42 753 43 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 21 753 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 21 753 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 21 753 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 21 753 37 , srcInfoPoints = [] } "fileNameEndClean"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 38 753 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 38 753 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 38 753 42 , srcInfoPoints = [] } "name")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 44 753 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 44 753 45 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 44 753 45 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 46 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 753 46 753 47 , SrcSpan "tests/examples/Directory.hs" 753 49 753 51 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 47 753 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 47 753 48 , srcInfoPoints = [] } "s") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 753 52 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 753 52 753 54 , SrcSpan "tests/examples/Directory.hs" 754 9 754 9 , SrcSpan "tests/examples/Directory.hs" 756 1 756 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 9 754 33 , srcInfoPoints = [] } "throwErrnoIfMinus1Retry_"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 34 754 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 34 754 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 34 754 37 , srcInfoPoints = [] } "loc")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 38 754 50 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 754 38 754 39 , SrcSpan "tests/examples/Directory.hs" 754 49 754 50 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 39 754 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 39 754 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 39 754 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 39 754 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 39 754 45 , srcInfoPoints = [] } "c_stat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 46 754 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 46 754 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 46 754 47 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 48 754 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 48 754 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 754 48 754 49 , srcInfoPoints = [] } "p")))))) ])))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 1 756 77 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 25 756 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 1 756 24 , srcInfoPoints = [] } "withFileOrSymlinkStatus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 28 756 77 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 35 756 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 28 756 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 28 756 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 28 756 34 , srcInfoPoints = [] } "String"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 38 756 77 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 47 756 49 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 38 756 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 38 756 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 38 756 46 , srcInfoPoints = [] } "FilePath"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 50 756 77 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 70 756 72 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 50 756 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 50 756 51 , SrcSpan "tests/examples/Directory.hs" 756 68 756 69 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 51 756 68 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 756 61 756 63 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 51 756 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 51 756 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 51 756 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 51 756 54 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 55 756 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 55 756 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 55 756 60 , srcInfoPoints = [] } "CStat")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 64 756 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 64 756 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 64 756 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 64 756 66 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 67 756 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 67 756 68 , srcInfoPoints = [] } "a"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 73 756 77 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 73 756 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 73 756 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 73 756 75 , srcInfoPoints = [] } "IO"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 76 756 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 756 76 756 77 , srcInfoPoints = [] } "a")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 1 761 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 1 761 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 1 757 24 , srcInfoPoints = [] } "withFileOrSymlinkStatus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 25 757 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 25 757 28 , srcInfoPoints = [] } "loc") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 29 757 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 29 757 33 , srcInfoPoints = [] } "name") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 34 757 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 34 757 35 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 36 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 757 36 757 37 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 757 38 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 757 38 757 40 , SrcSpan "tests/examples/Directory.hs" 758 3 758 3 , SrcSpan "tests/examples/Directory.hs" 763 1 763 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 761 49 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 761 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 758 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 758 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 758 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 3 758 16 , srcInfoPoints = [] } "modifyIOError"))) (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 17 758 40 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 758 17 758 18 , SrcSpan "tests/examples/Directory.hs" 758 39 758 40 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 18 758 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 758 18 758 19 , SrcSpan "tests/examples/Directory.hs" 758 19 758 33 , SrcSpan "tests/examples/Directory.hs" 758 33 758 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 18 758 34 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 758 18 758 19 , SrcSpan "tests/examples/Directory.hs" 758 19 758 33 , SrcSpan "tests/examples/Directory.hs" 758 33 758 34 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 19 758 33 , srcInfoPoints = [] } "ioeSetFileName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 35 758 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 35 758 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 35 758 39 , srcInfoPoints = [] } "name"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 41 758 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 41 758 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 758 41 758 42 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 5 761 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 5 759 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 5 759 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 5 759 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 5 759 16 , srcInfoPoints = [] } "allocaBytes"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 17 759 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 17 759 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 17 759 28 , srcInfoPoints = [] } "sizeof_stat")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 29 759 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 29 759 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 29 759 30 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 31 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 759 31 759 32 , SrcSpan "tests/examples/Directory.hs" 759 34 759 36 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 32 759 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 759 32 759 33 , srcInfoPoints = [] } "p") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 7 761 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 7 760 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 7 760 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 7 760 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 7 760 19 , srcInfoPoints = [] } "withFilePath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 20 760 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 20 760 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 20 760 24 , srcInfoPoints = [] } "name")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 25 760 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 25 760 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 25 760 26 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 27 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 760 27 760 28 , SrcSpan "tests/examples/Directory.hs" 760 30 760 32 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 28 760 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 28 760 29 , srcInfoPoints = [] } "s") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 760 33 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 760 33 760 35 , SrcSpan "tests/examples/Directory.hs" 761 9 761 9 , SrcSpan "tests/examples/Directory.hs" 763 1 763 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 9 761 33 , srcInfoPoints = [] } "throwErrnoIfMinus1Retry_"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 34 761 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 34 761 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 34 761 37 , srcInfoPoints = [] } "loc")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 38 761 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 761 38 761 39 , SrcSpan "tests/examples/Directory.hs" 761 48 761 49 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 39 761 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 39 761 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 39 761 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 39 761 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 39 761 44 , srcInfoPoints = [] } "lstat"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 45 761 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 45 761 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 45 761 46 , srcInfoPoints = [] } "s")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 47 761 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 47 761 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 761 47 761 48 , srcInfoPoints = [] } "p")))))) ])))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 1 763 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 763 18 763 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 1 763 17 , srcInfoPoints = [] } "modificationTime" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 21 763 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 763 31 763 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 21 763 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 21 763 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 21 763 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 21 763 24 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 25 763 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 25 763 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 25 763 30 , srcInfoPoints = [] } "CStat")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 34 763 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 34 763 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 34 763 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 34 763 36 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 37 763 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 37 763 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 763 37 763 46 , srcInfoPoints = [] } "ClockTime"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 1 767 52 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 1 767 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 1 764 17 , srcInfoPoints = [] } "modificationTime") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 18 764 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 18 764 22 , srcInfoPoints = [] } "stat") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 23 767 52 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 764 23 764 24 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 764 25 767 52 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 764 25 764 27 , SrcSpan "tests/examples/Directory.hs" 765 5 765 5 , SrcSpan "tests/examples/Directory.hs" 766 5 766 5 , SrcSpan "tests/examples/Directory.hs" 767 5 767 5 , SrcSpan "tests/examples/Directory.hs" 769 1 769 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 5 765 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 765 11 765 13 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 5 765 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 5 765 10 , srcInfoPoints = [] } "mtime")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 14 765 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 14 765 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 14 765 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 14 765 22 , srcInfoPoints = [] } "st_mtime"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 23 765 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 23 765 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 765 23 765 27 , srcInfoPoints = [] } "stat")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 5 766 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 5 766 8 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 9 766 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 9 766 9 , SrcSpan "tests/examples/Directory.hs" 767 5 767 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 9 766 69 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 9 766 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 9 766 22 , srcInfoPoints = [] } "realToInteger")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 23 766 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 23 766 24 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 25 766 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 44 766 46 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 25 766 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 25 766 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 25 766 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 25 766 30 , srcInfoPoints = [] } "round"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 31 766 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 31 766 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 31 766 32 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 33 766 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 33 766 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 33 766 43 , srcInfoPoints = [] } "realToFrac")))) (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 69 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 54 766 56 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 54 766 56 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 54 766 56 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 54 766 56 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 47 766 51 , srcInfoPoints = [] } "Real"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 52 766 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 52 766 53 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 57 766 69 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 766 59 766 61 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 57 766 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 57 766 58 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 62 766 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 62 766 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 766 62 766 69 , srcInfoPoints = [] } "Integer"))))))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 5 767 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 5 767 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 5 767 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 5 767 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 5 767 11 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 12 767 52 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 767 12 767 13 , SrcSpan "tests/examples/Directory.hs" 767 51 767 52 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 13 767 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 13 767 49 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 13 767 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 13 767 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 13 767 16 , srcInfoPoints = [] } "TOD"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 17 767 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 767 17 767 18 , SrcSpan "tests/examples/Directory.hs" 767 48 767 49 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 18 767 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 18 767 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 18 767 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 18 767 31 , srcInfoPoints = [] } "realToInteger"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 32 767 48 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 767 32 767 33 , SrcSpan "tests/examples/Directory.hs" 767 47 767 48 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 33 767 47 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 767 39 767 41 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 33 767 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 33 767 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 33 767 38 , srcInfoPoints = [] } "mtime"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 42 767 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 42 767 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 42 767 47 , srcInfoPoints = [] } "CTime")))))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 50 767 51 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 767 50 767 51 , srcInfoPoints = [] } 0 "0"))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 1 769 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 769 13 769 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 1 769 12 , srcInfoPoints = [] } "isDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 16 769 36 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 769 26 769 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 16 769 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 16 769 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 16 769 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 16 769 19 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 20 769 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 20 769 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 20 769 25 , srcInfoPoints = [] } "CStat")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 29 769 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 29 769 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 29 769 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 29 769 31 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 32 769 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 32 769 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 769 32 769 36 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 1 772 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 1 772 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 1 770 12 , srcInfoPoints = [] } "isDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 13 770 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 13 770 17 , srcInfoPoints = [] } "stat") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 18 772 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 770 18 770 19 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 770 20 772 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 770 20 770 22 , SrcSpan "tests/examples/Directory.hs" 771 3 771 3 , SrcSpan "tests/examples/Directory.hs" 772 3 772 3 , SrcSpan "tests/examples/Directory.hs" 774 1 774 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 3 771 23 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 771 8 771 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 3 771 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 3 771 7 , srcInfoPoints = [] } "mode")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 11 771 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 11 771 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 11 771 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 11 771 18 , srcInfoPoints = [] } "st_mode"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 19 771 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 19 771 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 771 19 771 23 , srcInfoPoints = [] } "stat")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 3 772 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 3 772 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 3 772 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 3 772 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 3 772 9 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 10 772 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 772 10 772 11 , SrcSpan "tests/examples/Directory.hs" 772 23 772 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 11 772 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 11 772 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 11 772 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 11 772 18 , srcInfoPoints = [] } "s_isdir"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 19 772 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 19 772 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 772 19 772 23 , srcInfoPoints = [] } "mode")))))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 1 774 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 774 18 774 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 1 774 17 , srcInfoPoints = [] } "fileNameEndClean" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 21 774 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 774 28 774 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 21 774 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 21 774 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 21 774 27 , srcInfoPoints = [] } "String"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 31 774 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 31 774 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 774 31 774 37 , srcInfoPoints = [] } "String")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 1 776 76 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 1 776 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 1 775 17 , srcInfoPoints = [] } "fileNameEndClean") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 18 775 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 18 775 22 , srcInfoPoints = [] } "name") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 23 776 76 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 775 23 775 24 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 25 776 76 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 775 25 775 27 , SrcSpan "tests/examples/Directory.hs" 775 41 775 45 , SrcSpan "tests/examples/Directory.hs" 776 41 776 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 28 775 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 28 775 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 28 775 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 28 775 35 , srcInfoPoints = [] } "isDrive"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 36 775 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 36 775 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 36 775 40 , srcInfoPoints = [] } "name")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 46 775 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 46 775 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 46 775 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 46 775 70 , srcInfoPoints = [] } "addTrailingPathSeparator"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 71 775 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 71 775 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 775 71 775 75 , srcInfoPoints = [] } "name")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 46 776 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 46 776 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 46 776 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 46 776 71 , srcInfoPoints = [] } "dropTrailingPathSeparator"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 72 776 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 72 776 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 776 72 776 76 , srcInfoPoints = [] } "name")))))) Nothing ] , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 1 778 78 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 778 1 778 8 , SrcSpan "tests/examples/Directory.hs" 778 9 778 15 , SrcSpan "tests/examples/Directory.hs" 778 29 778 61 , SrcSpan "tests/examples/Directory.hs" 778 70 778 72 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 16 778 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 22 778 28 , srcInfoPoints = [] })) (Just "HsDirectory.h __hscore_S_IRUSR") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 62 778 69 , srcInfoPoints = [] } "s_IRUSR") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 73 778 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 73 778 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 778 73 778 78 , srcInfoPoints = [] } "CMode"))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 1 779 78 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 779 1 779 8 , SrcSpan "tests/examples/Directory.hs" 779 9 779 15 , SrcSpan "tests/examples/Directory.hs" 779 29 779 61 , SrcSpan "tests/examples/Directory.hs" 779 70 779 72 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 16 779 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 22 779 28 , srcInfoPoints = [] })) (Just "HsDirectory.h __hscore_S_IWUSR") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 62 779 69 , srcInfoPoints = [] } "s_IWUSR") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 73 779 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 73 779 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 779 73 779 78 , srcInfoPoints = [] } "CMode"))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 1 780 78 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 780 1 780 8 , SrcSpan "tests/examples/Directory.hs" 780 9 780 15 , SrcSpan "tests/examples/Directory.hs" 780 29 780 61 , SrcSpan "tests/examples/Directory.hs" 780 70 780 72 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 16 780 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 22 780 28 , srcInfoPoints = [] })) (Just "HsDirectory.h __hscore_S_IXUSR") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 62 780 69 , srcInfoPoints = [] } "s_IXUSR") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 73 780 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 73 780 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 780 73 780 78 , srcInfoPoints = [] } "CMode"))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 1 781 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 781 1 781 8 , SrcSpan "tests/examples/Directory.hs" 781 9 781 15 , SrcSpan "tests/examples/Directory.hs" 781 29 781 47 , SrcSpan "tests/examples/Directory.hs" 781 56 781 58 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 16 781 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 22 781 28 , srcInfoPoints = [] })) (Just "__hscore_S_IFDIR") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 48 781 55 , srcInfoPoints = [] } "s_IFDIR") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 59 781 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 59 781 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 781 59 781 64 , srcInfoPoints = [] } "CMode"))) , ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 784 1 785 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 784 1 784 8 , SrcSpan "tests/examples/Directory.hs" 784 9 784 15 , SrcSpan "tests/examples/Directory.hs" 784 29 784 54 , SrcSpan "tests/examples/Directory.hs" 785 18 785 20 ] } (CCall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 784 16 784 21 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 784 22 784 28 , srcInfoPoints = [] })) (Just "__hscore_long_path_size") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 785 3 785 17 , srcInfoPoints = [] } "long_path_size") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 785 21 785 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 785 21 785 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 785 21 785 24 , srcInfoPoints = [] } "Int"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 1 808 32 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 808 18 808 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 1 808 17 , srcInfoPoints = [] } "getHomeDirectory" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 21 808 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 21 808 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 21 808 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 21 808 23 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 24 808 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 24 808 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 808 24 808 32 , srcInfoPoints = [] } "FilePath")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 809 1 818 46 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 809 1 809 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 809 1 809 17 , srcInfoPoints = [] } "getHomeDirectory")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 809 18 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 809 18 809 19 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 3 818 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 3 810 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 3 810 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 3 810 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 3 810 16 , srcInfoPoints = [] } "modifyIOError"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 17 810 56 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 810 17 810 18 , SrcSpan "tests/examples/Directory.hs" 810 55 810 56 ] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 18 810 55 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 810 18 810 19 , SrcSpan "tests/examples/Directory.hs" 810 54 810 55 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 19 810 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 810 19 810 20 , SrcSpan "tests/examples/Directory.hs" 810 20 810 34 , SrcSpan "tests/examples/Directory.hs" 810 34 810 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 19 810 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 810 19 810 20 , SrcSpan "tests/examples/Directory.hs" 810 20 810 34 , SrcSpan "tests/examples/Directory.hs" 810 34 810 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 20 810 34 , srcInfoPoints = [] } "ioeSetLocation"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 36 810 54 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 36 810 54 , srcInfoPoints = [] } "getHomeDirectory" "getHomeDirectory"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 57 810 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 57 810 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 57 810 58 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 810 59 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 810 59 810 61 , SrcSpan "tests/examples/Directory.hs" 811 3 811 3 , SrcSpan "tests/examples/Directory.hs" 812 3 812 3 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 3 811 73 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 811 5 811 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 3 811 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 3 811 4 , srcInfoPoints = [] } "r")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 8 811 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 8 811 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 8 811 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 8 811 11 , srcInfoPoints = [] } "try"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 12 811 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 12 811 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 12 811 13 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 35 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 35 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 35 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 14 811 35 , srcInfoPoints = [] } "sHGetFolderPath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 36 811 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 36 811 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 36 811 43 , srcInfoPoints = [] } "nullPtr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 44 811 63 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 44 811 63 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 44 811 63 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 44 811 63 , srcInfoPoints = [] } "cSIDL_PROFILE")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 64 811 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 64 811 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 64 811 71 , srcInfoPoints = [] } "nullPtr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 72 811 73 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 811 72 811 73 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 3 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 812 3 812 7 , SrcSpan "tests/examples/Directory.hs" 812 41 812 43 , SrcSpan "tests/examples/Directory.hs" 813 5 813 5 , SrcSpan "tests/examples/Directory.hs" 814 5 814 5 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 3 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 812 3 812 7 , SrcSpan "tests/examples/Directory.hs" 812 41 812 43 , SrcSpan "tests/examples/Directory.hs" 813 5 813 5 , SrcSpan "tests/examples/Directory.hs" 814 5 814 5 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 8 812 40 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 812 8 812 9 , SrcSpan "tests/examples/Directory.hs" 812 39 812 40 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 9 812 39 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 812 11 812 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 9 812 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 9 812 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 9 812 10 , srcInfoPoints = [] } "r"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 14 812 39 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 14 812 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 14 812 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 14 812 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 14 812 20 , srcInfoPoints = [] } "Either"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 21 812 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 21 812 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 21 812 32 , srcInfoPoints = [] } "IOException")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 33 812 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 33 812 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 812 33 812 39 , srcInfoPoints = [] } "String")))))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 5 813 24 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 5 813 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 5 813 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 5 813 10 , srcInfoPoints = [] } "Right")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 11 813 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 11 813 12 , srcInfoPoints = [] } "s") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 13 813 24 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 813 13 813 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 16 813 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 16 813 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 16 813 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 16 813 22 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 23 813 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 23 813 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 813 23 813 24 , srcInfoPoints = [] } "s"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 5 818 46 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 5 814 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 5 814 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 5 814 9 , srcInfoPoints = [] } "Left")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 11 814 12 , srcInfoPoints = [] } ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 13 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 814 13 814 15 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 814 16 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 814 16 814 18 , SrcSpan "tests/examples/Directory.hs" 815 7 815 7 , SrcSpan "tests/examples/Directory.hs" 816 7 816 7 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 7 815 78 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 815 10 815 12 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 7 815 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 7 815 9 , srcInfoPoints = [] } "r1")) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 13 815 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 13 815 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 13 815 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 13 815 16 , srcInfoPoints = [] } "try"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 17 815 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 17 815 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 17 815 18 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 76 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 40 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 40 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 40 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 19 815 40 , srcInfoPoints = [] } "sHGetFolderPath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 41 815 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 41 815 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 41 815 48 , srcInfoPoints = [] } "nullPtr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 49 815 68 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 49 815 68 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 49 815 68 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 49 815 68 , srcInfoPoints = [] } "cSIDL_WINDOWS")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 69 815 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 69 815 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 69 815 76 , srcInfoPoints = [] } "nullPtr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 77 815 78 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 815 77 815 78 , srcInfoPoints = [] } 0 "0")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 816 7 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 816 7 816 11 , SrcSpan "tests/examples/Directory.hs" 816 15 816 17 , SrcSpan "tests/examples/Directory.hs" 817 9 817 9 , SrcSpan "tests/examples/Directory.hs" 818 9 818 9 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 816 7 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 816 7 816 11 , SrcSpan "tests/examples/Directory.hs" 816 15 816 17 , SrcSpan "tests/examples/Directory.hs" 817 9 817 9 , SrcSpan "tests/examples/Directory.hs" 818 9 818 9 , SrcSpan "tests/examples/Directory.hs" 847 1 847 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 816 12 816 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 816 12 816 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 816 12 816 14 , srcInfoPoints = [] } "r1"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 9 817 28 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 9 817 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 9 817 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 9 817 14 , srcInfoPoints = [] } "Right")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 15 817 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 15 817 16 , srcInfoPoints = [] } "s") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 17 817 28 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 817 17 817 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 20 817 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 20 817 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 20 817 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 20 817 26 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 27 817 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 27 817 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 817 27 817 28 , srcInfoPoints = [] } "s"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 9 818 46 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 9 818 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 9 818 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 9 818 13 , srcInfoPoints = [] } "Left")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 15 818 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 15 818 16 , srcInfoPoints = [] } "e") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 17 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 818 17 818 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 20 818 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 20 818 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 20 818 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 20 818 27 , srcInfoPoints = [] } "ioError"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 28 818 46 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 818 28 818 29 , SrcSpan "tests/examples/Directory.hs" 818 45 818 46 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 29 818 45 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 818 31 818 33 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 29 818 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 29 818 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 29 818 30 , srcInfoPoints = [] } "e"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 34 818 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 34 818 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 818 34 818 45 , srcInfoPoints = [] } "IOException"))))))) Nothing ]) ])) Nothing ]) ]))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 1 847 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 847 25 847 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 1 847 24 , srcInfoPoints = [] } "getAppUserDataDirectory" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 28 847 49 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 847 35 847 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 28 847 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 28 847 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 28 847 34 , srcInfoPoints = [] } "String"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 38 847 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 38 847 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 38 847 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 38 847 40 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 41 847 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 41 847 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 847 41 847 49 , srcInfoPoints = [] } "FilePath"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 1 851 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 1 851 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 1 848 24 , srcInfoPoints = [] } "getAppUserDataDirectory") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 25 848 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 25 848 32 , srcInfoPoints = [] } "appName") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 33 851 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 848 33 848 34 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 848 35 851 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 848 35 848 37 , SrcSpan "tests/examples/Directory.hs" 849 3 849 3 , SrcSpan "tests/examples/Directory.hs" 874 1 874 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 851 27 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 851 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 849 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 849 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 849 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 3 849 16 , srcInfoPoints = [] } "modifyIOError"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 17 849 63 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 849 17 849 18 , SrcSpan "tests/examples/Directory.hs" 849 62 849 63 ] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 18 849 62 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 849 18 849 19 , SrcSpan "tests/examples/Directory.hs" 849 61 849 62 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 19 849 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 849 19 849 20 , SrcSpan "tests/examples/Directory.hs" 849 20 849 34 , SrcSpan "tests/examples/Directory.hs" 849 34 849 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 19 849 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 849 19 849 20 , SrcSpan "tests/examples/Directory.hs" 849 20 849 34 , SrcSpan "tests/examples/Directory.hs" 849 34 849 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 20 849 34 , srcInfoPoints = [] } "ioeSetLocation"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 36 849 61 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 36 849 61 , srcInfoPoints = [] } "getAppUserDataDirectory" "getAppUserDataDirectory"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 64 849 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 64 849 65 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 64 849 65 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 849 66 851 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 849 66 849 68 , SrcSpan "tests/examples/Directory.hs" 850 3 850 3 , SrcSpan "tests/examples/Directory.hs" 850 3 850 3 , SrcSpan "tests/examples/Directory.hs" 851 3 851 3 , SrcSpan "tests/examples/Directory.hs" 874 1 874 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 3 850 67 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 850 5 850 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 3 850 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 3 850 4 , srcInfoPoints = [] } "s")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 29 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 29 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 29 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 8 850 29 , srcInfoPoints = [] } "sHGetFolderPath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 30 850 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 30 850 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 30 850 37 , srcInfoPoints = [] } "nullPtr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 38 850 57 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 38 850 57 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 38 850 57 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 38 850 57 , srcInfoPoints = [] } "cSIDL_APPDATA")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 58 850 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 58 850 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 58 850 65 , srcInfoPoints = [] } "nullPtr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 66 850 67 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 850 66 850 67 , srcInfoPoints = [] } 0 "0"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 3 851 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 3 851 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 3 851 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 3 851 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 3 851 9 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 10 851 27 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 851 10 851 11 , SrcSpan "tests/examples/Directory.hs" 851 26 851 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 11 851 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 11 851 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 11 851 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 11 851 12 , srcInfoPoints = [] } "s"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 12 851 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 12 851 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 12 851 14 , srcInfoPoints = [] } "++"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 14 851 26 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 14 851 18 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 14 851 18 , srcInfoPoints = [] } '\\' "\\\\")) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 18 851 19 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 18 851 19 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 18 851 19 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 19 851 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 19 851 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 851 19 851 26 , srcInfoPoints = [] } "appName"))))))) ])) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 1 874 41 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 874 27 874 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 1 874 26 , srcInfoPoints = [] } "getUserDocumentsDirectory" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 30 874 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 30 874 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 30 874 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 30 874 32 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 33 874 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 33 874 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 874 33 874 41 , srcInfoPoints = [] } "FilePath")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 875 1 877 63 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 875 1 875 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 875 1 875 26 , srcInfoPoints = [] } "getUserDocumentsDirectory")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 875 27 877 63 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 875 27 875 28 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 875 29 877 63 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 875 29 875 31 , SrcSpan "tests/examples/Directory.hs" 876 3 876 3 , SrcSpan "tests/examples/Directory.hs" 905 1 905 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 877 63 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 877 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 876 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 876 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 876 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 3 876 16 , srcInfoPoints = [] } "modifyIOError"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 17 876 65 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 876 17 876 18 , SrcSpan "tests/examples/Directory.hs" 876 64 876 65 ] } (RightSection SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 18 876 64 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 876 18 876 19 , SrcSpan "tests/examples/Directory.hs" 876 63 876 64 ] } (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 19 876 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 876 19 876 20 , SrcSpan "tests/examples/Directory.hs" 876 20 876 34 , SrcSpan "tests/examples/Directory.hs" 876 34 876 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 19 876 35 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 876 19 876 20 , SrcSpan "tests/examples/Directory.hs" 876 20 876 34 , SrcSpan "tests/examples/Directory.hs" 876 34 876 35 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 20 876 34 , srcInfoPoints = [] } "ioeSetLocation"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 36 876 63 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 36 876 63 , srcInfoPoints = [] } "getUserDocumentsDirectory" "getUserDocumentsDirectory"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 66 876 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 66 876 67 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 66 876 67 , srcInfoPoints = [] } "$"))) (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 876 68 877 63 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 876 68 876 70 , SrcSpan "tests/examples/Directory.hs" 877 3 877 3 , SrcSpan "tests/examples/Directory.hs" 877 3 877 3 , SrcSpan "tests/examples/Directory.hs" 905 1 905 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 61 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 24 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 24 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 24 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 3 877 24 , srcInfoPoints = [] } "sHGetFolderPath"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 25 877 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 25 877 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 25 877 32 , srcInfoPoints = [] } "nullPtr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 33 877 53 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 33 877 53 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 33 877 53 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 33 877 53 , srcInfoPoints = [] } "cSIDL_PERSONAL")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 54 877 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 54 877 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 54 877 61 , srcInfoPoints = [] } "nullPtr")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 62 877 63 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 877 62 877 63 , srcInfoPoints = [] } 0 "0"))) ])) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 1 905 37 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 905 23 905 25 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 1 905 22 , srcInfoPoints = [] } "getTemporaryDirectory" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 26 905 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 26 905 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 26 905 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 26 905 28 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 29 905 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 29 905 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 905 29 905 37 , srcInfoPoints = [] } "FilePath")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 906 1 907 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 906 1 906 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 906 1 906 22 , srcInfoPoints = [] } "getTemporaryDirectory")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 906 23 907 30 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 906 23 906 24 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 906 25 907 30 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 906 25 906 27 , SrcSpan "tests/examples/Directory.hs" 907 3 907 3 , SrcSpan "tests/examples/Directory.hs" 912 1 912 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 907 3 907 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 907 3 907 30 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 907 3 907 30 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 907 3 907 30 , srcInfoPoints = [] } "Win32") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 907 3 907 30 , srcInfoPoints = [] } "getTemporaryDirectory"))) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 912 1 912 23 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 912 14 912 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 912 1 912 13 , srcInfoPoints = [] } "exeExtension" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 912 17 912 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 912 17 912 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 912 17 912 23 , srcInfoPoints = [] } "String"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 1 913 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 1 913 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 1 913 13 , srcInfoPoints = [] } "exeExtension")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 14 913 21 , srcInfoPoints = [ SrcSpan "tests/examples/Directory.hs" 913 14 913 15 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 16 913 21 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Directory.hs" 913 16 913 21 , srcInfoPoints = [] } "exe" "exe"))) Nothing ] , [ Comment False (SrcSpan "tests/examples/Directory.hs" 3 1 3 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Directory.hs" 4 1 4 5) " |" , Comment False (SrcSpan "tests/examples/Directory.hs" 5 1 5 35) " Module : System.Directory" , Comment False (SrcSpan "tests/examples/Directory.hs" 6 1 6 53) " Copyright : (c) The University of Glasgow 2001" , Comment False (SrcSpan "tests/examples/Directory.hs" 7 1 7 66) " License : BSD-style (see the file libraries/base/LICENSE)" , Comment False (SrcSpan "tests/examples/Directory.hs" 8 1 8 3) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 9 1 9 40) " Maintainer : libraries@haskell.org" , Comment False (SrcSpan "tests/examples/Directory.hs" 10 1 10 25) " Stability : stable" , Comment False (SrcSpan "tests/examples/Directory.hs" 11 1 11 27) " Portability : portable" , Comment False (SrcSpan "tests/examples/Directory.hs" 12 1 12 3) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 13 1 13 59) " System-independent interface to directory manipulation." , Comment False (SrcSpan "tests/examples/Directory.hs" 14 1 14 3) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 15 1 15 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Directory.hs" 19 5 19 14) " $intro" , Comment False (SrcSpan "tests/examples/Directory.hs" 21 5 21 32) " * Actions on directories" , Comment False (SrcSpan "tests/examples/Directory.hs" 22 29 22 52) " :: FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 23 33 23 64) " :: Bool -> FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 24 29 24 52) " :: FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 25 33 25 56) " :: FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 26 29 26 64) " :: FilePath -> FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 28 33 28 64) " :: FilePath -> IO [FilePath]" , Comment False (SrcSpan "tests/examples/Directory.hs" 29 33 29 50) " :: IO FilePath" , Comment False (SrcSpan "tests/examples/Directory.hs" 30 33 30 56) " :: FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 32 5 32 33) " * Pre-defined directories" , Comment False (SrcSpan "tests/examples/Directory.hs" 38 5 38 26) " * Actions on files" , Comment False (SrcSpan "tests/examples/Directory.hs" 39 25 39 48) " :: FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 40 33 40 68) " :: FilePath -> FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 41 33 41 68) " :: FilePath -> FilePath -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 47 5 47 25) " * Existence tests" , Comment False (SrcSpan "tests/examples/Directory.hs" 48 25 48 50) " :: FilePath -> IO Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 49 33 49 58) " :: FilePath -> IO Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 51 5 51 21) " * Permissions" , Comment False (SrcSpan "tests/examples/Directory.hs" 53 5 53 20) " $permissions" , Comment False (SrcSpan "tests/examples/Directory.hs" 57 21 57 46) " :: Permissions -> Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 58 21 58 46) " :: Permissions -> Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 59 21 59 46) " :: Permissions -> Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 60 21 60 46) " :: Permissions -> Bool" , Comment False (SrcSpan "tests/examples/Directory.hs" 63 33 63 65) " :: FilePath -> IO Permissions" , Comment False (SrcSpan "tests/examples/Directory.hs" 64 33 64 71) " :: FilePath -> Permissions -> IO ()" , Comment False (SrcSpan "tests/examples/Directory.hs" 67 5 67 20) " * Timestamps" , Comment False (SrcSpan "tests/examples/Directory.hs" 69 33 69 63) " :: FilePath -> IO ClockTime" , Comment True (SrcSpan "tests/examples/Directory.hs" 86 1 86 33) "# CFILES cbits/directory.c #" , Comment True (SrcSpan "tests/examples/Directory.hs" 96 1 110 3) " $intro\nA directory contains a series of entries, each of which is a named\nreference to a file system object (file, directory etc.). Some\nentries may be hidden, inaccessible, or have some administrative\nfunction (e.g. `.' or `..' under POSIX\n), but in\nthis standard all such entries are considered to form part of the\ndirectory contents. Entries in sub-directories are not, however,\nconsidered to form part of the directory contents.\n\nEach file system object is referenced by a /path/. There is\nnormally at least one absolute path to each file system object. In\nsome operating systems, it may also be possible to have paths which\nare relative to the current directory.\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 112 1 112 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Directory.hs" 113 1 113 15) " Permissions" , Comment True (SrcSpan "tests/examples/Directory.hs" 115 1 132 3) " $permissions\n\n The 'Permissions' type is used to record whether certain operations are\n permissible on a file\\/directory. 'getPermissions' and 'setPermissions'\n get and set these permissions, respectively. Permissions apply both to\n files and directories. For directories, the executable field will be\n 'False', and for files the searchable field will be 'False'. Note that\n directories may be searchable without being readable, if permission has\n been given to use them as part of a path, but not to examine the\n directory contents.\n\nNote that to change some, but not all permissions, a construct on the following lines must be used.\n\n> makeReadable f = do\n> p <- getPermissions f\n> setPermissions f (p {readable = True})\n\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 140 1 150 3) " |The 'getPermissions' operation returns the\npermissions for the file or directory.\n\nThe operation may fail with:\n\n* 'isPermissionError' if the user is not permitted to access\n the permissions; or\n\n* 'isDoesNotExistError' if the file or directory does not exist.\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 155 3 155 69) " stat() does a better job of guessing the permissions on Windows" , Comment False (SrcSpan "tests/examples/Directory.hs" 156 3 156 71) " than access() does. e.g. for execute permission, it looks at the" , Comment False (SrcSpan "tests/examples/Directory.hs" 157 3 157 28) " filename extension :-)" , Comment False (SrcSpan "tests/examples/Directory.hs" 158 3 158 5) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 159 3 159 78) " I tried for a while to do this properly, using the Windows security API," , Comment False (SrcSpan "tests/examples/Directory.hs" 160 3 160 79) " and eventually gave up. getPermissions is a flawed API anyway. -- SimonM" , Comment True (SrcSpan "tests/examples/Directory.hs" 177 1 187 3) " |The 'setPermissions' operation sets the\npermissions for the file or directory.\n\nThe operation may fail with:\n\n* 'isPermissionError' if the user is not permitted to set\n the permissions; or\n\n* 'isDoesNotExistError' if the file or directory does not exist.\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 217 1 217 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/Directory.hs" 218 1 218 18) " Implementation" , Comment True (SrcSpan "tests/examples/Directory.hs" 220 1 255 3) " |@'createDirectory' dir@ creates a new directory @dir@ which is\ninitially empty, or as near to empty as the operating system\nallows.\n\nThe operation may fail with:\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EROFS, EACCES]@\n\n* 'isAlreadyExistsError' \\/ 'AlreadyExists'\nThe operand refers to a directory that already exists.\n@ [EEXIST]@\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nThe operand is not a valid directory name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'NoSuchThing'\nThere is no path to the directory.\n@[ENOENT, ENOTDIR]@\n\n* 'ResourceExhausted'\nInsufficient resources (virtual memory, process file descriptors,\nphysical disk space, etc.) are available to perform the operation.\n@[EDQUOT, ENOSPC, ENOMEM, EMLINK]@\n\n* 'InappropriateType'\nThe path refers to an existing non-directory object.\n@[EEXIST]@\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 261 1 261 70) " | @'createDirectoryIfMissing' parents dir@ creates a new directory" , Comment False (SrcSpan "tests/examples/Directory.hs" 262 1 262 63) " @dir@ if it doesn\\'t exist. If the first argument is 'True'" , Comment False (SrcSpan "tests/examples/Directory.hs" 263 1 263 77) " the function will also create all parent directories if they are missing." , Comment False (SrcSpan "tests/examples/Directory.hs" 264 38 264 66) " ^ Create its parents too?" , Comment False (SrcSpan "tests/examples/Directory.hs" 265 30 265 77) " ^ The path to the directory you want to make" , Comment False (SrcSpan "tests/examples/Directory.hs" 287 11 287 75) " createDirectory (and indeed POSIX mkdir) does not distinguish" , Comment False (SrcSpan "tests/examples/Directory.hs" 288 11 288 79) " between a dir already existing and a file already existing. So we" , Comment False (SrcSpan "tests/examples/Directory.hs" 289 11 289 79) " check for it here. Unfortunately there is a slight race condition" , Comment False (SrcSpan "tests/examples/Directory.hs" 290 11 290 77) " here, but we think it is benign. It could report an exeption in" , Comment False (SrcSpan "tests/examples/Directory.hs" 291 11 291 77) " the case that the dir did exist but another process deletes the" , Comment False (SrcSpan "tests/examples/Directory.hs" 292 11 292 75) " directory and creates a file in its place before we can check" , Comment False (SrcSpan "tests/examples/Directory.hs" 293 11 293 50) " that the directory did indeed exist." , Comment True (SrcSpan "tests/examples/Directory.hs" 302 1 341 3) " | @'removeDirectory' dir@ removes an existing directory /dir/. The\nimplementation may specify additional constraints which must be\nsatisfied before a directory can be removed (e.g. the directory has to\nbe empty, or may not be in use by other processes). It is not legal\nfor an implementation to partially remove a directory unless the\nentire directory is removed. A conformant implementation need not\nsupport directory removal in all situations (e.g. removal of the root\ndirectory).\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\nEIO\n\n* 'InvalidArgument'\nThe operand is not a valid directory name.\n[ENAMETOOLONG, ELOOP]\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe directory does not exist.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EROFS, EACCES, EPERM]@\n\n* 'UnsatisfiedConstraints'\nImplementation-dependent constraints are not satisfied.\n@[EBUSY, ENOTEMPTY, EEXIST]@\n\n* 'UnsupportedOperation'\nThe implementation does not support removal in this situation.\n@[EINVAL]@\n\n* 'InappropriateType'\nThe operand refers to an existing non-directory object.\n@[ENOTDIR]@\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 347 1 347 75) " | @'removeDirectoryRecursive' dir@ removes an existing directory /dir/" , Comment False (SrcSpan "tests/examples/Directory.hs" 348 1 348 65) " together with its content and all subdirectories. Be careful," , Comment False (SrcSpan "tests/examples/Directory.hs" 349 1 349 70) " if the directory contains symlinks, the function will follow them." , Comment False (SrcSpan "tests/examples/Directory.hs" 360 31 360 77) " If f is not a directory, re-throw the error" , Comment True (SrcSpan "tests/examples/Directory.hs" 365 1 397 3) " |'removeFile' /file/ removes the directory entry for an existing file\n/file/, where /file/ is not itself a directory. The\nimplementation may specify additional constraints which must be\nsatisfied before a file can be removed (e.g. the file may not be in\nuse by other processes).\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nThe operand is not a valid file name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe file does not exist.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EROFS, EACCES, EPERM]@\n\n* 'UnsatisfiedConstraints'\nImplementation-dependent constraints are not satisfied.\n@[EBUSY]@\n\n* 'InappropriateType'\nThe operand refers to an existing directory.\n@[EPERM, EINVAL]@\n\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 403 1 450 3) " |@'renameDirectory' old new@ changes the name of an existing\ndirectory from /old/ to /new/. If the /new/ directory\nalready exists, it is atomically replaced by the /old/ directory.\nIf the /new/ directory is neither the /old/ directory nor an\nalias of the /old/ directory, it is removed as if by\n'removeDirectory'. A conformant implementation need not support\nrenaming directories in all situations (e.g. renaming to an existing\ndirectory, or across different physical devices), but the constraints\nmust be documented.\n\nOn Win32 platforms, @renameDirectory@ fails if the /new/ directory already\nexists.\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nEither operand is not a valid directory name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe original directory does not exist, or there is no path to the target.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EROFS, EACCES, EPERM]@\n\n* 'ResourceExhausted'\nInsufficient resources are available to perform the operation.\n@[EDQUOT, ENOSPC, ENOMEM, EMLINK]@\n\n* 'UnsatisfiedConstraints'\nImplementation-dependent constraints are not satisfied.\n@[EBUSY, ENOTEMPTY, EEXIST]@\n\n* 'UnsupportedOperation'\nThe implementation does not support renaming in this situation.\n@[EINVAL, EXDEV]@\n\n* 'InappropriateType'\nEither path refers to an existing non-directory object.\n@[ENOTDIR, EISDIR]@\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 454 4 454 73) " XXX this test isn't performed atomically with the following rename" , Comment False (SrcSpan "tests/examples/Directory.hs" 455 4 455 26) " ToDo: use Win32 API" , Comment True (SrcSpan "tests/examples/Directory.hs" 465 1 507 3) " |@'renameFile' old new@ changes the name of an existing file system\nobject from /old/ to /new/. If the /new/ object already\nexists, it is atomically replaced by the /old/ object. Neither\npath may refer to an existing directory. A conformant implementation\nneed not support renaming files in all situations (e.g. renaming\nacross different physical devices), but the constraints must be\ndocumented.\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nEither operand is not a valid file name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe original file does not exist, or there is no path to the target.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EROFS, EACCES, EPERM]@\n\n* 'ResourceExhausted'\nInsufficient resources are available to perform the operation.\n@[EDQUOT, ENOSPC, ENOMEM, EMLINK]@\n\n* 'UnsatisfiedConstraints'\nImplementation-dependent constraints are not satisfied.\n@[EBUSY]@\n\n* 'UnsupportedOperation'\nThe implementation does not support renaming in this situation.\n@[EXDEV]@\n\n* 'InappropriateType'\nEither path refers to an existing directory.\n@[ENOTDIR, EISDIR, EINVAL, EEXIST, ENOTEMPTY]@\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 511 4 511 73) " XXX this test isn't performed atomically with the following rename" , Comment False (SrcSpan "tests/examples/Directory.hs" 512 4 512 26) " ToDo: use Win32 API" , Comment True (SrcSpan "tests/examples/Directory.hs" 522 1 526 3) " |@'copyFile' old new@ copies the existing file from /old/ to /new/.\nIf the /new/ file already exists, it is atomically replaced by the /old/ file.\nNeither path may refer to an existing directory. The permissions of /old/ are\ncopied to /new/, if possible.\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 553 1 553 60) " | Given path referring to a file or directory, returns a" , Comment False (SrcSpan "tests/examples/Directory.hs" 554 1 554 64) " canonicalized path, with the intent that two paths referring" , Comment False (SrcSpan "tests/examples/Directory.hs" 555 1 555 66) " to the same file\\/directory will map to the same canonicalized" , Comment False (SrcSpan "tests/examples/Directory.hs" 556 1 556 58) " path. Note that it is impossible to guarantee that the" , Comment False (SrcSpan "tests/examples/Directory.hs" 557 1 557 67) " implication (same file\\/dir \\<=\\> same canonicalizedPath) holds" , Comment False (SrcSpan "tests/examples/Directory.hs" 558 1 558 66) " in either direction: this function can make only a best-effort" , Comment False (SrcSpan "tests/examples/Directory.hs" 559 1 559 12) " attempt." , Comment False (SrcSpan "tests/examples/Directory.hs" 564 9 564 73) " normalise does more stuff, like upper-casing the drive letter" , Comment False (SrcSpan "tests/examples/Directory.hs" 567 1 567 43) " | 'makeRelative' the current directory." , Comment False (SrcSpan "tests/examples/Directory.hs" 573 1 573 66) " | Given an executable file name, searches for such file in the" , Comment False (SrcSpan "tests/examples/Directory.hs" 574 1 574 69) " directories listed in system PATH. The returned value is the path" , Comment False (SrcSpan "tests/examples/Directory.hs" 575 1 575 70) " to the found executable or Nothing if an executable with the given" , Comment False (SrcSpan "tests/examples/Directory.hs" 576 1 576 70) " name was not found. For example (findExecutable \\\"ghc\\\") gives you" , Comment False (SrcSpan "tests/examples/Directory.hs" 577 1 577 20) " the path to GHC." , Comment False (SrcSpan "tests/examples/Directory.hs" 578 1 578 3) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 579 1 579 60) " The path returned by 'findExecutable' corresponds to the" , Comment False (SrcSpan "tests/examples/Directory.hs" 580 1 580 68) " program that would be executed by 'System.Process.createProcess'" , Comment False (SrcSpan "tests/examples/Directory.hs" 581 1 581 70) " when passed the same string (as a RawCommand, not a ShellCommand)." , Comment False (SrcSpan "tests/examples/Directory.hs" 582 1 582 3) "" , Comment False (SrcSpan "tests/examples/Directory.hs" 583 1 583 71) " On Windows, 'findExecutable' calls the Win32 function 'SearchPath'," , Comment False (SrcSpan "tests/examples/Directory.hs" 584 1 584 68) " which may search other places before checking the directories in" , Comment False (SrcSpan "tests/examples/Directory.hs" 585 1 585 69) " @PATH@. Where it actually searches depends on registry settings," , Comment False (SrcSpan "tests/examples/Directory.hs" 586 1 586 61) " but notably includes the directory containing the current" , Comment False (SrcSpan "tests/examples/Directory.hs" 587 1 587 19) " executable. See" , Comment False (SrcSpan "tests/examples/Directory.hs" 588 1 588 68) " for more" , Comment False (SrcSpan "tests/examples/Directory.hs" 589 1 589 12) " details." , Comment False (SrcSpan "tests/examples/Directory.hs" 590 1 590 3) "" , Comment True (SrcSpan "tests/examples/Directory.hs" 596 1 625 3) " |@'getDirectoryContents' dir@ returns a list of /all/ entries\nin /dir/.\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nThe operand is not a valid directory name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe directory does not exist.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EACCES]@\n\n* 'ResourceExhausted'\nInsufficient resources are available to perform the operation.\n@[EMFILE, ENFILE]@\n\n* 'InappropriateType'\nThe path refers to an existing non-directory object.\n@[ENOTDIR]@\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 636 9 636 71) " we needn't worry about empty directories: adirectory always" , Comment False (SrcSpan "tests/examples/Directory.hs" 637 9 637 45) " has at least \".\" and \"..\" entries" , Comment False (SrcSpan "tests/examples/Directory.hs" 645 18 645 62) " no need to reverse, ordering is undefined" , Comment True (SrcSpan "tests/examples/Directory.hs" 647 1 671 3) " |If the operating system has a notion of current directories,\n'getCurrentDirectory' returns an absolute path to the\ncurrent directory of the calling process.\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThere is no path referring to the current directory.\n@[EPERM, ENOENT, ESTALE...]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EACCES]@\n\n* 'ResourceExhausted'\nInsufficient resources are available to perform the operation.\n\n* 'UnsupportedOperation'\nThe operating system has no notion of current directory.\n\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 676 1 706 3) " |If the operating system has a notion of current directories,\n@'setCurrentDirectory' dir@ changes the current\ndirectory of the calling process to /dir/.\n\nThe operation may fail with:\n\n* 'HardwareFault'\nA physical I\\/O error has occurred.\n@[EIO]@\n\n* 'InvalidArgument'\nThe operand is not a valid directory name.\n@[ENAMETOOLONG, ELOOP]@\n\n* 'isDoesNotExistError' \\/ 'NoSuchThing'\nThe directory does not exist.\n@[ENOENT, ENOTDIR]@\n\n* 'isPermissionError' \\/ 'PermissionDenied'\nThe process has insufficient privileges to perform the operation.\n@[EACCES]@\n\n* 'UnsupportedOperation'\nThe operating system has no notion of current directory, or the\ncurrent directory cannot be dynamically changed.\n\n* 'InappropriateType'\nThe path refers to an existing non-directory object.\n@[ENOTDIR]@\n\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 712 1 714 3) " |The operation 'doesDirectoryExist' returns 'True' if the argument file\nexists and is a directory, and 'False' otherwise.\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 721 1 723 3) " |The operation 'doesFileExist' returns 'True'\nif the argument file exists and is not a directory, and 'False' otherwise.\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 730 1 740 3) " |The 'getModificationTime' operation returns the\nclock time at which the file or directory was last modified.\n\nThe operation may fail with:\n\n* 'isPermissionError' if the user is not permitted to access\n the modification time; or\n\n* 'isDoesNotExistError' if the file or directory does not exist.\n\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 744 2 744 24) " ToDo: use Win32 API" , Comment True (SrcSpan "tests/examples/Directory.hs" 787 1 807 3) " | Returns the current user's home directory.\n\nThe directory returned is expected to be writable by the current user,\nbut note that it isn't generally considered good practice to store\napplication-specific data here; use 'getAppUserDataDirectory'\ninstead.\n\nOn Unix, 'getHomeDirectory' returns the value of the @HOME@\nenvironment variable. On Windows, the system is queried for a\nsuitable path; a typical path might be\n@C:/Documents And Settings/user@.\n\nThe operation may fail with:\n\n* 'UnsupportedOperation'\nThe operating system has no notion of home directory.\n\n* 'isDoesNotExistError'\nThe home directory for the current user does not exist, or\ncannot be found.\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 820 1 846 3) " | Returns the pathname of a directory in which application-specific\ndata for the current user can be stored. The result of\n'getAppUserDataDirectory' for a given application is specific to\nthe current user.\n\nThe argument should be the name of the application, which will be used\nto construct the pathname (so avoid using unusual characters that\nmight result in an invalid pathname).\n\nNote: the directory may not actually exist, and may need to be created\nfirst. It is expected that the parent directory exists and is\nwritable.\n\nOn Unix, this function returns @$HOME\\/.appName@. On Windows, a\ntypical path might be\n\n> C:/Documents And Settings/user/Application Data/appName\n\nThe operation may fail with:\n\n* 'UnsupportedOperation'\nThe operating system has no notion of application-specific data directory.\n\n* 'isDoesNotExistError'\nThe home directory for the current user does not exist, or\ncannot be found.\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 853 1 873 3) " | Returns the current user's document directory.\n\nThe directory returned is expected to be writable by the current user,\nbut note that it isn't generally considered good practice to store\napplication-specific data here; use 'getAppUserDataDirectory'\ninstead.\n\nOn Unix, 'getUserDocumentsDirectory' returns the value of the @HOME@\nenvironment variable. On Windows, the system is queried for a\nsuitable path; a typical path might be\n@C:\\/Documents and Settings\\/user\\/My Documents@.\n\nThe operation may fail with:\n\n* 'UnsupportedOperation'\nThe operating system has no notion of document directory.\n\n* 'isDoesNotExistError'\nThe document directory for the current user does not exist, or\ncannot be found.\n" , Comment True (SrcSpan "tests/examples/Directory.hs" 879 1 904 3) " | Returns the current directory for temporary files.\n\nOn Unix, 'getTemporaryDirectory' returns the value of the @TMPDIR@\nenvironment variable or \\\"\\/tmp\\\" if the variable isn\\'t defined.\nOn Windows, the function checks for the existence of environment variables in\nthe following order and uses the first path found:\n\n*\nTMP environment variable.\n\n*\nTEMP environment variable.\n\n*\nUSERPROFILE environment variable.\n\n*\nThe Windows directory\n\nThe operation may fail with:\n\n* 'UnsupportedOperation'\nThe operating system has no notion of temporary directory.\n\nThe function doesn\\'t verify whether the path exists.\n" , Comment False (SrcSpan "tests/examples/Directory.hs" 909 1 909 60) " ToDo: This should be determined via autoconf (AC_EXEEXT)" , Comment False (SrcSpan "tests/examples/Directory.hs" 910 1 910 36) " | Extension for executable files" , Comment False (SrcSpan "tests/examples/Directory.hs" 911 1 911 64) " (typically @\\\"\\\"@ on Unix and @\\\"exe\\\"@ on Windows or OS\\/2)" ] ) haskell-src-exts-1.23.1/tests/examples/LanguagePragma.hs.parser.golden0000644000000000000000000000654613534314633024126 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/LanguagePragma.hs" 1 1 1 1 , SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 1 , SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 1 , SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 1 , SrcSpan "tests/examples/LanguagePragma.hs" 5 1 5 1 , SrcSpan "tests/examples/LanguagePragma.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 1 1 3 5 , srcInfoPoints = [ SrcSpan "tests/examples/LanguagePragma.hs" 1 1 1 13 , SrcSpan "tests/examples/LanguagePragma.hs" 3 2 3 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 2 1 2 16 , srcInfoPoints = [] } "RecordWildCards" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 1 4 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 6 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/LanguagePragma.hs" 4 6 4 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 8 4 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 8 4 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 8 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 8 4 13 , srcInfoPoints = [] } "print"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 14 4 21 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LanguagePragma.hs" 4 14 4 21 , srcInfoPoints = [] } "hello" "hello")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/SpecializeInstance.hs.parser.golden0000644000000000000000000013014113556712523025021 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializeInstance.hs" 5 1 5 1 , SrcSpan "tests/examples/SpecializeInstance.hs" 5 1 5 1 ] } Nothing [] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 5 0 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 1 1 9 , SrcSpan "tests/examples/SpecializeInstance.hs" 1 37 1 42 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 8 2 8 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 8 3 8 , SrcSpan "tests/examples/SpecializeInstance.hs" 4 8 4 8 , SrcSpan "tests/examples/SpecializeInstance.hs" 5 1 5 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 36 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 18 1 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 18 1 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 18 1 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 18 1 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 10 1 15 , srcInfoPoints = [] } "Sized"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 16 1 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 16 1 17 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 21 1 36 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 21 1 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 21 1 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 21 1 26 , srcInfoPoints = [] } "Sized"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 27 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 1 27 1 28 , SrcSpan "tests/examples/SpecializeInstance.hs" 1 35 1 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 28 1 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 28 1 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 28 1 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 28 1 33 , srcInfoPoints = [] } "Digit"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 34 1 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 1 34 1 35 , srcInfoPoints = [] } "a")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 8 2 58 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 2 8 2 22 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 23 2 31 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 55 2 58 ] } (InstSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 8 2 58 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 2 8 2 22 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 23 2 31 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 55 2 58 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 32 2 54 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 32 2 54 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 32 2 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 32 2 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 32 2 37 , srcInfoPoints = [] } "Sized"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 38 2 54 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 2 38 2 39 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 53 2 54 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 39 2 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 39 2 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 39 2 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 39 2 44 , srcInfoPoints = [] } "Digit"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 45 2 53 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 2 45 2 46 , SrcSpan "tests/examples/SpecializeInstance.hs" 2 52 2 53 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 46 2 52 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 46 2 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 46 2 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 46 2 50 , srcInfoPoints = [] } "Elem"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 51 2 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 2 51 2 52 , srcInfoPoints = [] } "a"))))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 8 3 58 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 3 8 3 22 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 23 3 31 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 55 3 58 ] } (InstSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 8 3 58 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 3 8 3 22 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 23 3 31 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 55 3 58 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 32 3 54 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 32 3 54 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 32 3 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 32 3 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 32 3 37 , srcInfoPoints = [] } "Sized"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 38 3 54 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 3 38 3 39 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 53 3 54 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 39 3 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 39 3 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 39 3 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 39 3 44 , srcInfoPoints = [] } "Digit"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 45 3 53 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 3 45 3 46 , SrcSpan "tests/examples/SpecializeInstance.hs" 3 52 3 53 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 46 3 52 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 46 3 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 46 3 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 46 3 50 , srcInfoPoints = [] } "Node"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 51 3 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 3 51 3 52 , srcInfoPoints = [] } "a"))))))))) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 8 4 50 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 8 4 50 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 8 4 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 8 4 12 , srcInfoPoints = [] } "size") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 13 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 13 4 15 , srcInfoPoints = [] } "xs") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 16 4 50 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 4 16 4 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 18 4 23 , srcInfoPoints = [] } "foldl"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 24 4 45 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 4 24 4 25 , SrcSpan "tests/examples/SpecializeInstance.hs" 4 44 4 45 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 25 4 44 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializeInstance.hs" 4 25 4 26 , SrcSpan "tests/examples/SpecializeInstance.hs" 4 31 4 33 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 27 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 27 4 28 , srcInfoPoints = [] } "i") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 29 4 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 29 4 30 , srcInfoPoints = [] } "x") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 34 4 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 34 4 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 34 4 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 34 4 35 , srcInfoPoints = [] } "i"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 36 4 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 36 4 37 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 36 4 37 , srcInfoPoints = [] } "+"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 38 4 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 38 4 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 38 4 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 38 4 42 , srcInfoPoints = [] } "size"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 43 4 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 43 4 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 43 4 44 , srcInfoPoints = [] } "x")))))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 46 4 47 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 46 4 47 , srcInfoPoints = [] } 0 "0"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 48 4 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 48 4 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializeInstance.hs" 4 48 4 50 , srcInfoPoints = [] } "xs"))))) Nothing ]) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSynonyms3.hs.parser.golden0000644000000000000000000045656113556712523024545 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 1 77 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 8 1 8 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 9 1 9 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 10 1 10 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 12 1 12 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 13 1 13 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 1 16 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 17 1 17 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 1 19 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 20 1 20 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 1 22 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 23 1 23 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 1 25 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 26 1 26 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 28 1 28 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 30 1 30 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 31 1 31 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 1 34 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 1 36 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 37 1 37 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 39 1 39 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 40 1 40 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 42 1 42 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 43 1 43 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 46 1 46 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 48 1 48 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 50 1 50 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 53 1 53 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 56 1 56 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 58 1 58 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 60 1 60 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 63 1 63 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 65 1 65 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 67 1 67 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 69 1 69 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 72 1 72 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 75 1 75 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 77 1 77 1 , SrcSpan "tests/examples/PatternSynonyms3.hs" 77 1 77 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 1 2 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSynonyms3.hs" 1 29 1 30 , SrcSpan "tests/examples/PatternSynonyms3.hs" 1 43 1 44 , SrcSpan "tests/examples/PatternSynonyms3.hs" 1 54 1 55 , SrcSpan "tests/examples/PatternSynonyms3.hs" 1 65 1 66 , SrcSpan "tests/examples/PatternSynonyms3.hs" 1 72 1 73 , SrcSpan "tests/examples/PatternSynonyms3.hs" 2 18 2 19 , SrcSpan "tests/examples/PatternSynonyms3.hs" 2 33 2 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 31 1 43 , srcInfoPoints = [] } "BangPatterns" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 45 1 54 , srcInfoPoints = [] } "PolyKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 56 1 65 , srcInfoPoints = [] } "DataKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 1 67 1 72 , srcInfoPoints = [] } "GADTs" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 2 2 2 18 , srcInfoPoints = [] } "FlexibleContexts" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 2 20 2 32 , srcInfoPoints = [] } "ViewPatterns" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 3 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 3 1 3 13 , SrcSpan "tests/examples/PatternSynonyms3.hs" 3 29 3 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 3 14 3 28 , srcInfoPoints = [] } "ExplicitForAll" ] ] [] [ PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 1 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 5 1 5 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 5 18 5 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 9 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 9 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 9 5 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 16 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 16 5 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 21 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 5 21 5 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 5 23 5 24 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 22 5 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 5 22 5 23 , srcInfoPoints = [] } "x") ]) Unidirectional , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 1 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 8 8 8 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 1 8 7 , srcInfoPoints = [] } "single" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 11 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 8 15 8 17 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 11 8 14 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 8 11 8 12 , SrcSpan "tests/examples/PatternSynonyms3.hs" 8 13 8 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 12 8 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 12 8 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 18 8 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 18 8 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 18 8 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 18 8 23 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 24 8 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 8 24 8 25 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 1 10 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 1 9 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 1 9 7 , srcInfoPoints = [] } "single") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 8 9 18 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 9 8 9 9 , SrcSpan "tests/examples/PatternSynonyms3.hs" 9 17 9 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 9 9 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 9 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 9 9 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 16 9 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 16 9 17 , srcInfoPoints = [] } "x") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 19 9 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 9 19 9 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 21 9 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 21 9 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 21 9 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 21 9 25 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 26 9 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 26 9 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 9 26 9 27 , srcInfoPoints = [] } "x"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 1 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 1 10 7 , srcInfoPoints = [] } "single") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 8 10 9 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 10 10 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 10 10 10 11 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 12 10 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 12 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 10 12 10 19 , srcInfoPoints = [] } "Nothing")))) Nothing ] , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 1 12 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 12 1 12 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 12 16 12 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 9 12 15 , srcInfoPoints = [] } "Single" ] Nothing Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 19 12 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 12 21 12 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 19 12 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 19 12 20 , srcInfoPoints = [] } "a")) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 24 12 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 12 24 12 25 , SrcSpan "tests/examples/PatternSynonyms3.hs" 12 26 12 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 25 12 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 12 25 12 26 , srcInfoPoints = [] } "a")))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 1 13 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 13 1 13 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 13 18 13 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 9 13 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 9 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 9 13 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 16 13 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 16 13 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 20 13 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 13 20 13 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 13 22 13 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 21 13 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 13 21 13 22 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 1 16 45 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 1 16 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 16 16 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 9 16 15 , srcInfoPoints = [] } "Single" ] Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 19 16 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 19 16 20 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 20 16 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 22 16 24 ] })) Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 25 16 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 25 16 26 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 32 16 33 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 34 16 36 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 25 16 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 25 16 26 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 32 16 33 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 34 16 36 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 26 16 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 26 16 32 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 26 16 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 26 16 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 26 16 30 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 31 16 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 31 16 32 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 37 16 45 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 39 16 41 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 37 16 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 37 16 38 , srcInfoPoints = [] } "a")) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 42 16 45 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 16 42 16 43 , SrcSpan "tests/examples/PatternSynonyms3.hs" 16 44 16 45 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 43 16 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 16 43 16 44 , srcInfoPoints = [] } "a")))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 1 17 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 17 1 17 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 17 18 17 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 9 17 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 9 17 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 9 17 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 16 17 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 16 17 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 20 17 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 17 20 17 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 17 22 17 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 21 17 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 17 21 17 22 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 1 19 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 19 3 19 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 1 19 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 6 19 26 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 6 19 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 19 6 19 7 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 13 19 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 15 19 17 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 6 19 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 19 6 19 7 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 13 19 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 15 19 17 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 7 19 13 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 7 19 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 7 19 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 7 19 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 7 19 11 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 12 19 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 12 19 13 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 18 19 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 19 22 19 24 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 18 19 21 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 19 18 19 19 , SrcSpan "tests/examples/PatternSynonyms3.hs" 19 20 19 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 19 19 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 19 19 20 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 25 19 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 19 25 19 26 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 1 20 17 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 1 20 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 1 20 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 3 20 13 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 20 3 20 4 , SrcSpan "tests/examples/PatternSynonyms3.hs" 20 12 20 13 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 4 20 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 4 20 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 4 20 10 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 11 20 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 11 20 12 , srcInfoPoints = [] } "x") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 14 20 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 20 14 20 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 16 20 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 16 20 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 20 16 20 17 , srcInfoPoints = [] } "x")))) Nothing ] , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 1 22 41 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 22 1 22 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 20 22 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 9 22 19 , srcInfoPoints = [] } "SinglePair" ] Nothing Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 23 22 41 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 22 30 22 32 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 23 22 29 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 22 23 22 24 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 25 22 26 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 28 22 29 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 24 22 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 24 22 25 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 27 22 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 27 22 28 , srcInfoPoints = [] } "a") ]) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 33 22 41 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 22 33 22 34 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 40 22 41 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 34 22 40 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 22 34 22 35 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 36 22 37 , SrcSpan "tests/examples/PatternSynonyms3.hs" 22 39 22 40 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 35 22 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 35 22 36 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 38 22 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 22 38 22 39 , srcInfoPoints = [] } "a") ]))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 1 23 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 23 1 23 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 23 22 23 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 9 23 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 9 23 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 9 23 19 , srcInfoPoints = [] } "SinglePair")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 20 23 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 20 23 21 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 24 23 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 23 24 23 25 , SrcSpan "tests/examples/PatternSynonyms3.hs" 23 26 23 27 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 25 23 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 23 25 23 26 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 1 25 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 3 25 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 1 25 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 6 25 36 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 6 25 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 6 25 7 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 13 25 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 15 25 17 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 6 25 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 6 25 7 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 13 25 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 15 25 17 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 7 25 13 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 7 25 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 7 25 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 7 25 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 7 25 11 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 12 25 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 12 25 13 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 18 25 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 27 25 29 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 18 25 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 18 25 19 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 25 25 26 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 19 25 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 25 19 25 20 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 21 25 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 25 24 25 25 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 20 25 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 20 25 21 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 23 25 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 23 25 24 , srcInfoPoints = [] } "a") ])) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 30 25 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 30 25 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 25 30 25 36 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 1 26 26 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 1 26 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 1 26 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 3 26 17 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 26 3 26 4 , SrcSpan "tests/examples/PatternSynonyms3.hs" 26 16 26 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 4 26 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 4 26 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 4 26 14 , srcInfoPoints = [] } "SinglePair")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 15 26 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 15 26 16 , srcInfoPoints = [] } "x") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 18 26 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 26 18 26 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 20 26 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 20 26 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 20 26 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 20 26 24 , srcInfoPoints = [] } "show"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 25 26 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 25 26 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 26 25 26 26 , srcInfoPoints = [] } "x"))))) Nothing ] , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 1 28 14 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 28 1 28 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 28 11 28 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 9 28 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 9 28 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 9 28 10 , srcInfoPoints = [] } "Q")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 13 28 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 13 28 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 28 13 28 14 , srcInfoPoints = [] } "D")) []) ImplicitBidirectional , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 1 30 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 30 1 30 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 30 11 30 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 9 30 10 , srcInfoPoints = [] } "C" ] Nothing Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 14 30 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 30 16 30 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 14 30 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 14 30 15 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 19 30 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 19 30 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 19 30 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 19 30 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 19 30 20 , srcInfoPoints = [] } "X"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 21 30 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 21 30 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 21 30 26 , srcInfoPoints = [] } "Maybe")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 27 30 36 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 30 27 30 28 , SrcSpan "tests/examples/PatternSynonyms3.hs" 30 35 30 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 28 30 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 28 30 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 28 30 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 28 30 33 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 34 30 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 30 34 30 35 , srcInfoPoints = [] } "a")))))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 1 31 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 31 1 31 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 31 13 31 14 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 9 31 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 9 31 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 9 31 10 , srcInfoPoints = [] } "C")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 11 31 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 11 31 12 , srcInfoPoints = [] } "x") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 15 31 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 15 31 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 15 31 16 , srcInfoPoints = [] } "Y")) [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 17 31 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 31 17 31 18 , SrcSpan "tests/examples/PatternSynonyms3.hs" 31 24 31 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 18 31 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 18 31 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 18 31 22 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 23 31 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 31 23 31 24 , srcInfoPoints = [] } "x") ]) ]) ImplicitBidirectional , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 1 34 49 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 34 1 34 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 13 34 15 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 16 34 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 32 34 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 9 34 12 , srcInfoPoints = [] } "Syn" ] (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 23 34 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 23 34 24 , srcInfoPoints = [] } "a") , UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 25 34 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 25 34 26 , srcInfoPoints = [] } "b") , UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 27 34 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 27 34 28 , srcInfoPoints = [] } "c") ]) (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 34 34 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 34 34 34 35 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 35 34 36 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 37 34 39 ] })) Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 40 34 45 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 34 40 34 41 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 41 34 42 , SrcSpan "tests/examples/PatternSynonyms3.hs" 34 43 34 45 ] })) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 46 34 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 46 34 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 34 46 34 49 , srcInfoPoints = [] } "Int"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 1 36 64 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 1 36 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 11 36 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 9 36 10 , srcInfoPoints = [] } "C" ] Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 14 36 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 14 36 15 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 29 36 30 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 31 36 33 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 14 36 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 14 36 15 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 29 36 30 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 31 36 33 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 15 36 29 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 15 36 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 15 36 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 15 36 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 15 36 19 , srcInfoPoints = [] } "Show"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 20 36 29 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 20 36 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 22 36 23 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 28 36 29 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 21 36 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 21 36 22 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 24 36 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 24 36 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 24 36 28 , srcInfoPoints = [] } "Bool")) ])))))) Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 34 36 64 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 36 36 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 34 36 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 34 36 35 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 39 36 64 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 39 36 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 39 36 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 39 36 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 39 36 40 , srcInfoPoints = [] } "X"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 41 36 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 41 36 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 41 36 46 , srcInfoPoints = [] } "Maybe")))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 47 36 64 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 47 36 48 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 63 36 64 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 48 36 63 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 48 36 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 48 36 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 48 36 53 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 54 36 63 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 36 54 36 55 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 56 36 57 , SrcSpan "tests/examples/PatternSynonyms3.hs" 36 62 36 63 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 55 36 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 55 36 56 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 58 36 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 58 36 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 36 58 36 62 , srcInfoPoints = [] } "Bool")) ]))))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 1 37 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 37 1 37 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 37 13 37 14 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 9 37 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 9 37 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 9 37 10 , srcInfoPoints = [] } "C")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 11 37 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 11 37 12 , srcInfoPoints = [] } "x") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 15 37 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 15 37 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 15 37 16 , srcInfoPoints = [] } "Y")) [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 17 37 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 37 17 37 18 , SrcSpan "tests/examples/PatternSynonyms3.hs" 37 32 37 33 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 18 37 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 18 37 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 18 37 22 , srcInfoPoints = [] } "Just")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 23 37 32 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 37 23 37 24 , SrcSpan "tests/examples/PatternSynonyms3.hs" 37 25 37 26 , SrcSpan "tests/examples/PatternSynonyms3.hs" 37 31 37 32 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 24 37 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 24 37 25 , srcInfoPoints = [] } "x") , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 27 37 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 27 37 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 37 27 37 31 , srcInfoPoints = [] } "True")) [] ] ]) ]) ImplicitBidirectional , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 1 39 22 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 39 1 39 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 39 11 39 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 9 39 10 , srcInfoPoints = [] } "P" ] Nothing Nothing Nothing Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 14 39 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 14 39 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 14 39 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 14 39 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 14 39 15 , srcInfoPoints = [] } "T"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 16 39 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 16 39 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 16 39 20 , srcInfoPoints = [] } "Bool")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 21 39 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 39 21 39 22 , srcInfoPoints = [] } "b"))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 1 40 22 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 40 1 40 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 40 11 40 13 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 9 40 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 9 40 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 9 40 10 , srcInfoPoints = [] } "P")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 14 40 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 14 40 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 14 40 17 , srcInfoPoints = [] } "MkT")) [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 18 40 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 18 40 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 40 18 40 22 , srcInfoPoints = [] } "True")) [] ]) Unidirectional , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 1 42 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 42 1 42 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 42 11 42 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 9 42 10 , srcInfoPoints = [] } "D" ] Nothing Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 14 42 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 42 16 42 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 14 42 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 14 42 15 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 19 42 35 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 19 42 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 19 42 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 19 42 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 19 42 20 , srcInfoPoints = [] } "T"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 21 42 30 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 42 21 42 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 42 29 42 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 22 42 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 22 42 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 22 42 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 22 42 27 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 28 42 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 28 42 29 , srcInfoPoints = [] } "a"))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 31 42 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 31 42 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 42 31 42 35 , srcInfoPoints = [] } "Bool"))))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 1 43 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 43 1 43 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 43 13 43 14 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 9 43 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 9 43 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 9 43 10 , srcInfoPoints = [] } "D")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 11 43 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 11 43 12 , srcInfoPoints = [] } "x") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 15 43 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 15 43 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 15 43 18 , srcInfoPoints = [] } "MkT")) [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 19 43 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 43 19 43 20 , SrcSpan "tests/examples/PatternSynonyms3.hs" 43 26 43 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 20 43 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 20 43 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 20 43 24 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 25 43 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 43 25 43 26 , srcInfoPoints = [] } "x") ]) ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 1 46 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 46 1 46 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 46 15 46 16 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 9 46 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 9 46 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 9 46 10 , srcInfoPoints = [] } "P")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 11 46 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 11 46 12 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 13 46 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 13 46 14 , srcInfoPoints = [] } "b") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 17 46 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 17 46 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 17 46 21 , srcInfoPoints = [] } "Just")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 22 46 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 46 22 46 23 , SrcSpan "tests/examples/PatternSynonyms3.hs" 46 24 46 25 , SrcSpan "tests/examples/PatternSynonyms3.hs" 46 27 46 28 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 23 46 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 23 46 24 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 26 46 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 46 26 46 27 , srcInfoPoints = [] } "b") ] ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 1 48 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 48 1 48 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 48 18 48 19 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 9 48 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 9 48 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 9 48 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 16 48 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 16 48 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 20 48 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 48 20 48 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 48 22 48 23 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 21 48 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 48 21 48 22 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 1 50 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 50 1 50 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 50 17 50 18 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 9 50 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 9 50 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 9 50 10 , srcInfoPoints = [] } "a")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 11 50 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 11 50 14 , srcInfoPoints = [] } ":+:")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 15 50 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 15 50 16 , srcInfoPoints = [] } "b"))) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 19 50 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 50 19 50 20 , SrcSpan "tests/examples/PatternSynonyms3.hs" 50 21 50 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 50 24 50 25 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 20 50 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 20 50 21 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 23 50 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 50 23 50 24 , srcInfoPoints = [] } "b") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 1 53 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 53 1 53 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 53 13 53 15 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 9 53 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 9 53 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 9 53 10 , srcInfoPoints = [] } "P")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 11 53 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 11 53 12 , srcInfoPoints = [] } "x") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 16 53 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 16 53 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 16 53 19 , srcInfoPoints = [] } "MkT")) [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 20 53 22 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 20 53 22 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 20 53 22 , srcInfoPoints = [] } 42 "42") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 23 53 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 53 23 53 24 , srcInfoPoints = [] } "x") ]) Unidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 1 56 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 56 1 56 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 56 15 56 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 9 56 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 9 56 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 9 56 10 , srcInfoPoints = [] } "P")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 11 56 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 11 56 12 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 13 56 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 13 56 14 , srcInfoPoints = [] } "y") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 18 56 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 18 56 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 18 56 21 , srcInfoPoints = [] } "MkT")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 22 56 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 22 56 23 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 24 56 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 56 24 56 25 , srcInfoPoints = [] } "y") ]) Unidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 1 58 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 58 1 58 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 58 13 58 15 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 9 58 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 9 58 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 9 58 10 , srcInfoPoints = [] } "P")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 11 58 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 11 58 12 , srcInfoPoints = [] } "x") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 16 58 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 16 58 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 16 58 19 , srcInfoPoints = [] } "MkT")) [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 20 58 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 58 20 58 21 , SrcSpan "tests/examples/PatternSynonyms3.hs" 58 30 58 31 ] } (PViewPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 21 58 30 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 58 23 58 25 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 21 58 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 21 58 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 21 58 22 , srcInfoPoints = [] } "f"))) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 26 58 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 26 58 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 26 58 30 , srcInfoPoints = [] } "True")) [])) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 32 58 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 58 32 58 33 , srcInfoPoints = [] } "x") ]) Unidirectional , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 60 1 63 0 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 60 8 60 13 , SrcSpan "tests/examples/PatternSynonyms3.hs" 61 5 61 5 , SrcSpan "tests/examples/PatternSynonyms3.hs" 63 1 63 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 60 1 60 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 60 6 60 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 60 6 60 7 , srcInfoPoints = [] } "T")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 5 61 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 61 9 61 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 5 61 8 , srcInfoPoints = [] } "MkT") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 12 61 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 61 14 61 16 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 12 61 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 12 61 13 , srcInfoPoints = [] } "b")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 17 61 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 61 29 61 31 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 17 61 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 61 17 61 18 , SrcSpan "tests/examples/PatternSynonyms3.hs" 61 27 61 28 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 18 61 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 61 20 61 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 18 61 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 18 61 19 , srcInfoPoints = [] } "b")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 23 61 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 23 61 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 23 61 27 , srcInfoPoints = [] } "Bool"))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 32 61 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 32 61 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 61 32 61 33 , srcInfoPoints = [] } "T"))))) ] [] , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 1 63 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 63 1 63 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 63 15 63 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 9 63 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 9 63 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 9 63 10 , srcInfoPoints = [] } "P")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 11 63 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 11 63 12 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 13 63 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 13 63 14 , srcInfoPoints = [] } "f") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 18 63 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 18 63 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 18 63 21 , srcInfoPoints = [] } "MkT")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 22 63 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 22 63 23 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 24 63 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 63 24 63 25 , srcInfoPoints = [] } "f") ]) Unidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 1 65 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 65 1 65 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 65 18 65 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 9 65 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 9 65 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 9 65 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 16 65 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 16 65 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 21 65 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 65 21 65 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 65 23 65 24 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 22 65 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 65 22 65 23 , srcInfoPoints = [] } "x") ]) Unidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 1 67 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 67 1 67 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 67 11 67 13 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 9 67 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 9 67 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 9 67 10 , srcInfoPoints = [] } "P")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 14 67 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 14 67 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 14 67 18 , srcInfoPoints = [] } "Just")) [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 19 67 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 19 67 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 67 19 67 23 , srcInfoPoints = [] } "True")) [] ]) Unidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 1 69 15 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 69 1 69 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 69 11 69 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 9 69 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 9 69 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 9 69 10 , srcInfoPoints = [] } "P")) []) (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 13 69 15 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 13 69 15 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 69 13 69 15 , srcInfoPoints = [] } 42 "42")) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 1 72 15 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 72 1 72 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 72 11 72 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 9 72 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 9 72 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 9 72 10 , srcInfoPoints = [] } "P")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 15 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 72 14 72 15 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 15 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 72 14 72 15 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 15 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 72 13 72 14 , SrcSpan "tests/examples/PatternSynonyms3.hs" 72 14 72 15 ] })) []) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 1 75 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 75 1 75 8 , SrcSpan "tests/examples/PatternSynonyms3.hs" 75 18 75 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 9 75 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 9 75 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 9 75 15 , srcInfoPoints = [] } "Single")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 16 75 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 16 75 17 , srcInfoPoints = [] } "x") ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 21 75 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms3.hs" 75 21 75 22 , SrcSpan "tests/examples/PatternSynonyms3.hs" 75 23 75 24 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 22 75 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms3.hs" 75 22 75 23 , srcInfoPoints = [] } "x") ]) Unidirectional ] , [] ) haskell-src-exts-1.23.1/tests/examples/SafeImports2.hs.parser.golden0000644000000000000000000000433413534314633023562 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports2.hs" 1 1 1 1 , SrcSpan "tests/examples/SafeImports2.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports2.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports2.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports2.hs" 3 1 3 1 , SrcSpan "tests/examples/SafeImports2.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 1 1 1 22 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports2.hs" 1 1 1 13 , SrcSpan "tests/examples/SafeImports2.hs" 1 19 1 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 1 14 1 18 , srcInfoPoints = [] } "Safe" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports2.hs" 2 1 2 7 , SrcSpan "tests/examples/SafeImports2.hs" 2 8 2 12 , SrcSpan "tests/examples/SafeImports2.hs" 2 21 2 23 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 2 13 2 20 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = True , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports2.hs" 2 24 2 25 , srcInfoPoints = [] } "P") , importSpecs = Nothing } ] [] , [] ) haskell-src-exts-1.23.1/tests/examples/DataKinds2.hs.parser.golden0000644000000000000000000002541313534314632023170 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 1 1 1 1 , SrcSpan "tests/examples/DataKinds2.hs" 3 1 3 1 , SrcSpan "tests/examples/DataKinds2.hs" 3 1 3 1 , SrcSpan "tests/examples/DataKinds2.hs" 3 1 3 1 , SrcSpan "tests/examples/DataKinds2.hs" 5 1 5 1 , SrcSpan "tests/examples/DataKinds2.hs" 7 1 7 1 , SrcSpan "tests/examples/DataKinds2.hs" 9 1 9 1 , SrcSpan "tests/examples/DataKinds2.hs" 10 1 10 1 , SrcSpan "tests/examples/DataKinds2.hs" 10 1 10 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 1 1 1 13 , SrcSpan "tests/examples/DataKinds2.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 1 14 1 23 , srcInfoPoints = [] } "DataKinds" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 1 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 3 12 3 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 6 3 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 6 3 9 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 10 3 11 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 14 3 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 14 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 3 14 3 17 , srcInfoPoints = [] } "Foo") []) ] [] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 1 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 5 1 5 5 , SrcSpan "tests/examples/DataKinds2.hs" 5 11 5 12 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 6 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 6 5 10 , srcInfoPoints = [] } "FooB")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 13 5 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 13 5 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 13 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 13 5 16 , srcInfoPoints = [] } "Foo"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 17 5 20 , srcInfoPoints = [] } (PromotedString SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 5 17 5 20 , srcInfoPoints = [] } "a" "a"))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 1 7 18 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 7 1 7 5 , SrcSpan "tests/examples/DataKinds2.hs" 7 11 7 12 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 6 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 6 7 10 , srcInfoPoints = [] } "FooC")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 13 7 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 13 7 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 13 7 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 13 7 16 , srcInfoPoints = [] } "Foo"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 17 7 18 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 7 17 7 18 , srcInfoPoints = [] } 1 "1"))) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 1 10 0 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 9 1 9 9 , SrcSpan "tests/examples/DataKinds2.hs" 9 27 9 32 , SrcSpan "tests/examples/DataKinds2.hs" 10 1 10 1 , SrcSpan "tests/examples/DataKinds2.hs" 10 1 10 1 , SrcSpan "tests/examples/DataKinds2.hs" 10 0 10 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 10 9 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 10 9 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 10 9 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 10 9 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 10 9 14 , srcInfoPoints = [] } "Show"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 15 9 26 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds2.hs" 9 15 9 16 , SrcSpan "tests/examples/DataKinds2.hs" 9 25 9 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 16 9 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 16 9 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 16 9 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 16 9 19 , srcInfoPoints = [] } "Foo"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 20 9 25 , srcInfoPoints = [] } (PromotedString SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds2.hs" 9 20 9 25 , srcInfoPoints = [] } "bar" "bar")))))) (Just []) ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeRelation.hs.parser.golden0000644000000000000000000024354113534314633024335 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 1 1 20 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 5 1 5 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 6 1 6 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 11 1 11 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 12 1 12 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 20 1 20 1 , SrcSpan "tests/examples/UnicodeRelation.hs" 20 1 20 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 1 1 1 13 , SrcSpan "tests/examples/UnicodeRelation.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 3 1 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 3 8 3 23 , srcInfoPoints = [] } "Prelude.Unicode" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 1 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 5 9 5 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 1 5 8 , srcInfoPoints = [] } "testAnd" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 11 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 5 15 5 16 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 11 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 11 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 11 5 14 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 17 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 5 21 5 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 17 5 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 17 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 17 5 20 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 23 5 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 23 5 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 5 23 5 27 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 1 9 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 1 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 1 6 8 , srcInfoPoints = [] } "testAnd") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 9 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 9 6 10 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 11 6 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 11 6 12 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 6 13 9 15 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 6 13 6 14 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 5 9 15 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 7 5 7 8 , SrcSpan "tests/examples/UnicodeRelation.hs" 9 5 9 7 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 9 8 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 7 9 7 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 8 9 8 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 9 5 9 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 9 7 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 9 7 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 9 7 11 , srcInfoPoints = [] } "b\8321")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 12 7 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 7 12 7 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 14 7 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 14 7 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 14 7 15 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 16 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 16 7 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 16 7 17 , srcInfoPoints = [] } "\8804"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 18 7 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 7 18 7 19 , srcInfoPoints = [] } 3 "3")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 9 8 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 9 8 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 9 8 11 , srcInfoPoints = [] } "b\8322")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 12 8 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 8 12 8 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 14 8 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 14 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 14 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 14 8 15 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 16 8 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 16 8 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 16 8 17 , srcInfoPoints = [] } "\8805"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 18 8 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 8 18 8 19 , srcInfoPoints = [] } 5 "5")))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 8 9 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 8 9 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 8 9 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 8 9 10 , srcInfoPoints = [] } "b\8321"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 11 9 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 11 9 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 11 9 12 , srcInfoPoints = [] } "\8743"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 13 9 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 13 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 9 13 9 15 , srcInfoPoints = [] } "b\8322")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 1 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 8 11 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 1 11 7 , srcInfoPoints = [] } "testOr" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 10 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 14 11 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 10 11 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 10 11 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 10 11 13 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 16 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 20 11 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 16 11 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 16 11 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 16 11 19 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 22 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 26 11 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 22 11 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 22 11 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 22 11 25 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 28 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 32 11 33 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 28 11 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 28 11 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 28 11 31 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 34 11 44 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 11 38 11 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 34 11 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 34 11 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 34 11 37 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 40 11 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 40 11 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 11 40 11 44 , srcInfoPoints = [] } "Bool")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 1 19 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 1 19 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 1 12 7 , srcInfoPoints = [] } "testOr") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 8 12 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 8 12 9 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 10 12 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 10 12 11 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 12 12 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 12 12 13 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 14 12 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 14 12 15 , srcInfoPoints = [] } "d") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 16 12 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 16 12 17 , srcInfoPoints = [] } "e") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 12 18 19 35 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 12 18 12 19 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 5 19 35 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 13 5 13 8 , SrcSpan "tests/examples/UnicodeRelation.hs" 19 5 19 7 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 9 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 13 9 13 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 14 9 14 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 15 9 15 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 16 9 16 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 17 9 17 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 18 9 18 9 , SrcSpan "tests/examples/UnicodeRelation.hs" 19 5 19 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 9 13 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 9 13 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 9 13 11 , srcInfoPoints = [] } "b\8321")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 12 13 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 13 12 13 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 14 13 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 14 13 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 14 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 14 13 15 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 16 13 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 16 13 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 16 13 17 , srcInfoPoints = [] } "\8804"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 18 13 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 13 18 13 19 , srcInfoPoints = [] } 3 "3")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 9 14 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 9 14 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 9 14 11 , srcInfoPoints = [] } "b\8322")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 12 14 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 14 12 14 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 14 14 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 14 14 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 14 14 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 14 14 15 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 16 14 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 16 14 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 16 14 17 , srcInfoPoints = [] } "\8802"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 18 14 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 14 18 14 19 , srcInfoPoints = [] } 5 "5")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 9 15 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 9 15 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 9 15 11 , srcInfoPoints = [] } "b\8323")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 12 15 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 15 12 15 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 14 15 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 14 15 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 14 15 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 14 15 15 , srcInfoPoints = [] } "c"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 16 15 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 16 15 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 16 15 17 , srcInfoPoints = [] } "\8814"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 18 15 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 15 18 15 19 , srcInfoPoints = [] } 5 "5")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 9 16 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 9 16 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 9 16 11 , srcInfoPoints = [] } "b\8324")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 12 16 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 16 12 16 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 14 16 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 14 16 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 14 16 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 14 16 15 , srcInfoPoints = [] } "d"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 16 16 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 16 16 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 16 16 17 , srcInfoPoints = [] } "\8815"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 18 16 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 16 18 16 19 , srcInfoPoints = [] } 6 "6")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 9 17 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 9 17 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 9 17 11 , srcInfoPoints = [] } "b\8325")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 12 17 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 17 12 17 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 14 17 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 14 17 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 14 17 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 14 17 15 , srcInfoPoints = [] } "e"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 16 17 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 16 17 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 16 17 17 , srcInfoPoints = [] } "\8712"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 18 17 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 17 18 17 19 , SrcSpan "tests/examples/UnicodeRelation.hs" 17 20 17 21 , SrcSpan "tests/examples/UnicodeRelation.hs" 17 22 17 23 , SrcSpan "tests/examples/UnicodeRelation.hs" 17 24 17 25 , SrcSpan "tests/examples/UnicodeRelation.hs" 17 26 17 27 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 19 17 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 19 17 20 , srcInfoPoints = [] } 1 "1") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 21 17 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 21 17 22 , srcInfoPoints = [] } 2 "2") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 23 17 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 23 17 24 , srcInfoPoints = [] } 3 "3") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 25 17 26 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 17 25 17 26 , srcInfoPoints = [] } 4 "4") ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 9 18 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 9 18 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 9 18 11 , srcInfoPoints = [] } "b\8326")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 12 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 18 12 18 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 14 18 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 14 18 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 14 18 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 14 18 15 , srcInfoPoints = [] } "e"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 16 18 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 16 18 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 16 18 17 , srcInfoPoints = [] } "\8713"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 18 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeRelation.hs" 18 18 18 19 , SrcSpan "tests/examples/UnicodeRelation.hs" 18 20 18 21 , SrcSpan "tests/examples/UnicodeRelation.hs" 18 22 18 23 , SrcSpan "tests/examples/UnicodeRelation.hs" 18 24 18 25 , SrcSpan "tests/examples/UnicodeRelation.hs" 18 26 18 27 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 19 18 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 19 18 20 , srcInfoPoints = [] } 5 "5") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 21 18 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 21 18 22 , srcInfoPoints = [] } 6 "6") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 23 18 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 23 18 24 , srcInfoPoints = [] } 7 "7") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 25 18 26 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 18 25 18 26 , srcInfoPoints = [] } 8 "8") ]))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 35 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 30 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 25 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 20 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 8 19 10 , srcInfoPoints = [] } "b\8321"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 11 19 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 11 19 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 11 19 12 , srcInfoPoints = [] } "\8744"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 13 19 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 13 19 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 13 19 15 , srcInfoPoints = [] } "b\8322")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 16 19 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 16 19 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 16 19 17 , srcInfoPoints = [] } "\8744"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 18 19 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 18 19 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 18 19 20 , srcInfoPoints = [] } "b\8323")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 21 19 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 21 19 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 21 19 22 , srcInfoPoints = [] } "\8744"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 23 19 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 23 19 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 23 19 25 , srcInfoPoints = [] } "b\8324")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 26 19 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 26 19 27 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 26 19 27 , srcInfoPoints = [] } "\8744"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 28 19 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 28 19 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 28 19 30 , srcInfoPoints = [] } "b\8325")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 31 19 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 31 19 32 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 31 19 32 , srcInfoPoints = [] } "\8744"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 33 19 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 33 19 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeRelation.hs" 19 33 19 35 , srcInfoPoints = [] } "b\8326")))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RoleAnnotations.hs.parser.golden0000644000000000000000000005522313534314633024366 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 1 1 17 1 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 1 1 1 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 3 1 3 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 3 1 3 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 5 1 5 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 6 1 6 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 8 1 8 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 9 1 9 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 10 1 10 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 12 1 12 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 13 1 13 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 14 1 14 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 15 1 15 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 16 1 16 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 17 1 17 1 , SrcSpan "tests/examples/RoleAnnotations.hs" 17 1 17 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 3 1 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 3 1 3 7 , SrcSpan "tests/examples/RoleAnnotations.hs" 3 14 3 19 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 3 8 3 13 , srcInfoPoints = [] } "Roles") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 1 1 1 60 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 1 1 1 13 , SrcSpan "tests/examples/RoleAnnotations.hs" 1 29 1 30 , SrcSpan "tests/examples/RoleAnnotations.hs" 1 40 1 41 , SrcSpan "tests/examples/RoleAnnotations.hs" 1 57 1 60 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 1 14 1 29 , srcInfoPoints = [] } "RoleAnnotations" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 1 31 1 40 , srcInfoPoints = [] } "PolyKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 1 42 1 56 , srcInfoPoints = [] } "KindSignatures" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 1 5 17 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 5 11 5 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 6 5 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 6 5 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 6 5 8 , srcInfoPoints = [] } "T1")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 9 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 9 5 10 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 13 5 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 13 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 13 5 15 , srcInfoPoints = [] } "K1") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 16 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 5 16 5 17 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 1 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 6 11 6 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 1 6 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 6 6 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 6 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 6 6 8 , srcInfoPoints = [] } "T2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 9 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 9 6 10 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 13 6 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 13 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 13 6 15 , srcInfoPoints = [] } "K2") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 6 16 6 17 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 1 8 17 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 8 11 8 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 1 8 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 6 8 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 6 8 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 6 8 8 , srcInfoPoints = [] } "T5")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 9 8 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 9 8 10 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 13 8 17 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 13 8 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 13 8 15 , srcInfoPoints = [] } "K5") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 16 8 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 8 16 8 17 , srcInfoPoints = [] } "a") ]) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 1 9 15 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 9 11 9 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 1 9 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 6 9 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 6 9 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 6 9 8 , srcInfoPoints = [] } "T6")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 9 9 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 9 9 10 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 13 9 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 13 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 9 13 9 15 , srcInfoPoints = [] } "K6") []) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 1 10 19 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 10 13 10 14 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 1 10 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 6 10 12 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 6 10 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 6 10 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 6 10 8 , srcInfoPoints = [] } "T7")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 9 10 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 9 10 10 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 11 10 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 11 10 12 , srcInfoPoints = [] } "b"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 15 10 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 15 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 15 10 17 , srcInfoPoints = [] } "K7") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 18 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 10 18 10 19 , srcInfoPoints = [] } "b") ]) ] [] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 12 1 12 21 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 12 1 12 5 , SrcSpan "tests/examples/RoleAnnotations.hs" 12 6 12 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 12 11 12 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 12 11 12 13 , srcInfoPoints = [] } "T1")) [ Nominal SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 12 14 12 21 , srcInfoPoints = [] } ] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 13 1 13 30 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 13 1 13 5 , SrcSpan "tests/examples/RoleAnnotations.hs" 13 6 13 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 13 11 13 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 13 11 13 13 , srcInfoPoints = [] } "T2")) [ Representational SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 13 14 13 30 , srcInfoPoints = [] } ] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 14 1 14 21 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 14 1 14 5 , SrcSpan "tests/examples/RoleAnnotations.hs" 14 6 14 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 14 11 14 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 14 11 14 13 , srcInfoPoints = [] } "T3")) [ Phantom SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 14 14 14 21 , srcInfoPoints = [] } ] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 15 1 15 23 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 15 1 15 5 , SrcSpan "tests/examples/RoleAnnotations.hs" 15 6 15 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 15 11 15 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 15 11 15 13 , srcInfoPoints = [] } "T4")) [ Nominal SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 15 14 15 21 , srcInfoPoints = [] } , RoleWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 15 22 15 23 , srcInfoPoints = [] } ] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 16 1 16 17 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations.hs" 16 1 16 5 , SrcSpan "tests/examples/RoleAnnotations.hs" 16 6 16 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 16 11 16 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 16 11 16 13 , srcInfoPoints = [] } "T5")) [ RoleWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations.hs" 16 16 16 17 , srcInfoPoints = [] } ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuantifiedConstraints.hs.parser.golden0000644000000000000000000002377213556712523025600 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 1 1 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 2 1 2 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 1 4 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 1 4 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 1 4 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 5 1 5 1 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 1 1 13 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 1 14 1 28 , srcInfoPoints = [] } "ExplicitForAll" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 2 1 2 39 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 2 1 2 13 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 2 36 2 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 2 14 2 35 , srcInfoPoints = [] } "QuantifiedConstraints" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 1 4 34 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 1 4 6 ] } (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 7 4 30 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 7 4 8 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 26 4 27 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 28 4 30 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 7 4 30 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 7 4 8 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 26 4 27 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 28 4 30 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 8 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 8 4 14 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 16 4 17 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 8 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 8 4 14 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 16 4 17 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 15 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 15 4 16 , srcInfoPoints = [] } "a") ]) Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 18 4 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 18 4 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 18 4 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 18 4 20 , srcInfoPoints = [] } "Eq"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 21 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 21 4 22 , SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 25 4 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 22 4 25 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 22 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 22 4 23 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 24 4 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 24 4 25 , srcInfoPoints = [] } "a")))))))))) (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 31 4 34 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 31 4 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 31 4 32 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 33 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuantifiedConstraints.hs" 4 33 4 34 , srcInfoPoints = [] } "f"))) [] Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/QualifiedQQuote.hs.parser.golden0000644000000000000000000001176713534314633024316 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedQQuote.hs" 1 1 1 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 4 1 4 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 5 1 5 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 7 1 7 1 , SrcSpan "tests/examples/QualifiedQQuote.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedQQuote.hs" 1 1 1 13 , SrcSpan "tests/examples/QualifiedQQuote.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 2 1 2 42 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedQQuote.hs" 2 1 2 7 , SrcSpan "tests/examples/QualifiedQQuote.hs" 2 8 2 17 , SrcSpan "tests/examples/QualifiedQQuote.hs" 2 38 2 40 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 2 18 2 37 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = True , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 2 41 2 42 , srcInfoPoints = [] } "T") , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 1 4 13 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedQQuote.hs" 4 3 4 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 1 4 2 , srcInfoPoints = [] } "x" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 6 4 13 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 6 4 13 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 6 4 13 , srcInfoPoints = [] } "T") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 4 6 4 13 , srcInfoPoints = [] } "DecsQ"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 5 1 5 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 5 1 5 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 5 1 5 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 5 3 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedQQuote.hs" 5 3 5 4 ] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedQQuote.hs" 5 5 5 14 , srcInfoPoints = [] } "T.d" "id")) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeSuperscript.hs.parser.golden0000644000000000000000000005660013534314633025101 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 1 4 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 8 1 8 1 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 8 1 8 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 1 1 13 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 6 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 1 3 5 , srcInfoPoints = [] } "dumy" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 8 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 15 3 16 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 8 3 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 8 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 8 3 14 , srcInfoPoints = [] } "Double"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 17 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 24 3 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 17 3 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 17 3 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 17 3 23 , srcInfoPoints = [] } "Double"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 26 3 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 26 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 3 26 3 32 , srcInfoPoints = [] } "Double"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 1 7 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 1 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 1 4 5 , srcInfoPoints = [] } "dumy") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 6 4 7 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 8 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 8 4 9 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 10 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 4 10 4 11 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 5 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 5 5 8 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 5 7 7 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 9 6 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 9 5 9 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 9 6 9 , SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 5 7 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 9 5 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 9 5 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 9 5 11 , srcInfoPoints = [] } "a\178")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 12 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 12 5 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 14 5 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 14 5 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 14 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 14 5 15 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 16 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 16 5 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 16 5 17 , srcInfoPoints = [] } "\9733"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 18 5 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 18 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 5 18 5 19 , srcInfoPoints = [] } "a"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 9 6 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 9 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 9 6 11 , srcInfoPoints = [] } "b\178")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 12 6 19 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 12 6 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 14 6 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 14 6 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 14 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 14 6 15 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 16 6 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 16 6 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 16 6 17 , srcInfoPoints = [] } "\9733"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 18 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 18 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 6 18 6 19 , srcInfoPoints = [] } "b"))))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 8 7 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 8 7 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 8 7 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 8 7 12 , srcInfoPoints = [] } "sqrt"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 13 7 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 13 7 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 13 7 14 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 15 7 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 15 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 15 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 15 7 17 , srcInfoPoints = [] } "a\178"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 18 7 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 18 7 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 18 7 19 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 20 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 20 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSuperscript.hs" 7 20 7 22 , srcInfoPoints = [] } "b\178"))))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/MagicHashN.hs.parser.golden0000644000000000000000000002364213534314633023211 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 1 1 1 1 , SrcSpan "tests/examples/MagicHashN.hs" 2 1 2 1 , SrcSpan "tests/examples/MagicHashN.hs" 2 1 2 1 , SrcSpan "tests/examples/MagicHashN.hs" 4 1 4 1 , SrcSpan "tests/examples/MagicHashN.hs" 5 1 5 1 , SrcSpan "tests/examples/MagicHashN.hs" 6 1 6 1 , SrcSpan "tests/examples/MagicHashN.hs" 7 1 7 1 , SrcSpan "tests/examples/MagicHashN.hs" 8 1 8 1 , SrcSpan "tests/examples/MagicHashN.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 2 1 2 24 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 2 1 2 7 , SrcSpan "tests/examples/MagicHashN.hs" 2 19 2 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 2 8 2 18 , srcInfoPoints = [] } "MagicHashN") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 1 1 1 13 , SrcSpan "tests/examples/MagicHashN.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 1 14 1 23 , srcInfoPoints = [] } "MagicHash" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 1 4 7 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 1 4 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 1 4 3 , srcInfoPoints = [] } "a#")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 4 4 7 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 4 4 4 5 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 6 4 7 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 4 6 4 7 , srcInfoPoints = [] } 1 "1"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 1 5 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 1 5 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 1 5 4 , srcInfoPoints = [] } "b##")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 5 5 8 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 5 5 5 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 7 5 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 5 7 5 8 , srcInfoPoints = [] } 2 "2"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 1 6 9 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 1 6 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 1 6 5 , srcInfoPoints = [] } "c###")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 6 6 9 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 6 6 6 7 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 8 6 9 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 6 8 6 9 , srcInfoPoints = [] } 3 "3"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 1 7 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 1 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 1 7 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 6 7 29 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 7 6 7 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 8 7 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 8 7 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 8 7 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 8 7 13 , srcInfoPoints = [] } "print"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 14 7 29 , srcInfoPoints = [ SrcSpan "tests/examples/MagicHashN.hs" 7 14 7 15 , SrcSpan "tests/examples/MagicHashN.hs" 7 17 7 18 , SrcSpan "tests/examples/MagicHashN.hs" 7 22 7 23 , SrcSpan "tests/examples/MagicHashN.hs" 7 28 7 29 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 15 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 15 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 15 7 17 , srcInfoPoints = [] } "a#")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 19 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 19 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 19 7 22 , srcInfoPoints = [] } "b##")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 24 7 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 24 7 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MagicHashN.hs" 7 24 7 28 , srcInfoPoints = [] } "c###")) ]))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/InfixBang.hs.parser.golden0000644000000000000000000001126213534314633023107 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/InfixBang.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1 , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1 , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1 , SrcSpan "tests/examples/InfixBang.hs" 4 1 4 1 , SrcSpan "tests/examples/InfixBang.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/InfixBang.hs" 1 1 1 13 , SrcSpan "tests/examples/InfixBang.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 14 1 26 , srcInfoPoints = [] } "BangPatterns" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 1 3 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 1 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/InfixBang.hs" 3 1 3 2 , SrcSpan "tests/examples/InfixBang.hs" 3 2 3 3 , SrcSpan "tests/examples/InfixBang.hs" 3 3 3 4 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 2 3 3 , srcInfoPoints = [] } "!") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 5 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 5 3 8 , srcInfoPoints = [] } "arr") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 9 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 9 3 10 , srcInfoPoints = [] } "i") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 11 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/InfixBang.hs" 3 11 3 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16 , srcInfoPoints = [] } "arr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18 , srcInfoPoints = [] } "i"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RoleAnnotations2.hs.parser.golden0000644000000000000000000003355313534314633024452 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 1 1 1 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 3 1 3 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 3 1 3 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 3 1 3 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 4 1 4 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 6 1 6 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 8 1 8 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 9 1 9 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 10 1 10 1 , SrcSpan "tests/examples/RoleAnnotations2.hs" 10 1 10 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 1 1 1 13 , SrcSpan "tests/examples/RoleAnnotations2.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 1 14 1 29 , srcInfoPoints = [] } "RoleAnnotations" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 1 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 3 12 3 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 6 3 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 6 3 9 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 10 3 11 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 14 3 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 14 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 14 3 17 , srcInfoPoints = [] } "Foo") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 18 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 3 18 3 19 , srcInfoPoints = [] } "a") ]) ] [] , RoleAnnotDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 4 1 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 4 1 4 5 , SrcSpan "tests/examples/RoleAnnotations2.hs" 4 6 4 10 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 4 11 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 4 11 4 14 , srcInfoPoints = [] } "Foo")) [ Representational SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 4 15 4 31 , srcInfoPoints = [] } ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 1 6 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 1 6 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 1 6 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 6 6 21 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 6 6 6 7 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 8 6 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 8 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 8 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 8 6 13 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 14 6 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 14 6 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 14 6 15 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 16 6 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 16 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 16 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 16 6 19 , srcInfoPoints = [] } "foo"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 20 6 21 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 6 20 6 21 , srcInfoPoints = [] } 1 "1"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 1 8 18 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 8 5 8 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 1 8 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 8 8 18 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 8 12 8 14 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 8 8 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 8 8 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 8 8 11 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 15 8 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 15 8 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 8 15 8 18 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 1 9 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 1 9 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 1 9 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 5 9 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 5 9 9 , srcInfoPoints = [] } "role") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 10 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/RoleAnnotations2.hs" 9 10 9 11 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 12 9 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RoleAnnotations2.hs" 9 12 9 14 , srcInfoPoints = [] } 42 "42"))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/TySplice4.hs.parser.golden0000644000000000000000000003373413534314633023072 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 1 1 1 1 , SrcSpan "tests/examples/TySplice4.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice4.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice4.hs" 2 1 2 1 , SrcSpan "tests/examples/TySplice4.hs" 5 1 5 1 , SrcSpan "tests/examples/TySplice4.hs" 6 1 6 1 , SrcSpan "tests/examples/TySplice4.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 1 1 1 13 , SrcSpan "tests/examples/TySplice4.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 1 3 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 1 2 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 1 2 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 3 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 2 3 2 4 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 5 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 2 5 2 8 , SrcSpan "tests/examples/TySplice4.hs" 3 9 3 9 , SrcSpan "tests/examples/TySplice4.hs" 3 17 3 19 ] } (DeclBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 5 3 19 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 2 9 2 9 , SrcSpan "tests/examples/TySplice4.hs" 3 9 3 9 , SrcSpan "tests/examples/TySplice4.hs" 3 17 3 17 , SrcSpan "tests/examples/TySplice4.hs" 3 17 3 19 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 9 2 22 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 2 11 2 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 9 2 10 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 14 2 22 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 2 16 2 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 14 2 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 14 2 15 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 19 2 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 19 2 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 2 19 2 22 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 9 3 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 9 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 9 3 10 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 11 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 11 3 12 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 13 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 3 13 3 14 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 15 3 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 3 15 3 16 , srcInfoPoints = [] } 1 "1"))) Nothing ] ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 1 5 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 1 5 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 1 5 2 , srcInfoPoints = [] } "y")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 3 5 36 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 3 5 4 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 5 5 36 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 5 5 8 , SrcSpan "tests/examples/TySplice4.hs" 5 23 5 24 , SrcSpan "tests/examples/TySplice4.hs" 5 34 5 36 ] } (DeclBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 5 5 36 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 9 5 9 , SrcSpan "tests/examples/TySplice4.hs" 5 23 5 24 , SrcSpan "tests/examples/TySplice4.hs" 5 34 5 34 , SrcSpan "tests/examples/TySplice4.hs" 5 34 5 36 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 9 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 12 5 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 9 5 11 , srcInfoPoints = [] } "f2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 15 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 17 5 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 15 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 15 5 16 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 20 5 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 20 5 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 20 5 23 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 25 5 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 25 5 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 25 5 27 , srcInfoPoints = [] } "f2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 28 5 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 28 5 29 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 30 5 33 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice4.hs" 5 30 5 31 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 32 5 33 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice4.hs" 5 32 5 33 , srcInfoPoints = [] } 1 "1"))) Nothing ] ]))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/QualifiedDot.hs.parser.golden0000644000000000000000000000644013534314633023616 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedDot.hs" 1 1 1 1 , SrcSpan "tests/examples/QualifiedDot.hs" 1 1 1 1 , SrcSpan "tests/examples/QualifiedDot.hs" 3 1 3 1 , SrcSpan "tests/examples/QualifiedDot.hs" 4 1 4 1 , SrcSpan "tests/examples/QualifiedDot.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 1 1 1 26 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedDot.hs" 1 1 1 7 , SrcSpan "tests/examples/QualifiedDot.hs" 1 21 1 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 1 8 1 20 , srcInfoPoints = [] } "QualifiedDot") Nothing Nothing)) [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 1 3 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 1 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 1 3 8 , srcInfoPoints = [] } "twoDots")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 9 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedDot.hs" 3 9 3 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 11 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedDot.hs" 3 11 3 12 , SrcSpan "tests/examples/QualifiedDot.hs" 3 12 3 21 , SrcSpan "tests/examples/QualifiedDot.hs" 3 21 3 22 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 11 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/QualifiedDot.hs" 3 11 3 12 , SrcSpan "tests/examples/QualifiedDot.hs" 3 12 3 21 , SrcSpan "tests/examples/QualifiedDot.hs" 3 21 3 22 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 12 3 21 , srcInfoPoints = [] } "Prelude") (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QualifiedDot.hs" 3 12 3 21 , srcInfoPoints = [] } ".")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/Ppr048.hs.parser.golden0000644000000000000000000000011113534314633022226 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/Ppr048.hs" 3 9) "Parse error: foo" haskell-src-exts-1.23.1/tests/examples/MultiCtxt.hs.parser.golden0000644000000000000000000002357013556712523023210 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 1 1 1 1 , SrcSpan "tests/examples/MultiCtxt.hs" 3 1 3 1 , SrcSpan "tests/examples/MultiCtxt.hs" 3 1 3 1 , SrcSpan "tests/examples/MultiCtxt.hs" 5 1 5 1 , SrcSpan "tests/examples/MultiCtxt.hs" 6 1 6 1 , SrcSpan "tests/examples/MultiCtxt.hs" 7 1 7 1 , SrcSpan "tests/examples/MultiCtxt.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 3 1 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 3 1 3 7 , SrcSpan "tests/examples/MultiCtxt.hs" 3 18 3 23 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 3 8 3 17 , srcInfoPoints = [] } "MultiCtxt") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 1 1 1 13 , SrcSpan "tests/examples/MultiCtxt.hs" 1 25 1 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 1 14 1 24 , srcInfoPoints = [] } "RankNTypes" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 1 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 13 5 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 1 5 12 , srcInfoPoints = [] } "multipleCtx" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 37 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 21 5 23 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 21 5 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 21 5 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 21 5 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 16 5 18 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 19 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 19 5 20 , srcInfoPoints = [] } "a")))))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 24 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 24 5 25 , SrcSpan "tests/examples/MultiCtxt.hs" 5 36 5 37 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 36 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 32 5 34 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 32 5 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 32 5 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 5 32 5 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 25 5 29 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 30 5 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 30 5 31 , srcInfoPoints = [] } "a")))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 35 5 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 5 35 5 36 , srcInfoPoints = [] } "a"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 1 6 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 1 6 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 1 6 12 , srcInfoPoints = [] } "multipleCtx")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 13 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiCtxt.hs" 6 13 6 14 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 15 6 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 15 6 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiCtxt.hs" 6 15 6 24 , srcInfoPoints = [] } "undefined")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/t412.hs.parser.golden0000644000000000000000000001407013534314633021734 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 1 1 1 1 , SrcSpan "tests/examples/t412.hs" 3 1 3 1 , SrcSpan "tests/examples/t412.hs" 3 1 3 1 , SrcSpan "tests/examples/t412.hs" 6 1 6 1 , SrcSpan "tests/examples/t412.hs" 8 1 8 1 , SrcSpan "tests/examples/t412.hs" 9 1 9 1 , SrcSpan "tests/examples/t412.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 3 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 3 1 3 7 , SrcSpan "tests/examples/t412.hs" 4 16 4 21 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 3 8 3 18 , srcInfoPoints = [] } "Typeintype") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 4 8 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 4 8 4 9 , SrcSpan "tests/examples/t412.hs" 4 14 4 15 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 4 10 4 13 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 4 10 4 13 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 4 10 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 4 10 4 13 , srcInfoPoints = [] } "App")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 1 1 1 13 , SrcSpan "tests/examples/t412.hs" 1 25 1 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 1 14 1 24 , srcInfoPoints = [] } "TypeInType" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 6 1 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 6 1 6 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 6 8 6 17 , srcInfoPoints = [] } "Data.Kind" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 1 8 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 1 8 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 6 8 23 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 6 8 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 6 8 9 , srcInfoPoints = [] } "App")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 10 8 23 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 8 10 8 11 , SrcSpan "tests/examples/t412.hs" 8 13 8 15 , SrcSpan "tests/examples/t412.hs" 8 22 8 23 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 11 8 12 , srcInfoPoints = [] } "f") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 16 8 22 , srcInfoPoints = [ SrcSpan "tests/examples/t412.hs" 8 18 8 20 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 16 8 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 16 8 17 , srcInfoPoints = [] } "k")) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t412.hs" 8 21 8 22 , srcInfoPoints = [] })))) [] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/FlexibleContextsWithoutVars.hs.parser.golden0000644000000000000000000001670513556712523026757 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 1 1 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 1 2 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 1 2 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 1 2 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 1 3 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 4 1 4 1 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 1 1 13 , SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 31 1 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 1 14 1 30 , srcInfoPoints = [] } "FlexibleContexts" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 3 2 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 1 2 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 25 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 16 2 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 16 2 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 16 2 18 ] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 15 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 15 , srcInfoPoints = [] } "Log") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 6 2 15 , srcInfoPoints = [] } "Stack")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 19 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 21 2 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 19 2 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 19 2 20 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 24 2 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 2 24 2 25 , srcInfoPoints = [] } "a")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 1 3 7 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 1 3 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 1 3 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 3 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 3 3 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 5 3 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 5 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FlexibleContextsWithoutVars.hs" 3 5 3 7 , srcInfoPoints = [] } "id")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/List2.hs.parser.golden0000644000000000000000000003652713534314633022252 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 1 1 36 1 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 1 1 1 1 , SrcSpan "tests/examples/List2.hs" 2 1 2 1 , SrcSpan "tests/examples/List2.hs" 3 1 3 1 , SrcSpan "tests/examples/List2.hs" 4 1 4 1 , SrcSpan "tests/examples/List2.hs" 5 1 5 1 , SrcSpan "tests/examples/List2.hs" 6 1 6 1 , SrcSpan "tests/examples/List2.hs" 7 1 7 1 , SrcSpan "tests/examples/List2.hs" 8 1 8 1 , SrcSpan "tests/examples/List2.hs" 9 1 9 1 , SrcSpan "tests/examples/List2.hs" 10 1 10 1 , SrcSpan "tests/examples/List2.hs" 11 1 11 1 , SrcSpan "tests/examples/List2.hs" 12 1 12 1 , SrcSpan "tests/examples/List2.hs" 13 1 13 1 , SrcSpan "tests/examples/List2.hs" 14 1 14 1 , SrcSpan "tests/examples/List2.hs" 15 1 15 1 , SrcSpan "tests/examples/List2.hs" 30 1 30 1 , SrcSpan "tests/examples/List2.hs" 30 1 30 1 , SrcSpan "tests/examples/List2.hs" 32 1 32 1 , SrcSpan "tests/examples/List2.hs" 33 1 33 1 , SrcSpan "tests/examples/List2.hs" 34 1 34 1 , SrcSpan "tests/examples/List2.hs" 36 1 36 1 , SrcSpan "tests/examples/List2.hs" 36 1 36 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 30 1 30 30 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 30 1 30 7 , SrcSpan "tests/examples/List2.hs" 30 25 30 30 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 30 8 30 24 , srcInfoPoints = [] } "Type.Family.List") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 1 1 1 40 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 1 1 1 13 , SrcSpan "tests/examples/List2.hs" 1 37 1 40 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 1 14 1 36 , srcInfoPoints = [] } "TypeFamilyDependencies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 2 1 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 2 1 2 13 , SrcSpan "tests/examples/List2.hs" 2 30 2 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 2 14 2 29 , srcInfoPoints = [] } "PatternSynonyms" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 3 1 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 3 1 3 13 , SrcSpan "tests/examples/List2.hs" 3 30 3 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 3 14 3 29 , srcInfoPoints = [] } "ConstraintKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 4 1 4 28 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 4 1 4 13 , SrcSpan "tests/examples/List2.hs" 4 25 4 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 4 14 4 24 , srcInfoPoints = [] } "RankNTypes" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 5 1 5 36 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 5 1 5 13 , SrcSpan "tests/examples/List2.hs" 5 33 5 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 5 14 5 32 , srcInfoPoints = [] } "StandaloneDeriving" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 6 1 6 35 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 6 1 6 13 , SrcSpan "tests/examples/List2.hs" 6 32 6 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 6 14 6 31 , srcInfoPoints = [] } "FlexibleInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 7 1 7 40 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 7 1 7 13 , SrcSpan "tests/examples/List2.hs" 7 37 7 40 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 7 14 7 36 , srcInfoPoints = [] } "FunctionalDependencies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 8 1 8 38 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 8 1 8 13 , SrcSpan "tests/examples/List2.hs" 8 35 8 38 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 8 14 8 34 , srcInfoPoints = [] } "UndecidableInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 9 1 9 30 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 9 1 9 13 , SrcSpan "tests/examples/List2.hs" 9 27 9 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 9 14 9 26 , srcInfoPoints = [] } "TypeFamilies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 10 1 10 28 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 10 1 10 13 , SrcSpan "tests/examples/List2.hs" 10 25 10 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 10 14 10 24 , srcInfoPoints = [] } "LambdaCase" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 11 1 11 31 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 11 1 11 13 , SrcSpan "tests/examples/List2.hs" 11 28 11 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 11 14 11 27 , srcInfoPoints = [] } "TypeOperators" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 12 1 12 32 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 12 1 12 13 , SrcSpan "tests/examples/List2.hs" 12 29 12 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 12 14 12 28 , srcInfoPoints = [] } "KindSignatures" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 13 1 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 13 1 13 13 , SrcSpan "tests/examples/List2.hs" 13 24 13 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 13 14 13 23 , srcInfoPoints = [] } "DataKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 14 1 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 14 1 14 13 , SrcSpan "tests/examples/List2.hs" 14 24 14 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 14 14 14 23 , srcInfoPoints = [] } "PolyKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 15 1 15 23 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 15 1 15 13 , SrcSpan "tests/examples/List2.hs" 15 20 15 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 15 14 15 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 32 1 32 16 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 32 1 32 5 , SrcSpan "tests/examples/List2.hs" 32 11 32 12 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 32 6 32 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 32 6 32 7 , srcInfoPoints = [] } "\216")) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 32 13 32 16 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 32 13 32 14 , SrcSpan "tests/examples/List2.hs" 32 15 32 16 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 32 13 32 16 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 32 13 32 14 , SrcSpan "tests/examples/List2.hs" 32 15 32 16 ] } True [])) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 1 33 17 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 33 1 33 5 , SrcSpan "tests/examples/List2.hs" 33 11 33 12 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 6 33 10 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 33 6 33 7 , SrcSpan "tests/examples/List2.hs" 33 7 33 9 , SrcSpan "tests/examples/List2.hs" 33 9 33 10 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 7 33 9 , srcInfoPoints = [] } ":<")) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 13 33 17 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 33 13 33 14 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 13 33 17 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 33 13 33 14 ] } True (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 14 33 17 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 33 14 33 15 , SrcSpan "tests/examples/List2.hs" 33 15 33 16 , SrcSpan "tests/examples/List2.hs" 33 16 33 17 ] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 33 15 33 16 , srcInfoPoints = [] })))) , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 34 1 34 12 , srcInfoPoints = [ SrcSpan "tests/examples/List2.hs" 34 8 34 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 34 1 34 7 , srcInfoPoints = [] }) (Just 5) [ ConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 34 10 34 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/List2.hs" 34 10 34 12 , srcInfoPoints = [] } ":<") ] ] , [ Comment False (SrcSpan "tests/examples/List2.hs" 16 1 16 78) "---------------------------------------------------------------------------" , Comment False (SrcSpan "tests/examples/List2.hs" 17 1 17 5) " |" , Comment False (SrcSpan "tests/examples/List2.hs" 18 1 18 35) " Module : Type.Family.List" , Comment False (SrcSpan "tests/examples/List2.hs" 19 1 19 49) " Copyright : Copyright (C) 2015 Kyle Carter" , Comment False (SrcSpan "tests/examples/List2.hs" 20 1 20 23) " License : BSD3" , Comment False (SrcSpan "tests/examples/List2.hs" 21 1 21 3) "" , Comment False (SrcSpan "tests/examples/List2.hs" 22 1 22 53) " Maintainer : Kyle Carter " , Comment False (SrcSpan "tests/examples/List2.hs" 23 1 23 31) " Stability : experimental" , Comment False (SrcSpan "tests/examples/List2.hs" 24 1 24 29) " Portability : RankNTypes" , Comment False (SrcSpan "tests/examples/List2.hs" 25 1 25 3) "" , Comment False (SrcSpan "tests/examples/List2.hs" 26 1 26 57) " Convenient aliases and type families for working with" , Comment False (SrcSpan "tests/examples/List2.hs" 27 1 27 21) " type-level lists." , Comment False (SrcSpan "tests/examples/List2.hs" 28 1 28 77) "--------------------------------------------------------------------------" ] ) haskell-src-exts-1.23.1/tests/examples/DeriveGeneric.hs.parser.golden0000644000000000000000000002344113534314632023756 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 1 1 1 1 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 1 3 1 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 1 3 1 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 1 3 1 , SrcSpan "tests/examples/DeriveGeneric.hs" 5 1 5 1 , SrcSpan "tests/examples/DeriveGeneric.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 1 1 1 13 , SrcSpan "tests/examples/DeriveGeneric.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 1 14 1 27 , srcInfoPoints = [] } "DeriveGeneric" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 1 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 3 17 3 18 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 52 3 53 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 6 3 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 6 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 6 3 14 , srcInfoPoints = [] } "UserTree")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 15 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 15 3 16 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 19 3 51 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 19 3 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 19 3 23 , srcInfoPoints = [] } "Node") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 24 3 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 24 3 25 , srcInfoPoints = [] } "a") , TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 26 3 38 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 3 26 3 27 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 37 3 38 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 27 3 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 27 3 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 27 3 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 27 3 35 , srcInfoPoints = [] } "UserTree"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 36 3 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 36 3 37 , srcInfoPoints = [] } "a"))) , TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 39 3 51 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 3 39 3 40 , SrcSpan "tests/examples/DeriveGeneric.hs" 3 50 3 51 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 40 3 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 40 3 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 40 3 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 40 3 48 , srcInfoPoints = [] } "UserTree"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 49 3 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 49 3 50 , srcInfoPoints = [] } "a"))) ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 54 3 58 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 54 3 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 3 54 3 58 , srcInfoPoints = [] } "Leaf") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 4 3 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/DeriveGeneric.hs" 4 3 4 11 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 4 12 4 19 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 4 12 4 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 4 12 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DeriveGeneric.hs" 4 12 4 19 , srcInfoPoints = [] } "Generic"))) ] ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/SpecializePhaseControl.hs.parser.golden0000644000000000000000000013204013556712523025656 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 16 1 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 1 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 1 6 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 1 7 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 1 9 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 1 14 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 1 15 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 16 1 16 1 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 16 1 16 1 ] } Nothing [] [] [ SpecSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 4 30 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 1 1 15 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 22 1 24 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 38 2 39 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 34 3 35 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 27 4 30 ] } (Just (ActiveFrom SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 16 1 19 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 16 1 17 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 17 1 18 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 18 1 19 ] } 1)) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 20 1 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 1 20 1 21 , srcInfoPoints = [] } "x")) [ TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 9 2 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 17 2 19 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 9 2 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 17 2 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 9 2 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 9 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 9 2 16 , srcInfoPoints = [] } "Integer"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 20 2 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 28 2 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 20 2 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 20 2 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 20 2 27 , srcInfoPoints = [] } "Integer"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 31 2 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 31 2 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 2 31 2 38 , srcInfoPoints = [] } "Integer"))))) , TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 9 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 17 3 19 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 9 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 17 3 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 9 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 9 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 9 3 16 , srcInfoPoints = [] } "Integer"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 20 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 24 3 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 20 3 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 20 3 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 20 3 23 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 27 3 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 27 3 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 3 27 3 34 , srcInfoPoints = [] } "Integer"))))) , TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 9 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 13 4 15 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 9 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 13 4 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 9 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 9 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 9 4 12 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 16 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 20 4 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 16 4 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 16 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 16 4 19 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 23 4 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 23 4 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 4 23 4 26 , srcInfoPoints = [] } "Int"))))) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 1 6 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 3 6 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 1 6 2 , srcInfoPoints = [] } "x" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 6 6 40 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 6 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 6 6 7 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 12 6 13 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 24 6 25 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 26 6 28 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 7 6 12 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 7 6 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 7 6 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 7 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 7 6 10 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 11 6 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 11 6 12 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 14 6 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 14 6 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 14 6 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 14 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 14 6 22 , srcInfoPoints = [] } "Integral"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 23 6 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 23 6 24 , srcInfoPoints = [] } "b"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 29 6 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 31 6 33 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 29 6 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 29 6 30 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 34 6 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 36 6 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 34 6 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 34 6 35 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 39 6 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 6 39 6 40 , srcInfoPoints = [] } "a"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 1 7 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 1 7 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 1 7 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 3 7 14 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 3 7 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 5 7 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 5 7 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 7 5 7 14 , srcInfoPoints = [] } "undefined")))) Nothing , SpecInlineSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 1 12 30 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 1 9 22 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 31 9 33 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 38 10 39 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 34 11 35 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 27 12 30 ] } True (Just (ActiveFrom SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 23 9 28 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 23 9 24 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 24 9 27 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 27 9 28 ] } 999)) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 29 9 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 9 29 9 30 , srcInfoPoints = [] } "y")) [ TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 9 10 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 17 10 19 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 9 10 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 17 10 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 9 10 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 9 10 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 9 10 16 , srcInfoPoints = [] } "Integer"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 20 10 38 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 28 10 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 20 10 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 20 10 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 20 10 27 , srcInfoPoints = [] } "Integer"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 31 10 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 31 10 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 10 31 10 38 , srcInfoPoints = [] } "Integer"))))) , TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 9 11 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 17 11 19 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 9 11 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 17 11 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 9 11 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 9 11 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 9 11 16 , srcInfoPoints = [] } "Integer"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 20 11 34 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 24 11 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 20 11 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 20 11 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 20 11 23 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 27 11 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 27 11 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 11 27 11 34 , srcInfoPoints = [] } "Integer"))))) , TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 9 12 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 13 12 15 ] } Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 9 12 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 13 12 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 9 12 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 9 12 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 9 12 12 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 16 12 26 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 20 12 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 16 12 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 16 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 16 12 19 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 23 12 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 23 12 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 12 23 12 26 , srcInfoPoints = [] } "Int"))))) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 1 14 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 3 14 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 1 14 2 , srcInfoPoints = [] } "y" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 6 14 40 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 6 14 28 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 6 14 7 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 12 14 13 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 24 14 25 , SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 26 14 28 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 7 14 12 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 7 14 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 7 14 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 7 14 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 7 14 10 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 11 14 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 11 14 12 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 14 14 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 14 14 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 14 14 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 14 14 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 14 14 22 , srcInfoPoints = [] } "Integral"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 23 14 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 23 14 24 , srcInfoPoints = [] } "b"))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 29 14 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 31 14 33 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 29 14 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 29 14 30 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 34 14 40 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 36 14 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 34 14 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 34 14 35 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 39 14 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 14 39 14 40 , srcInfoPoints = [] } "a"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 1 15 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 1 15 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 1 15 2 , srcInfoPoints = [] } "y")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 3 15 14 , srcInfoPoints = [ SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 3 15 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 5 15 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 5 15 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SpecializePhaseControl.hs" 15 5 15 14 , srcInfoPoints = [] } "undefined")))) Nothing ] , [ Comment True (SrcSpan "tests/examples/SpecializePhaseControl.hs" 5 1 5 24) "# INLINABLE [1] x #" , Comment True (SrcSpan "tests/examples/SpecializePhaseControl.hs" 13 1 13 24) "# INLINABLE [1] y #" ] ) haskell-src-exts-1.23.1/tests/examples/QQType.hs.parser.golden0000644000000000000000000003140013534314633022421 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 1 1 1 1 , SrcSpan "tests/examples/QQType.hs" 2 1 2 1 , SrcSpan "tests/examples/QQType.hs" 2 1 2 1 , SrcSpan "tests/examples/QQType.hs" 4 1 4 1 , SrcSpan "tests/examples/QQType.hs" 6 1 6 1 , SrcSpan "tests/examples/QQType.hs" 7 1 7 1 , SrcSpan "tests/examples/QQType.hs" 8 1 8 1 , SrcSpan "tests/examples/QQType.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 2 1 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 2 1 2 7 , SrcSpan "tests/examples/QQType.hs" 2 15 2 20 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 2 8 2 14 , srcInfoPoints = [] } "QQType") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 1 1 1 65 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 1 1 1 13 , SrcSpan "tests/examples/QQType.hs" 1 31 1 32 , SrcSpan "tests/examples/QQType.hs" 1 48 1 49 , SrcSpan "tests/examples/QQType.hs" 1 62 1 65 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 1 14 1 31 , srcInfoPoints = [] } "FlexibleInstances" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 1 33 1 48 , srcInfoPoints = [] } "TemplateHaskell" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 1 50 1 61 , srcInfoPoints = [] } "QuasiQuotes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 4 1 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 4 8 4 27 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 6 1 6 11 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 6 3 6 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 6 1 6 2 , srcInfoPoints = [] } "x" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 6 6 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 6 6 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 6 6 6 11 , srcInfoPoints = [] } "DecsQ"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 1 7 48 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 1 7 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 1 7 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 3 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 3 7 4 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 5 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 5 7 8 , SrcSpan "tests/examples/QQType.hs" 7 46 7 48 ] } (DeclBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 5 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 9 7 9 , SrcSpan "tests/examples/QQType.hs" 7 46 7 46 , SrcSpan "tests/examples/QQType.hs" 7 46 7 48 ] } [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 9 7 45 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 9 7 17 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 18 7 45 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 18 7 45 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 18 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 18 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 18 7 22 , srcInfoPoints = [] } "Show"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 23 7 45 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 23 7 25 , SrcSpan "tests/examples/QQType.hs" 7 44 7 45 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 23 7 45 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 23 7 25 , SrcSpan "tests/examples/QQType.hs" 7 44 7 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 25 7 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 25 7 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 25 7 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 25 7 29 , srcInfoPoints = [] } "conT"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 30 7 44 , srcInfoPoints = [ SrcSpan "tests/examples/QQType.hs" 7 30 7 31 , SrcSpan "tests/examples/QQType.hs" 7 43 7 44 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 31 7 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 31 7 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 31 7 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 31 7 37 , srcInfoPoints = [] } "mkName"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 38 7 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QQType.hs" 7 38 7 43 , srcInfoPoints = [] } "Int" "Int"))))))))) Nothing ]))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteQual2.hs.parser.golden0000644000000000000000000001236413534314633024253 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 2 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 2 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 2 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 5 1 5 1 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 3 8 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 2 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 1 2 2 , srcInfoPoints = [] } "f") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 3 2 9 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 3 2 4 , SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 8 2 9 ] } [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 4 2 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 4 2 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 4 2 8 , srcInfoPoints = [] } "True")) [] ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 10 2 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 10 2 11 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 12 2 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 2 12 2 13 , srcInfoPoints = [] } 1 "1"))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 1 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 1 3 2 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 3 3 4 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 5 3 8 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 5 3 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 7 3 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteQual2.hs" 3 7 3 8 , srcInfoPoints = [] } 0 "0"))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RecursiveDo.hs.parser.golden0000644000000000000000000003330113534314633023472 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 1 1 1 1 , SrcSpan "tests/examples/RecursiveDo.hs" 2 1 2 1 , SrcSpan "tests/examples/RecursiveDo.hs" 2 1 2 1 , SrcSpan "tests/examples/RecursiveDo.hs" 2 1 2 1 , SrcSpan "tests/examples/RecursiveDo.hs" 6 1 6 1 , SrcSpan "tests/examples/RecursiveDo.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 1 1 1 13 , SrcSpan "tests/examples/RecursiveDo.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 1 14 1 25 , srcInfoPoints = [] } "RecursiveDo" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 2 1 4 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 2 1 2 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 2 1 2 9 , srcInfoPoints = [] } "justOnes")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 2 10 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 2 10 2 11 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 2 12 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 2 12 2 14 , SrcSpan "tests/examples/RecursiveDo.hs" 3 5 3 5 , SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 5 , SrcSpan "tests/examples/RecursiveDo.hs" 6 1 6 0 ] } [ RecStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 5 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 3 5 3 8 , SrcSpan "tests/examples/RecursiveDo.hs" 3 9 3 9 , SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 9 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 3 12 3 14 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 9 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 9 3 11 , srcInfoPoints = [] } "xs")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 15 3 26 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 15 3 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 15 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 15 3 19 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 20 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 3 20 3 21 , SrcSpan "tests/examples/RecursiveDo.hs" 3 25 3 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 21 3 25 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 21 3 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 21 3 22 , srcInfoPoints = [] } 1 "1")) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 22 3 23 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 22 3 23 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 22 3 23 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 23 3 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 23 3 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 3 23 3 25 , srcInfoPoints = [] } "xs")))))) ] , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 5 4 11 , srcInfoPoints = [] } "return"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 12 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/RecursiveDo.hs" 4 12 4 13 , SrcSpan "tests/examples/RecursiveDo.hs" 4 26 4 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 13 4 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 13 4 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 13 4 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 13 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 13 4 16 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 17 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 17 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 17 4 23 , srcInfoPoints = [] } "negate")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 24 4 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 24 4 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecursiveDo.hs" 4 24 4 26 , srcInfoPoints = [] } "xs")))))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/IndentedModule1.hs.parser.golden0000644000000000000000000001015113534314633024217 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule1.hs" 1 1 1 1 , SrcSpan "tests/examples/IndentedModule1.hs" 2 2 2 2 , SrcSpan "tests/examples/IndentedModule1.hs" 3 1 3 1 , SrcSpan "tests/examples/IndentedModule1.hs" 4 1 4 1 , SrcSpan "tests/examples/IndentedModule1.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 2 2 2 19 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule1.hs" 2 2 2 8 , SrcSpan "tests/examples/IndentedModule1.hs" 2 14 2 19 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 2 9 2 13 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule1.hs" 1 1 1 13 , SrcSpan "tests/examples/IndentedModule1.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 1 14 1 28 , srcInfoPoints = [] } "NamedFieldPuns" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 1 3 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 1 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 1 3 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 6 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedModule1.hs" 3 6 3 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 8 3 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 8 3 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 8 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 8 3 14 , srcInfoPoints = [] } "putStr"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 15 3 20 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedModule1.hs" 3 15 3 20 , srcInfoPoints = [] } "foo" "foo")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/DoRec.hs.parser.golden0000644000000000000000000001761213534314633022243 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 1 1 1 1 , SrcSpan "tests/examples/DoRec.hs" 3 1 3 1 , SrcSpan "tests/examples/DoRec.hs" 3 1 3 1 , SrcSpan "tests/examples/DoRec.hs" 3 1 3 1 , SrcSpan "tests/examples/DoRec.hs" 5 1 5 1 , SrcSpan "tests/examples/DoRec.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 1 1 1 13 , SrcSpan "tests/examples/DoRec.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 1 14 1 19 , srcInfoPoints = [] } "DoRec" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 1 4 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 1 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 1 3 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 6 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 6 3 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 8 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 8 3 10 , SrcSpan "tests/examples/DoRec.hs" 3 11 3 11 , SrcSpan "tests/examples/DoRec.hs" 4 11 4 11 , SrcSpan "tests/examples/DoRec.hs" 5 1 5 0 ] } [ RecStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 11 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 11 3 14 , SrcSpan "tests/examples/DoRec.hs" 3 15 3 15 , SrcSpan "tests/examples/DoRec.hs" 4 11 4 0 ] } [ LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 15 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 15 3 18 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 19 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 19 3 19 , SrcSpan "tests/examples/DoRec.hs" 4 11 4 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 19 3 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 19 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 19 3 20 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 21 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 3 21 3 22 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 23 3 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 3 23 3 24 , srcInfoPoints = [] } 1 "1"))) Nothing ]) ] , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 11 4 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 11 4 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 11 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 11 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 11 4 17 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 4 18 4 19 , SrcSpan "tests/examples/DoRec.hs" 4 19 4 20 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 4 18 4 19 , SrcSpan "tests/examples/DoRec.hs" 4 19 4 20 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DoRec.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/DoRec.hs" 4 18 4 19 , SrcSpan "tests/examples/DoRec.hs" 4 19 4 20 ] })))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/Fixity3.hs.parser.golden0000644000000000000000000005420513556712523022611 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity3.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity3.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity3.hs" 5 1 5 1 , SrcSpan "tests/examples/Fixity3.hs" 6 1 6 1 , SrcSpan "tests/examples/Fixity3.hs" 6 1 6 1 ] } Nothing [] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 1 1 1 6 , SrcSpan "tests/examples/Fixity3.hs" 1 13 1 18 , SrcSpan "tests/examples/Fixity3.hs" 2 3 2 3 , SrcSpan "tests/examples/Fixity3.hs" 3 3 3 3 , SrcSpan "tests/examples/Fixity3.hs" 5 1 5 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 7 1 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 7 1 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 7 1 10 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 11 1 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 1 11 1 12 , srcInfoPoints = [] } "f"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 3 2 53 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 9 2 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 3 2 53 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 9 2 11 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 3 2 8 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 3 2 4 , SrcSpan "tests/examples/Fixity3.hs" 2 4 2 7 , SrcSpan "tests/examples/Fixity3.hs" 2 7 2 8 ] } "<^>" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 53 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 26 2 28 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 26 2 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 26 2 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 26 2 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 12 2 23 , srcInfoPoints = [] } "Applicative"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 24 2 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 24 2 25 , srcInfoPoints = [] } "f")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 29 2 53 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 33 2 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 29 2 32 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 29 2 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 29 2 30 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 31 2 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 31 2 32 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 36 2 53 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 47 2 49 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 36 2 46 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 36 2 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 36 2 37 , srcInfoPoints = [] } "f")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 38 2 46 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 38 2 39 , SrcSpan "tests/examples/Fixity3.hs" 2 45 2 46 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 39 2 45 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 2 41 2 43 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 39 2 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 39 2 40 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 44 2 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 44 2 45 , srcInfoPoints = [] } "b"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 50 2 53 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 50 2 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 50 2 51 , srcInfoPoints = [] } "f")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 52 2 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 2 52 2 53 , srcInfoPoints = [] } "b"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 3 3 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 3 10 3 11 ] } (InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 3 3 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 3 10 3 11 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 3 3 3 9 , srcInfoPoints = [] }) (Just 4) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 3 12 3 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 3 12 3 15 , srcInfoPoints = [] } "<^>") ]) ]) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 1 5 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 1 5 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 1 5 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 5 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 5 5 5 6 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 7 5 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 7 5 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 7 5 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 7 5 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 7 5 11 , srcInfoPoints = [] } "pure"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 12 5 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 12 5 13 , srcInfoPoints = [] } 1 "1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 14 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 14 5 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 14 5 17 , srcInfoPoints = [] } "<^>"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 18 5 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 18 5 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 18 5 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 18 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 18 5 22 , srcInfoPoints = [] } "pure"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 23 5 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 23 5 24 , srcInfoPoints = [] } 2 "2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 25 5 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 25 5 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 25 5 28 , srcInfoPoints = [] } "<^>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 29 5 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 29 5 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 29 5 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 29 5 33 , srcInfoPoints = [] } "pure"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 34 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 5 34 5 35 , SrcSpan "tests/examples/Fixity3.hs" 5 35 5 36 , SrcSpan "tests/examples/Fixity3.hs" 5 36 5 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 34 5 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity3.hs" 5 34 5 35 , SrcSpan "tests/examples/Fixity3.hs" 5 35 5 36 , SrcSpan "tests/examples/Fixity3.hs" 5 36 5 37 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity3.hs" 5 35 5 36 , srcInfoPoints = [] } "+"))))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/SingleClassAsst.hs.parser.golden0000644000000000000000000002112013556712523024302 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 1 1 1 1 , SrcSpan "tests/examples/SingleClassAsst.hs" 1 1 1 1 , SrcSpan "tests/examples/SingleClassAsst.hs" 3 1 3 1 , SrcSpan "tests/examples/SingleClassAsst.hs" 4 1 4 1 , SrcSpan "tests/examples/SingleClassAsst.hs" 5 1 5 1 , SrcSpan "tests/examples/SingleClassAsst.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 1 1 1 18 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 1 1 1 7 , SrcSpan "tests/examples/SingleClassAsst.hs" 1 13 1 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 1 8 1 12 , srcInfoPoints = [] } "Test") Nothing Nothing)) [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 1 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 3 5 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 1 3 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 8 3 24 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 8 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 3 8 3 9 , SrcSpan "tests/examples/SingleClassAsst.hs" 3 13 3 14 , SrcSpan "tests/examples/SingleClassAsst.hs" 3 15 3 17 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 8 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 3 8 3 9 , SrcSpan "tests/examples/SingleClassAsst.hs" 3 13 3 14 , SrcSpan "tests/examples/SingleClassAsst.hs" 3 15 3 17 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 9 3 13 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 9 3 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 9 3 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 9 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 9 3 11 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 12 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 12 3 13 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 18 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 3 20 3 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 18 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 18 3 19 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 23 3 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 3 23 3 24 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 1 4 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 1 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 1 4 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 5 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 5 4 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 7 4 10 , srcInfoPoints = [ SrcSpan "tests/examples/SingleClassAsst.hs" 4 7 4 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 9 4 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SingleClassAsst.hs" 4 9 4 10 , srcInfoPoints = [] } "x")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/NoStartNumIdents.hs.parser.golden0000644000000000000000000000013613551227111024452 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NoStartNumIdents.hs" 2 1) "Parse error in pattern: 1" haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces1.hs.parser.golden0000644000000000000000000002353413534314633025111 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 1 1 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 1 3 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 1 4 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 5 1 5 1 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 1 1 13 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 1 14 1 32 , srcInfoPoints = [] } "ExplicitNamespaces" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 1 2 37 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 1 2 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 8 2 23 , srcInfoPoints = [] } "Data.Array.Repa" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 24 2 37 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 24 2 25 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 36 2 37 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 26 2 35 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 26 2 30 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 31 2 35 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 26 2 30 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 26 2 30 ] }) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 31 2 35 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 31 2 32 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 32 2 34 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 2 34 2 35 ] } "++") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 1 3 56 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 8 3 23 , srcInfoPoints = [] } "Data.Array.Repa" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 24 3 56 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 24 3 25 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 55 3 56 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 26 3 54 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 26 3 30 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 50 3 54 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 26 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 26 3 30 ] }) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 50 3 54 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 50 3 51 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 51 3 53 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 53 3 54 ] } "++") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 1 4 76 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 8 4 23 , srcInfoPoints = [] } "Data.Array.Repa" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 24 4 76 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 24 4 25 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 75 4 76 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 29 4 58 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 29 4 33 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 54 4 58 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 29 4 33 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 29 4 33 ] }) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 54 4 58 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 54 4 55 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 55 4 57 , SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 57 4 58 ] } "++") ]) } ] [] , [ Comment True (SrcSpan "tests/examples/ExplicitNamespaces1.hs" 3 31 3 49) " comment here " , Comment True (SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 34 4 53) " comment2 here " , Comment True (SrcSpan "tests/examples/ExplicitNamespaces1.hs" 4 60 4 74) " and here " ] ) haskell-src-exts-1.23.1/tests/examples/Bundles.hs.parser.golden0000644000000000000000000002522213534314632022636 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 1 1 1 1 , SrcSpan "tests/examples/Bundles.hs" 2 1 2 1 , SrcSpan "tests/examples/Bundles.hs" 2 1 2 1 , SrcSpan "tests/examples/Bundles.hs" 4 1 4 1 , SrcSpan "tests/examples/Bundles.hs" 5 1 5 1 , SrcSpan "tests/examples/Bundles.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 1 2 65 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 1 2 7 , SrcSpan "tests/examples/Bundles.hs" 2 60 2 65 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 8 2 15 , srcInfoPoints = [] } "Bundles") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 15 2 59 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 15 2 16 , SrcSpan "tests/examples/Bundles.hs" 2 23 2 24 , SrcSpan "tests/examples/Bundles.hs" 2 34 2 35 , SrcSpan "tests/examples/Bundles.hs" 2 45 2 46 , SrcSpan "tests/examples/Bundles.hs" 2 58 2 59 ] } [ EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 16 2 23 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 19 2 20 , SrcSpan "tests/examples/Bundles.hs" 2 22 2 23 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 20 2 22 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 16 2 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 16 2 19 , srcInfoPoints = [] } "Foo")) [] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 25 2 34 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 28 2 29 , SrcSpan "tests/examples/Bundles.hs" 2 31 2 32 , SrcSpan "tests/examples/Bundles.hs" 2 33 2 34 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 29 2 31 , srcInfoPoints = [] } 0) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 25 2 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 25 2 28 , srcInfoPoints = [] } "Baz")) [ ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 32 2 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 32 2 33 , srcInfoPoints = [] } "Q") ] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 36 2 45 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 39 2 40 , SrcSpan "tests/examples/Bundles.hs" 2 41 2 42 , SrcSpan "tests/examples/Bundles.hs" 2 44 2 45 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 42 2 44 , srcInfoPoints = [] } 1) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 36 2 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 36 2 39 , srcInfoPoints = [] } "Qux")) [ ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 40 2 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 40 2 41 , srcInfoPoints = [] } "F") ] , EThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 47 2 58 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 2 50 2 51 , SrcSpan "tests/examples/Bundles.hs" 2 52 2 53 , SrcSpan "tests/examples/Bundles.hs" 2 55 2 56 , SrcSpan "tests/examples/Bundles.hs" 2 57 2 58 ] } (EWildcard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 53 2 55 , srcInfoPoints = [] } 1) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 47 2 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 47 2 50 , srcInfoPoints = [] } "Tux")) [ ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 51 2 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 51 2 52 , srcInfoPoints = [] } "Q") , ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 56 2 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 2 56 2 57 , srcInfoPoints = [] } "F") ] ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 1 1 1 13 , SrcSpan "tests/examples/Bundles.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 1 4 12 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 1 4 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 1 4 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 6 4 12 , srcInfoPoints = [ SrcSpan "tests/examples/Bundles.hs" 4 6 4 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 8 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 8 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Bundles.hs" 4 8 4 12 , srcInfoPoints = [] } "main")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/IndentedWhere.hs.parser.golden0000644000000000000000000001455413534314633023776 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/IndentedWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/IndentedWhere.hs" 2 1 2 1 , SrcSpan "tests/examples/IndentedWhere.hs" 5 1 5 1 , SrcSpan "tests/examples/IndentedWhere.hs" 5 1 5 1 ] } Nothing [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 1 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 3 3 3 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 1 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 3 3 3 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 1 2 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 3 2 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 3 2 4 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 5 2 8 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 2 5 2 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 7 2 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 7 2 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 2 7 2 8 , srcInfoPoints = [] } "g")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 9 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 3 9 3 9 , SrcSpan "tests/examples/IndentedWhere.hs" 4 9 4 9 , SrcSpan "tests/examples/IndentedWhere.hs" 5 1 5 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 9 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 3 11 3 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 9 3 10 , srcInfoPoints = [] } "g" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 14 3 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 14 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 3 14 3 17 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 9 4 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 9 4 10 , srcInfoPoints = [] } "g")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 11 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/IndentedWhere.hs" 4 11 4 12 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 13 4 14 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/IndentedWhere.hs" 4 13 4 14 , srcInfoPoints = [] } 0 "0"))) Nothing ])) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/WildcardTyFam.hs.parser.golden0000644000000000000000000001114713534314633023736 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/WildcardTyFam.hs" 1 1 1 1 , SrcSpan "tests/examples/WildcardTyFam.hs" 3 1 3 1 , SrcSpan "tests/examples/WildcardTyFam.hs" 3 1 3 1 , SrcSpan "tests/examples/WildcardTyFam.hs" 3 1 3 1 , SrcSpan "tests/examples/WildcardTyFam.hs" 5 1 5 1 , SrcSpan "tests/examples/WildcardTyFam.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/WildcardTyFam.hs" 1 1 1 13 , SrcSpan "tests/examples/WildcardTyFam.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 1 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/WildcardTyFam.hs" 3 1 3 5 , SrcSpan "tests/examples/WildcardTyFam.hs" 3 6 3 12 , SrcSpan "tests/examples/WildcardTyFam.hs" 3 19 3 24 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 13 3 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 13 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 13 3 16 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 17 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 3 17 3 18 , srcInfoPoints = [] } "a"))) Nothing Nothing [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 3 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/WildcardTyFam.hs" 4 9 4 10 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 3 4 8 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 3 4 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 3 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 3 4 6 , srcInfoPoints = [] } "Foo"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 7 4 8 , srcInfoPoints = [] } Nothing)) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 11 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 11 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/WildcardTyFam.hs" 4 11 4 14 , srcInfoPoints = [] } "Int"))) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ClassContext.hs.parser.golden0000644000000000000000000002376013556712523023666 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 1 1 1 , SrcSpan "tests/examples/ClassContext.hs" 1 1 1 1 , SrcSpan "tests/examples/ClassContext.hs" 1 1 1 1 , SrcSpan "tests/examples/ClassContext.hs" 2 1 2 1 , SrcSpan "tests/examples/ClassContext.hs" 3 1 3 1 , SrcSpan "tests/examples/ClassContext.hs" 3 1 3 1 ] } Nothing [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 1 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 3 1 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 1 1 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 35 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 18 1 20 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 18 1 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 18 1 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 20 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 18 1 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 6 1 9 , srcInfoPoints = [] } "Ord"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 10 1 17 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 10 1 11 , SrcSpan "tests/examples/ClassContext.hs" 1 16 1 17 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 11 1 16 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 11 1 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 11 1 12 , srcInfoPoints = [] } "i")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 13 1 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 13 1 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 13 1 16 , srcInfoPoints = [] } "Int"))))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 21 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 1 27 1 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 21 1 26 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 21 1 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 21 1 22 , srcInfoPoints = [] } "i")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 23 1 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 23 1 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 23 1 26 , srcInfoPoints = [] } "Int")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 30 1 35 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 30 1 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 30 1 31 , srcInfoPoints = [] } "i")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 32 1 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 32 1 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 1 32 1 35 , srcInfoPoints = [] } "Int")))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 1 2 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 1 2 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 1 2 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 3 2 14 , srcInfoPoints = [ SrcSpan "tests/examples/ClassContext.hs" 2 3 2 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 5 2 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 5 2 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassContext.hs" 2 5 2 14 , srcInfoPoints = [] } "undefined")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/ClassInstType.hs.parser.golden0000644000000000000000000024040313534314632024007 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 1 1 18 1 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 1 1 1 1 , SrcSpan "tests/examples/ClassInstType.hs" 1 1 1 1 , SrcSpan "tests/examples/ClassInstType.hs" 3 1 3 1 , SrcSpan "tests/examples/ClassInstType.hs" 6 1 6 1 , SrcSpan "tests/examples/ClassInstType.hs" 17 1 17 1 , SrcSpan "tests/examples/ClassInstType.hs" 18 1 18 1 , SrcSpan "tests/examples/ClassInstType.hs" 18 1 18 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 1 1 1 7 , SrcSpan "tests/examples/ClassInstType.hs" 1 22 1 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 1 8 1 21 , srcInfoPoints = [] } "ClassInstType") Nothing Nothing)) [] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 1 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 3 1 3 6 , SrcSpan "tests/examples/ClassInstType.hs" 3 13 3 18 , SrcSpan "tests/examples/ClassInstType.hs" 4 3 4 3 , SrcSpan "tests/examples/ClassInstType.hs" 6 1 6 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 7 3 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 7 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 7 3 10 , srcInfoPoints = [] } "Dir")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 11 3 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 3 11 3 12 , srcInfoPoints = [] } "d"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 3 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 4 12 4 14 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 3 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 4 12 4 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 3 4 11 , srcInfoPoints = [] } "localDir" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 15 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 4 17 4 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 15 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 15 4 16 , srcInfoPoints = [] } "d")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 20 4 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 20 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 20 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 20 4 22 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 23 4 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 23 4 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 4 23 4 31 , srcInfoPoints = [] } "FilePath")))))) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 1 17 0 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 6 1 6 9 , SrcSpan "tests/examples/ClassInstType.hs" 6 24 6 29 , SrcSpan "tests/examples/ClassInstType.hs" 7 3 7 3 , SrcSpan "tests/examples/ClassInstType.hs" 9 3 9 3 , SrcSpan "tests/examples/ClassInstType.hs" 17 1 17 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 10 6 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 10 6 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 10 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 10 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 10 6 13 , srcInfoPoints = [] } "Dir"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 14 6 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 14 6 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 6 14 6 23 , srcInfoPoints = [] } "Directory"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 3 15 37 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 3 15 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 3 7 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 3 7 11 , srcInfoPoints = [] } "localDir") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 12 7 21 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 7 12 7 13 , SrcSpan "tests/examples/ClassInstType.hs" 7 20 7 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 13 7 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 13 7 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 13 7 18 , srcInfoPoints = [] } "Local")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 19 7 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 19 7 20 , srcInfoPoints = [] } "f") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 22 7 32 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 7 22 7 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 24 7 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 24 7 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 24 7 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 24 7 30 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 31 7 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 31 7 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 7 31 7 32 , srcInfoPoints = [] } "f"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 3 15 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 3 9 11 , srcInfoPoints = [] } "localDir") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 12 9 74 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 12 9 13 , SrcSpan "tests/examples/ClassInstType.hs" 9 73 9 74 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 13 9 73 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 19 9 20 , SrcSpan "tests/examples/ClassInstType.hs" 9 27 9 28 , SrcSpan "tests/examples/ClassInstType.hs" 9 52 9 53 , SrcSpan "tests/examples/ClassInstType.hs" 9 72 9 73 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 13 9 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 13 9 18 , srcInfoPoints = [] } "Darcs")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 20 9 27 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 23 9 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 20 9 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 20 9 23 , srcInfoPoints = [] } "url")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 24 9 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 24 9 27 , srcInfoPoints = [] } "url")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 28 9 52 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 40 9 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 28 9 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 28 9 40 , srcInfoPoints = [] } "darcsVersion")) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 41 9 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 41 9 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 41 9 46 , srcInfoPoints = [] } "Patch")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 47 9 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 47 9 52 , srcInfoPoints = [] } "patch") ]) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 53 9 72 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 65 9 66 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 53 9 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 53 9 65 , srcInfoPoints = [] } "subDirectory")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 66 9 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 66 9 72 , srcInfoPoints = [] } "subDir")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 75 15 37 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 75 9 76 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 9 77 15 37 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 9 77 9 79 , SrcSpan "tests/examples/ClassInstType.hs" 10 5 10 5 , SrcSpan "tests/examples/ClassInstType.hs" 11 5 11 5 , SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 5 , SrcSpan "tests/examples/ClassInstType.hs" 13 5 13 5 , SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 5 , SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 5 , SrcSpan "tests/examples/ClassInstType.hs" 17 1 17 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 5 10 38 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 10 9 10 11 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 5 10 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 5 10 8 , srcInfoPoints = [] } "tmp")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 12 10 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 12 10 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 12 10 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 12 10 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 12 10 25 , srcInfoPoints = [] } "createTempDir"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 26 10 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 26 10 27 , srcInfoPoints = [] } 0 "0"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 28 10 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 10 28 10 38 , srcInfoPoints = [] } "haskelld" "haskelld"))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 5 11 91 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 11 14 11 16 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 5 11 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 5 11 13 , srcInfoPoints = [] } "darcsOut")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 91 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 17 11 32 , srcInfoPoints = [] } "runDarcsCommand"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 33 11 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 33 11 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 33 11 36 , srcInfoPoints = [] } "tmp")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 37 11 42 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 37 11 42 , srcInfoPoints = [] } "get" "get"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 43 11 91 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 11 43 11 44 , SrcSpan "tests/examples/ClassInstType.hs" 11 52 11 53 , SrcSpan "tests/examples/ClassInstType.hs" 11 65 11 66 , SrcSpan "tests/examples/ClassInstType.hs" 11 81 11 82 , SrcSpan "tests/examples/ClassInstType.hs" 11 85 11 86 , SrcSpan "tests/examples/ClassInstType.hs" 11 90 11 91 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 44 11 52 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 44 11 52 , srcInfoPoints = [] } "--lazy" "--lazy") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 53 11 65 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 53 11 65 , srcInfoPoints = [] } "--to-match" "--to-match") , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 66 11 81 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 66 11 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 66 11 73 , srcInfoPoints = [] } "hash " "hash ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 73 11 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 73 11 75 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 73 11 75 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 76 11 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 76 11 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 76 11 81 , srcInfoPoints = [] } "patch"))) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 82 11 85 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 82 11 85 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 82 11 85 , srcInfoPoints = [] } "url")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 86 11 90 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 11 86 11 90 , srcInfoPoints = [] } "fs" "fs") ])) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 19 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 5 12 10 , srcInfoPoints = [] } "print"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 11 12 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 11 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 12 11 12 19 , srcInfoPoints = [] } "darcsOut")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 5 13 40 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 13 5 13 8 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 9 13 40 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 13 9 13 9 , SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 9 13 40 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 9 13 29 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 13 9 13 10 , SrcSpan "tests/examples/ClassInstType.hs" 13 21 13 22 , SrcSpan "tests/examples/ClassInstType.hs" 13 24 13 25 , SrcSpan "tests/examples/ClassInstType.hs" 13 28 13 29 ] } Boxed [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 10 13 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 10 13 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 10 13 21 , srcInfoPoints = [] } "ExitSuccess")) [] , PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 22 13 24 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 22 13 24 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 22 13 24 , srcInfoPoints = [] } "" "") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 25 13 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 25 13 28 , srcInfoPoints = [] } "out") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 30 13 40 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 13 30 13 31 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 32 13 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 32 13 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 13 32 13 40 , srcInfoPoints = [] } "darcsOut")))) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 5 14 10 , srcInfoPoints = [] } "print"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 11 14 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 11 14 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 14 11 14 14 , srcInfoPoints = [] } "out")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 37 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 5 15 11 , srcInfoPoints = [] } "return"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 12 15 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 12 15 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 12 15 13 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 14 15 37 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 14 15 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 14 15 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 14 15 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 14 15 17 , srcInfoPoints = [] } "tmp"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 18 15 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 18 15 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 18 15 21 , srcInfoPoints = [] } ""))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 22 15 26 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 22 15 26 , srcInfoPoints = [] } "fs" "fs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 27 15 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 27 15 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 27 15 30 , srcInfoPoints = [] } ""))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 31 15 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 31 15 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 15 31 15 37 , srcInfoPoints = [] } "subDir"))))) ])) Nothing ]) ]) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 1 17 18 , srcInfoPoints = [ SrcSpan "tests/examples/ClassInstType.hs" 17 1 17 5 , SrcSpan "tests/examples/ClassInstType.hs" 17 10 17 11 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 6 17 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 6 17 9 , srcInfoPoints = [] } "URL")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 12 17 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 12 17 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClassInstType.hs" 17 12 17 18 , srcInfoPoints = [] } "String"))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsBad.hs.parser.golden0000644000000000000000000000013413534314632024570 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BinaryLiteralsBad.hs" 3 1) "arity mismatch for 'f'" haskell-src-exts-1.23.1/tests/examples/Vta1.hs.parser.golden0000644000000000000000000072223113556712523022066 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 1 1 96 1 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 1 1 1 1 , SrcSpan "tests/examples/Vta1.hs" 6 1 6 1 , SrcSpan "tests/examples/Vta1.hs" 6 1 6 1 , SrcSpan "tests/examples/Vta1.hs" 8 1 8 1 , SrcSpan "tests/examples/Vta1.hs" 9 1 9 1 , SrcSpan "tests/examples/Vta1.hs" 11 1 11 1 , SrcSpan "tests/examples/Vta1.hs" 13 1 13 1 , SrcSpan "tests/examples/Vta1.hs" 15 1 15 1 , SrcSpan "tests/examples/Vta1.hs" 16 1 16 1 , SrcSpan "tests/examples/Vta1.hs" 18 1 18 1 , SrcSpan "tests/examples/Vta1.hs" 21 1 21 1 , SrcSpan "tests/examples/Vta1.hs" 22 1 22 1 , SrcSpan "tests/examples/Vta1.hs" 23 1 23 1 , SrcSpan "tests/examples/Vta1.hs" 25 1 25 1 , SrcSpan "tests/examples/Vta1.hs" 27 1 27 1 , SrcSpan "tests/examples/Vta1.hs" 29 1 29 1 , SrcSpan "tests/examples/Vta1.hs" 30 1 30 1 , SrcSpan "tests/examples/Vta1.hs" 31 1 31 1 , SrcSpan "tests/examples/Vta1.hs" 33 1 33 1 , SrcSpan "tests/examples/Vta1.hs" 34 1 34 1 , SrcSpan "tests/examples/Vta1.hs" 36 1 36 1 , SrcSpan "tests/examples/Vta1.hs" 37 1 37 1 , SrcSpan "tests/examples/Vta1.hs" 39 1 39 1 , SrcSpan "tests/examples/Vta1.hs" 40 1 40 1 , SrcSpan "tests/examples/Vta1.hs" 42 1 42 1 , SrcSpan "tests/examples/Vta1.hs" 44 1 44 1 , SrcSpan "tests/examples/Vta1.hs" 45 1 45 1 , SrcSpan "tests/examples/Vta1.hs" 46 1 46 1 , SrcSpan "tests/examples/Vta1.hs" 48 1 48 1 , SrcSpan "tests/examples/Vta1.hs" 49 1 49 1 , SrcSpan "tests/examples/Vta1.hs" 51 1 51 1 , SrcSpan "tests/examples/Vta1.hs" 52 1 52 1 , SrcSpan "tests/examples/Vta1.hs" 53 1 53 1 , SrcSpan "tests/examples/Vta1.hs" 55 1 55 1 , SrcSpan "tests/examples/Vta1.hs" 56 1 56 1 , SrcSpan "tests/examples/Vta1.hs" 58 1 58 1 , SrcSpan "tests/examples/Vta1.hs" 59 1 59 1 , SrcSpan "tests/examples/Vta1.hs" 61 1 61 1 , SrcSpan "tests/examples/Vta1.hs" 62 1 62 1 , SrcSpan "tests/examples/Vta1.hs" 63 1 63 1 , SrcSpan "tests/examples/Vta1.hs" 65 1 65 1 , SrcSpan "tests/examples/Vta1.hs" 66 1 66 1 , SrcSpan "tests/examples/Vta1.hs" 68 1 68 1 , SrcSpan "tests/examples/Vta1.hs" 69 1 69 1 , SrcSpan "tests/examples/Vta1.hs" 71 1 71 1 , SrcSpan "tests/examples/Vta1.hs" 72 1 72 1 , SrcSpan "tests/examples/Vta1.hs" 74 1 74 1 , SrcSpan "tests/examples/Vta1.hs" 75 1 75 1 , SrcSpan "tests/examples/Vta1.hs" 77 1 77 1 , SrcSpan "tests/examples/Vta1.hs" 78 1 78 1 , SrcSpan "tests/examples/Vta1.hs" 80 1 80 1 , SrcSpan "tests/examples/Vta1.hs" 81 1 81 1 , SrcSpan "tests/examples/Vta1.hs" 83 1 83 1 , SrcSpan "tests/examples/Vta1.hs" 85 1 85 1 , SrcSpan "tests/examples/Vta1.hs" 87 1 87 1 , SrcSpan "tests/examples/Vta1.hs" 89 1 89 1 , SrcSpan "tests/examples/Vta1.hs" 91 1 91 1 , SrcSpan "tests/examples/Vta1.hs" 92 1 92 1 , SrcSpan "tests/examples/Vta1.hs" 94 1 94 1 , SrcSpan "tests/examples/Vta1.hs" 95 1 95 1 , SrcSpan "tests/examples/Vta1.hs" 96 1 96 1 , SrcSpan "tests/examples/Vta1.hs" 96 1 96 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 6 1 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 6 1 6 7 , SrcSpan "tests/examples/Vta1.hs" 6 13 6 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 6 8 6 12 , srcInfoPoints = [] } "Vta1") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 1 1 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 1 1 1 13 , SrcSpan "tests/examples/Vta1.hs" 1 30 1 31 , SrcSpan "tests/examples/Vta1.hs" 1 51 1 52 , SrcSpan "tests/examples/Vta1.hs" 1 62 1 63 , SrcSpan "tests/examples/Vta1.hs" 2 26 2 27 , SrcSpan "tests/examples/Vta1.hs" 2 38 2 39 , SrcSpan "tests/examples/Vta1.hs" 3 31 3 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 1 14 1 30 , srcInfoPoints = [] } "TypeApplications" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 1 32 1 51 , srcInfoPoints = [] } "ScopedTypeVariables" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 1 53 1 62 , srcInfoPoints = [] } "PolyKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 2 14 2 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 2 28 2 38 , srcInfoPoints = [] } "RankNTypes" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 3 14 3 30 , srcInfoPoints = [] } "FlexibleContexts" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 1 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 6 8 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 1 8 5 , srcInfoPoints = [] } "quad" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 9 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 11 8 13 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 9 8 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 9 8 10 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 14 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 16 8 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 14 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 14 8 15 , srcInfoPoints = [] } "b")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 19 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 21 8 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 19 8 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 19 8 20 , srcInfoPoints = [] } "c")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 24 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 26 8 28 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 24 8 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 24 8 25 , srcInfoPoints = [] } "d")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 29 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 8 29 8 30 , SrcSpan "tests/examples/Vta1.hs" 8 31 8 32 , SrcSpan "tests/examples/Vta1.hs" 8 34 8 35 , SrcSpan "tests/examples/Vta1.hs" 8 37 8 38 , SrcSpan "tests/examples/Vta1.hs" 8 40 8 41 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 30 8 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 30 8 31 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 33 8 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 33 8 34 , srcInfoPoints = [] } "b") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 36 8 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 36 8 37 , srcInfoPoints = [] } "c") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 39 8 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 8 39 8 40 , srcInfoPoints = [] } "d") ]))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 1 9 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 1 9 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 1 9 5 , srcInfoPoints = [] } "quad")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 6 9 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 9 6 9 7 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 8 9 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 9 8 9 9 , SrcSpan "tests/examples/Vta1.hs" 9 9 9 10 , SrcSpan "tests/examples/Vta1.hs" 9 10 9 11 , SrcSpan "tests/examples/Vta1.hs" 9 11 9 12 , SrcSpan "tests/examples/Vta1.hs" 9 12 9 13 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 8 9 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 9 8 9 9 , SrcSpan "tests/examples/Vta1.hs" 9 9 9 10 , SrcSpan "tests/examples/Vta1.hs" 9 10 9 11 , SrcSpan "tests/examples/Vta1.hs" 9 11 9 12 , SrcSpan "tests/examples/Vta1.hs" 9 12 9 13 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 9 8 9 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 9 8 9 9 , SrcSpan "tests/examples/Vta1.hs" 9 9 9 10 , SrcSpan "tests/examples/Vta1.hs" 9 10 9 11 , SrcSpan "tests/examples/Vta1.hs" 9 11 9 12 , SrcSpan "tests/examples/Vta1.hs" 9 12 9 13 ] } Boxed 4)))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 1 11 50 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 1 11 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 1 11 6 , srcInfoPoints = [] } "silly")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 7 11 50 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 11 7 11 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 50 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 9 11 13 , srcInfoPoints = [] } "quad"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 14 11 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 11 14 11 15 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 15 11 16 , srcInfoPoints = [] } Nothing))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 17 11 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 11 17 11 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 18 11 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 18 11 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 18 11 22 , srcInfoPoints = [] } "Bool"))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 23 11 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 11 23 11 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 24 11 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 24 11 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 24 11 28 , srcInfoPoints = [] } "Char"))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 29 11 31 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 11 29 11 30 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 30 11 31 , srcInfoPoints = [] } Nothing))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 32 11 33 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 32 11 33 , srcInfoPoints = [] } 5 "5"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 34 11 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 34 11 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 34 11 38 , srcInfoPoints = [] } "True")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 39 11 42 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 39 11 42 , srcInfoPoints = [] } 'a' "a"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 43 11 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 11 43 11 50 , srcInfoPoints = [] } "Hello" "Hello")))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 1 13 26 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 1 13 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 1 13 13 , srcInfoPoints = [] } "pairup_nosig") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 14 13 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 14 13 15 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 16 13 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 16 13 17 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 18 13 26 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 13 18 13 19 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 20 13 26 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 13 20 13 21 , SrcSpan "tests/examples/Vta1.hs" 13 22 13 23 , SrcSpan "tests/examples/Vta1.hs" 13 25 13 26 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 21 13 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 21 13 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 21 13 22 , srcInfoPoints = [] } "x")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 24 13 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 24 13 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 13 24 13 25 , srcInfoPoints = [] } "y")) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 1 15 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 15 12 15 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 1 15 11 , srcInfoPoints = [] } "pairup_sig" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 15 15 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 15 17 15 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 15 15 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 15 15 16 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 20 15 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 15 22 15 24 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 20 15 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 20 15 21 , srcInfoPoints = [] } "b")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 25 15 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 15 25 15 26 , SrcSpan "tests/examples/Vta1.hs" 15 27 15 28 , SrcSpan "tests/examples/Vta1.hs" 15 29 15 30 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 26 15 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 26 15 27 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 28 15 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 15 28 15 29 , srcInfoPoints = [] } "b") ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 1 16 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 1 16 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 1 16 11 , srcInfoPoints = [] } "pairup_sig") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 12 16 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 12 16 13 , srcInfoPoints = [] } "u") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 14 16 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 14 16 15 , srcInfoPoints = [] } "w") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 16 16 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 16 16 16 17 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 18 16 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 16 18 16 19 , SrcSpan "tests/examples/Vta1.hs" 16 20 16 21 , SrcSpan "tests/examples/Vta1.hs" 16 23 16 24 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 19 16 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 19 16 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 19 16 20 , srcInfoPoints = [] } "u")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 22 16 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 22 16 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 16 22 16 23 , srcInfoPoints = [] } "w")) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 1 18 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 1 18 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 1 18 11 , srcInfoPoints = [] } "answer_sig")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 12 18 43 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 18 12 18 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 14 18 24 , srcInfoPoints = [] } "pairup_sig"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 25 18 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 18 25 18 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 26 18 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 26 18 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 26 18 30 , srcInfoPoints = [] } "Bool"))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 31 18 35 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 18 31 18 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 32 18 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 32 18 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 32 18 35 , srcInfoPoints = [] } "Int"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 36 18 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 36 18 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 36 18 41 , srcInfoPoints = [] } "False")))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 42 18 43 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 18 42 18 43 , srcInfoPoints = [] } 7 "7")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 1 21 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 1 21 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 1 21 12 , srcInfoPoints = [] } "answer_read")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 13 21 35 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 21 13 21 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 15 21 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 15 21 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 15 21 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 15 21 19 , srcInfoPoints = [] } "show"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 20 21 35 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 21 20 21 21 , SrcSpan "tests/examples/Vta1.hs" 21 34 21 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 21 21 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 21 21 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 21 21 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 21 21 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 21 21 25 , srcInfoPoints = [] } "read"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 26 21 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 21 26 21 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 27 21 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 27 21 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 27 21 30 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 31 21 34 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 21 31 21 34 , srcInfoPoints = [] } "3" "3")))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 1 22 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 1 22 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 1 22 12 , srcInfoPoints = [] } "answer_show")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 13 22 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 22 13 22 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 15 22 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 15 22 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 15 22 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 15 22 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 15 22 19 , srcInfoPoints = [] } "show"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 20 22 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 22 20 22 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 21 22 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 21 22 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 21 22 28 , srcInfoPoints = [] } "Integer"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 29 22 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 22 29 22 30 , SrcSpan "tests/examples/Vta1.hs" 22 38 22 39 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 30 22 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 30 22 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 30 22 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 30 22 34 , srcInfoPoints = [] } "read"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 35 22 38 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 22 35 22 38 , srcInfoPoints = [] } "5" "5")))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 1 23 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 1 23 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 1 23 16 , srcInfoPoints = [] } "answer_showread")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 17 23 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 23 17 23 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 19 23 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 19 23 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 19 23 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 19 23 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 19 23 23 , srcInfoPoints = [] } "show"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 24 23 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 23 24 23 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 25 23 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 25 23 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 25 23 28 , srcInfoPoints = [] } "Int"))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 29 23 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 23 29 23 30 , SrcSpan "tests/examples/Vta1.hs" 23 43 23 44 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 30 23 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 30 23 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 30 23 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 30 23 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 30 23 34 , srcInfoPoints = [] } "read"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 35 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 23 35 23 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 36 23 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 36 23 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 36 23 39 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 40 23 43 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 23 40 23 43 , srcInfoPoints = [] } "7" "7")))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 1 25 23 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 1 25 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 1 25 8 , srcInfoPoints = [] } "intcons") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 9 25 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 9 25 10 , srcInfoPoints = [] } "a") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 11 25 23 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 25 11 25 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 13 25 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 13 25 21 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 13 25 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 25 13 25 14 , SrcSpan "tests/examples/Vta1.hs" 25 14 25 15 , SrcSpan "tests/examples/Vta1.hs" 25 15 25 16 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 13 25 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 25 13 25 14 , SrcSpan "tests/examples/Vta1.hs" 25 14 25 15 , SrcSpan "tests/examples/Vta1.hs" 25 15 25 16 ] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 14 25 15 , srcInfoPoints = [] }))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 17 25 21 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 25 17 25 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 18 25 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 18 25 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 18 25 21 , srcInfoPoints = [] } "Int"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 22 25 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 22 25 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 25 22 25 23 , srcInfoPoints = [] } "a"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 1 27 34 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 1 27 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 1 27 8 , srcInfoPoints = [] } "intpair") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 9 27 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 9 27 10 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 11 27 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 11 27 12 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 13 27 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 27 13 27 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 15 27 25 , srcInfoPoints = [] } "pairup_sig"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 26 27 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 27 26 27 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 27 27 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 27 27 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 27 27 30 , srcInfoPoints = [] } "Int"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 31 27 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 31 27 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 31 27 32 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 33 27 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 33 27 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 27 33 27 34 , srcInfoPoints = [] } "y"))))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 1 29 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 1 29 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 1 29 14 , srcInfoPoints = [] } "answer_pairup")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 15 29 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 29 15 29 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 17 29 27 , srcInfoPoints = [] } "pairup_sig"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 28 29 32 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 29 28 29 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 29 29 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 29 29 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 29 29 32 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 33 29 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 33 29 34 , srcInfoPoints = [] } 5 "5"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 35 29 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 35 29 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 29 35 29 39 , srcInfoPoints = [] } "True"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 1 30 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 1 30 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 1 30 15 , srcInfoPoints = [] } "answer_intpair")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 16 30 35 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 30 16 30 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 18 30 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 18 30 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 18 30 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 18 30 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 18 30 25 , srcInfoPoints = [] } "intpair"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 26 30 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 26 30 27 , srcInfoPoints = [] } 1 "1"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 28 30 35 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 30 28 30 35 , srcInfoPoints = [] } "hello" "hello")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 1 31 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 1 31 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 1 31 15 , srcInfoPoints = [] } "answer_intcons")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 16 31 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 31 16 31 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 18 31 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 18 31 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 18 31 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 18 31 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 18 31 25 , srcInfoPoints = [] } "intcons"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 26 31 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 26 31 27 , srcInfoPoints = [] } 7 "7"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 31 28 31 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 31 28 31 29 , SrcSpan "tests/examples/Vta1.hs" 31 29 31 30 ] } []))) Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 1 33 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 33 1 33 5 , SrcSpan "tests/examples/Vta1.hs" 33 6 33 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 13 33 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 13 33 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 13 33 14 , srcInfoPoints = [] } "F")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 15 33 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 33 15 33 16 , srcInfoPoints = [] } "a"))) Nothing Nothing , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 1 34 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 34 1 34 5 , SrcSpan "tests/examples/Vta1.hs" 34 6 34 14 , SrcSpan "tests/examples/Vta1.hs" 34 22 34 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 15 34 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 15 34 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 15 34 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 15 34 16 , srcInfoPoints = [] } "F"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 17 34 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 17 34 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 17 34 21 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 24 34 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 24 34 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 34 24 34 28 , srcInfoPoints = [] } "Bool"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 1 36 14 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 36 3 36 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 1 36 2 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 6 36 14 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 36 10 36 12 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 6 36 9 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 6 36 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 6 36 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 6 36 7 , srcInfoPoints = [] } "F"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 8 36 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 8 36 9 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 13 36 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 36 13 36 14 , srcInfoPoints = [] } "a"))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 1 37 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 1 37 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 1 37 2 , srcInfoPoints = [] } "g") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 3 37 4 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 5 37 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 37 5 37 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 7 37 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 7 37 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 37 7 37 16 , srcInfoPoints = [] } "undefined")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 39 1 39 10 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 39 3 39 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 39 1 39 2 , srcInfoPoints = [] } "f" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 39 6 39 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 39 6 39 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 39 6 39 10 , srcInfoPoints = [] } "Char"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 1 40 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 1 40 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 1 40 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 3 40 11 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 40 3 40 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 5 40 11 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 5 40 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 5 40 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 5 40 6 , srcInfoPoints = [] } "g"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 7 40 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 7 40 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 40 7 40 11 , srcInfoPoints = [] } "True"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 1 42 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 1 42 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 1 42 7 , srcInfoPoints = [] } "answer")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 8 42 23 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 42 8 42 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 10 42 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 10 42 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 10 42 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 10 42 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 10 42 11 , srcInfoPoints = [] } "g"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 12 42 17 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 42 12 42 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 13 42 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 13 42 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 13 42 17 , srcInfoPoints = [] } "Char"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 18 42 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 18 42 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 42 18 42 23 , srcInfoPoints = [] } "False"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 1 44 54 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 9 44 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 1 44 8 , srcInfoPoints = [] } "mapSame" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 12 44 54 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 12 44 18 , SrcSpan "tests/examples/Vta1.hs" 44 20 44 21 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 19 44 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 19 44 20 , srcInfoPoints = [] } "b") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 22 44 54 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 41 44 43 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 22 44 40 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 22 44 23 , SrcSpan "tests/examples/Vta1.hs" 44 39 44 40 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 23 44 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 23 44 29 , SrcSpan "tests/examples/Vta1.hs" 44 31 44 32 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 30 44 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 30 44 31 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 33 44 39 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 35 44 37 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 33 44 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 33 44 34 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 38 44 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 38 44 39 , srcInfoPoints = [] } "a"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 44 44 54 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 48 44 50 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 44 44 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 44 44 45 , SrcSpan "tests/examples/Vta1.hs" 44 46 44 47 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 45 44 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 45 44 46 , srcInfoPoints = [] } "b"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 51 44 54 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 44 51 44 52 , SrcSpan "tests/examples/Vta1.hs" 44 53 44 54 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 52 44 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 44 52 44 53 , srcInfoPoints = [] } "b")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 1 46 52 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 1 45 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 1 45 8 , srcInfoPoints = [] } "mapSame") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 9 45 10 , srcInfoPoints = [] } , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 11 45 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 45 11 45 12 , SrcSpan "tests/examples/Vta1.hs" 45 12 45 13 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 14 45 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 45 14 45 15 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 45 16 45 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 45 16 45 17 , SrcSpan "tests/examples/Vta1.hs" 45 17 45 18 ] } [])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 1 46 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 1 46 8 , srcInfoPoints = [] } "mapSame") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 9 46 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 9 46 12 , srcInfoPoints = [] } "fun") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 13 46 19 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 46 13 46 14 , SrcSpan "tests/examples/Vta1.hs" 46 18 46 19 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 14 46 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 14 46 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 14 46 15 , srcInfoPoints = [] } "x")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 15 46 16 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 15 46 16 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 16 46 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 16 46 18 , srcInfoPoints = [] } "xs"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 20 46 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 46 20 46 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 22 46 25 , srcInfoPoints = [] } "fun"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 26 46 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 46 26 46 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 27 46 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 27 46 28 , srcInfoPoints = [] } "b")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 29 46 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 29 46 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 29 46 30 , srcInfoPoints = [] } "x")))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 31 46 32 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 31 46 32 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 31 46 32 , srcInfoPoints = [] }))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 33 46 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 46 33 46 34 , SrcSpan "tests/examples/Vta1.hs" 46 51 46 52 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 34 46 41 , srcInfoPoints = [] } "mapSame"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 42 46 44 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 46 42 46 43 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 43 46 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 43 46 44 , srcInfoPoints = [] } "b")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 45 46 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 45 46 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 45 46 48 , srcInfoPoints = [] } "fun")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 49 46 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 49 46 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 46 49 46 51 , srcInfoPoints = [] } "xs"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 1 48 46 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 6 48 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 1 48 5 , srcInfoPoints = [] } "pair" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 9 48 46 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 9 48 15 , SrcSpan "tests/examples/Vta1.hs" 48 17 48 18 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 16 48 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 16 48 17 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 19 48 46 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 20 48 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 19 48 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 19 48 20 , srcInfoPoints = [] } "a")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 23 48 46 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 23 48 24 , SrcSpan "tests/examples/Vta1.hs" 48 45 48 46 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 24 48 45 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 24 48 30 , SrcSpan "tests/examples/Vta1.hs" 48 32 48 33 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 31 48 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 31 48 32 , srcInfoPoints = [] } "b") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 34 48 45 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 36 48 38 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 34 48 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 34 48 35 , srcInfoPoints = [] } "b")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 39 48 45 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 48 39 48 40 , SrcSpan "tests/examples/Vta1.hs" 48 41 48 42 , SrcSpan "tests/examples/Vta1.hs" 48 44 48 45 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 40 48 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 40 48 41 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 43 48 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 48 43 48 44 , srcInfoPoints = [] } "b") ])))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 1 49 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 1 49 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 1 49 5 , srcInfoPoints = [] } "pair") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 6 49 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 6 49 7 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 8 49 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 8 49 9 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 10 49 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 49 10 49 11 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 12 49 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 49 12 49 13 , SrcSpan "tests/examples/Vta1.hs" 49 14 49 15 , SrcSpan "tests/examples/Vta1.hs" 49 17 49 18 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 13 49 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 13 49 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 13 49 14 , srcInfoPoints = [] } "x")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 16 49 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 16 49 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 49 16 49 17 , srcInfoPoints = [] } "y")) ])) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 1 51 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 1 51 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 1 51 2 , srcInfoPoints = [] } "b")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 3 51 27 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 51 3 51 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 16 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 5 51 9 , srcInfoPoints = [] } "pair"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 10 51 14 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 51 10 51 11 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 11 51 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 11 51 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 11 51 14 , srcInfoPoints = [] } "Int"))))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 15 51 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 15 51 16 , srcInfoPoints = [] } 3 "3"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 17 51 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 51 17 51 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 18 51 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 18 51 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 18 51 22 , srcInfoPoints = [] } "Bool"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 23 51 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 23 51 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 51 23 51 27 , srcInfoPoints = [] } "True"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 1 52 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 1 52 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 1 52 2 , srcInfoPoints = [] } "c")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 3 52 23 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 52 3 52 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 5 52 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 5 52 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 5 52 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 5 52 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 5 52 12 , srcInfoPoints = [] } "mapSame"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 13 52 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 13 52 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 13 52 15 , srcInfoPoints = [] } "id")))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 16 52 23 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 52 16 52 17 , SrcSpan "tests/examples/Vta1.hs" 52 18 52 19 , SrcSpan "tests/examples/Vta1.hs" 52 20 52 21 , SrcSpan "tests/examples/Vta1.hs" 52 22 52 23 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 17 52 18 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 17 52 18 , srcInfoPoints = [] } 1 "1") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 19 52 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 19 52 20 , srcInfoPoints = [] } 2 "2") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 21 52 22 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 52 21 52 22 , srcInfoPoints = [] } 3 "3") ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 1 53 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 1 53 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 1 53 2 , srcInfoPoints = [] } "d")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 3 53 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 53 3 53 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 11 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 5 53 9 , srcInfoPoints = [] } "pair"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 10 53 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 10 53 11 , srcInfoPoints = [] } 3 "3"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 12 53 17 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 53 12 53 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 13 53 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 13 53 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 13 53 17 , srcInfoPoints = [] } "Bool"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 18 53 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 18 53 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 53 18 53 22 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 1 55 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 9 55 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 1 55 8 , srcInfoPoints = [] } "pairnum" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 12 55 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 12 55 18 , SrcSpan "tests/examples/Vta1.hs" 55 20 55 21 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 19 55 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 19 55 20 , srcInfoPoints = [] } "a") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 28 55 30 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 28 55 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 28 55 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 28 55 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 22 55 25 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 26 55 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 26 55 27 , srcInfoPoints = [] } "a")))))) (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 31 55 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 31 55 37 , SrcSpan "tests/examples/Vta1.hs" 55 39 55 40 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 38 55 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 38 55 39 , srcInfoPoints = [] } "b") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 41 55 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 43 55 45 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 41 55 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 41 55 42 , srcInfoPoints = [] } "b")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 46 55 52 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 55 46 55 47 , SrcSpan "tests/examples/Vta1.hs" 55 48 55 49 , SrcSpan "tests/examples/Vta1.hs" 55 51 55 52 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 47 55 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 47 55 48 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 50 55 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 55 50 55 51 , srcInfoPoints = [] } "b") ])))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 1 56 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 1 56 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 1 56 8 , srcInfoPoints = [] } "pairnum")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 9 56 17 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 56 9 56 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 11 56 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 11 56 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 11 56 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 11 56 15 , srcInfoPoints = [] } "pair"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 16 56 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 56 16 56 17 , srcInfoPoints = [] } 3 "3")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 1 58 73 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 1 58 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 1 58 2 , srcInfoPoints = [] } "e")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 3 58 73 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 3 58 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 5 58 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 5 58 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 5 58 62 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 5 58 57 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 5 58 6 , SrcSpan "tests/examples/Vta1.hs" 58 56 58 57 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 6 58 56 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 13 58 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 6 58 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 6 58 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 6 58 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 6 58 10 , srcInfoPoints = [] } "pair"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 11 58 12 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 11 58 12 , srcInfoPoints = [] } 3 "3"))) (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 16 58 56 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 16 58 22 , SrcSpan "tests/examples/Vta1.hs" 58 24 58 25 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 23 58 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 23 58 24 , srcInfoPoints = [] } "a") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 32 58 34 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 32 58 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 32 58 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 32 58 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 26 58 29 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 30 58 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 30 58 31 , srcInfoPoints = [] } "a")))))) (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 35 58 56 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 35 58 41 , SrcSpan "tests/examples/Vta1.hs" 58 43 58 44 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 42 58 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 42 58 43 , srcInfoPoints = [] } "b") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 45 58 56 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 47 58 49 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 45 58 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 45 58 46 , srcInfoPoints = [] } "b")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 50 58 56 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 50 58 51 , SrcSpan "tests/examples/Vta1.hs" 58 52 58 53 , SrcSpan "tests/examples/Vta1.hs" 58 55 58 56 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 51 58 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 51 58 52 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 54 58 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 54 58 55 , srcInfoPoints = [] } "b") ])))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 58 58 62 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 58 58 59 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 59 58 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 59 58 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 59 58 62 , srcInfoPoints = [] } "Int"))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 63 58 68 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 58 63 58 64 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 64 58 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 64 58 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 64 58 68 , srcInfoPoints = [] } "Bool"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 69 58 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 69 58 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 58 69 58 73 , srcInfoPoints = [] } "True"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 1 59 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 1 59 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 1 59 2 , srcInfoPoints = [] } "h")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 3 59 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 59 3 59 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 5 59 12 , srcInfoPoints = [] } "pairnum"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 13 59 17 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 59 13 59 14 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 14 59 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 14 59 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 14 59 17 , srcInfoPoints = [] } "Int"))))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 18 59 23 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 59 18 59 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 19 59 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 19 59 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 19 59 23 , srcInfoPoints = [] } "Bool"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 24 59 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 24 59 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 59 24 59 28 , srcInfoPoints = [] } "True"))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 1 61 29 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 61 26 61 27 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 1 61 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 6 61 25 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 6 61 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 6 61 11 , srcInfoPoints = [] } "First")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 12 61 25 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 61 12 61 13 , SrcSpan "tests/examples/Vta1.hs" 61 15 61 17 , SrcSpan "tests/examples/Vta1.hs" 61 24 61 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 13 61 14 , srcInfoPoints = [] } "a") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 18 61 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 61 20 61 22 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 18 61 19 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 23 61 24 , srcInfoPoints = [] })))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 28 61 29 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 28 61 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 61 28 61 29 , srcInfoPoints = [] } "F") []) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 1 62 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 62 21 62 22 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 1 62 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 6 62 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 6 62 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 6 62 11 , srcInfoPoints = [] } "Proxy")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 12 62 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 62 12 62 13 , SrcSpan "tests/examples/Vta1.hs" 62 15 62 17 , SrcSpan "tests/examples/Vta1.hs" 62 19 62 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 13 62 14 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 18 62 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 18 62 19 , srcInfoPoints = [] } "k")))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 23 62 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 23 62 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 62 23 62 24 , srcInfoPoints = [] } "P") []) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 1 63 34 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 63 31 63 32 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 1 63 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 6 63 30 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 6 63 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 6 63 11 , srcInfoPoints = [] } "Three")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 12 63 30 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 63 12 63 13 , SrcSpan "tests/examples/Vta1.hs" 63 15 63 17 , SrcSpan "tests/examples/Vta1.hs" 63 29 63 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 13 63 14 , srcInfoPoints = [] } "a") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 18 63 29 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 63 20 63 22 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 18 63 19 , srcInfoPoints = [] }) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 23 63 29 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 63 25 63 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 23 63 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 23 63 24 , srcInfoPoints = [] } "k")) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 28 63 29 , srcInfoPoints = [] }))))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 33 63 34 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 33 63 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 63 33 63 34 , srcInfoPoints = [] } "T") []) ] [] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 1 65 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 65 5 65 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 1 65 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 8 65 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 65 16 65 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 8 65 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 8 65 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 8 65 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 8 65 13 , srcInfoPoints = [] } "Proxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 14 65 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 14 65 15 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 19 65 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 19 65 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 65 19 65 22 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 1 66 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 1 66 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 1 66 4 , srcInfoPoints = [] } "foo") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 5 66 6 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 7 66 10 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 66 7 66 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 9 66 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 66 9 66 10 , srcInfoPoints = [] } 0 "0"))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 1 68 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 68 7 68 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 1 68 6 , srcInfoPoints = [] } "first" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 10 68 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 68 18 68 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 10 68 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 10 68 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 10 68 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 10 68 15 , srcInfoPoints = [] } "First"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 16 68 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 16 68 17 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 21 68 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 21 68 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 68 21 68 24 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 1 69 12 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 1 69 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 1 69 6 , srcInfoPoints = [] } "first") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 7 69 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 9 69 12 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 69 9 69 10 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 11 69 12 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 69 11 69 12 , srcInfoPoints = [] } 0 "0"))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 1 71 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 1 71 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 1 71 6 , srcInfoPoints = [] } "fTest")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 7 71 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 71 7 71 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 9 71 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 9 71 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 9 71 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 9 71 14 , srcInfoPoints = [] } "first"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 15 71 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 15 71 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 71 15 71 16 , srcInfoPoints = [] } "F"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 1 72 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 1 72 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 1 72 7 , srcInfoPoints = [] } "fMaybe")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 8 72 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 72 8 72 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 10 72 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 10 72 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 10 72 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 10 72 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 10 72 15 , srcInfoPoints = [] } "first"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 16 72 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 72 16 72 17 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 17 72 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 17 72 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 17 72 22 , srcInfoPoints = [] } "Maybe"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 23 72 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 23 72 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 72 23 72 24 , srcInfoPoints = [] } "F"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 1 74 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 1 74 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 1 74 5 , srcInfoPoints = [] } "test")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 6 74 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 74 6 74 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 8 74 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 8 74 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 8 74 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 8 74 11 , srcInfoPoints = [] } "foo"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 12 74 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 12 74 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 74 12 74 13 , srcInfoPoints = [] } "P"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 1 75 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 1 75 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 1 75 4 , srcInfoPoints = [] } "bar")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 5 75 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 75 5 75 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 7 75 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 7 75 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 7 75 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 7 75 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 7 75 10 , srcInfoPoints = [] } "foo"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 11 75 16 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 75 11 75 12 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 12 75 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 12 75 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 12 75 16 , srcInfoPoints = [] } "Bool"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 17 75 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 17 75 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 75 17 75 18 , srcInfoPoints = [] } "P"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 1 77 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 77 5 77 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 1 77 4 , srcInfoPoints = [] } "too" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 8 77 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 77 16 77 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 8 77 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 8 77 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 8 77 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 8 77 13 , srcInfoPoints = [] } "Three"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 14 77 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 14 77 15 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 19 77 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 19 77 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 77 19 77 22 , srcInfoPoints = [] } "Int")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 1 78 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 1 78 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 1 78 4 , srcInfoPoints = [] } "too") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 5 78 6 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 7 78 10 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 78 7 78 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 9 78 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 78 9 78 10 , srcInfoPoints = [] } 3 "3"))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 1 80 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 1 80 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 1 80 10 , srcInfoPoints = [] } "threeBase")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 11 80 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 80 11 80 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 13 80 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 13 80 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 13 80 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 13 80 16 , srcInfoPoints = [] } "too"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 17 80 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 17 80 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 80 17 80 18 , srcInfoPoints = [] } "T"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 1 81 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 1 81 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 1 81 8 , srcInfoPoints = [] } "threeOk")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 9 81 24 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 81 9 81 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 11 81 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 11 81 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 11 81 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 11 81 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 11 81 14 , srcInfoPoints = [] } "too"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 15 81 22 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 81 15 81 16 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 16 81 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 16 81 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 16 81 22 , srcInfoPoints = [] } "Either"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 23 81 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 23 81 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 81 23 81 24 , srcInfoPoints = [] } "T"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 1 83 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 1 83 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 1 83 5 , srcInfoPoints = [] } "blah")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 6 83 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 83 6 83 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 8 83 20 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 8 83 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 8 83 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 8 83 15 , srcInfoPoints = [] } "Nothing"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 16 83 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 83 16 83 17 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 17 83 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 17 83 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 83 17 83 20 , srcInfoPoints = [] } "Int")))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 1 85 61 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 11 85 12 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 1 85 8 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 9 85 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 9 85 10 , srcInfoPoints = [] } "N")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 13 85 61 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 17 85 18 , SrcSpan "tests/examples/Vta1.hs" 85 60 85 61 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 13 85 61 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 17 85 18 , SrcSpan "tests/examples/Vta1.hs" 85 60 85 61 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 13 85 16 , srcInfoPoints = [] } "MkN") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 19 85 59 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 25 85 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 19 85 24 , srcInfoPoints = [] } "unMkN" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 28 85 59 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 28 85 34 , SrcSpan "tests/examples/Vta1.hs" 85 36 85 37 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 35 85 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 35 85 36 , srcInfoPoints = [] } "a") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 45 85 47 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 45 85 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 45 85 47 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 45 85 47 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 38 85 42 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 43 85 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 43 85 44 , srcInfoPoints = [] } "a")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 48 85 59 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 85 50 85 52 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 48 85 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 48 85 49 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 53 85 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 53 85 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 85 53 85 59 , srcInfoPoints = [] } "String"))))) ]) ] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 1 87 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 1 87 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 1 87 2 , srcInfoPoints = [] } "n")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 3 87 13 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 87 3 87 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 5 87 13 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 5 87 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 5 87 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 5 87 8 , srcInfoPoints = [] } "MkN"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 9 87 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 9 87 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 87 9 87 13 , srcInfoPoints = [] } "show"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 1 89 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 1 89 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 1 89 4 , srcInfoPoints = [] } "boo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 5 89 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 89 5 89 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 7 89 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 7 89 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 7 89 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 7 89 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 7 89 12 , srcInfoPoints = [] } "unMkN"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 13 89 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 13 89 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 13 89 14 , srcInfoPoints = [] } "n")))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 15 89 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 89 15 89 16 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 16 89 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 16 89 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 89 16 89 20 , srcInfoPoints = [] } "Bool")))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 1 91 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 91 6 91 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 1 91 5 , srcInfoPoints = [] } "boo2" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 9 91 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 91 9 91 15 , SrcSpan "tests/examples/Vta1.hs" 91 30 91 31 ] } (Just [ KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 16 91 29 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 91 16 91 17 , SrcSpan "tests/examples/Vta1.hs" 91 19 91 21 , SrcSpan "tests/examples/Vta1.hs" 91 28 91 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 17 91 18 , srcInfoPoints = [] } "a") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 22 91 28 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 91 24 91 26 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 22 91 23 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 27 91 28 , srcInfoPoints = [] })) ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 32 91 47 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 91 40 91 42 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 32 91 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 32 91 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 32 91 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 32 91 37 , srcInfoPoints = [] } "Proxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 38 91 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 38 91 39 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 43 91 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 43 91 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 91 43 91 47 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 1 92 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 1 92 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 1 92 5 , srcInfoPoints = [] } "boo2") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 6 92 7 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 8 92 15 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 92 8 92 9 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 10 92 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 10 92 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 92 10 92 15 , srcInfoPoints = [] } "False")))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 1 94 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 1 94 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 1 94 5 , srcInfoPoints = [] } "base")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 6 94 14 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 94 6 94 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 8 94 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 8 94 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 8 94 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 8 94 12 , srcInfoPoints = [] } "boo2"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 13 94 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 13 94 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 94 13 94 14 , srcInfoPoints = [] } "P"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 1 95 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 1 95 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 1 95 5 , srcInfoPoints = [] } "bar'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 5 95 20 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 95 5 95 6 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 7 95 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 7 95 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 7 95 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 7 95 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 7 95 11 , srcInfoPoints = [] } "boo2"))) (TypeApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 12 95 18 , srcInfoPoints = [ SrcSpan "tests/examples/Vta1.hs" 95 12 95 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 13 95 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 13 95 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 13 95 18 , srcInfoPoints = [] } "Maybe"))))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 19 95 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 19 95 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Vta1.hs" 95 19 95 20 , srcInfoPoints = [] } "P"))))) Nothing ] , [ Comment False (SrcSpan "tests/examples/Vta1.hs" 4 1 4 40) " tests about visible type application" , Comment False (SrcSpan "tests/examples/Vta1.hs" 18 44 18 46) "" , Comment False (SrcSpan "tests/examples/Vta1.hs" 19 1 19 29) " (False, 7) :: (Bool, Int)" , Comment False (SrcSpan "tests/examples/Vta1.hs" 21 36 21 52) " \"3\" :: String" , Comment False (SrcSpan "tests/examples/Vta1.hs" 22 40 22 56) " \"5\" :: String" , Comment False (SrcSpan "tests/examples/Vta1.hs" 23 45 23 61) " \"7\" :: String" , Comment False (SrcSpan "tests/examples/Vta1.hs" 29 40 29 67) " (5, True) :: (Int, Bool)" , Comment False (SrcSpan "tests/examples/Vta1.hs" 30 36 30 68) " (1, \"hello\") :: (Int, String)" , Comment False (SrcSpan "tests/examples/Vta1.hs" 31 36 31 51) " [7] :: [Int]" , Comment False (SrcSpan "tests/examples/Vta1.hs" 62 25 62 77) " This expands to P (kind variable) (type variable)" , Comment False (SrcSpan "tests/examples/Vta1.hs" 75 19 75 33) " should work" , Comment False (SrcSpan "tests/examples/Vta1.hs" 95 21 95 35) " should work" ] ) haskell-src-exts-1.23.1/tests/examples/GhcDeriving.hs.parser.golden0000644000000000000000000002752213534314633023441 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/GhcDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GhcDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GhcDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GhcDeriving.hs" 5 1 5 1 , SrcSpan "tests/examples/GhcDeriving.hs" 5 1 5 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 1 4 45 , srcInfoPoints = [ SrcSpan "tests/examples/GhcDeriving.hs" 3 25 3 26 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 1 3 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 9 3 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 9 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 9 3 22 , srcInfoPoints = [] } "CodeGenModule")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 23 3 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 23 3 24 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 27 3 53 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 27 3 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 27 3 30 , srcInfoPoints = [] } "CGM") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 31 3 53 , srcInfoPoints = [ SrcSpan "tests/examples/GhcDeriving.hs" 3 31 3 32 , SrcSpan "tests/examples/GhcDeriving.hs" 3 52 3 53 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 52 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 32 3 38 , srcInfoPoints = [] } "StateT"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 39 3 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 39 3 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 39 3 47 , srcInfoPoints = [] } "CGMState")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 48 3 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 48 3 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 48 3 50 , srcInfoPoints = [] } "IO")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 51 3 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 3 51 3 52 , srcInfoPoints = [] } "a"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 4 4 45 , srcInfoPoints = [ SrcSpan "tests/examples/GhcDeriving.hs" 4 4 4 12 , SrcSpan "tests/examples/GhcDeriving.hs" 4 13 4 14 , SrcSpan "tests/examples/GhcDeriving.hs" 4 19 4 20 , SrcSpan "tests/examples/GhcDeriving.hs" 4 35 4 36 , SrcSpan "tests/examples/GhcDeriving.hs" 4 44 4 45 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 14 4 19 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 14 4 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 14 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 14 4 19 , srcInfoPoints = [] } "Monad"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 21 4 35 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 21 4 35 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 21 4 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 21 4 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 21 4 31 , srcInfoPoints = [] } "MonadState"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 32 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/GhcDeriving.hs" 4 32 4 33 , SrcSpan "tests/examples/GhcDeriving.hs" 4 34 4 35 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 33 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 33 4 34 , srcInfoPoints = [] } "s")))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 37 4 44 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 37 4 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 37 4 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GhcDeriving.hs" 4 37 4 44 , srcInfoPoints = [] } "MonadIO"))) ] ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSynonymImport.hs.parser.golden0000644000000000000000000002211513534314633025446 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSynonymImport.hs" 6 1 6 1 , SrcSpan "tests/examples/PatternSynonymImport.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 1 3 46 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 3 1 3 7 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 41 3 46 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 8 3 12 , srcInfoPoints = [] } "Main") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 13 3 40 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 3 13 3 14 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 25 3 26 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 39 3 40 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 14 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 3 14 3 21 ] } (PatternNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 14 3 21 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 22 3 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 22 3 25 , srcInfoPoints = [] } "Foo")) , EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 27 3 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 3 27 3 34 ] } (PatternNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 27 3 34 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 35 3 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 3 35 3 36 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 36 3 38 , SrcSpan "tests/examples/PatternSynonymImport.hs" 3 38 3 39 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 3 36 3 38 , srcInfoPoints = [] } ":>")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSynonymImport.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 1 5 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 1 5 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 8 5 11 , srcInfoPoints = [] } "Foo" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 12 5 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 12 5 13 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 24 5 25 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 38 5 39 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 13 5 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 13 5 20 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 21 5 24 ] } (PatternNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 13 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 13 5 20 ] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 21 5 24 , srcInfoPoints = [] } "Foo") , IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 26 5 38 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 26 5 33 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 34 5 38 ] } (PatternNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 26 5 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 26 5 33 ] }) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymImport.hs" 5 34 5 38 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymImport.hs" 5 34 5 35 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 35 5 37 , SrcSpan "tests/examples/PatternSynonymImport.hs" 5 37 5 38 ] } ":>") ]) } ] [] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeInstances.hs.parser.golden0000644000000000000000000002532313534314633024036 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeInstances.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeInstances.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeInstances.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeInstances.hs" 8 1 8 1 , SrcSpan "tests/examples/TypeInstances.hs" 8 1 8 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeInstances.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 1 7 21 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 3 1 3 6 , SrcSpan "tests/examples/TypeInstances.hs" 3 17 3 22 , SrcSpan "tests/examples/TypeInstances.hs" 4 3 4 3 , SrcSpan "tests/examples/TypeInstances.hs" 5 3 5 3 , SrcSpan "tests/examples/TypeInstances.hs" 7 3 7 3 , SrcSpan "tests/examples/TypeInstances.hs" 8 1 8 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 7 3 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 7 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 7 3 14 , srcInfoPoints = [] } "MapType")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 15 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 3 15 3 16 , srcInfoPoints = [] } "v"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 3 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 4 3 4 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 8 4 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 8 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 8 4 11 , srcInfoPoints = [] } "Key")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 12 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 12 4 13 , srcInfoPoints = [] } "v"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 14 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 4 14 4 16 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 4 17 4 18 , srcInfoPoints = [] }))) Nothing , ClsTyDef SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 3 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 5 3 5 7 , SrcSpan "tests/examples/TypeInstances.hs" 5 8 5 16 ] } (TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 17 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 5 23 5 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 17 5 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 17 5 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 17 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 17 5 20 , srcInfoPoints = [] } "Key"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 21 5 22 , srcInfoPoints = [] } "v"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 25 5 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 25 5 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 25 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 25 5 32 , srcInfoPoints = [] } "TileKey"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 33 5 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 5 33 5 34 , srcInfoPoints = [] } "v")))) , ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 3 7 21 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 7 3 7 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 8 7 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 8 7 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 8 7 14 , srcInfoPoints = [] } "Source")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 15 7 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 15 7 16 , srcInfoPoints = [] } "v"))) (Just (KindSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 17 7 21 , srcInfoPoints = [ SrcSpan "tests/examples/TypeInstances.hs" 7 17 7 19 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeInstances.hs" 7 20 7 21 , srcInfoPoints = [] }))) Nothing ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/TySplice.hs.parser.golden0000644000000000000000000002046113534314633022777 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 1 1 1 1 , SrcSpan "tests/examples/TySplice.hs" 3 1 3 1 , SrcSpan "tests/examples/TySplice.hs" 3 1 3 1 , SrcSpan "tests/examples/TySplice.hs" 3 1 3 1 , SrcSpan "tests/examples/TySplice.hs" 4 1 4 1 , SrcSpan "tests/examples/TySplice.hs" 5 1 5 1 , SrcSpan "tests/examples/TySplice.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 1 1 1 13 , SrcSpan "tests/examples/TySplice.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ SpliceDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 3 1 3 3 , SrcSpan "tests/examples/TySplice.hs" 3 13 3 15 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 3 1 3 3 , SrcSpan "tests/examples/TySplice.hs" 3 13 3 15 ] } (ExpBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 3 1 3 3 , SrcSpan "tests/examples/TySplice.hs" 3 13 3 15 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 4 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 3 6 3 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 4 3 5 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 4 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 4 3 5 , srcInfoPoints = [] } "f"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 9 3 12 , srcInfoPoints = [] } (IdSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 3 9 3 12 , srcInfoPoints = [] } "ty"))))) , SpliceDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 1 4 3 , SrcSpan "tests/examples/TySplice.hs" 4 19 4 21 ] } (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 1 4 3 , SrcSpan "tests/examples/TySplice.hs" 4 19 4 21 ] } (ExpBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 1 4 21 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 1 4 3 , SrcSpan "tests/examples/TySplice.hs" 4 19 4 21 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 4 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 6 4 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 4 4 5 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 4 4 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 4 4 5 , srcInfoPoints = [] } "f"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 9 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 9 4 11 , SrcSpan "tests/examples/TySplice.hs" 4 17 4 18 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 9 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/TySplice.hs" 4 9 4 11 , SrcSpan "tests/examples/TySplice.hs" 4 17 4 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 11 4 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 11 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 11 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 11 4 14 , srcInfoPoints = [] } "fun"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 15 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 15 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TySplice.hs" 4 15 4 17 , srcInfoPoints = [] } "ty"))))))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/ForeignImportJavascript.hs.parser.golden0000644000000000000000000001537013534314633026061 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 1 1 1 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 1 3 1 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 5 1 5 1 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 1 1 13 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 1 14 1 27 , srcInfoPoints = [] } "JavascriptFFI" ] ] [] [ ForImp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 1 4 47 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 1 3 8 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 9 3 15 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 34 3 57 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 28 4 30 ] } (JavaScript SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 16 3 26 , srcInfoPoints = [] }) (Just (PlayRisky SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 3 27 3 33 , srcInfoPoints = [] })) (Just "somethingUseful_ = $1") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 5 4 27 , srcInfoPoints = [] } "js_set_somethingUseful") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 31 4 47 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 39 4 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 31 4 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 31 4 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 31 4 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 31 4 36 , srcInfoPoints = [] } "JSFun"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 37 4 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 37 4 38 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 42 4 47 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 42 4 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 42 4 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 42 4 44 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 47 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 46 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 46 4 47 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 47 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 46 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 46 4 47 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 47 , srcInfoPoints = [ SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 45 4 46 , SrcSpan "tests/examples/ForeignImportJavascript.hs" 4 46 4 47 ] }))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/FamilyVarid.hs.parser.golden0000644000000000000000000001015613534314633023452 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyVarid.hs" 1 1 1 1 , SrcSpan "tests/examples/FamilyVarid.hs" 2 1 2 1 , SrcSpan "tests/examples/FamilyVarid.hs" 2 1 2 1 , SrcSpan "tests/examples/FamilyVarid.hs" 4 1 4 1 , SrcSpan "tests/examples/FamilyVarid.hs" 5 1 5 1 , SrcSpan "tests/examples/FamilyVarid.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyVarid.hs" 2 1 2 7 , SrcSpan "tests/examples/FamilyVarid.hs" 2 20 2 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 2 8 2 19 , srcInfoPoints = [] } "FamilyVarid") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyVarid.hs" 1 1 1 13 , SrcSpan "tests/examples/FamilyVarid.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 1 4 28 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 1 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 1 4 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 3 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 3 4 9 , srcInfoPoints = [] } "family") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 10 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 10 4 16 , srcInfoPoints = [] } "forall") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 17 4 28 , srcInfoPoints = [ SrcSpan "tests/examples/FamilyVarid.hs" 4 17 4 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 19 4 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 19 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FamilyVarid.hs" 4 19 4 28 , srcInfoPoints = [] } "undefined")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/Unicode2.hs.parser.golden0000644000000000000000000001231213534314633022707 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode2.hs" 1 1 1 1 , SrcSpan "tests/examples/Unicode2.hs" 3 1 3 1 , SrcSpan "tests/examples/Unicode2.hs" 3 1 3 1 , SrcSpan "tests/examples/Unicode2.hs" 3 1 3 1 , SrcSpan "tests/examples/Unicode2.hs" 4 1 4 1 , SrcSpan "tests/examples/Unicode2.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode2.hs" 1 1 1 13 , SrcSpan "tests/examples/Unicode2.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 1 3 23 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 1 3 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 1 3 9 , srcInfoPoints = [] } "lengthOP") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 10 3 11 , srcInfoPoints = [] } "n") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 12 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode2.hs" 3 12 3 13 , SrcSpan "tests/examples/Unicode2.hs" 3 13 3 14 , SrcSpan "tests/examples/Unicode2.hs" 3 14 3 15 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 13 3 14 , srcInfoPoints = [] } "\8860") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 16 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/Unicode2.hs" 3 16 3 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 18 3 23 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 18 3 19 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 18 3 19 , srcInfoPoints = [] } 0 "0")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 20 3 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 20 3 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 20 3 21 , srcInfoPoints = [] } "\8860"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 22 3 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 22 3 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unicode2.hs" 3 22 3 23 , srcInfoPoints = [] } "n"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/IndentedWhereBlock.hs.parser.golden0000644000000000000000000000013513534314633024737 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedWhereBlock.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/SafeImports1.hs.parser.golden0000644000000000000000000000434313534314633023561 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports1.hs" 1 1 1 1 , SrcSpan "tests/examples/SafeImports1.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports1.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports1.hs" 2 1 2 1 , SrcSpan "tests/examples/SafeImports1.hs" 3 1 3 1 , SrcSpan "tests/examples/SafeImports1.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports1.hs" 1 1 1 13 , SrcSpan "tests/examples/SafeImports1.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 1 14 1 25 , srcInfoPoints = [] } "SafeImports" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 2 1 2 25 , srcInfoPoints = [ SrcSpan "tests/examples/SafeImports1.hs" 2 1 2 7 , SrcSpan "tests/examples/SafeImports1.hs" 2 8 2 12 , SrcSpan "tests/examples/SafeImports1.hs" 2 21 2 23 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 2 13 2 20 , srcInfoPoints = [] } "Prelude" , importQualified = False , importSrc = False , importSafe = True , importPkg = Nothing , importAs = Just (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SafeImports1.hs" 2 24 2 25 , srcInfoPoints = [] } "P") , importSpecs = Nothing } ] [] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeOperatorAsVariable.hs.parser.golden0000644000000000000000000001455013534314633025634 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 1 5 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 6 1 6 1 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 1 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 1 3 5 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 13 3 14 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 6 3 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 6 3 7 , srcInfoPoints = [] } "T")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 8 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 8 3 9 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 9 3 11 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 11 3 12 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 9 3 11 , srcInfoPoints = [] } "~>"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 16 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 16 3 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 16 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 16 3 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 15 3 16 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 3 16 3 17 ] }))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 1 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 1 5 5 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 10 5 11 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 6 5 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 6 5 9 , srcInfoPoints = [] } "Foo")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 13 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 13 5 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 13 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 13 5 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 12 5 13 , SrcSpan "tests/examples/TypeOperatorAsVariable.hs" 5 13 5 14 ] }))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/MinimalPragma.hs.parser.golden0000644000000000000000000007317613534314633023774 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/MinimalPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/MinimalPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/MinimalPragma.hs" 8 1 8 1 , SrcSpan "tests/examples/MinimalPragma.hs" 8 1 8 1 ] } Nothing [] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 1 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 1 1 1 6 , SrcSpan "tests/examples/MinimalPragma.hs" 1 12 1 17 , SrcSpan "tests/examples/MinimalPragma.hs" 2 6 2 6 , SrcSpan "tests/examples/MinimalPragma.hs" 3 6 3 6 , SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 6 , SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 6 , SrcSpan "tests/examples/MinimalPragma.hs" 6 6 6 6 , SrcSpan "tests/examples/MinimalPragma.hs" 8 1 8 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 7 1 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 7 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 7 1 9 , srcInfoPoints = [] } "Eq")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 10 1 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 1 10 1 11 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 6 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 2 11 2 13 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 6 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 2 11 2 13 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 6 2 10 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 2 6 2 7 , SrcSpan "tests/examples/MinimalPragma.hs" 2 7 2 9 , SrcSpan "tests/examples/MinimalPragma.hs" 2 9 2 10 ] } "==" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 14 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 2 16 2 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 14 2 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 14 2 15 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 19 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 2 21 2 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 19 2 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 19 2 20 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 24 2 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 24 2 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 2 24 2 28 , srcInfoPoints = [] } "Bool")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 6 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 3 11 3 13 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 6 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 3 11 3 13 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 6 3 10 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 3 6 3 7 , SrcSpan "tests/examples/MinimalPragma.hs" 3 7 3 9 , SrcSpan "tests/examples/MinimalPragma.hs" 3 9 3 10 ] } "/=" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 14 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 3 16 3 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 14 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 14 3 15 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 19 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 3 21 3 23 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 19 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 19 3 20 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 24 3 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 24 3 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 3 24 3 28 , srcInfoPoints = [] } "Bool")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 6 4 7 , srcInfoPoints = [] } "x")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 8 4 10 , srcInfoPoints = [] } "==") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 11 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 11 4 12 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 13 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 4 13 4 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 15 4 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 15 4 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 15 4 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 15 4 18 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 19 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 4 19 4 20 , SrcSpan "tests/examples/MinimalPragma.hs" 4 26 4 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 20 4 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 20 4 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 20 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 20 4 21 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 22 4 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 22 4 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 22 4 24 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 25 4 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 25 4 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 4 25 4 26 , srcInfoPoints = [] } "y"))))))) Nothing ]) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 6 5 7 , srcInfoPoints = [] } "x")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 8 5 10 , srcInfoPoints = [] } "/=") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 11 5 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 11 5 12 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 13 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 5 13 5 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 15 5 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 15 5 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 15 5 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 15 5 18 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 19 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 5 19 5 20 , SrcSpan "tests/examples/MinimalPragma.hs" 5 26 5 27 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 20 5 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 20 5 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 20 5 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 20 5 21 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 22 5 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 22 5 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 22 5 24 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 25 5 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 25 5 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 5 25 5 26 , srcInfoPoints = [] } "y"))))))) Nothing ]) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 6 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 6 6 17 , SrcSpan "tests/examples/MinimalPragma.hs" 6 30 6 33 ] } (MinimalPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 6 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 6 6 17 , SrcSpan "tests/examples/MinimalPragma.hs" 6 30 6 33 ] } (Just (OrFormula SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 18 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 23 6 24 ] } [ VarFormula SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 18 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 18 6 19 , SrcSpan "tests/examples/MinimalPragma.hs" 6 19 6 21 , SrcSpan "tests/examples/MinimalPragma.hs" 6 21 6 22 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 18 6 22 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 18 6 19 , SrcSpan "tests/examples/MinimalPragma.hs" 6 19 6 21 , SrcSpan "tests/examples/MinimalPragma.hs" 6 21 6 22 ] } "==") , VarFormula SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 25 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 25 6 26 , SrcSpan "tests/examples/MinimalPragma.hs" 6 26 6 28 , SrcSpan "tests/examples/MinimalPragma.hs" 6 28 6 29 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MinimalPragma.hs" 6 25 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/MinimalPragma.hs" 6 25 6 26 , SrcSpan "tests/examples/MinimalPragma.hs" 6 26 6 28 , SrcSpan "tests/examples/MinimalPragma.hs" 6 28 6 29 ] } "/=") ]))) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/RecordWildcard.hs.parser.golden0000644000000000000000000000011713534314633024127 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcard.hs" 3 9) "Parse error: ," haskell-src-exts-1.23.1/tests/examples/ContextOrdering.hs.parser.golden0000644000000000000000000002067513556712523024374 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 1 1 1 1 , SrcSpan "tests/examples/ContextOrdering.hs" 2 1 2 1 , SrcSpan "tests/examples/ContextOrdering.hs" 2 1 2 1 , SrcSpan "tests/examples/ContextOrdering.hs" 4 1 4 1 , SrcSpan "tests/examples/ContextOrdering.hs" 5 1 5 1 , SrcSpan "tests/examples/ContextOrdering.hs" 6 1 6 1 , SrcSpan "tests/examples/ContextOrdering.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 2 1 2 29 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 2 1 2 7 , SrcSpan "tests/examples/ContextOrdering.hs" 2 24 2 29 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 2 8 2 23 , srcInfoPoints = [] } "ContextOrdering") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 1 1 1 13 , SrcSpan "tests/examples/ContextOrdering.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 1 14 1 29 , srcInfoPoints = [] } "ConstraintKinds" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 1 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 4 5 4 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 1 4 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 8 4 22 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 8 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 4 8 4 9 , SrcSpan "tests/examples/ContextOrdering.hs" 4 14 4 15 , SrcSpan "tests/examples/ContextOrdering.hs" 4 16 4 18 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 8 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 4 8 4 9 , SrcSpan "tests/examples/ContextOrdering.hs" 4 14 4 15 , SrcSpan "tests/examples/ContextOrdering.hs" 4 16 4 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 9 4 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 9 4 14 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 9 4 14 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 9 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 9 4 10 , srcInfoPoints = [] } "x")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 11 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 11 4 12 , srcInfoPoints = [] } "m"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 13 4 14 , srcInfoPoints = [] } "a"))))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 19 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 19 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 4 19 4 22 , srcInfoPoints = [] } "Int")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 1 5 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 1 5 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 1 5 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 5 5 8 , srcInfoPoints = [ SrcSpan "tests/examples/ContextOrdering.hs" 5 5 5 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 7 5 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ContextOrdering.hs" 5 7 5 8 , srcInfoPoints = [] } 5 "5"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/EmptyList.hs.parser.golden0000644000000000000000000000431413534314633023174 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyList.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyList.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyList.hs" 3 1 3 1 , SrcSpan "tests/examples/EmptyList.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyList.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyList.hs" 1 1 1 7 , SrcSpan "tests/examples/EmptyList.hs" 1 18 1 23 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 1 8 1 17 , srcInfoPoints = [] } "EmptyList") Nothing Nothing)) [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 3 1 3 12 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 3 1 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 3 1 3 7 , srcInfoPoints = [] } "eAttrs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 3 8 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyList.hs" 3 8 3 9 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyList.hs" 3 10 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyList.hs" 3 10 3 11 , SrcSpan "tests/examples/EmptyList.hs" 3 11 3 12 ] } [])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/DerivingParen.hs.parser.golden0000644000000000000000000001505113534314632023776 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingParen.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingParen.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingParen.hs" 2 1 2 1 , SrcSpan "tests/examples/DerivingParen.hs" 3 1 3 1 , SrcSpan "tests/examples/DerivingParen.hs" 3 1 3 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 1 1 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 1 8 1 9 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 1 1 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 6 1 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 6 1 7 , srcInfoPoints = [] } "X")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 10 1 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 10 1 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 10 1 11 , srcInfoPoints = [] } "X") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 12 1 25 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 1 12 1 20 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 21 1 25 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 21 1 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 21 1 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 1 21 1 25 , srcInfoPoints = [] } "Show"))) ] ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 2 8 2 9 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 1 2 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 6 2 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 6 2 7 , srcInfoPoints = [] } "X")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 10 2 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 10 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 10 2 11 , srcInfoPoints = [] } "X") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 12 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 2 12 2 20 ] } Nothing [ IParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 21 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingParen.hs" 2 21 2 22 , SrcSpan "tests/examples/DerivingParen.hs" 2 26 2 27 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 22 2 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 22 2 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 22 2 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingParen.hs" 2 22 2 26 , srcInfoPoints = [] } "Show")))) ] ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RecordWildcardError.hs.parser.golden0000644000000000000000000000031113534314633025135 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcardError.hs" 1 12) "RecordWildCards language extension is not enabled. Please add {-# LANGUAGE RecordWildCards #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/DataKinds.hs.parser.golden0000644000000000000000000020335013534314632023104 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 1 1 35 1 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 1 1 1 1 , SrcSpan "tests/examples/DataKinds.hs" 2 1 2 1 , SrcSpan "tests/examples/DataKinds.hs" 3 1 3 1 , SrcSpan "tests/examples/DataKinds.hs" 5 1 5 1 , SrcSpan "tests/examples/DataKinds.hs" 5 1 5 1 , SrcSpan "tests/examples/DataKinds.hs" 5 1 5 1 , SrcSpan "tests/examples/DataKinds.hs" 8 1 8 1 , SrcSpan "tests/examples/DataKinds.hs" 10 1 10 1 , SrcSpan "tests/examples/DataKinds.hs" 11 1 11 1 , SrcSpan "tests/examples/DataKinds.hs" 13 1 13 1 , SrcSpan "tests/examples/DataKinds.hs" 15 1 15 1 , SrcSpan "tests/examples/DataKinds.hs" 18 1 18 1 , SrcSpan "tests/examples/DataKinds.hs" 20 1 20 1 , SrcSpan "tests/examples/DataKinds.hs" 22 1 22 1 , SrcSpan "tests/examples/DataKinds.hs" 24 1 24 1 , SrcSpan "tests/examples/DataKinds.hs" 25 1 25 1 , SrcSpan "tests/examples/DataKinds.hs" 27 1 27 1 , SrcSpan "tests/examples/DataKinds.hs" 29 1 29 1 , SrcSpan "tests/examples/DataKinds.hs" 30 1 30 1 , SrcSpan "tests/examples/DataKinds.hs" 33 1 33 1 , SrcSpan "tests/examples/DataKinds.hs" 34 1 34 1 , SrcSpan "tests/examples/DataKinds.hs" 35 1 35 1 , SrcSpan "tests/examples/DataKinds.hs" 35 1 35 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 1 1 1 13 , SrcSpan "tests/examples/DataKinds.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 1 14 1 28 , srcInfoPoints = [] } "KindSignatures" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 2 1 2 13 , SrcSpan "tests/examples/DataKinds.hs" 2 24 2 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 2 14 2 23 , srcInfoPoints = [] } "DataKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 3 1 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 3 1 3 13 , SrcSpan "tests/examples/DataKinds.hs" 3 24 3 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 3 14 3 23 , srcInfoPoints = [] } "PolyKinds" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 1 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 5 1 5 6 , SrcSpan "tests/examples/DataKinds.hs" 5 30 5 35 , SrcSpan "tests/examples/DataKinds.hs" 6 5 6 5 , SrcSpan "tests/examples/DataKinds.hs" 8 1 8 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 7 5 29 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 7 5 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 7 5 9 , srcInfoPoints = [] } "C1")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 10 5 29 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 5 10 5 11 , SrcSpan "tests/examples/DataKinds.hs" 5 13 5 15 , SrcSpan "tests/examples/DataKinds.hs" 5 28 5 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 11 5 12 , srcInfoPoints = [] } "a") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 16 5 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 16 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 5 16 5 20 , srcInfoPoints = [] } "Bool"))))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 5 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 6 7 6 9 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 5 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 6 7 6 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 5 6 6 , srcInfoPoints = [] } "c" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 10 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 6 18 6 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 10 6 17 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 10 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 10 6 15 , srcInfoPoints = [] } "proxy")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 16 6 17 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 21 6 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 21 6 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 6 21 6 24 , srcInfoPoints = [] } "Int"))))) ]) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 1 8 22 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 8 1 8 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 7 8 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 7 8 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 7 8 9 , srcInfoPoints = [] } "C2")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 10 8 22 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 8 10 8 11 , SrcSpan "tests/examples/DataKinds.hs" 8 13 8 15 , SrcSpan "tests/examples/DataKinds.hs" 8 21 8 22 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 11 8 12 , srcInfoPoints = [] } "a") (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 16 8 21 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 8 16 8 17 , SrcSpan "tests/examples/DataKinds.hs" 8 20 8 21 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 8 18 8 19 , srcInfoPoints = [] })))) [] Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 1 10 15 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 10 10 10 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 1 10 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 6 10 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 6 10 9 , srcInfoPoints = [] } "Baz")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 12 10 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 12 10 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 10 12 10 15 , srcInfoPoints = [] } "Baz") []) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 1 11 15 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 11 10 11 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 1 11 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 6 11 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 6 11 9 , srcInfoPoints = [] } "Foo")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 12 11 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 12 11 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 11 12 11 15 , srcInfoPoints = [] } "Foo") []) ] [] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 1 13 29 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 13 1 13 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 7 13 29 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 7 13 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 7 13 9 , srcInfoPoints = [] } "C3")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 10 13 29 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 13 10 13 11 , SrcSpan "tests/examples/DataKinds.hs" 13 13 13 15 , SrcSpan "tests/examples/DataKinds.hs" 13 28 13 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 11 13 12 , srcInfoPoints = [] } "a") (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 16 13 28 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 13 16 13 17 , SrcSpan "tests/examples/DataKinds.hs" 13 27 13 28 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 17 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 13 17 13 18 , SrcSpan "tests/examples/DataKinds.hs" 13 21 13 22 , SrcSpan "tests/examples/DataKinds.hs" 13 26 13 27 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 18 13 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 18 13 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 18 13 21 , srcInfoPoints = [] } "Baz")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 23 13 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 23 13 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 13 23 13 26 , srcInfoPoints = [] } "Foo")) ])))) [] Nothing , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 1 15 22 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 15 1 15 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 7 15 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 7 15 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 7 15 9 , srcInfoPoints = [] } "C4")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 10 15 22 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 15 10 15 11 , SrcSpan "tests/examples/DataKinds.hs" 15 13 15 15 , SrcSpan "tests/examples/DataKinds.hs" 15 21 15 22 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 11 15 12 , srcInfoPoints = [] } "a") (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 16 15 21 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 15 16 15 17 , SrcSpan "tests/examples/DataKinds.hs" 15 20 15 21 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 15 18 15 19 , srcInfoPoints = [] })))) [] Nothing , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 1 18 28 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 18 1 18 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 7 18 28 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 7 18 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 7 18 9 , srcInfoPoints = [] } "C5")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 10 18 28 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 18 10 18 11 , SrcSpan "tests/examples/DataKinds.hs" 18 13 18 15 , SrcSpan "tests/examples/DataKinds.hs" 18 27 18 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 11 18 12 , srcInfoPoints = [] } "a") (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 16 18 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 16 18 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 16 18 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 16 18 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 16 18 19 , srcInfoPoints = [] } "App"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 20 18 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 20 18 23 , srcInfoPoints = [] } "foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 24 18 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 18 24 18 27 , srcInfoPoints = [] } "baz"))))) [] Nothing , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 1 20 25 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 20 1 20 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 7 20 25 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 7 20 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 7 20 9 , srcInfoPoints = [] } "C6")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 10 20 25 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 20 10 20 11 , SrcSpan "tests/examples/DataKinds.hs" 20 13 20 15 , SrcSpan "tests/examples/DataKinds.hs" 20 24 20 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 11 20 12 , srcInfoPoints = [] } "a") (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 16 20 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 20 16 20 17 , SrcSpan "tests/examples/DataKinds.hs" 20 23 20 24 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 17 20 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 20 17 20 23 , srcInfoPoints = [] } "parens"))))) [] Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 1 22 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 1 22 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 6 22 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 6 22 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 6 22 7 , srcInfoPoints = [] } "X")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 8 22 18 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 22 8 22 9 , SrcSpan "tests/examples/DataKinds.hs" 22 11 22 13 , SrcSpan "tests/examples/DataKinds.hs" 22 17 22 18 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 9 22 10 , srcInfoPoints = [] } "a") (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 14 22 17 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 22 14 22 15 , SrcSpan "tests/examples/DataKinds.hs" 22 16 22 17 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 22 15 22 16 , srcInfoPoints = [] })))) [] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 1 24 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 1 24 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 1 24 3 , srcInfoPoints = [] } "x1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 4 24 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 24 4 24 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 6 24 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 24 16 24 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 6 24 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 6 24 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 6 24 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 19 24 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 19 24 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 19 24 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 19 24 20 , srcInfoPoints = [] } "X"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 21 24 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 24 21 24 22 , SrcSpan "tests/examples/DataKinds.hs" 24 26 24 27 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 21 24 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 24 21 24 22 , SrcSpan "tests/examples/DataKinds.hs" 24 26 24 27 ] } True [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 23 24 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 23 24 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 24 23 24 26 , srcInfoPoints = [] } "Int")) ]))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 1 25 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 1 25 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 1 25 3 , srcInfoPoints = [] } "x2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 4 25 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 25 4 25 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 6 25 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 25 16 25 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 6 25 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 6 25 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 6 25 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 19 25 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 19 25 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 19 25 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 19 25 20 , srcInfoPoints = [] } "X"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 21 25 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 25 21 25 22 , SrcSpan "tests/examples/DataKinds.hs" 25 26 25 27 , SrcSpan "tests/examples/DataKinds.hs" 25 34 25 35 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 21 25 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 25 21 25 22 , SrcSpan "tests/examples/DataKinds.hs" 25 26 25 27 , SrcSpan "tests/examples/DataKinds.hs" 25 34 25 35 ] } True [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 23 25 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 23 25 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 23 25 26 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 28 25 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 28 25 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 25 28 25 34 , srcInfoPoints = [] } "Double")) ]))))) Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 1 27 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 1 27 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 6 27 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 6 27 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 6 27 7 , srcInfoPoints = [] } "Y")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 8 27 24 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 27 8 27 9 , SrcSpan "tests/examples/DataKinds.hs" 27 11 27 13 , SrcSpan "tests/examples/DataKinds.hs" 27 23 27 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 9 27 10 , srcInfoPoints = [] } "a") (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 14 27 23 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 27 14 27 15 , SrcSpan "tests/examples/DataKinds.hs" 27 16 27 17 , SrcSpan "tests/examples/DataKinds.hs" 27 22 27 23 ] } Boxed [ TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 15 27 16 , srcInfoPoints = [] } , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 18 27 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 18 27 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 27 18 27 22 , srcInfoPoints = [] } "Bool")) ]))) [] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 1 29 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 1 29 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 1 29 3 , srcInfoPoints = [] } "y1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 4 29 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 29 4 29 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 6 29 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 29 16 29 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 6 29 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 6 29 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 6 29 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 19 29 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 19 29 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 19 29 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 19 29 20 , srcInfoPoints = [] } "Y"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 21 29 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 29 21 29 22 , SrcSpan "tests/examples/DataKinds.hs" 29 29 29 30 , SrcSpan "tests/examples/DataKinds.hs" 29 35 29 36 ] } (PromotedTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 21 29 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 29 21 29 22 , SrcSpan "tests/examples/DataKinds.hs" 29 29 29 30 , SrcSpan "tests/examples/DataKinds.hs" 29 35 29 36 ] } [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 23 29 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 23 29 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 23 29 29 , srcInfoPoints = [] } "Double")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 31 29 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 31 29 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 29 31 29 35 , srcInfoPoints = [] } "True")) ]))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 1 30 50 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 1 30 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 1 30 3 , srcInfoPoints = [] } "y2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 4 30 50 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 4 30 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 6 30 50 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 16 30 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 6 30 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 6 30 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 6 30 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 19 30 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 19 30 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 19 30 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 19 30 20 , srcInfoPoints = [] } "Y"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 21 30 50 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 21 30 22 , SrcSpan "tests/examples/DataKinds.hs" 30 29 30 30 , SrcSpan "tests/examples/DataKinds.hs" 30 49 30 50 ] } (PromotedTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 21 30 50 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 21 30 22 , SrcSpan "tests/examples/DataKinds.hs" 30 29 30 30 , SrcSpan "tests/examples/DataKinds.hs" 30 49 30 50 ] } [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 23 30 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 23 30 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 23 30 29 , srcInfoPoints = [] } "Double")) , TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 31 30 37 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 31 30 32 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 31 30 37 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 30 31 30 32 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 32 30 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 30 32 30 37 , srcInfoPoints = [] } "False"))) ]))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 1 33 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 1 33 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 1 33 3 , srcInfoPoints = [] } "z1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 4 33 38 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 4 33 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 6 33 38 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 16 33 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 6 33 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 6 33 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 6 33 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 19 33 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 19 33 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 19 33 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 19 33 20 , srcInfoPoints = [] } "X"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 21 33 38 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 21 33 22 , SrcSpan "tests/examples/DataKinds.hs" 33 29 33 30 , SrcSpan "tests/examples/DataKinds.hs" 33 37 33 38 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 21 33 38 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 21 33 22 , SrcSpan "tests/examples/DataKinds.hs" 33 29 33 30 , SrcSpan "tests/examples/DataKinds.hs" 33 37 33 38 ] } False [ TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 23 33 29 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 25 33 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 23 33 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 23 33 24 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 28 33 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 28 33 29 , srcInfoPoints = [] } "b")) , TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 31 33 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 31 33 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 31 33 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 31 33 32 , srcInfoPoints = [] } "X"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 33 33 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 33 33 34 , SrcSpan "tests/examples/DataKinds.hs" 33 35 33 36 ] } (PromotedList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 33 33 33 36 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 33 33 33 34 , SrcSpan "tests/examples/DataKinds.hs" 33 35 33 36 ] } True [])) ]))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 1 34 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 1 34 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 1 34 3 , srcInfoPoints = [] } "z2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 4 34 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 34 4 34 5 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 6 34 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 34 16 34 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 6 34 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 6 34 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 6 34 15 , srcInfoPoints = [] } "undefined"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 19 34 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 19 34 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 19 34 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 19 34 20 , srcInfoPoints = [] } "Y"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 21 34 35 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 34 21 34 22 , SrcSpan "tests/examples/DataKinds.hs" 34 28 34 29 , SrcSpan "tests/examples/DataKinds.hs" 34 34 34 35 ] } Boxed [ TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 22 34 28 , srcInfoPoints = [ SrcSpan "tests/examples/DataKinds.hs" 34 24 34 26 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 22 34 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 22 34 23 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 27 34 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 27 34 28 , srcInfoPoints = [] } "b")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 30 34 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 30 34 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataKinds.hs" 34 30 34 34 , srcInfoPoints = [] } "True")) ])))) Nothing ] , [ Comment True (SrcSpan "tests/examples/DataKinds.hs" 5 21 5 28) " 1 " , Comment True (SrcSpan "tests/examples/DataKinds.hs" 30 38 30 49) "comment" ] ) haskell-src-exts-1.23.1/tests/examples/RegularPatterns.hs.parser.golden0000644000000000000000000011516713534314633024375 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/RegularPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/RegularPatterns.hs" 3 1 3 1 , SrcSpan "tests/examples/RegularPatterns.hs" 3 1 3 1 , SrcSpan "tests/examples/RegularPatterns.hs" 5 1 5 1 , SrcSpan "tests/examples/RegularPatterns.hs" 6 1 6 1 , SrcSpan "tests/examples/RegularPatterns.hs" 7 1 7 1 , SrcSpan "tests/examples/RegularPatterns.hs" 8 1 8 1 , SrcSpan "tests/examples/RegularPatterns.hs" 9 1 9 1 , SrcSpan "tests/examples/RegularPatterns.hs" 10 1 10 1 , SrcSpan "tests/examples/RegularPatterns.hs" 10 1 10 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 3 1 3 7 , SrcSpan "tests/examples/RegularPatterns.hs" 3 24 3 29 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 3 8 3 23 , srcInfoPoints = [] } "RegularPatterns") Nothing Nothing)) [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 1 1 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 1 1 1 32 , SrcSpan "tests/examples/RegularPatterns.hs" 1 32 1 35 ] } (Just GHC) "-F -pgmFhsx2hs " , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 2 1 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 2 1 2 13 , SrcSpan "tests/examples/RegularPatterns.hs" 2 30 2 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 2 14 2 29 , srcInfoPoints = [] } "RegularPatterns" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 1 5 22 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 5 3 5 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 1 5 2 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 6 5 22 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 5 12 5 14 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 6 5 11 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 5 6 5 7 , SrcSpan "tests/examples/RegularPatterns.hs" 5 10 5 11 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 7 5 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 7 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 7 5 10 , srcInfoPoints = [] } "Int")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 15 5 22 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 5 15 5 16 , SrcSpan "tests/examples/RegularPatterns.hs" 5 21 5 22 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 16 5 21 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 5 16 5 17 , SrcSpan "tests/examples/RegularPatterns.hs" 5 20 5 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 17 5 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 17 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 5 17 5 20 , srcInfoPoints = [] } "Int")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 1 9 9 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 1 6 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 1 6 2 , srcInfoPoints = [] } "f") [ PRPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 3 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 6 3 6 4 , SrcSpan "tests/examples/RegularPatterns.hs" 6 8 6 9 , SrcSpan "tests/examples/RegularPatterns.hs" 6 12 6 13 , SrcSpan "tests/examples/RegularPatterns.hs" 6 16 6 17 , SrcSpan "tests/examples/RegularPatterns.hs" 6 28 6 29 ] } [ RPOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 5 6 8 , srcInfoPoints = [] } (RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 5 6 6 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 5 6 6 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 5 6 6 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 5 6 6 , srcInfoPoints = [] } 0 "0"))) (RPPlusG SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 6 6 8 , srcInfoPoints = [] }) , RPOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 10 6 12 , srcInfoPoints = [] } (RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 10 6 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 10 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 10 6 11 , srcInfoPoints = [] } "b"))) (RPPlus SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 11 6 12 , srcInfoPoints = [] }) , RPOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 14 6 16 , srcInfoPoints = [] } (RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 14 6 15 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 14 6 15 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 14 6 15 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 14 6 15 , srcInfoPoints = [] } 1 "1"))) (RPOpt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 15 6 16 , srcInfoPoints = [] }) , RPSeq SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 18 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 6 18 6 20 , SrcSpan "tests/examples/RegularPatterns.hs" 6 22 6 23 , SrcSpan "tests/examples/RegularPatterns.hs" 6 25 6 27 ] } [ RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 21 6 22 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 21 6 22 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 21 6 22 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 21 6 22 , srcInfoPoints = [] } 2 "2")) , RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 23 6 24 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 23 6 24 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 23 6 24 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 23 6 24 , srcInfoPoints = [] } 3 "3")) ] ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 30 6 35 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 6 30 6 31 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 32 6 35 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 6 32 6 33 , SrcSpan "tests/examples/RegularPatterns.hs" 6 34 6 35 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 33 6 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 33 6 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 6 33 6 34 , srcInfoPoints = [] } "b")) ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 1 7 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 1 7 2 , srcInfoPoints = [] } "f") [ PRPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 3 7 35 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 3 7 4 , SrcSpan "tests/examples/RegularPatterns.hs" 7 7 7 8 , SrcSpan "tests/examples/RegularPatterns.hs" 7 34 7 35 ] } [ RPOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 5 7 7 , srcInfoPoints = [] } (RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 5 7 6 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 5 7 6 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 5 7 6 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 5 7 6 , srcInfoPoints = [] } 1 "1"))) (RPPlus SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 6 7 7 , srcInfoPoints = [] }) , RPGuard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 9 7 33 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 9 7 11 , SrcSpan "tests/examples/RegularPatterns.hs" 7 14 7 15 , SrcSpan "tests/examples/RegularPatterns.hs" 7 31 7 33 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 12 7 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 12 7 13 , srcInfoPoints = [] } "x")) [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 30 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 30 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 16 7 17 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 18 7 23 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 18 7 19 , SrcSpan "tests/examples/RegularPatterns.hs" 7 19 7 22 , SrcSpan "tests/examples/RegularPatterns.hs" 7 22 7 23 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 18 7 23 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 18 7 19 , SrcSpan "tests/examples/RegularPatterns.hs" 7 19 7 22 , SrcSpan "tests/examples/RegularPatterns.hs" 7 22 7 23 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 19 7 22 , srcInfoPoints = [] } "mod"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 24 7 25 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 24 7 25 , srcInfoPoints = [] } 2 "2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 26 7 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 26 7 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 26 7 28 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 29 7 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 29 7 30 , srcInfoPoints = [] } 0 "0"))) ] ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 36 7 43 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 36 7 37 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 38 7 43 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 38 7 39 , SrcSpan "tests/examples/RegularPatterns.hs" 7 42 7 43 ] } [ List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 39 7 42 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 7 39 7 40 , SrcSpan "tests/examples/RegularPatterns.hs" 7 41 7 42 ] } [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 40 7 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 40 7 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 7 40 7 41 , srcInfoPoints = [] } "x")) ] ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 1 8 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 1 8 2 , srcInfoPoints = [] } "f") [ PRPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 3 8 26 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 8 3 8 4 , SrcSpan "tests/examples/RegularPatterns.hs" 8 6 8 7 , SrcSpan "tests/examples/RegularPatterns.hs" 8 25 8 26 ] } [ RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 5 8 6 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 5 8 6 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 5 8 6 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 5 8 6 , srcInfoPoints = [] } 2 "2")) , RPAs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 8 8 23 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 8 9 8 10 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 8 8 9 , srcInfoPoints = [] } "a") (RPOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 8 8 24 , srcInfoPoints = [] } (RPSeq SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 10 8 23 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 8 10 8 12 , SrcSpan "tests/examples/RegularPatterns.hs" 8 17 8 18 , SrcSpan "tests/examples/RegularPatterns.hs" 8 21 8 23 ] } [ RPCAs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 13 8 17 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 8 14 8 16 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 13 8 14 , srcInfoPoints = [] } "b") (RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 16 8 17 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 16 8 17 , srcInfoPoints = [] })) , RPPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 19 8 20 , srcInfoPoints = [] } (PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 19 8 20 , srcInfoPoints = [] }) ]) (RPStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 23 8 24 , srcInfoPoints = [] })) ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 27 8 32 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 8 27 8 28 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 29 8 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 29 8 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 29 8 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 29 8 30 , srcInfoPoints = [] } "b"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 30 8 31 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 30 8 31 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 30 8 31 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 31 8 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 31 8 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 8 31 8 32 , srcInfoPoints = [] } "a"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 9 1 9 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 9 1 9 2 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 9 3 9 4 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 9 5 9 9 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 9 5 9 6 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RegularPatterns.hs" 9 7 9 9 , srcInfoPoints = [ SrcSpan "tests/examples/RegularPatterns.hs" 9 7 9 8 , SrcSpan "tests/examples/RegularPatterns.hs" 9 8 9 9 ] } [])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnboxedTuples.hs.parser.golden0000644000000000000000000004215513534314633024050 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 1 1 1 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 4 1 4 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 7 1 7 1 , SrcSpan "tests/examples/UnboxedTuples.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 1 1 1 13 , SrcSpan "tests/examples/UnboxedTuples.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 1 14 1 27 , srcInfoPoints = [] } "UnboxedTuples" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 3 5 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 1 3 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 8 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 3 15 3 17 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 8 3 14 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 3 8 3 9 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 10 3 11 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 13 3 14 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 9 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 9 3 10 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 12 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 12 3 13 , srcInfoPoints = [] } "b") ]) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 18 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 3 18 3 20 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 23 3 24 , SrcSpan "tests/examples/UnboxedTuples.hs" 3 27 3 29 ] } Unboxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 21 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 21 3 22 , srcInfoPoints = [] } "b") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 25 3 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 3 25 3 26 , srcInfoPoints = [] } "a") ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 1 6 30 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 1 6 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 1 4 4 , srcInfoPoints = [] } "foo") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 5 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 4 5 4 6 , SrcSpan "tests/examples/UnboxedTuples.hs" 4 7 4 8 , SrcSpan "tests/examples/UnboxedTuples.hs" 4 10 4 11 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 6 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 6 4 7 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 9 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 9 4 10 , srcInfoPoints = [] } "b") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 4 12 6 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 4 12 4 13 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 3 6 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 5 3 5 7 , SrcSpan "tests/examples/UnboxedTuples.hs" 5 19 5 21 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 5 6 5 , SrcSpan "tests/examples/UnboxedTuples.hs" 7 1 7 0 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 8 5 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 5 8 5 10 , SrcSpan "tests/examples/UnboxedTuples.hs" 5 12 5 13 , SrcSpan "tests/examples/UnboxedTuples.hs" 5 16 5 18 ] } Unboxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 11 5 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 11 5 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 11 5 12 , srcInfoPoints = [] } "b")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 14 5 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 14 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 5 14 5 15 , srcInfoPoints = [] } "a")) ]) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 5 6 30 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 5 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 6 5 6 7 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 9 6 10 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 13 6 15 ] } Unboxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 8 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 8 6 9 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 11 6 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 11 6 12 , srcInfoPoints = [] } "a") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 16 6 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 6 16 6 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 28 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 21 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 22 6 23 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 24 6 26 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 21 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 22 6 23 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 24 6 26 ] } (TupleCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 26 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedTuples.hs" 6 19 6 21 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 22 6 23 , SrcSpan "tests/examples/UnboxedTuples.hs" 6 24 6 26 ] } Unboxed 2))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 27 6 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 27 6 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 27 6 28 , srcInfoPoints = [] } "b")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 29 6 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 29 6 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedTuples.hs" 6 29 6 30 , srcInfoPoints = [] } "a"))))) Nothing ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/CStyleLinePragmas.hs.parser.golden0000644000000000000000000000012213534314632024560 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/CStyleLinePragmas.hs" 1 1) "Parse error: #" haskell-src-exts-1.23.1/tests/examples/ClosedTypeFamily.hs.parser.golden0000644000000000000000000002642113534314632024461 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 1 1 1 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 1 3 1 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 1 3 1 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 1 5 1 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 9 1 9 1 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 1 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 1 3 7 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 25 3 30 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 3 8 3 24 , srcInfoPoints = [] } "ClosedTypeFamily") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 1 1 41 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 1 1 13 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 26 1 27 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 38 1 41 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 1 28 1 37 , srcInfoPoints = [] } "DataKinds" ] ] [] [ ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 1 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 1 5 5 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 6 5 12 , SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 20 5 25 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 13 5 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 13 5 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 13 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 13 5 15 , srcInfoPoints = [] } "Eq")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 16 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 16 5 17 , srcInfoPoints = [] } "x"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 18 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 5 18 5 19 , srcInfoPoints = [] } "y"))) Nothing Nothing [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 16 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 10 6 11 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 9 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 7 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 5 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 3 6 5 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 6 6 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 6 6 7 , srcInfoPoints = [] } "x"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 8 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 8 6 9 , srcInfoPoints = [] } "x"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 12 6 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 12 6 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 6 12 6 16 , srcInfoPoints = [] } "True"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 17 , srcInfoPoints = [ SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 10 7 11 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 9 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 7 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 5 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 3 7 5 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 6 7 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 6 7 7 , srcInfoPoints = [] } "x"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 8 7 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 8 7 9 , srcInfoPoints = [] } "y"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 12 7 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 12 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ClosedTypeFamily.hs" 7 12 7 17 , srcInfoPoints = [] } "False"))) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/DefaultSignatures.hs.parser.golden0000644000000000000000000005125613556712523024706 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 1 1 1 1 , SrcSpan "tests/examples/DefaultSignatures.hs" 2 1 2 1 , SrcSpan "tests/examples/DefaultSignatures.hs" 2 1 2 1 , SrcSpan "tests/examples/DefaultSignatures.hs" 2 1 2 1 , SrcSpan "tests/examples/DefaultSignatures.hs" 6 1 6 1 , SrcSpan "tests/examples/DefaultSignatures.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 1 1 1 35 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 1 1 1 13 , SrcSpan "tests/examples/DefaultSignatures.hs" 1 32 1 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 1 14 1 31 , srcInfoPoints = [] } "DefaultSignatures" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 1 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 2 1 2 6 , SrcSpan "tests/examples/DefaultSignatures.hs" 2 11 2 16 , SrcSpan "tests/examples/DefaultSignatures.hs" 3 5 3 5 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 5 4 5 , SrcSpan "tests/examples/DefaultSignatures.hs" 5 5 5 5 , SrcSpan "tests/examples/DefaultSignatures.hs" 6 1 6 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 7 2 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 7 2 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 7 2 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 9 2 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 2 9 2 10 , srcInfoPoints = [] } "a"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 5 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 3 7 3 9 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 5 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 3 7 3 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 5 3 6 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 10 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 3 12 3 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 10 3 11 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 15 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 3 17 3 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 15 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 15 3 16 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 20 3 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 20 3 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 3 20 3 24 , srcInfoPoints = [] } "Bool")))))) , ClsDefSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 5 4 42 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 4 5 4 12 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 15 4 17 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 13 4 14 , srcInfoPoints = [] } "f") (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 18 4 42 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 18 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 4 18 4 19 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 23 4 24 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 25 4 27 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 18 4 27 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 4 18 4 19 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 23 4 24 , SrcSpan "tests/examples/DefaultSignatures.hs" 4 25 4 27 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 19 4 23 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 19 4 23 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 19 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 19 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 19 4 21 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 22 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 22 4 23 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 28 4 42 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 4 30 4 32 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 28 4 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 28 4 29 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 33 4 42 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 4 35 4 37 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 33 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 33 4 34 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 38 4 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 38 4 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 4 38 4 42 , srcInfoPoints = [] } "Bool")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 5 5 19 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 5 5 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 5 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 5 5 6 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 7 5 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 7 5 8 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 9 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 9 5 10 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 11 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/DefaultSignatures.hs" 5 11 5 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 13 5 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 13 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 13 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 13 5 14 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 15 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 15 5 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 15 5 17 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 18 5 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 18 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DefaultSignatures.hs" 5 18 5 19 , srcInfoPoints = [] } "y"))))) Nothing ]) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/ForallInInstance.hs.parser.golden0000644000000000000000000001774413556712523024454 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/ForallInInstance.hs" 2 1 2 1 , SrcSpan "tests/examples/ForallInInstance.hs" 2 1 2 1 , SrcSpan "tests/examples/ForallInInstance.hs" 4 1 4 1 , SrcSpan "tests/examples/ForallInInstance.hs" 5 1 5 1 , SrcSpan "tests/examples/ForallInInstance.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 2 1 2 30 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 2 1 2 7 , SrcSpan "tests/examples/ForallInInstance.hs" 2 25 2 30 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 2 8 2 24 , srcInfoPoints = [] } "ForallInInstance") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 1 1 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 1 1 1 13 , SrcSpan "tests/examples/ForallInInstance.hs" 1 34 1 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 1 14 1 33 , srcInfoPoints = [] } "ScopedTypeVariables" ] ] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 1 5 0 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 1 4 9 , SrcSpan "tests/examples/ForallInInstance.hs" 4 45 4 50 , SrcSpan "tests/examples/ForallInInstance.hs" 5 1 5 1 , SrcSpan "tests/examples/ForallInInstance.hs" 5 1 5 1 , SrcSpan "tests/examples/ForallInInstance.hs" 5 0 5 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 10 4 44 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 10 4 16 , SrcSpan "tests/examples/ForallInInstance.hs" 4 18 4 19 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 17 4 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 17 4 18 , srcInfoPoints = [] } "a") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 32 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 30 4 32 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 32 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 30 4 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 32 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 30 4 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 32 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 30 4 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 20 4 27 , srcInfoPoints = [] } "MyClass"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 28 4 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 28 4 29 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 33 4 44 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 33 4 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 33 4 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 33 4 40 , srcInfoPoints = [] } "MyClass"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 41 4 44 , srcInfoPoints = [ SrcSpan "tests/examples/ForallInInstance.hs" 4 41 4 42 , SrcSpan "tests/examples/ForallInInstance.hs" 4 43 4 44 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 42 4 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ForallInInstance.hs" 4 42 4 43 , srcInfoPoints = [] } "a"))))) (Just []) ] , [] ) haskell-src-exts-1.23.1/tests/examples/TrailingWhere2.hs.parser.golden0000644000000000000000000002272713534314633024100 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 7 0 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere2.hs" 3 1 3 1 , SrcSpan "tests/examples/TrailingWhere2.hs" 7 1 7 0 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 1 15 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 1 10 1 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 1 1 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 6 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 6 1 9 , srcInfoPoints = [] } "Baz")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 12 1 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 12 1 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 1 12 1 15 , srcInfoPoints = [] } "Baz") []) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 1 7 0 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 3 1 3 9 , SrcSpan "tests/examples/TrailingWhere2.hs" 3 19 3 24 , SrcSpan "tests/examples/TrailingWhere2.hs" 4 3 4 3 , SrcSpan "tests/examples/TrailingWhere2.hs" 6 3 6 3 , SrcSpan "tests/examples/TrailingWhere2.hs" 7 1 7 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 10 3 18 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 10 3 18 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 10 3 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 10 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 10 3 14 , srcInfoPoints = [] } "Show"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 15 3 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 15 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 3 15 3 18 , srcInfoPoints = [] } "Baz"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 3 6 14 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 3 6 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 3 6 3 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 5 5 5 10 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 3 4 7 , srcInfoPoints = [] } "show") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 8 4 9 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 10 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 4 10 4 11 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 12 4 14 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 4 12 4 14 , srcInfoPoints = [] } "" ""))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 0 6 3 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 6 3 6 3 , SrcSpan "tests/examples/TrailingWhere2.hs" 6 3 6 3 , SrcSpan "tests/examples/TrailingWhere2.hs" 6 0 6 0 ] } [])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 3 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 3 6 7 , srcInfoPoints = [] } "show") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 8 6 9 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 10 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere2.hs" 6 10 6 11 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 12 6 14 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere2.hs" 6 12 6 14 , srcInfoPoints = [] } "" ""))) Nothing ]) ]) ] , [] ) haskell-src-exts-1.23.1/tests/examples/InfixTypeMinus.hs.parser.golden0000644000000000000000000017755413556712523024222 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 2 1 2 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 2 1 2 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 1 5 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 1 6 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 1 7 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 1 8 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 9 1 9 1 , SrcSpan "tests/examples/InfixTypeMinus.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 2 1 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 2 1 2 7 , SrcSpan "tests/examples/InfixTypeMinus.hs" 2 12 2 17 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 2 8 2 11 , srcInfoPoints = [] } "Foo") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 1 1 65 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 1 1 1 13 , SrcSpan "tests/examples/InfixTypeMinus.hs" 1 23 1 24 , SrcSpan "tests/examples/InfixTypeMinus.hs" 1 39 1 40 , SrcSpan "tests/examples/InfixTypeMinus.hs" 1 54 1 55 , SrcSpan "tests/examples/InfixTypeMinus.hs" 1 62 1 65 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 14 1 23 , srcInfoPoints = [] } "DataKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 25 1 39 , srcInfoPoints = [] } "KindSignatures" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 41 1 54 , srcInfoPoints = [] } "TypeOperators" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 1 56 1 61 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 1 5 79 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 21 5 26 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 27 5 28 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 78 5 79 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 6 5 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 6 5 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 6 5 9 , srcInfoPoints = [] } "Vec")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 10 5 20 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 10 5 11 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 13 5 15 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 19 5 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 11 5 12 , srcInfoPoints = [] } "n") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 16 5 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 16 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 16 5 19 , srcInfoPoints = [] } "Nat"))))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 29 5 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 35 5 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 29 5 34 , srcInfoPoints = [] } "VCons") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 38 5 77 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 38 5 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 38 5 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 48 5 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 50 5 52 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 38 5 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 38 5 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 48 5 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 50 5 52 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 39 5 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 41 5 42 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 39 5 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 41 5 42 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 39 5 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 39 5 40 , srcInfoPoints = [] } "m")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 43 5 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 43 5 44 , SrcSpan "tests/examples/InfixTypeMinus.hs" 5 47 5 48 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 44 5 47 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 44 5 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 44 5 45 , srcInfoPoints = [] } "n")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 45 5 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 45 5 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 45 5 46 , srcInfoPoints = [] } "-"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 46 5 47 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 46 5 47 , srcInfoPoints = [] } 1 "1"))))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 53 5 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 60 5 62 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 53 5 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 53 5 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 53 5 59 , srcInfoPoints = [] } "Double"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 63 5 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 5 69 5 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 63 5 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 63 5 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 63 5 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 63 5 66 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 67 5 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 67 5 68 , srcInfoPoints = [] } "m"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 72 5 77 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 72 5 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 72 5 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 72 5 75 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 76 5 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 5 76 5 77 , srcInfoPoints = [] } "n")))))) ] [] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 1 6 79 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 21 6 26 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 27 6 28 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 78 6 79 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 1 6 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 6 6 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 6 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 6 6 9 , srcInfoPoints = [] } "Vec")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 10 6 20 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 10 6 11 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 13 6 15 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 19 6 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 11 6 12 , srcInfoPoints = [] } "n") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 16 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 16 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 16 6 19 , srcInfoPoints = [] } "Nat"))))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 29 6 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 35 6 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 29 6 34 , srcInfoPoints = [] } "VCons") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 38 6 77 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 38 6 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 38 6 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 48 6 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 50 6 52 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 38 6 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 38 6 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 48 6 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 50 6 52 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 39 6 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 45 6 46 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 39 6 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 45 6 46 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 39 6 44 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 39 6 40 , SrcSpan "tests/examples/InfixTypeMinus.hs" 6 43 6 44 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 40 6 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 40 6 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 40 6 41 , srcInfoPoints = [] } "n")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 41 6 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 41 6 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 41 6 42 , srcInfoPoints = [] } "-"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 42 6 43 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 42 6 43 , srcInfoPoints = [] } 1 "1")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 47 6 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 47 6 48 , srcInfoPoints = [] } "m"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 53 6 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 60 6 62 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 53 6 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 53 6 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 53 6 59 , srcInfoPoints = [] } "Double"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 63 6 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 6 69 6 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 63 6 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 63 6 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 63 6 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 63 6 66 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 67 6 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 67 6 68 , srcInfoPoints = [] } "m"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 72 6 77 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 72 6 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 72 6 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 72 6 75 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 76 6 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 6 76 6 77 , srcInfoPoints = [] } "n")))))) ] [] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 1 7 79 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 21 7 26 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 27 7 28 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 78 7 79 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 1 7 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 6 7 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 6 7 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 6 7 9 , srcInfoPoints = [] } "Vec")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 10 7 20 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 10 7 11 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 13 7 15 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 19 7 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 11 7 12 , srcInfoPoints = [] } "n") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 16 7 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 16 7 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 16 7 19 , srcInfoPoints = [] } "Nat"))))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 29 7 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 35 7 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 29 7 34 , srcInfoPoints = [] } "VCons") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 38 7 77 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 38 7 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 38 7 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 48 7 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 50 7 52 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 38 7 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 38 7 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 48 7 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 50 7 52 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 39 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 45 7 46 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 39 7 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 45 7 46 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 39 7 44 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 39 7 40 , SrcSpan "tests/examples/InfixTypeMinus.hs" 7 43 7 44 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 40 7 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 40 7 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 40 7 41 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 41 7 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 41 7 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 41 7 42 , srcInfoPoints = [] } "+"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 42 7 43 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 42 7 43 , srcInfoPoints = [] } 1 "1")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 47 7 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 47 7 48 , srcInfoPoints = [] } "n"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 53 7 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 60 7 62 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 53 7 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 53 7 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 53 7 59 , srcInfoPoints = [] } "Double"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 63 7 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 7 69 7 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 63 7 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 63 7 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 63 7 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 63 7 66 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 67 7 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 67 7 68 , srcInfoPoints = [] } "m"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 72 7 77 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 72 7 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 72 7 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 72 7 75 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 76 7 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 7 76 7 77 , srcInfoPoints = [] } "n")))))) ] [] , GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 1 8 79 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 21 8 26 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 27 8 28 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 78 8 79 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 1 8 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 6 8 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 6 8 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 6 8 9 , srcInfoPoints = [] } "Vec")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 10 8 20 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 10 8 11 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 13 8 15 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 19 8 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 11 8 12 , srcInfoPoints = [] } "n") (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 16 8 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 16 8 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 16 8 19 , srcInfoPoints = [] } "Nat"))))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 29 8 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 35 8 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 29 8 34 , srcInfoPoints = [] } "VCons") Nothing Nothing Nothing (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 38 8 77 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 38 8 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 38 8 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 48 8 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 50 8 52 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 38 8 52 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 38 8 39 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 48 8 49 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 50 8 52 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 39 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 41 8 42 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 39 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 41 8 42 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 39 8 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 39 8 40 , srcInfoPoints = [] } "n")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 43 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 43 8 44 , SrcSpan "tests/examples/InfixTypeMinus.hs" 8 47 8 48 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 44 8 47 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 44 8 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 44 8 45 , srcInfoPoints = [] } "m")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 45 8 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 45 8 46 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 45 8 46 , srcInfoPoints = [] } "+"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 46 8 47 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 46 8 47 , srcInfoPoints = [] } 1 "1"))))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 53 8 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 60 8 62 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 53 8 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 53 8 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 53 8 59 , srcInfoPoints = [] } "Double"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 63 8 77 , srcInfoPoints = [ SrcSpan "tests/examples/InfixTypeMinus.hs" 8 69 8 71 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 63 8 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 63 8 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 63 8 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 63 8 66 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 67 8 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 67 8 68 , srcInfoPoints = [] } "m"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 72 8 77 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 72 8 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 72 8 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 72 8 75 , srcInfoPoints = [] } "Vec"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 76 8 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixTypeMinus.hs" 8 76 8 77 , srcInfoPoints = [] } "n")))))) ] [] ] , [ Comment False (SrcSpan "tests/examples/InfixTypeMinus.hs" 4 1 4 14) " Test cases" ] ) haskell-src-exts-1.23.1/tests/examples/NestedAsPat.hs.parser.golden0000644000000000000000000001227513534314633023422 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 1 1 1 1 , SrcSpan "tests/examples/NestedAsPat.hs" 1 1 1 1 , SrcSpan "tests/examples/NestedAsPat.hs" 3 1 3 1 , SrcSpan "tests/examples/NestedAsPat.hs" 4 1 4 1 , SrcSpan "tests/examples/NestedAsPat.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 1 1 1 25 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 1 1 1 7 , SrcSpan "tests/examples/NestedAsPat.hs" 1 20 1 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 1 8 1 19 , srcInfoPoints = [] } "NestedAsPat") Nothing Nothing)) [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 1 3 37 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 1 3 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 1 3 12 , srcInfoPoints = [] } "nestedAsPat") [ PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 13 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 3 13 3 14 , SrcSpan "tests/examples/NestedAsPat.hs" 3 24 3 25 ] } [ PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 14 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 3 15 3 16 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 14 3 15 , srcInfoPoints = [] } "x") (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 16 3 24 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 3 16 3 17 , SrcSpan "tests/examples/NestedAsPat.hs" 3 23 3 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 17 3 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 17 3 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 17 3 21 , srcInfoPoints = [] } "Just")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 22 3 23 , srcInfoPoints = [] } ])) ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 26 3 37 , srcInfoPoints = [ SrcSpan "tests/examples/NestedAsPat.hs" 3 26 3 27 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 28 3 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 28 3 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NestedAsPat.hs" 3 28 3 37 , srcInfoPoints = [] } "undefined")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PolyKindSigs.hs.parser.golden0000644000000000000000000001376513534314633023633 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 1 1 1 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 3 1 3 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 5 1 5 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 5 1 5 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 7 1 7 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 9 1 9 1 , SrcSpan "tests/examples/PolyKindSigs.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 5 1 5 18 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 5 1 5 7 , SrcSpan "tests/examples/PolyKindSigs.hs" 5 13 5 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 5 8 5 12 , srcInfoPoints = [] } "Test") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 1 1 1 13 , SrcSpan "tests/examples/PolyKindSigs.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 3 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 3 1 3 13 , SrcSpan "tests/examples/PolyKindSigs.hs" 3 29 3 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 3 14 3 23 , srcInfoPoints = [] } "PolyKinds" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 1 9 0 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 7 10 7 12 , SrcSpan "tests/examples/PolyKindSigs.hs" 7 20 7 25 , SrcSpan "tests/examples/PolyKindSigs.hs" 8 3 8 3 , SrcSpan "tests/examples/PolyKindSigs.hs" 9 1 9 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 1 7 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 6 7 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 6 7 9 , srcInfoPoints = [] } "Foo")) (Just (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 13 7 19 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 7 15 7 17 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 13 7 14 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 7 18 7 19 , srcInfoPoints = [] }))) [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 3 8 15 , srcInfoPoints = [ SrcSpan "tests/examples/PolyKindSigs.hs" 8 7 8 9 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 3 8 6 , srcInfoPoints = [] } "Foo") Nothing Nothing Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 10 8 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 10 8 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 10 8 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 10 8 13 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 14 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PolyKindSigs.hs" 8 14 8 15 , srcInfoPoints = [] } "a"))) ] [] ] , [ Comment False (SrcSpan "tests/examples/PolyKindSigs.hs" 2 1 2 34) "{-# LANGUAGE KindSignatures #-}" ] ) haskell-src-exts-1.23.1/tests/examples/BangViewPat.hs.parser.golden0000644000000000000000000001230613534314632023410 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 1 1 1 1 , SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 1 , SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 1 , SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 1 , SrcSpan "tests/examples/BangViewPat.hs" 3 1 3 1 , SrcSpan "tests/examples/BangViewPat.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 1 1 1 44 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 1 1 1 13 , SrcSpan "tests/examples/BangViewPat.hs" 1 26 1 27 , SrcSpan "tests/examples/BangViewPat.hs" 1 41 1 44 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 1 14 1 26 , srcInfoPoints = [] } "BangPatterns" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 1 28 1 40 , srcInfoPoints = [] } "ViewPatterns" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 33 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 1 2 8 , srcInfoPoints = [] } "someFun") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 9 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 2 9 2 10 , SrcSpan "tests/examples/BangViewPat.hs" 2 20 2 21 ] } (PViewPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 10 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 2 13 2 15 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 10 2 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 10 2 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 10 2 12 , srcInfoPoints = [] } "id"))) (PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 16 2 20 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 2 16 2 17 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 17 2 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 17 2 20 , srcInfoPoints = [] } "arg")))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 22 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/BangViewPat.hs" 2 22 2 23 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 24 2 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 24 2 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangViewPat.hs" 2 24 2 33 , srcInfoPoints = [] } "undefined")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/TyQuasiQuote.hs.parser.golden0000644000000000000000000001003013534314633023647 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 4 1 4 1 , SrcSpan "tests/examples/TyQuasiQuote.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 46 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 13 , SrcSpan "tests/examples/TyQuasiQuote.hs" 1 25 1 26 , SrcSpan "tests/examples/TyQuasiQuote.hs" 1 43 1 46 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 27 1 42 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 2 3 2 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 2 , srcInfoPoints = [] } "f" ] (TyQuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 6 2 31 , srcInfoPoints = [] } "qq" " something in here ") , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 7 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 3 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 3 3 4 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6 , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6 , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7 , srcInfoPoints = [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6 , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7 ] })))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/MultiParam.hs.parser.golden0000644000000000000000000002222513556712523023322 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 1 1 1 1 , SrcSpan "tests/examples/MultiParam.hs" 1 1 1 1 , SrcSpan "tests/examples/MultiParam.hs" 3 1 3 1 , SrcSpan "tests/examples/MultiParam.hs" 4 1 4 1 , SrcSpan "tests/examples/MultiParam.hs" 5 1 5 1 , SrcSpan "tests/examples/MultiParam.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 1 1 1 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 1 1 1 7 , SrcSpan "tests/examples/MultiParam.hs" 1 19 1 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 1 8 1 18 , srcInfoPoints = [] } "MultiParam") Nothing Nothing)) [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 1 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 5 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 1 3 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 35 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 23 3 25 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 23 3 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 23 3 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 23 3 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 23 3 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 8 3 18 , srcInfoPoints = [] } "MonadError"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 19 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 19 3 20 , srcInfoPoints = [] } "e"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 21 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 21 3 22 , srcInfoPoints = [] } "m")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 26 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 28 3 30 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 26 3 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 26 3 27 , srcInfoPoints = [] } "e")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 31 3 35 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 31 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 31 3 32 , srcInfoPoints = [] } "m")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 33 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 33 3 34 , SrcSpan "tests/examples/MultiParam.hs" 3 34 3 35 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 33 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 33 3 34 , SrcSpan "tests/examples/MultiParam.hs" 3 34 3 35 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 3 33 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 3 33 3 34 , SrcSpan "tests/examples/MultiParam.hs" 3 34 3 35 ] })))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 1 4 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 5 4 16 , srcInfoPoints = [ SrcSpan "tests/examples/MultiParam.hs" 4 5 4 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 7 4 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 7 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiParam.hs" 4 7 4 16 , srcInfoPoints = [] } "undefined")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeSyntax.hs.parser.golden0000644000000000000000000006766113534314633024055 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 1 1 16 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 2 1 2 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 2 1 2 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 4 1 4 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 6 1 6 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 7 1 7 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 11 1 11 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 12 1 12 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 14 1 14 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 15 1 15 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 16 1 16 1 , SrcSpan "tests/examples/UnicodeSyntax.hs" 16 1 16 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 2 1 2 7 , SrcSpan "tests/examples/UnicodeSyntax.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 2 8 2 21 , srcInfoPoints = [] } "UnicodeSyntax") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 1 1 1 47 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 1 1 1 13 , SrcSpan "tests/examples/UnicodeSyntax.hs" 1 27 1 28 , SrcSpan "tests/examples/UnicodeSyntax.hs" 1 44 1 47 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 1 29 1 43 , srcInfoPoints = [] } "ExplicitForAll" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 4 1 4 36 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 4 1 4 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 4 8 4 26 , srcInfoPoints = [] } "System.Environment" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 4 27 4 36 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 4 27 4 28 , SrcSpan "tests/examples/UnicodeSyntax.hs" 4 35 4 36 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 4 28 4 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 4 28 4 35 , srcInfoPoints = [] } "getArgs") ]) } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 1 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 6 6 6 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 1 6 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 8 6 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 8 6 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 8 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 8 6 10 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 12 , SrcSpan "tests/examples/UnicodeSyntax.hs" 6 12 6 13 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 12 , SrcSpan "tests/examples/UnicodeSyntax.hs" 6 12 6 13 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 13 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 6 11 6 12 , SrcSpan "tests/examples/UnicodeSyntax.hs" 6 12 6 13 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 7 1 9 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 7 1 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 7 1 7 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 7 6 9 17 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 7 6 7 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 7 8 9 17 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 7 8 7 10 , SrcSpan "tests/examples/UnicodeSyntax.hs" 8 3 8 3 , SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 3 , SrcSpan "tests/examples/UnicodeSyntax.hs" 11 1 11 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 3 8 15 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 8 6 8 7 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 3 8 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 3 8 5 , srcInfoPoints = [] } "as")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 8 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 8 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 8 8 8 15 , srcInfoPoints = [] } "getArgs"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 3 9 8 , srcInfoPoints = [] } "print"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 9 9 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 9 9 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 9 9 10 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 11 9 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 11 9 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 11 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 11 9 15 , srcInfoPoints = [] } "test"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 16 9 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 9 16 9 17 , srcInfoPoints = [] } 0 "0")))) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 1 11 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 11 6 11 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 1 11 5 , srcInfoPoints = [] } "test" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 8 11 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 11 12 11 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 8 11 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 8 11 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 8 11 11 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 14 11 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 14 11 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 11 14 11 18 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 1 12 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 1 12 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 1 12 5 , srcInfoPoints = [] } "test") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 6 12 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 6 12 7 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 8 12 20 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 12 8 12 9 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 10 12 20 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 10 12 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 10 12 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 10 12 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 10 12 11 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 11 12 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 11 12 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 11 12 12 , srcInfoPoints = [] } "*"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 12 12 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 12 12 13 , srcInfoPoints = [] } 5 "5"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 14 12 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 14 12 16 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 14 12 16 , srcInfoPoints = [] } "=="))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 17 12 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 17 12 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 17 12 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 17 12 18 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 18 12 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 18 12 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 18 12 19 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 19 12 20 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 12 19 12 20 , srcInfoPoints = [] } 8 "8"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 1 14 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 14 5 14 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 1 14 4 , srcInfoPoints = [] } "id1" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 7 14 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 14 7 14 8 , SrcSpan "tests/examples/UnicodeSyntax.hs" 14 11 14 12 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 9 14 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 9 14 10 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 13 14 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 14 15 14 16 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 13 14 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 13 14 14 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 17 14 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 14 17 14 18 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 1 15 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 1 15 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 1 15 4 , srcInfoPoints = [] } "id1") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 5 15 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 5 15 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 7 15 10 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSyntax.hs" 15 7 15 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 9 15 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 9 15 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSyntax.hs" 15 9 15 10 , srcInfoPoints = [] } "x")))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/Completesig03A.hs.parser.golden0000644000000000000000000001023413534314632023756 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/Completesig03A.hs" 1 1 1 1 , SrcSpan "tests/examples/Completesig03A.hs" 1 1 1 1 , SrcSpan "tests/examples/Completesig03A.hs" 3 1 3 1 , SrcSpan "tests/examples/Completesig03A.hs" 5 1 5 1 , SrcSpan "tests/examples/Completesig03A.hs" 7 1 7 1 , SrcSpan "tests/examples/Completesig03A.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/Completesig03A.hs" 1 1 1 7 , SrcSpan "tests/examples/Completesig03A.hs" 1 23 1 28 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 1 8 1 22 , srcInfoPoints = [] } "Completesig03A") Nothing Nothing)) [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Completesig03A.hs" 3 8 3 9 , SrcSpan "tests/examples/Completesig03A.hs" 3 12 3 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 6 3 7 , srcInfoPoints = [] } "A")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 10 3 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 10 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 10 3 11 , srcInfoPoints = [] } "A") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 14 3 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 14 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 3 14 3 15 , srcInfoPoints = [] } "B") []) ] [] , CompletePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 5 1 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/Completesig03A.hs" 5 1 5 13 , SrcSpan "tests/examples/Completesig03A.hs" 5 16 5 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Completesig03A.hs" 5 14 5 15 , srcInfoPoints = [] } "A" ] Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/Testing.hs.parser.golden0000644000000000000000000000662113534314633022662 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/Testing.hs" 2 1 2 1 , SrcSpan "tests/examples/Testing.hs" 2 1 2 1 , SrcSpan "tests/examples/Testing.hs" 2 1 2 1 , SrcSpan "tests/examples/Testing.hs" 3 1 3 1 , SrcSpan "tests/examples/Testing.hs" 3 1 3 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 1 2 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 1 2 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 1 2 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 6 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/Testing.hs" 2 6 2 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 8 2 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 8 2 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 8 2 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 8 2 14 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 15 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/Testing.hs" 2 15 2 16 , SrcSpan "tests/examples/Testing.hs" 2 16 2 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 15 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/Testing.hs" 2 15 2 16 , SrcSpan "tests/examples/Testing.hs" 2 16 2 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Testing.hs" 2 15 2 17 , srcInfoPoints = [ SrcSpan "tests/examples/Testing.hs" 2 15 2 16 , SrcSpan "tests/examples/Testing.hs" 2 16 2 17 ] }))))) Nothing ] , [ Comment True (SrcSpan "tests/examples/Testing.hs" 1 1 1 46) "# LINE 5 \"templates\\GenericTemplate.hs\" #" ] ) haskell-src-exts-1.23.1/tests/examples/DataHeadParen.hs.parser.golden0000644000000000000000000001136613534314632023667 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/DataHeadParen.hs" 1 1 1 1 , SrcSpan "tests/examples/DataHeadParen.hs" 2 1 2 1 , SrcSpan "tests/examples/DataHeadParen.hs" 2 1 2 1 , SrcSpan "tests/examples/DataHeadParen.hs" 4 1 4 1 , SrcSpan "tests/examples/DataHeadParen.hs" 5 1 5 1 , SrcSpan "tests/examples/DataHeadParen.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/DataHeadParen.hs" 2 1 2 7 , SrcSpan "tests/examples/DataHeadParen.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 2 8 2 21 , srcInfoPoints = [] } "DataHeadParen") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/DataHeadParen.hs" 1 1 1 13 , SrcSpan "tests/examples/DataHeadParen.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 1 14 1 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 1 4 23 , srcInfoPoints = [ SrcSpan "tests/examples/DataHeadParen.hs" 4 18 4 19 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 1 4 5 , srcInfoPoints = [] }) Nothing (DHParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 6 4 16 , srcInfoPoints = [ SrcSpan "tests/examples/DataHeadParen.hs" 4 6 4 7 , SrcSpan "tests/examples/DataHeadParen.hs" 4 15 4 16 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 7 4 15 , srcInfoPoints = [] } (DHInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 7 4 15 , srcInfoPoints = [] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 7 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 7 4 9 , srcInfoPoints = [] } "a1")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 10 4 12 , srcInfoPoints = [] } ":<")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 13 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 13 4 15 , srcInfoPoints = [] } "a2")))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 20 4 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 20 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DataHeadParen.hs" 4 20 4 23 , srcInfoPoints = [] } "Foo") []) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/completesig01.hs.parser.golden0000644000000000000000000006441113534314633023722 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 1 1 24 1 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 1 1 1 1 , SrcSpan "tests/examples/completesig01.hs" 2 1 2 1 , SrcSpan "tests/examples/completesig01.hs" 3 1 3 1 , SrcSpan "tests/examples/completesig01.hs" 4 1 4 1 , SrcSpan "tests/examples/completesig01.hs" 4 1 4 1 , SrcSpan "tests/examples/completesig01.hs" 6 1 6 1 , SrcSpan "tests/examples/completesig01.hs" 7 1 7 1 , SrcSpan "tests/examples/completesig01.hs" 9 1 9 1 , SrcSpan "tests/examples/completesig01.hs" 10 1 10 1 , SrcSpan "tests/examples/completesig01.hs" 12 1 12 1 , SrcSpan "tests/examples/completesig01.hs" 14 1 14 1 , SrcSpan "tests/examples/completesig01.hs" 15 1 15 1 , SrcSpan "tests/examples/completesig01.hs" 16 1 16 1 , SrcSpan "tests/examples/completesig01.hs" 18 1 18 1 , SrcSpan "tests/examples/completesig01.hs" 19 1 19 1 , SrcSpan "tests/examples/completesig01.hs" 20 1 20 1 , SrcSpan "tests/examples/completesig01.hs" 22 1 22 1 , SrcSpan "tests/examples/completesig01.hs" 24 1 24 1 , SrcSpan "tests/examples/completesig01.hs" 24 1 24 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 4 1 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 4 1 4 7 , SrcSpan "tests/examples/completesig01.hs" 4 15 4 20 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 4 8 4 14 , srcInfoPoints = [] } "Simple") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 1 1 1 13 , SrcSpan "tests/examples/completesig01.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 2 1 2 35 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 2 1 2 13 , SrcSpan "tests/examples/completesig01.hs" 2 32 2 35 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 2 14 2 31 , srcInfoPoints = [] } "NoImplicitPrelude" ] , OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 3 1 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 3 1 3 23 , SrcSpan "tests/examples/completesig01.hs" 3 23 3 26 ] } (Just GHC) "-Wall " ] [] [ PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 6 1 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 6 1 6 8 , SrcSpan "tests/examples/completesig01.hs" 6 13 6 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 6 9 6 12 , srcInfoPoints = [] } "Foo" ] Nothing Nothing Nothing Nothing (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 6 16 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 6 16 6 17 , SrcSpan "tests/examples/completesig01.hs" 6 17 6 18 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 6 16 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 6 16 6 17 , SrcSpan "tests/examples/completesig01.hs" 6 17 6 18 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 6 16 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 6 16 6 17 , SrcSpan "tests/examples/completesig01.hs" 6 17 6 18 ] }))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 1 7 17 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 7 1 7 8 , SrcSpan "tests/examples/completesig01.hs" 7 13 7 14 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 9 7 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 9 7 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 9 7 12 , srcInfoPoints = [] } "Foo")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 15 7 17 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 7 15 7 16 , SrcSpan "tests/examples/completesig01.hs" 7 16 7 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 15 7 17 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 7 15 7 16 , SrcSpan "tests/examples/completesig01.hs" 7 16 7 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 7 15 7 17 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 7 15 7 16 , SrcSpan "tests/examples/completesig01.hs" 7 16 7 17 ] })) []) ImplicitBidirectional , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 1 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 3 9 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 1 9 2 , srcInfoPoints = [] } "a" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 6 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 9 9 11 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 6 9 8 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 6 9 7 , SrcSpan "tests/examples/completesig01.hs" 9 7 9 8 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 6 9 8 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 6 9 7 , SrcSpan "tests/examples/completesig01.hs" 9 7 9 8 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 6 9 8 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 6 9 7 , SrcSpan "tests/examples/completesig01.hs" 9 7 9 8 ] }))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 12 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 12 9 13 , SrcSpan "tests/examples/completesig01.hs" 9 13 9 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 12 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 12 9 13 , SrcSpan "tests/examples/completesig01.hs" 9 13 9 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 9 12 9 14 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 9 12 9 13 , SrcSpan "tests/examples/completesig01.hs" 9 13 9 14 ] })))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 1 10 11 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 1 10 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 1 10 2 , srcInfoPoints = [] } "a") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 3 10 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 3 10 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 3 10 6 , srcInfoPoints = [] } "Foo")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 7 10 11 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 10 7 10 8 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 9 10 11 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 10 9 10 10 , SrcSpan "tests/examples/completesig01.hs" 10 10 10 11 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 9 10 11 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 10 9 10 10 , SrcSpan "tests/examples/completesig01.hs" 10 10 10 11 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 10 9 10 11 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 10 9 10 10 , SrcSpan "tests/examples/completesig01.hs" 10 10 10 11 ] })))) Nothing ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 1 12 19 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 12 8 12 9 , SrcSpan "tests/examples/completesig01.hs" 12 12 12 13 , SrcSpan "tests/examples/completesig01.hs" 12 16 12 17 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 1 12 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 6 12 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 6 12 7 , srcInfoPoints = [] } "A")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 10 12 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 10 12 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 10 12 11 , srcInfoPoints = [] } "B") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 14 12 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 14 12 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 14 12 15 , srcInfoPoints = [] } "C") []) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 18 12 19 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 18 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 12 18 12 19 , srcInfoPoints = [] } "D") []) ] [] , CompletePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 14 1 14 21 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 14 1 14 13 , SrcSpan "tests/examples/completesig01.hs" 14 18 14 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 14 14 14 17 , srcInfoPoints = [] } "Foo" ] Nothing , CompletePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 15 1 15 21 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 15 1 15 13 , SrcSpan "tests/examples/completesig01.hs" 15 15 15 16 , SrcSpan "tests/examples/completesig01.hs" 15 18 15 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 15 14 15 15 , srcInfoPoints = [] } "B" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 15 16 15 17 , srcInfoPoints = [] } "C" ] Nothing , CompletePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 16 1 16 19 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 16 1 16 13 , SrcSpan "tests/examples/completesig01.hs" 16 16 16 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 16 14 16 15 , srcInfoPoints = [] } "B" ] Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 1 18 12 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 18 3 18 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 1 18 2 , srcInfoPoints = [] } "b" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 6 18 12 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 18 8 18 10 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 6 18 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 6 18 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 6 18 7 , srcInfoPoints = [] } "A"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 11 18 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 11 18 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 18 11 18 12 , srcInfoPoints = [] } "A")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 1 20 8 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 1 19 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 1 19 2 , srcInfoPoints = [] } "b") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 3 19 4 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 3 19 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 3 19 4 , srcInfoPoints = [] } "B")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 5 19 8 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 19 5 19 6 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 7 19 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 7 19 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 19 7 19 8 , srcInfoPoints = [] } "B")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 1 20 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 1 20 2 , srcInfoPoints = [] } "b") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 3 20 4 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 3 20 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 3 20 4 , srcInfoPoints = [] } "C")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 5 20 8 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 20 5 20 6 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 7 20 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 7 20 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 20 7 20 8 , srcInfoPoints = [] } "C")))) Nothing ] , CompletePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 22 1 22 27 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 22 1 22 13 , SrcSpan "tests/examples/completesig01.hs" 22 18 22 20 , SrcSpan "tests/examples/completesig01.hs" 22 24 22 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 22 14 22 17 , srcInfoPoints = [] } "Foo" ] (Just (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 22 21 22 23 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 22 21 22 22 , SrcSpan "tests/examples/completesig01.hs" 22 22 22 23 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/completesig01.hs" 22 21 22 23 , srcInfoPoints = [ SrcSpan "tests/examples/completesig01.hs" 22 21 22 22 , SrcSpan "tests/examples/completesig01.hs" 22 22 22 23 ] }))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/NegPrimWordLiteral.hs.parser.golden0000644000000000000000000000021413534314633024747 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NegPrimWordLiteral.hs" 3 1) "Parse error: negative primitive word literal: - 9223372036854775808##" haskell-src-exts-1.23.1/tests/examples/RecordPuns.hs.parser.golden0000644000000000000000000001074613534314633023334 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPuns.hs" 1 1 1 1 , SrcSpan "tests/examples/RecordPuns.hs" 2 1 2 1 , SrcSpan "tests/examples/RecordPuns.hs" 2 1 2 1 , SrcSpan "tests/examples/RecordPuns.hs" 4 1 4 1 , SrcSpan "tests/examples/RecordPuns.hs" 5 1 5 1 , SrcSpan "tests/examples/RecordPuns.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 2 1 2 24 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPuns.hs" 2 1 2 7 , SrcSpan "tests/examples/RecordPuns.hs" 2 19 2 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 2 8 2 18 , srcInfoPoints = [] } "RecordPuns") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPuns.hs" 1 1 1 13 , SrcSpan "tests/examples/RecordPuns.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 1 14 1 28 , srcInfoPoints = [] } "NamedFieldPuns" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 1 4 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 1 4 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 1 4 7 , srcInfoPoints = [] } "cotile")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 8 4 30 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPuns.hs" 4 8 4 9 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 10 4 30 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPuns.hs" 4 15 4 16 , SrcSpan "tests/examples/RecordPuns.hs" 4 29 4 30 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 10 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 10 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 10 4 14 , srcInfoPoints = [] } "tile"))) [ FieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 16 4 29 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 16 4 29 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 16 4 29 , srcInfoPoints = [] } "Kind") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPuns.hs" 4 16 4 29 , srcInfoPoints = [] } "ospeedup")) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/GadtDeriving.hs.parser.golden0000644000000000000000000001752513534314633023621 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 1 1 1 1 , SrcSpan "tests/examples/GadtDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtDeriving.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtDeriving.hs" 6 1 6 1 , SrcSpan "tests/examples/GadtDeriving.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 1 1 1 13 , SrcSpan "tests/examples/GadtDeriving.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 3 1 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 3 10 3 15 , SrcSpan "tests/examples/GadtDeriving.hs" 4 5 4 5 , SrcSpan "tests/examples/GadtDeriving.hs" 5 5 5 5 , SrcSpan "tests/examples/GadtDeriving.hs" 5 5 5 5 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 3 6 3 9 , srcInfoPoints = [] } "Foo")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 5 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 4 9 4 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 5 4 8 , srcInfoPoints = [] } "Foo") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 12 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 4 16 4 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 12 4 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 12 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 12 4 15 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 19 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 19 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 4 19 4 22 , srcInfoPoints = [] } "Foo")))) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 5 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/GadtDeriving.hs" 5 5 5 13 , SrcSpan "tests/examples/GadtDeriving.hs" 5 14 5 15 , SrcSpan "tests/examples/GadtDeriving.hs" 5 17 5 18 , SrcSpan "tests/examples/GadtDeriving.hs" 5 21 5 22 , SrcSpan "tests/examples/GadtDeriving.hs" 5 30 5 31 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 15 5 17 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 15 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 15 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 15 5 17 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 18 5 21 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 18 5 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 18 5 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 18 5 21 , srcInfoPoints = [] } "Ord"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 22 5 30 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 22 5 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 22 5 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtDeriving.hs" 5 22 5 30 , srcInfoPoints = [] } "Typeable"))) ] ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ParallelListComp.hs.parser.golden0000644000000000000000000004610713534314633024457 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 1 1 1 1 , SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelListComp.hs" 4 1 4 1 , SrcSpan "tests/examples/ParallelListComp.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 1 1 1 34 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 1 1 1 13 , SrcSpan "tests/examples/ParallelListComp.hs" 1 31 1 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 1 14 1 30 , srcInfoPoints = [] } "ParallelListComp" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 62 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 1 3 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 3 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 3 3 5 , srcInfoPoints = [] } "xs") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 6 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 6 3 8 , srcInfoPoints = [] } "ys") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 9 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 9 3 11 , srcInfoPoints = [] } "zs") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 12 3 62 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 12 3 13 ] } (ParComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 14 3 62 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 14 3 15 , SrcSpan "tests/examples/ParallelListComp.hs" 3 24 3 25 , SrcSpan "tests/examples/ParallelListComp.hs" 3 34 3 35 , SrcSpan "tests/examples/ParallelListComp.hs" 3 43 3 44 , SrcSpan "tests/examples/ParallelListComp.hs" 3 51 3 52 , SrcSpan "tests/examples/ParallelListComp.hs" 3 61 3 62 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 16 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 16 3 17 , SrcSpan "tests/examples/ParallelListComp.hs" 3 18 3 19 , SrcSpan "tests/examples/ParallelListComp.hs" 3 20 3 21 , SrcSpan "tests/examples/ParallelListComp.hs" 3 22 3 23 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 17 3 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 17 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 17 3 18 , srcInfoPoints = [] } "x")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 19 3 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 19 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 19 3 20 , srcInfoPoints = [] } "y")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 21 3 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 21 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 21 3 22 , srcInfoPoints = [] } "z")) ]) [ [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 26 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 28 3 30 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 26 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 28 3 30 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 26 3 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 26 3 27 , srcInfoPoints = [] } "x")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 31 3 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 31 3 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 31 3 33 , srcInfoPoints = [] } "xs")))) ] , [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 36 3 43 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 38 3 40 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 36 3 43 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 38 3 40 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 36 3 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 36 3 37 , srcInfoPoints = [] } "y")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 41 3 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 41 3 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 41 3 43 , srcInfoPoints = [] } "ys")))) , QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 50 , srcInfoPoints = [] } (Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 50 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 45 3 46 , srcInfoPoints = [] } "y"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 47 3 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 47 3 48 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 47 3 48 , srcInfoPoints = [] } ">"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 49 3 50 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 49 3 50 , srcInfoPoints = [] } 2 "2")))) ] , [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 53 3 60 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 55 3 57 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 53 3 60 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelListComp.hs" 3 55 3 57 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 53 3 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 53 3 54 , srcInfoPoints = [] } "z")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 58 3 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 58 3 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelListComp.hs" 3 58 3 60 , srcInfoPoints = [] } "zs")))) ] ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/PrimitiveIntHexLiteral.hs.parser.golden0000644000000000000000000001037413534314633025652 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 1 3 1 , srcInfoPoints = [ SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 1 1 1 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 1 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 1 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 1 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 3 1 3 1 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 3 1 3 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 1 1 13 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 1 14 1 23 , srcInfoPoints = [] } "MagicHash" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 34 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 1 2 7 , srcInfoPoints = [] } "minInt")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 8 2 34 , srcInfoPoints = [ SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 8 2 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 10 2 34 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 10 2 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 10 2 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 10 2 12 , srcInfoPoints = [] } "I#"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 13 2 34 , srcInfoPoints = [ SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 13 2 14 , SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 33 2 34 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 14 2 33 , srcInfoPoints = [] } (PrimInt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PrimitiveIntHexLiteral.hs" 2 14 2 33 , srcInfoPoints = [] } 9223372036854775808 "0x8000000000000000"))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeArrow.hs.parser.golden0000644000000000000000000002746113534314633023653 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 3 1 3 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 4 1 4 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 9 1 9 1 , SrcSpan "tests/examples/UnicodeArrow.hs" 9 1 9 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 1 1 1 13 , SrcSpan "tests/examples/UnicodeArrow.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 1 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 3 11 3 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 1 3 10 , srcInfoPoints = [] } "arrowTest" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 13 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 3 20 3 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 13 3 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 13 3 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 13 3 19 , srcInfoPoints = [] } "String"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 24 3 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 24 3 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 3 24 3 30 , srcInfoPoints = [] } "String")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 1 8 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 1 8 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 1 4 10 , srcInfoPoints = [] } "arrowTest") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 11 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 11 4 16 , srcInfoPoints = [] } "input") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 4 17 8 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 4 17 4 18 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 5 5 8 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 5 5 5 9 , SrcSpan "tests/examples/UnicodeArrow.hs" 5 16 5 18 , SrcSpan "tests/examples/UnicodeArrow.hs" 6 7 6 7 , SrcSpan "tests/examples/UnicodeArrow.hs" 7 7 7 7 , SrcSpan "tests/examples/UnicodeArrow.hs" 8 7 8 7 , SrcSpan "tests/examples/UnicodeArrow.hs" 9 1 9 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 5 10 5 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 5 10 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 5 10 5 15 , srcInfoPoints = [] } "input"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 7 6 24 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 7 6 14 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 7 6 14 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 7 6 14 , srcInfoPoints = [] } "hello" "hello")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 15 6 24 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 6 15 6 16 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 17 6 24 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 6 17 6 24 , srcInfoPoints = [] } "world" "world"))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 7 7 24 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 7 7 14 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 7 7 14 , srcInfoPoints = [] }) (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 7 7 14 , srcInfoPoints = [] } "world" "world")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 15 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 7 15 7 16 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 17 7 24 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 7 17 7 24 , srcInfoPoints = [] } "hello" "hello"))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 7 8 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 7 8 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 7 8 16 , srcInfoPoints = [] } "otherwise")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 17 8 27 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeArrow.hs" 8 17 8 18 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 19 8 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeArrow.hs" 8 19 8 27 , srcInfoPoints = [] } "unknow" "unknow"))) Nothing ])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteLines.hs.parser.golden0000644000000000000000000002551113534314633024337 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 1 13 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 1 5 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 1 6 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 1 11 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 1 12 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 13 1 13 1 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 13 1 13 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 1 3 12 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 3 8 3 12 , srcInfoPoints = [] } "Here" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 1 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 5 5 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 1 5 4 , srcInfoPoints = [] } "str" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 8 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 8 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 5 8 5 14 , srcInfoPoints = [] } "String"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 1 8 13 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 1 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 1 6 4 , srcInfoPoints = [] } "str")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 5 8 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 5 6 6 ] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 6 7 8 13 , srcInfoPoints = [] } "here" "test \ntest \ntest test ")) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 1 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 6 11 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 1 11 5 , srcInfoPoints = [] } "main" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 9 11 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 9 11 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 9 11 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 9 11 11 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 12 11 13 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 12 11 13 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 13 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 11 11 12 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 11 12 11 13 ] })))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 1 12 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 1 12 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 1 12 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 6 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 6 12 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 8 12 23 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 8 12 10 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 11 , SrcSpan "tests/examples/QuasiQuoteLines.hs" 13 1 13 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 11 12 19 , srcInfoPoints = [] } "putStrLn"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 20 12 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 20 12 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteLines.hs" 12 20 12 23 , srcInfoPoints = [] } "str")))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/SimpleDeriving.hs.parser.golden0000644000000000000000000000677113534314633024174 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1 , SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1 , SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1 , SrcSpan "tests/examples/SimpleDeriving.hs" 2 1 2 1 , SrcSpan "tests/examples/SimpleDeriving.hs" 2 1 2 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 8 1 9 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 6 1 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 6 1 7 , srcInfoPoints = [] } "T")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11 , srcInfoPoints = [] } "T") []) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 12 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 12 1 20 ] } Nothing [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23 , srcInfoPoints = [] } "Eq"))) ] ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/NegativePatterns.hs.parser.golden0000644000000000000000000012657713534314633024545 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 1 16 1 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/NegativePatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/NegativePatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/NegativePatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/NegativePatterns.hs" 3 1 3 1 , SrcSpan "tests/examples/NegativePatterns.hs" 4 1 4 1 , SrcSpan "tests/examples/NegativePatterns.hs" 6 1 6 1 , SrcSpan "tests/examples/NegativePatterns.hs" 8 1 8 1 , SrcSpan "tests/examples/NegativePatterns.hs" 9 1 9 1 , SrcSpan "tests/examples/NegativePatterns.hs" 10 1 10 1 , SrcSpan "tests/examples/NegativePatterns.hs" 12 1 12 1 , SrcSpan "tests/examples/NegativePatterns.hs" 13 1 13 1 , SrcSpan "tests/examples/NegativePatterns.hs" 14 1 14 1 , SrcSpan "tests/examples/NegativePatterns.hs" 15 1 15 1 , SrcSpan "tests/examples/NegativePatterns.hs" 16 1 16 1 , SrcSpan "tests/examples/NegativePatterns.hs" 16 1 16 1 ] } Nothing [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 1 4 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 1 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 1 1 2 , srcInfoPoints = [] } "f") [ PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 3 1 4 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 3 1 4 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 3 1 4 , srcInfoPoints = [] } 1 "1") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 5 1 9 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 1 5 1 6 ] } (NegApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 7 1 9 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 1 7 1 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 8 1 9 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 1 8 1 9 , srcInfoPoints = [] } 1 "1")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 1 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 1 2 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 3 2 7 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 2 3 2 4 , SrcSpan "tests/examples/NegativePatterns.hs" 2 6 2 7 ] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 4 2 6 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 2 4 2 5 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 4 2 5 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 2 4 2 5 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 5 2 6 , srcInfoPoints = [] } 1 "1")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 8 2 11 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 2 8 2 9 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 10 2 11 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 2 10 2 11 , srcInfoPoints = [] } 1 "1"))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 1 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 1 3 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 3 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 3 3 3 4 , SrcSpan "tests/examples/NegativePatterns.hs" 3 8 3 9 ] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 5 3 8 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 3 5 3 6 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 5 3 6 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 3 5 3 6 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 7 3 8 , srcInfoPoints = [] } 2 "2")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 10 3 13 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 3 10 3 11 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 12 3 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 3 12 3 13 , srcInfoPoints = [] } 2 "2"))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 1 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 1 4 2 , srcInfoPoints = [] } "f") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 3 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 4 3 4 4 , SrcSpan "tests/examples/NegativePatterns.hs" 4 10 4 11 ] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 6 4 10 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 4 6 4 7 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 6 4 7 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 4 6 4 7 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 9 4 10 , srcInfoPoints = [] } 3 "3")) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 12 4 15 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 4 12 4 13 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 14 4 15 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 4 14 4 15 , srcInfoPoints = [] } 3 "3"))) Nothing ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 1 6 45 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 6 10 6 11 , SrcSpan "tests/examples/NegativePatterns.hs" 6 23 6 24 , SrcSpan "tests/examples/NegativePatterns.hs" 6 34 6 35 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 1 6 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 6 6 9 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 6 6 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 6 6 7 , srcInfoPoints = [] } "Z")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 8 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 8 6 9 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 12 6 22 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 12 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 12 6 18 , srcInfoPoints = [] } "Higher") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 19 6 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 19 6 20 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 21 6 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 21 6 22 , srcInfoPoints = [] } "a") ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 25 6 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 25 6 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 25 6 29 , srcInfoPoints = [] } "Same") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 30 6 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 30 6 31 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 32 6 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 32 6 33 , srcInfoPoints = [] } "a") ]) , QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 36 6 45 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 36 6 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 36 6 41 , srcInfoPoints = [] } "Lower") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 42 6 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 42 6 43 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 44 6 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 6 44 6 45 , srcInfoPoints = [] } "a") ]) ] [] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 8 1 8 18 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 8 8 8 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 8 1 8 7 , srcInfoPoints = [] }) (Just 7) [ ConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 8 10 8 18 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 8 10 8 11 , SrcSpan "tests/examples/NegativePatterns.hs" 8 11 8 17 , SrcSpan "tests/examples/NegativePatterns.hs" 8 17 8 18 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 8 10 8 18 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 8 10 8 11 , SrcSpan "tests/examples/NegativePatterns.hs" 8 11 8 17 , SrcSpan "tests/examples/NegativePatterns.hs" 8 17 8 18 ] } "Higher") ] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 9 1 9 16 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 9 8 9 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 9 1 9 7 , srcInfoPoints = [] }) (Just 6) [ ConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 9 10 9 16 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 9 10 9 11 , SrcSpan "tests/examples/NegativePatterns.hs" 9 11 9 15 , SrcSpan "tests/examples/NegativePatterns.hs" 9 15 9 16 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 9 10 9 16 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 9 10 9 11 , SrcSpan "tests/examples/NegativePatterns.hs" 9 11 9 15 , SrcSpan "tests/examples/NegativePatterns.hs" 9 15 9 16 ] } "Same") ] , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 10 1 10 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 10 8 10 9 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 10 1 10 7 , srcInfoPoints = [] }) (Just 5) [ ConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 10 10 10 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 10 10 10 11 , SrcSpan "tests/examples/NegativePatterns.hs" 10 11 10 16 , SrcSpan "tests/examples/NegativePatterns.hs" 10 16 10 17 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 10 10 10 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 10 10 10 11 , SrcSpan "tests/examples/NegativePatterns.hs" 10 11 10 16 , SrcSpan "tests/examples/NegativePatterns.hs" 10 16 10 17 ] } "Lower") ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 1 12 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 12 3 12 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 1 12 2 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 6 12 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 12 12 12 14 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 6 12 11 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 6 12 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 6 12 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 6 12 7 , srcInfoPoints = [] } "Z"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 8 12 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 8 12 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 8 12 11 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 16 , SrcSpan "tests/examples/NegativePatterns.hs" 12 16 12 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 16 , SrcSpan "tests/examples/NegativePatterns.hs" 12 16 12 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 12 15 12 16 , SrcSpan "tests/examples/NegativePatterns.hs" 12 16 12 17 ] })))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 1 15 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 1 13 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 1 13 2 , srcInfoPoints = [] } "g") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 3 13 22 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 3 13 4 , SrcSpan "tests/examples/NegativePatterns.hs" 13 21 13 22 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 7 13 21 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 7 13 9 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 7 13 8 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 7 13 8 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 7 13 8 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 8 13 9 , srcInfoPoints = [] } 1 "1")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 10 13 18 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 10 13 11 , SrcSpan "tests/examples/NegativePatterns.hs" 13 11 13 17 , SrcSpan "tests/examples/NegativePatterns.hs" 13 17 13 18 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 11 13 17 , srcInfoPoints = [] } "Higher")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 20 13 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 20 13 21 , srcInfoPoints = [] } "x"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 23 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 23 13 24 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 26 , SrcSpan "tests/examples/NegativePatterns.hs" 13 26 13 27 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 26 , SrcSpan "tests/examples/NegativePatterns.hs" 13 26 13 27 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 13 25 13 26 , SrcSpan "tests/examples/NegativePatterns.hs" 13 26 13 27 ] })))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 1 14 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 1 14 2 , srcInfoPoints = [] } "g") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 3 14 22 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 3 14 4 , SrcSpan "tests/examples/NegativePatterns.hs" 14 21 14 22 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 6 14 21 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 6 14 10 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 6 14 7 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 6 14 7 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 6 14 7 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 9 14 10 , srcInfoPoints = [] } 2 "2")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 11 14 17 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 11 14 12 , SrcSpan "tests/examples/NegativePatterns.hs" 14 12 14 16 , SrcSpan "tests/examples/NegativePatterns.hs" 14 16 14 17 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 12 14 16 , srcInfoPoints = [] } "Same")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 20 14 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 20 14 21 , srcInfoPoints = [] } "x"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 23 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 23 14 24 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 26 , SrcSpan "tests/examples/NegativePatterns.hs" 14 26 14 27 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 26 , SrcSpan "tests/examples/NegativePatterns.hs" 14 26 14 27 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 14 25 14 26 , SrcSpan "tests/examples/NegativePatterns.hs" 14 26 14 27 ] })))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 1 15 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 1 15 2 , srcInfoPoints = [] } "g") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 3 15 22 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 3 15 4 , SrcSpan "tests/examples/NegativePatterns.hs" 15 21 15 22 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 5 15 21 , srcInfoPoints = [] } (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 5 15 11 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 5 15 6 ] } (Negative SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 5 15 6 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 5 15 6 ] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 10 15 11 , srcInfoPoints = [] } 3 "3")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 12 15 19 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 12 15 13 , SrcSpan "tests/examples/NegativePatterns.hs" 15 13 15 18 , SrcSpan "tests/examples/NegativePatterns.hs" 15 18 15 19 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 13 15 18 , srcInfoPoints = [] } "Lower")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 20 15 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 20 15 21 , srcInfoPoints = [] } "x"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 23 15 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 23 15 24 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 26 , SrcSpan "tests/examples/NegativePatterns.hs" 15 26 15 27 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 26 , SrcSpan "tests/examples/NegativePatterns.hs" 15 26 15 27 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 27 , srcInfoPoints = [ SrcSpan "tests/examples/NegativePatterns.hs" 15 25 15 26 , SrcSpan "tests/examples/NegativePatterns.hs" 15 26 15 27 ] })))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteSplice.hs.parser.golden0000644000000000000000000007120313534314633024503 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 2 1 2 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 1 5 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 1 7 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 10 1 10 1 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 10 1 10 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 1 1 45 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 29 1 30 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 42 1 45 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 1 31 1 41 , srcInfoPoints = [] } "RankNTypes" ] , OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 2 1 2 34 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 2 1 2 31 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 2 31 2 34 ] } (Just GHC) "-F -pgmFtrhsx " ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 1 3 27 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 1 3 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 3 8 3 27 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 1 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 23 5 24 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 6 5 22 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 6 5 20 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 6 5 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 6 5 18 , srcInfoPoints = [] } "PageFunction")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 19 5 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 19 5 20 , srcInfoPoints = [] } "m"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 21 5 22 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 25 5 27 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 25 5 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 5 25 5 27 , srcInfoPoints = [] } "PF") []) ] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 1 8 75 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 1 7 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 1 7 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 6 8 75 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 6 7 7 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 8 8 75 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 8 7 11 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 27 7 29 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 12 7 26 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 12 7 12 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 27 7 27 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 12 7 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 12 7 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 12 7 13 , srcInfoPoints = [] } "a")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 14 7 26 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 14 7 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 16 7 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 16 7 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 16 7 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 16 7 22 , srcInfoPoints = [] } "mkName"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 23 7 26 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 7 23 7 26 , srcInfoPoints = [] } "a" "a")))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 8 8 75 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 8 8 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 8 8 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 8 8 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 8 8 12 , srcInfoPoints = [] } "runQ"))) (BracketExp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 13 8 65 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 13 8 16 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 63 8 65 ] } (TypeBracket SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 13 8 65 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 13 8 16 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 63 8 65 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 17 8 62 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 17 8 23 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 25 8 26 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 24 8 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 24 8 25 , srcInfoPoints = [] } "m") ]) Nothing (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 27 8 62 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 27 8 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 27 8 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 27 8 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 27 8 39 , srcInfoPoints = [] } "PageFunction"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 40 8 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 40 8 41 , srcInfoPoints = [] } "m"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 42 8 62 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 42 8 44 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 61 8 62 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 42 8 62 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 42 8 44 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 61 8 62 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 44 8 61 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 44 8 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 44 8 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 44 8 48 , srcInfoPoints = [] } "conT"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 49 8 61 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 49 8 50 , SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 60 8 61 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 50 8 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 50 8 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 50 8 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 50 8 56 , srcInfoPoints = [] } "mkName"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 57 8 60 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 57 8 60 , srcInfoPoints = [] } "a" "a")))))))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 66 8 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 66 8 69 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 66 8 69 , srcInfoPoints = [] } ">>="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 70 8 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 70 8 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteSplice.hs" 8 70 8 75 , srcInfoPoints = [] } "print")))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/MultiWayIf.hs.parser.golden0000644000000000000000000023514513534314633023304 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 1 1 31 1 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 1 1 1 1 , SrcSpan "tests/examples/MultiWayIf.hs" 2 1 2 1 , SrcSpan "tests/examples/MultiWayIf.hs" 2 1 2 1 , SrcSpan "tests/examples/MultiWayIf.hs" 4 1 4 1 , SrcSpan "tests/examples/MultiWayIf.hs" 8 1 8 1 , SrcSpan "tests/examples/MultiWayIf.hs" 14 1 14 1 , SrcSpan "tests/examples/MultiWayIf.hs" 15 1 15 1 , SrcSpan "tests/examples/MultiWayIf.hs" 16 1 16 1 , SrcSpan "tests/examples/MultiWayIf.hs" 18 1 18 1 , SrcSpan "tests/examples/MultiWayIf.hs" 20 1 20 1 , SrcSpan "tests/examples/MultiWayIf.hs" 21 1 21 1 , SrcSpan "tests/examples/MultiWayIf.hs" 23 1 23 1 , SrcSpan "tests/examples/MultiWayIf.hs" 27 1 27 1 , SrcSpan "tests/examples/MultiWayIf.hs" 30 1 30 1 , SrcSpan "tests/examples/MultiWayIf.hs" 31 1 31 1 , SrcSpan "tests/examples/MultiWayIf.hs" 31 1 31 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 2 1 2 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 2 1 2 7 , SrcSpan "tests/examples/MultiWayIf.hs" 2 19 2 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 2 8 2 18 , srcInfoPoints = [] } "MultiWayIf") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 1 1 1 28 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 1 1 1 13 , SrcSpan "tests/examples/MultiWayIf.hs" 1 25 1 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 1 14 1 24 , srcInfoPoints = [] } "MultiWayIf" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 1 6 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 1 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 1 4 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 5 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 4 5 4 6 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 7 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 4 7 4 9 , SrcSpan "tests/examples/MultiWayIf.hs" 4 10 4 10 , SrcSpan "tests/examples/MultiWayIf.hs" 5 10 5 10 , SrcSpan "tests/examples/MultiWayIf.hs" 6 10 6 10 , SrcSpan "tests/examples/MultiWayIf.hs" 8 1 8 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 10 4 23 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 4 10 4 11 , SrcSpan "tests/examples/MultiWayIf.hs" 4 18 4 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 12 4 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 12 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 12 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 12 4 17 , srcInfoPoints = [] } "test1"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 21 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 21 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 4 21 4 23 , srcInfoPoints = [] } "e1"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 10 5 31 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 5 10 5 11 , SrcSpan "tests/examples/MultiWayIf.hs" 5 26 5 28 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 12 5 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 12 5 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 12 5 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 12 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 12 5 17 , srcInfoPoints = [] } "test2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 18 5 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 18 5 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 18 5 25 , srcInfoPoints = [] } "witharg")))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 29 5 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 29 5 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 5 29 5 31 , srcInfoPoints = [] } "e2"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 10 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 6 10 6 11 , SrcSpan "tests/examples/MultiWayIf.hs" 6 22 6 24 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 12 6 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 12 6 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 12 6 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 12 6 21 , srcInfoPoints = [] } "otherwise"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 25 6 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 25 6 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 6 25 6 28 , srcInfoPoints = [] } "def"))) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 1 11 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 1 8 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 1 8 4 , srcInfoPoints = [] } "bar")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 5 11 11 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 8 5 8 6 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 7 11 11 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 8 7 8 9 , SrcSpan "tests/examples/MultiWayIf.hs" 8 10 8 11 , SrcSpan "tests/examples/MultiWayIf.hs" 11 10 11 11 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 12 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 8 12 8 13 , SrcSpan "tests/examples/MultiWayIf.hs" 8 20 8 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 14 8 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 14 8 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 14 8 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 14 8 19 , srcInfoPoints = [] } "test1"))) ] (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 23 9 43 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 8 23 8 25 , SrcSpan "tests/examples/MultiWayIf.hs" 8 26 8 27 , SrcSpan "tests/examples/MultiWayIf.hs" 9 42 9 43 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 28 8 41 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 8 28 8 29 , SrcSpan "tests/examples/MultiWayIf.hs" 8 36 8 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 30 8 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 30 8 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 30 8 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 30 8 35 , srcInfoPoints = [] } "test2"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 39 8 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 39 8 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 8 39 8 41 , srcInfoPoints = [] } "e1"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 28 9 41 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 9 28 9 29 , SrcSpan "tests/examples/MultiWayIf.hs" 9 36 9 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 30 9 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 30 9 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 30 9 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 30 9 35 , srcInfoPoints = [] } "test3"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 39 9 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 39 9 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 9 39 9 41 , srcInfoPoints = [] } "e2"))) ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 12 10 25 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 10 12 10 13 , SrcSpan "tests/examples/MultiWayIf.hs" 10 20 10 22 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 14 10 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 14 10 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 14 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 14 10 19 , srcInfoPoints = [] } "test4"))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 23 10 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 23 10 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 10 23 10 25 , srcInfoPoints = [] } "e3"))) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 1 14 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 1 14 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 1 14 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 4 14 8 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 14 4 14 5 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 6 14 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 14 6 14 8 , srcInfoPoints = [] } 10 "10"))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 1 15 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 1 15 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 1 15 3 , srcInfoPoints = [] } "x1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 4 15 45 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 15 4 15 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 6 15 45 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 15 6 15 8 , SrcSpan "tests/examples/MultiWayIf.hs" 15 9 15 9 , SrcSpan "tests/examples/MultiWayIf.hs" 16 1 16 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 9 15 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 15 9 15 10 , SrcSpan "tests/examples/MultiWayIf.hs" 15 18 15 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 11 15 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 11 15 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 11 15 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 11 15 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 11 15 12 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 13 15 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 13 15 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 13 15 14 , srcInfoPoints = [] } "<"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 15 15 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 15 15 17 , srcInfoPoints = [] } 10 "10"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 21 15 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 21 15 27 , srcInfoPoints = [] } "< 10" "< 10")) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 28 15 45 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 15 28 15 29 , SrcSpan "tests/examples/MultiWayIf.hs" 15 40 15 42 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 30 15 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 30 15 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 30 15 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 30 15 39 , srcInfoPoints = [] } "otherwise"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 43 15 45 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 15 43 15 45 , srcInfoPoints = [] } "" "")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 1 17 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 1 16 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 1 16 3 , srcInfoPoints = [] } "x2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 4 17 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 16 4 16 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 6 17 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 16 6 16 8 , SrcSpan "tests/examples/MultiWayIf.hs" 16 9 16 9 , SrcSpan "tests/examples/MultiWayIf.hs" 17 9 17 9 , SrcSpan "tests/examples/MultiWayIf.hs" 18 1 18 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 9 16 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 16 9 16 10 , SrcSpan "tests/examples/MultiWayIf.hs" 16 18 16 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 11 16 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 11 16 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 11 16 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 11 16 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 11 16 12 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 13 16 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 13 16 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 13 16 14 , srcInfoPoints = [] } "<"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 15 16 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 15 16 17 , srcInfoPoints = [] } 10 "10"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 21 16 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 16 21 16 27 , srcInfoPoints = [] } "< 10" "< 10")) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 9 17 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 17 9 17 10 , SrcSpan "tests/examples/MultiWayIf.hs" 17 21 17 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 11 17 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 11 17 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 11 17 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 11 17 20 , srcInfoPoints = [] } "otherwise"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 24 17 26 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 17 24 17 26 , srcInfoPoints = [] } "" "")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 1 19 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 1 18 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 1 18 3 , srcInfoPoints = [] } "x3")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 4 19 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 18 4 18 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 6 19 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 18 6 18 8 , SrcSpan "tests/examples/MultiWayIf.hs" 18 9 18 9 , SrcSpan "tests/examples/MultiWayIf.hs" 19 9 19 9 , SrcSpan "tests/examples/MultiWayIf.hs" 20 1 20 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 9 18 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 18 9 18 10 , SrcSpan "tests/examples/MultiWayIf.hs" 18 18 18 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 11 18 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 11 18 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 11 18 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 11 18 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 11 18 12 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 13 18 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 13 18 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 13 18 14 , srcInfoPoints = [] } "<"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 15 18 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 15 18 17 , srcInfoPoints = [] } 10 "10"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 21 18 27 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 18 21 18 27 , srcInfoPoints = [] } "< 10" "< 10")) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 9 19 26 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 19 9 19 10 , SrcSpan "tests/examples/MultiWayIf.hs" 19 21 19 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 11 19 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 11 19 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 11 19 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 11 19 20 , srcInfoPoints = [] } "otherwise"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 24 19 26 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 19 24 19 26 , srcInfoPoints = [] } "" "")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 1 20 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 1 20 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 1 20 3 , srcInfoPoints = [] } "x4")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 4 20 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 20 4 20 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 6 20 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 20 6 20 8 , SrcSpan "tests/examples/MultiWayIf.hs" 20 9 20 9 , SrcSpan "tests/examples/MultiWayIf.hs" 21 1 21 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 9 20 24 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 20 9 20 10 , SrcSpan "tests/examples/MultiWayIf.hs" 20 16 20 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 11 20 15 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 11 20 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 11 20 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 11 20 15 , srcInfoPoints = [] } "True"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 19 20 24 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 20 19 20 24 , srcInfoPoints = [] } "yes" "yes")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 1 21 46 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 1 21 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 1 21 3 , srcInfoPoints = [] } "x5")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 4 21 46 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 4 21 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 6 21 46 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 6 21 8 , SrcSpan "tests/examples/MultiWayIf.hs" 21 9 21 9 , SrcSpan "tests/examples/MultiWayIf.hs" 23 1 23 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 9 21 46 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 9 21 10 , SrcSpan "tests/examples/MultiWayIf.hs" 21 16 21 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 11 21 15 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 11 21 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 11 21 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 11 21 15 , srcInfoPoints = [] } "True"))) ] (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 19 21 46 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 19 21 21 , SrcSpan "tests/examples/MultiWayIf.hs" 21 22 21 22 , SrcSpan "tests/examples/MultiWayIf.hs" 23 1 23 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 22 21 34 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 22 21 23 , SrcSpan "tests/examples/MultiWayIf.hs" 21 30 21 32 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 24 21 29 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 24 21 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 24 21 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 24 21 29 , srcInfoPoints = [] } "False"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 33 21 34 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 33 21 34 , srcInfoPoints = [] } 1 "1")) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 35 21 46 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 21 35 21 36 , SrcSpan "tests/examples/MultiWayIf.hs" 21 42 21 44 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 37 21 41 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 37 21 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 37 21 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 37 21 41 , srcInfoPoints = [] } "True"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 45 21 46 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 21 45 21 46 , srcInfoPoints = [] } 2 "2")) ]) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 1 25 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 1 23 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 1 23 3 , srcInfoPoints = [] } "x6")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 4 25 31 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 23 4 23 5 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 6 25 31 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 23 6 23 8 , SrcSpan "tests/examples/MultiWayIf.hs" 23 9 23 9 , SrcSpan "tests/examples/MultiWayIf.hs" 25 9 25 9 , SrcSpan "tests/examples/MultiWayIf.hs" 27 1 27 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 9 24 39 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 23 9 23 10 , SrcSpan "tests/examples/MultiWayIf.hs" 23 18 23 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 11 23 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 11 23 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 11 23 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 11 23 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 11 23 12 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 13 23 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 13 23 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 13 23 14 , srcInfoPoints = [] } "<"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 15 23 17 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 15 23 17 , srcInfoPoints = [] } 10 "10"))) ] (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 21 24 39 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 23 21 23 23 , SrcSpan "tests/examples/MultiWayIf.hs" 23 24 23 24 , SrcSpan "tests/examples/MultiWayIf.hs" 24 24 24 24 , SrcSpan "tests/examples/MultiWayIf.hs" 25 9 25 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 24 23 39 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 23 24 23 25 , SrcSpan "tests/examples/MultiWayIf.hs" 23 31 23 33 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 26 23 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 26 23 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 26 23 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 26 23 30 , srcInfoPoints = [] } "True"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 34 23 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 23 34 23 39 , srcInfoPoints = [] } "yes" "yes")) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 24 24 39 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 24 24 24 25 , SrcSpan "tests/examples/MultiWayIf.hs" 24 32 24 34 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 26 24 31 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 26 24 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 26 24 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 26 24 31 , srcInfoPoints = [] } "False"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 35 24 39 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 24 35 24 39 , srcInfoPoints = [] } "no" "no")) ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 9 25 31 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 25 9 25 10 , SrcSpan "tests/examples/MultiWayIf.hs" 25 21 25 23 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 11 25 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 11 25 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 11 25 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 11 25 20 , srcInfoPoints = [] } "otherwise"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 24 25 31 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 25 24 25 31 , srcInfoPoints = [] } "maybe" "maybe")) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 1 27 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 1 27 3 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 1 27 3 , srcInfoPoints = [] } "x7")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 4 27 22 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 27 4 27 5 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 6 27 22 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 27 6 27 7 , SrcSpan "tests/examples/MultiWayIf.hs" 27 21 27 22 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 7 27 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 27 7 27 9 , SrcSpan "tests/examples/MultiWayIf.hs" 27 10 27 10 , SrcSpan "tests/examples/MultiWayIf.hs" 27 21 27 21 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 10 27 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 27 10 27 11 , SrcSpan "tests/examples/MultiWayIf.hs" 27 17 27 19 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 12 27 16 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 12 27 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 12 27 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 12 27 16 , srcInfoPoints = [] } "True"))) ] (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 20 27 21 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 27 20 27 21 , srcInfoPoints = [] } 0 "0")) ]))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 1 30 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 1 30 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 1 30 5 , srcInfoPoints = [] } "spam")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 6 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 6 30 7 ] } (MultiIf SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 8 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 8 30 10 , SrcSpan "tests/examples/MultiWayIf.hs" 30 11 30 11 , SrcSpan "tests/examples/MultiWayIf.hs" 31 1 31 0 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 11 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 11 30 12 , SrcSpan "tests/examples/MultiWayIf.hs" 30 22 30 24 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 16 30 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 15 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 14 , SrcSpan "tests/examples/MultiWayIf.hs" 30 14 30 15 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 15 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 14 , SrcSpan "tests/examples/MultiWayIf.hs" 30 14 30 15 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 15 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 13 30 14 , SrcSpan "tests/examples/MultiWayIf.hs" 30 14 30 15 ] })) []) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 20 , SrcSpan "tests/examples/MultiWayIf.hs" 30 20 30 21 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 20 , SrcSpan "tests/examples/MultiWayIf.hs" 30 20 30 21 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 21 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 19 30 20 , SrcSpan "tests/examples/MultiWayIf.hs" 30 20 30 21 ] }))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 26 , SrcSpan "tests/examples/MultiWayIf.hs" 30 26 30 27 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 26 , SrcSpan "tests/examples/MultiWayIf.hs" 30 26 30 27 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 27 , srcInfoPoints = [ SrcSpan "tests/examples/MultiWayIf.hs" 30 25 30 26 , SrcSpan "tests/examples/MultiWayIf.hs" 30 26 30 27 ] }))) ])) Nothing ] , [ Comment False (SrcSpan "tests/examples/MultiWayIf.hs" 13 1 13 31) " taken from GHC's test suite" , Comment False (SrcSpan "tests/examples/MultiWayIf.hs" 29 1 29 13) " issue #98" ] ) haskell-src-exts-1.23.1/tests/examples/Rules.hs.parser.golden0000644000000000000000000003624513534314633022344 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 1 2 1 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 1 1 1 , SrcSpan "tests/examples/Rules.hs" 1 1 1 1 , SrcSpan "tests/examples/Rules.hs" 1 1 1 1 , SrcSpan "tests/examples/Rules.hs" 2 1 2 1 , SrcSpan "tests/examples/Rules.hs" 2 1 2 1 ] } Nothing [] [] [ RulePragmaDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 1 1 105 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 1 1 10 , SrcSpan "tests/examples/Rules.hs" 1 102 1 105 ] } [ Rule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 11 1 101 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 11 1 23 , SrcSpan "tests/examples/Rules.hs" 1 24 1 30 , SrcSpan "tests/examples/Rules.hs" 1 61 1 62 , SrcSpan "tests/examples/Rules.hs" 1 78 1 79 ] } "head/build" Nothing (Just [ TypedRuleVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 31 1 60 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 31 1 32 , SrcSpan "tests/examples/Rules.hs" 1 33 1 35 , SrcSpan "tests/examples/Rules.hs" 1 59 1 60 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 32 1 33 , srcInfoPoints = [] } "g") (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 35 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 35 1 41 , SrcSpan "tests/examples/Rules.hs" 1 43 1 44 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 42 1 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 42 1 43 , srcInfoPoints = [] } "b") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 44 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 53 1 55 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 44 1 53 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 44 1 45 , SrcSpan "tests/examples/Rules.hs" 1 52 1 53 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 45 1 52 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 46 1 48 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 45 1 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 45 1 46 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 48 1 52 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 49 1 51 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 48 1 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 48 1 49 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 51 1 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 51 1 52 , srcInfoPoints = [] } "b"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 55 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 56 1 58 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 55 1 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 55 1 56 , srcInfoPoints = [] } "b")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 58 1 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 58 1 59 , srcInfoPoints = [] } "b"))))) ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 63 1 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 63 1 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 63 1 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 63 1 67 , srcInfoPoints = [] } "head"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 68 1 77 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 68 1 69 , SrcSpan "tests/examples/Rules.hs" 1 76 1 77 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 69 1 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 69 1 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 69 1 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 69 1 74 , srcInfoPoints = [] } "build"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 75 1 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 75 1 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 75 1 76 , srcInfoPoints = [] } "g")))))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 80 1 101 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 80 1 93 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 80 1 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 80 1 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 80 1 81 , srcInfoPoints = [] } "g"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 82 1 93 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 82 1 83 , SrcSpan "tests/examples/Rules.hs" 1 92 1 93 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 83 1 92 , srcInfoPoints = [ SrcSpan "tests/examples/Rules.hs" 1 83 1 84 , SrcSpan "tests/examples/Rules.hs" 1 88 1 90 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 84 1 85 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 84 1 85 , srcInfoPoints = [] } "x") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 86 1 87 , srcInfoPoints = [] } ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 91 1 92 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 91 1 92 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 91 1 92 , srcInfoPoints = [] } "x")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 94 1 101 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 94 1 101 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Rules.hs" 1 94 1 101 , srcInfoPoints = [] } "badHead")))) ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ConstraintKinds.hs.parser.golden0000644000000000000000000004652413556712523024374 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 1 1 11 1 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 1 1 1 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 2 1 2 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 3 1 3 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 4 1 4 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 6 1 6 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 7 1 7 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 9 1 9 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 10 1 10 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 11 1 11 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 11 1 11 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 1 1 1 13 , SrcSpan "tests/examples/ConstraintKinds.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 2 1 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 2 1 2 13 , SrcSpan "tests/examples/ConstraintKinds.hs" 2 30 2 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 2 14 2 29 , srcInfoPoints = [] } "ConstraintKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 3 1 3 39 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 3 1 3 13 , SrcSpan "tests/examples/ConstraintKinds.hs" 3 36 3 39 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 3 14 3 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 1 6 0 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 4 1 4 6 , SrcSpan "tests/examples/ConstraintKinds.hs" 4 13 4 18 , SrcSpan "tests/examples/ConstraintKinds.hs" 6 1 6 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 6 1 6 1 , SrcSpan "tests/examples/ConstraintKinds.hs" 6 0 6 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 7 4 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 7 4 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 7 4 10 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 11 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 4 11 4 12 , srcInfoPoints = [] } "a"))) [] (Just []) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 1 6 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 1 6 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 6 6 11 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 6 6 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 6 6 9 , srcInfoPoints = [] } "Bar")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 10 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 6 10 6 11 , srcInfoPoints = [] } "a"))) [] [] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 1 7 37 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 7 1 7 5 , SrcSpan "tests/examples/ConstraintKinds.hs" 7 18 7 19 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 6 7 17 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 6 7 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 6 7 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 6 7 13 , srcInfoPoints = [] } "Bazable")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 14 7 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 14 7 15 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 16 7 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 16 7 17 , srcInfoPoints = [] } "b"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 20 7 37 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 7 20 7 21 , SrcSpan "tests/examples/ConstraintKinds.hs" 7 36 7 37 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 21 7 36 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 7 27 7 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 21 7 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 21 7 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 21 7 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 21 7 24 , srcInfoPoints = [] } "Bar"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 25 7 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 25 7 26 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 29 7 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 29 7 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 29 7 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 29 7 34 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 35 7 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 7 35 7 36 , srcInfoPoints = [] } "b"))))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 1 9 29 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 5 9 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 1 9 4 , srcInfoPoints = [] } "baz" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 29 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 20 9 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 20 9 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 20 9 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 20 9 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 22 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 20 9 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 8 9 15 , srcInfoPoints = [] } "Bazable"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 16 9 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 16 9 17 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 18 9 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 18 9 19 , srcInfoPoints = [] } "b")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 23 9 29 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 9 25 9 27 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 23 9 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 23 9 24 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 28 9 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 9 28 9 29 , srcInfoPoints = [] } "a")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 1 10 9 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 1 10 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 1 10 4 , srcInfoPoints = [] } "baz")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 5 10 9 , srcInfoPoints = [ SrcSpan "tests/examples/ConstraintKinds.hs" 10 5 10 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 7 10 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 7 10 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ConstraintKinds.hs" 10 7 10 9 , srcInfoPoints = [] } "id")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/GroupKeyword.hs.parser.golden0000644000000000000000000002157613534314633023714 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 2 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/GroupKeyword.hs" 2 1 2 1 , SrcSpan "tests/examples/GroupKeyword.hs" 2 1 2 1 , SrcSpan "tests/examples/GroupKeyword.hs" 4 1 4 1 , SrcSpan "tests/examples/GroupKeyword.hs" 5 1 5 1 , SrcSpan "tests/examples/GroupKeyword.hs" 5 1 5 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 2 1 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/GroupKeyword.hs" 2 1 2 7 , SrcSpan "tests/examples/GroupKeyword.hs" 2 21 2 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 2 8 2 20 , srcInfoPoints = [] } "GroupKeyword") Nothing Nothing)) [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 1 4 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 1 4 2 , srcInfoPoints = [] } "a")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 3 4 37 , srcInfoPoints = [ SrcSpan "tests/examples/GroupKeyword.hs" 4 3 4 4 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 5 4 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 5 4 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 5 4 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 5 4 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 5 4 8 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 9 4 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 9 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 9 4 13 , srcInfoPoints = [] } "head")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 14 4 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 14 4 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 14 4 15 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 16 4 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 16 4 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 16 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 16 4 21 , srcInfoPoints = [] } "group"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 22 4 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 22 4 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 22 4 23 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 24 4 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 24 4 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 24 4 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 24 4 28 , srcInfoPoints = [] } "sort"))) (EnumFromTo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 29 4 37 , srcInfoPoints = [ SrcSpan "tests/examples/GroupKeyword.hs" 4 29 4 30 , SrcSpan "tests/examples/GroupKeyword.hs" 4 31 4 33 , SrcSpan "tests/examples/GroupKeyword.hs" 4 36 4 37 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 30 4 31 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 30 4 31 , srcInfoPoints = [] } 1 "1")) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 33 4 36 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GroupKeyword.hs" 4 33 4 36 , srcInfoPoints = [] } 100 "100"))))))) Nothing ] , [ Comment False (SrcSpan "tests/examples/GroupKeyword.hs" 1 1 1 38) " {-# LANGUAGE TransformListComp #-}" ] ) haskell-src-exts-1.23.1/tests/examples/T13050.hs.parser.golden0000644000000000000000000004360413534314633022043 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 1 1 8 1 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 1 1 1 1 , SrcSpan "tests/examples/T13050.hs" 1 1 1 1 , SrcSpan "tests/examples/T13050.hs" 3 1 3 1 , SrcSpan "tests/examples/T13050.hs" 4 1 4 1 , SrcSpan "tests/examples/T13050.hs" 5 1 5 1 , SrcSpan "tests/examples/T13050.hs" 6 1 6 1 , SrcSpan "tests/examples/T13050.hs" 8 1 8 1 , SrcSpan "tests/examples/T13050.hs" 8 1 8 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 1 1 1 24 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 1 1 1 7 , SrcSpan "tests/examples/T13050.hs" 1 19 1 24 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 1 8 1 18 , srcInfoPoints = [] } "HolesInfix") Nothing Nothing)) [] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 3 2 3 3 , SrcSpan "tests/examples/T13050.hs" 3 5 3 6 , SrcSpan "tests/examples/T13050.hs" 3 9 3 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 1 3 2 , srcInfoPoints = [] } "f" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 4 3 5 , srcInfoPoints = [] } "g" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 7 3 8 , srcInfoPoints = [] } "q" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 12 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 3 16 3 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 12 3 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 12 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 12 3 15 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 19 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 3 23 3 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 19 3 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 19 3 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 19 3 22 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 26 3 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 26 3 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 3 26 3 29 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 1 4 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 1 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 1 4 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 3 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 3 4 4 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 5 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 5 4 6 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 7 4 14 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 4 7 4 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 9 4 14 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 9 4 12 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 9 4 10 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 9 4 10 , srcInfoPoints = [] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 9 4 10 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 11 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 11 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 11 4 12 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 13 4 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 13 4 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 4 13 4 14 , srcInfoPoints = [] } "y"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 1 5 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 1 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 1 5 2 , srcInfoPoints = [] } "g") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 3 5 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 3 5 4 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 5 5 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 5 5 6 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 7 5 16 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 5 7 5 8 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 9 5 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 9 5 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 9 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 9 5 10 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 11 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 5 11 5 12 , SrcSpan "tests/examples/T13050.hs" 5 12 5 13 , SrcSpan "tests/examples/T13050.hs" 5 13 5 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 11 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 5 11 5 12 , SrcSpan "tests/examples/T13050.hs" 5 12 5 13 , SrcSpan "tests/examples/T13050.hs" 5 13 5 14 ] } (ExprHole SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 12 5 13 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 15 5 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 15 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 5 15 5 16 , srcInfoPoints = [] } "y"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 1 6 17 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 1 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 1 6 2 , srcInfoPoints = [] } "q") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 3 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 3 6 4 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 5 6 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 5 6 6 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 7 6 17 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 6 7 6 8 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 9 6 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 9 6 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 9 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 9 6 10 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 11 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 6 11 6 12 , SrcSpan "tests/examples/T13050.hs" 6 12 6 14 , SrcSpan "tests/examples/T13050.hs" 6 14 6 15 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 11 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/T13050.hs" 6 11 6 12 , SrcSpan "tests/examples/T13050.hs" 6 12 6 14 , SrcSpan "tests/examples/T13050.hs" 6 14 6 15 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 12 6 14 , srcInfoPoints = [] } "_a"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 16 6 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T13050.hs" 6 16 6 17 , srcInfoPoints = [] } "y"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ParallelArrays2.hs.parser.golden0000644000000000000000000000012113534314633024232 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ParallelArrays2.hs" 2 17) "Parse error: :" haskell-src-exts-1.23.1/tests/examples/Fixity2.hs.parser.golden0000644000000000000000000003253113534314633022602 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity2.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity2.hs" 1 1 1 1 , SrcSpan "tests/examples/Fixity2.hs" 4 1 4 1 , SrcSpan "tests/examples/Fixity2.hs" 4 1 4 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 1 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 1 38 1 43 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 1 1 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 1 1 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 5 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 1 5 1 6 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 7 1 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 7 1 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 7 1 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 7 1 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 7 1 11 , srcInfoPoints = [] } "pure"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 12 1 13 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 12 1 13 , srcInfoPoints = [] } 1 "1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 14 1 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 14 1 17 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 14 1 17 , srcInfoPoints = [] } "<^>"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 18 1 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 18 1 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 18 1 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 18 1 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 18 1 22 , srcInfoPoints = [] } "pure"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 23 1 24 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 23 1 24 , srcInfoPoints = [] } 2 "2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 25 1 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 25 1 28 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 25 1 28 , srcInfoPoints = [] } "<^>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 29 1 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 29 1 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 29 1 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 29 1 33 , srcInfoPoints = [] } "pure"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 34 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 1 34 1 35 , SrcSpan "tests/examples/Fixity2.hs" 1 35 1 36 , SrcSpan "tests/examples/Fixity2.hs" 1 36 1 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 34 1 37 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 1 34 1 35 , SrcSpan "tests/examples/Fixity2.hs" 1 35 1 36 , SrcSpan "tests/examples/Fixity2.hs" 1 36 1 37 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 1 35 1 36 , srcInfoPoints = [] } "+"))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 3 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 2 3 2 3 , SrcSpan "tests/examples/Fixity2.hs" 3 3 3 3 , SrcSpan "tests/examples/Fixity2.hs" 4 1 4 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 3 2 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 3 2 8 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 2 3 2 4 , SrcSpan "tests/examples/Fixity2.hs" 2 4 2 7 , SrcSpan "tests/examples/Fixity2.hs" 2 7 2 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 4 2 7 , srcInfoPoints = [] } "<^>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 9 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 2 9 2 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 11 2 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 11 2 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 11 2 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 11 2 15 , srcInfoPoints = [] } "flip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 16 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 2 16 2 17 , SrcSpan "tests/examples/Fixity2.hs" 2 17 2 20 , SrcSpan "tests/examples/Fixity2.hs" 2 20 2 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 16 2 21 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 2 16 2 17 , SrcSpan "tests/examples/Fixity2.hs" 2 17 2 20 , SrcSpan "tests/examples/Fixity2.hs" 2 20 2 21 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 2 17 2 20 , srcInfoPoints = [] } "<*>"))))) Nothing , InfixDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 3 3 3 15 , srcInfoPoints = [ SrcSpan "tests/examples/Fixity2.hs" 3 10 3 11 ] } (AssocRight SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 3 3 3 9 , srcInfoPoints = [] }) (Just 4) [ VarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 3 12 3 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Fixity2.hs" 3 12 3 15 , srcInfoPoints = [] } "<^>") ] ])) ] , [] ) haskell-src-exts-1.23.1/tests/examples/Unpack.hs.parser.golden0000644000000000000000000002543313534314633022470 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 1 1 1 1 , SrcSpan "tests/examples/Unpack.hs" 3 1 3 1 , SrcSpan "tests/examples/Unpack.hs" 3 1 3 1 , SrcSpan "tests/examples/Unpack.hs" 3 1 3 1 , SrcSpan "tests/examples/Unpack.hs" 6 1 6 1 , SrcSpan "tests/examples/Unpack.hs" 7 1 7 1 , SrcSpan "tests/examples/Unpack.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 1 1 1 13 , SrcSpan "tests/examples/Unpack.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 1 6 0 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 3 18 3 23 , SrcSpan "tests/examples/Unpack.hs" 4 9 4 9 , SrcSpan "tests/examples/Unpack.hs" 6 1 6 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 17 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 15 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 13 , srcInfoPoints = [] } "CmmNode")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 14 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 14 3 15 , srcInfoPoints = [] } "e"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 16 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 16 3 17 , srcInfoPoints = [] } "x"))) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 9 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 4 18 4 20 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 9 4 17 , srcInfoPoints = [] } "CmmEntry") Nothing Nothing Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 4 41 4 43 ] } (TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 40 , srcInfoPoints = [] } (BangedTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 36 4 37 , srcInfoPoints = [] }) (Unpack SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 35 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 4 21 4 31 , SrcSpan "tests/examples/Unpack.hs" 4 32 4 35 ] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40 , srcInfoPoints = [] } "Int")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51 , srcInfoPoints = [] } "CmmNode"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 52 4 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 52 4 53 , srcInfoPoints = [] } "e"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 54 4 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 54 4 55 , srcInfoPoints = [] } "x")))) ] [] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 1 6 33 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 6 9 6 10 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 1 6 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 6 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 6 6 8 , srcInfoPoints = [] } "UI")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 33 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 13 , srcInfoPoints = [] } "UI") [ TyBang SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 14 6 33 , srcInfoPoints = [] } (BangedTy SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 29 6 30 , srcInfoPoints = [] }) (Unpack SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 14 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 6 14 6 24 , SrcSpan "tests/examples/Unpack.hs" 6 25 6 28 ] }) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33 , srcInfoPoints = [] } "Int"))) ]) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/THTSplices.hs.parser.golden0000644000000000000000000001223713534314633023227 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 1 1 1 1 , SrcSpan "tests/examples/THTSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTSplices.hs" 2 1 2 1 , SrcSpan "tests/examples/THTSplices.hs" 3 1 3 1 , SrcSpan "tests/examples/THTSplices.hs" 4 1 4 1 , SrcSpan "tests/examples/THTSplices.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 1 1 1 13 , SrcSpan "tests/examples/THTSplices.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 1 14 1 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 2 1 2 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 2 8 2 27 , srcInfoPoints = [] } "Language.Haskell.TH" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 1 3 33 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 1 3 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 1 3 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 6 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 3 6 3 7 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 8 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 3 18 3 20 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 8 3 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 8 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 8 3 17 , srcInfoPoints = [] } "undefined"))) (TySplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 21 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 3 21 3 23 , SrcSpan "tests/examples/THTSplices.hs" 3 32 3 33 ] } (ParenSplice SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 21 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/THTSplices.hs" 3 21 3 23 , SrcSpan "tests/examples/THTSplices.hs" 3 32 3 33 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 23 3 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 23 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/THTSplices.hs" 3 23 3 32 , srcInfoPoints = [] } "undefined"))))))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/DerivingStrategies.hs.parser.golden0000644000000000000000000010465613556712523025062 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 1 1 19 1 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 2 1 2 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 3 1 3 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 4 1 4 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 5 1 5 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 5 1 5 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 7 1 7 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 8 1 8 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 10 1 10 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 16 1 16 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 17 1 17 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 18 1 18 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 19 1 19 1 , SrcSpan "tests/examples/DerivingStrategies.hs" 19 1 19 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 5 1 5 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 5 1 5 7 , SrcSpan "tests/examples/DerivingStrategies.hs" 5 27 5 32 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 5 8 5 26 , srcInfoPoints = [] } "DerivingStrategies") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 1 1 1 13 , SrcSpan "tests/examples/DerivingStrategies.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 1 14 1 28 , srcInfoPoints = [] } "DeriveAnyClass" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 2 1 2 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 2 1 2 13 , SrcSpan "tests/examples/DerivingStrategies.hs" 2 33 2 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 2 14 2 32 , srcInfoPoints = [] } "DerivingStrategies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 3 1 3 44 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 3 1 3 13 , SrcSpan "tests/examples/DerivingStrategies.hs" 3 41 3 44 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 3 14 3 40 , srcInfoPoints = [] } "GeneralizedNewtypeDeriving" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 4 1 4 36 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 4 1 4 13 , SrcSpan "tests/examples/DerivingStrategies.hs" 4 33 4 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 4 14 4 32 , srcInfoPoints = [] } "StandaloneDeriving" ] ] [] [ ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 1 7 10 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 7 1 7 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 7 7 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 7 7 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 7 7 8 , srcInfoPoints = [] } "C")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 9 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 7 9 7 10 , srcInfoPoints = [] } "a"))) [] Nothing , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 1 8 10 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 8 1 8 6 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 7 8 10 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 7 8 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 7 8 8 , srcInfoPoints = [] } "D")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 9 8 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 8 9 8 10 , srcInfoPoints = [] } "a"))) [] Nothing , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 1 14 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 10 15 10 16 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 1 10 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 9 10 14 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 9 10 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 9 10 12 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 13 10 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 13 10 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 17 10 24 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 17 10 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 17 10 22 , srcInfoPoints = [] } "MkFoo") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 23 10 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 10 23 10 24 , srcInfoPoints = [] } "a") ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 11 3 11 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 11 3 11 11 , SrcSpan "tests/examples/DerivingStrategies.hs" 11 12 11 13 , SrcSpan "tests/examples/DerivingStrategies.hs" 11 13 11 14 ] } Nothing [] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 3 12 27 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 12 3 12 11 , SrcSpan "tests/examples/DerivingStrategies.hs" 12 18 12 19 , SrcSpan "tests/examples/DerivingStrategies.hs" 12 21 12 22 , SrcSpan "tests/examples/DerivingStrategies.hs" 12 26 12 27 ] } (Just (DerivStock SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 12 12 17 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 19 12 21 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 19 12 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 19 12 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 19 12 21 , srcInfoPoints = [] } "Eq"))) , IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 23 12 26 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 23 12 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 23 12 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 12 23 12 26 , srcInfoPoints = [] } "Ord"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 3 13 24 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 13 3 13 11 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 12 13 19 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 20 13 24 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 20 13 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 20 13 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 13 20 13 24 , srcInfoPoints = [] } "Show"))) ] , Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 3 14 22 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 14 3 14 11 ] } (Just (DerivAnyclass SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 12 14 20 , srcInfoPoints = [] })) [ IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 21 14 22 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 21 14 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 21 14 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 14 21 14 22 , srcInfoPoints = [] } "C"))) ] ] , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 1 16 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 1 16 9 , SrcSpan "tests/examples/DerivingStrategies.hs" 16 16 16 24 ] } (Just (DerivStock SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 10 16 15 , srcInfoPoints = [] })) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 47 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 32 16 34 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 32 16 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 32 16 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 34 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 32 16 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 25 16 29 , srcInfoPoints = [] } "Read"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 30 16 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 30 16 31 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 35 16 47 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 35 16 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 35 16 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 35 16 39 , srcInfoPoints = [] } "Read"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 40 16 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 16 40 16 41 , SrcSpan "tests/examples/DerivingStrategies.hs" 16 46 16 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 41 16 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 41 16 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 41 16 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 41 16 44 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 45 16 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 16 45 16 46 , srcInfoPoints = [] } "a")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 1 17 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 1 17 9 , SrcSpan "tests/examples/DerivingStrategies.hs" 17 18 17 26 ] } (Just (DerivNewtype SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 10 17 17 , srcInfoPoints = [] })) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 47 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 33 17 35 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 33 17 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 33 17 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 35 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 33 17 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 27 17 30 , srcInfoPoints = [] } "Num"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 31 17 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 31 17 32 , srcInfoPoints = [] } "a")))))) (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 36 17 47 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 36 17 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 36 17 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 36 17 39 , srcInfoPoints = [] } "Num"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 40 17 47 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 17 40 17 41 , SrcSpan "tests/examples/DerivingStrategies.hs" 17 46 17 47 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 41 17 46 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 41 17 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 41 17 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 41 17 44 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 45 17 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 17 45 17 46 , srcInfoPoints = [] } "a")))))) , DerivDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 1 18 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 18 1 18 9 , SrcSpan "tests/examples/DerivingStrategies.hs" 18 19 18 27 ] } (Just (DerivAnyclass SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 10 18 18 , srcInfoPoints = [] })) Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 28 18 37 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 28 18 37 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 28 18 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 28 18 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 28 18 29 , srcInfoPoints = [] } "D"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 30 18 37 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingStrategies.hs" 18 30 18 31 , SrcSpan "tests/examples/DerivingStrategies.hs" 18 36 18 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 31 18 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 31 18 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 31 18 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 31 18 34 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 35 18 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingStrategies.hs" 18 35 18 36 , srcInfoPoints = [] } "a")))))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/EqualityConstraints1.hs.parser.golden0000644000000000000000000001602113556712523025352 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 2 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 2 1 2 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 1 4 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 1 4 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 1 4 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 5 1 5 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 6 1 6 1 , SrcSpan "tests/examples/EqualityConstraints1.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 2 1 2 23 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 2 1 2 13 , SrcSpan "tests/examples/EqualityConstraints1.hs" 2 20 2 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 2 14 2 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 1 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 4 5 4 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 1 4 4 , srcInfoPoints = [] } "one" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 20 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 4 10 4 11 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 16 4 18 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 4 10 4 11 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 16 4 18 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 4 10 4 11 , SrcSpan "tests/examples/EqualityConstraints1.hs" 4 16 4 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 8 4 9 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 12 4 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 12 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 12 4 15 , srcInfoPoints = [] } "Int"))))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 19 4 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 4 19 4 20 , srcInfoPoints = [] } "a"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 1 5 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 1 5 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 1 5 4 , srcInfoPoints = [] } "one")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 5 5 8 , srcInfoPoints = [ SrcSpan "tests/examples/EqualityConstraints1.hs" 5 5 5 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 7 5 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EqualityConstraints1.hs" 5 7 5 8 , srcInfoPoints = [] } 1 "1"))) Nothing ] , [ Comment False (SrcSpan "tests/examples/EqualityConstraints1.hs" 1 1 1 63) " https://github.com/haskell-suite/haskell-src-exts/issues/91" ] ) haskell-src-exts-1.23.1/tests/examples/UnboxedSingleton.hs.parser.golden0000644000000000000000000001017213534314633024530 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 1 , SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1 , SrcSpan "tests/examples/UnboxedSingleton.hs" 4 1 4 1 , SrcSpan "tests/examples/UnboxedSingleton.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 13 , SrcSpan "tests/examples/UnboxedSingleton.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 14 1 27 , srcInfoPoints = [] } "UnboxedTuples" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 5 3 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 5 3 6 , srcInfoPoints = [] } "a") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 7 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedSingleton.hs" 3 7 3 8 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 9 3 16 , srcInfoPoints = [ SrcSpan "tests/examples/UnboxedSingleton.hs" 3 9 3 11 , SrcSpan "tests/examples/UnboxedSingleton.hs" 3 14 3 16 ] } Unboxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13 , srcInfoPoints = [] } "a")) ])) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/UnboxedSingleton.hs" 2 1 2 33) " See e.g. GHC.Prim.indexArray#" ] ) haskell-src-exts-1.23.1/tests/examples/DerivingViaStealing.hs.parser.golden0000644000000000000000000001762413534314632025147 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 1 1 1 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 3 1 3 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 4 1 4 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 5 1 5 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 6 1 6 1 , SrcSpan "tests/examples/DerivingViaStealing.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 1 1 1 7 , SrcSpan "tests/examples/DerivingViaStealing.hs" 1 28 1 33 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 1 8 1 27 , srcInfoPoints = [] } "DerivingViaStealing") Nothing Nothing)) [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 1 3 9 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 1 3 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 1 3 4 , srcInfoPoints = [] } "via")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 5 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 3 5 3 6 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 8 , SrcSpan "tests/examples/DerivingViaStealing.hs" 3 8 3 9 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 8 , SrcSpan "tests/examples/DerivingViaStealing.hs" 3 8 3 9 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 3 7 3 8 , SrcSpan "tests/examples/DerivingViaStealing.hs" 3 8 3 9 ] })))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 1 4 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 1 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 1 4 6 , srcInfoPoints = [] } "stock")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 7 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 4 7 4 8 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 10 , SrcSpan "tests/examples/DerivingViaStealing.hs" 4 10 4 11 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 10 , SrcSpan "tests/examples/DerivingViaStealing.hs" 4 10 4 11 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 11 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 4 9 4 10 , SrcSpan "tests/examples/DerivingViaStealing.hs" 4 10 4 11 ] })))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 1 5 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 1 5 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 1 5 9 , srcInfoPoints = [] } "anyclass")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 10 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 5 10 5 11 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 13 , SrcSpan "tests/examples/DerivingViaStealing.hs" 5 13 5 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 13 , SrcSpan "tests/examples/DerivingViaStealing.hs" 5 13 5 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/DerivingViaStealing.hs" 5 12 5 13 , SrcSpan "tests/examples/DerivingViaStealing.hs" 5 13 5 14 ] })))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/ParenFunBind.hs.parser.golden0000644000000000000000000001267013534314633023561 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/ParenFunBind.hs" 1 1 1 1 , SrcSpan "tests/examples/ParenFunBind.hs" 1 1 1 1 , SrcSpan "tests/examples/ParenFunBind.hs" 3 1 3 1 , SrcSpan "tests/examples/ParenFunBind.hs" 4 1 4 1 , SrcSpan "tests/examples/ParenFunBind.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 1 1 1 26 , srcInfoPoints = [ SrcSpan "tests/examples/ParenFunBind.hs" 1 1 1 7 , SrcSpan "tests/examples/ParenFunBind.hs" 1 21 1 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 1 8 1 20 , srcInfoPoints = [] } "ParenFunBind") Nothing Nothing)) [] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 1 3 18 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 1 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/ParenFunBind.hs" 3 1 3 2 , SrcSpan "tests/examples/ParenFunBind.hs" 3 7 3 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 2 3 5 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 6 3 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 6 3 7 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 9 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 9 3 10 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 11 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/ParenFunBind.hs" 3 11 3 12 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 13 3 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 13 3 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 13 3 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 13 3 14 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 15 3 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 15 3 16 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 15 3 16 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 17 3 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 17 3 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParenFunBind.hs" 3 17 3 18 , srcInfoPoints = [] } "y"))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces4.hs.parser.golden0000644000000000000000000001517113534314633025112 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 1 1 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 2 1 2 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 1 3 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 1 3 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 1 5 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 6 1 6 1 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 6 1 6 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 1 3 29 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 1 3 7 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 24 3 29 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 8 3 11 , srcInfoPoints = [] } "Foo") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 12 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 12 3 13 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 22 3 23 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 13 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 13 3 17 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 18 3 22 ] } (TypeNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 13 3 17 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 13 3 17 ] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 18 3 22 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 18 3 19 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 19 3 21 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 21 3 22 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 3 19 3 21 , srcInfoPoints = [] } ":-")) ])))) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 1 1 36 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 1 1 13 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 33 1 36 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 1 14 1 32 , srcInfoPoints = [] } "ExplicitNamespaces" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 2 1 2 31 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 2 1 2 13 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 2 28 2 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 2 14 2 27 , srcInfoPoints = [] } "TypeOperators" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 1 5 16 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 11 5 12 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 1 5 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 6 5 10 , srcInfoPoints = [ SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 6 5 7 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 7 5 9 , SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 9 5 10 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 7 5 9 , srcInfoPoints = [] } ":-")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 13 5 16 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 13 5 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ExplicitNamespaces4.hs" 5 13 5 16 , srcInfoPoints = [] } "Foo") []) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/UnicodeSubscript.hs.parser.golden0000644000000000000000000015040513534314633024532 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 1 1 14 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 1 1 1 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 2 1 2 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 2 1 2 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 4 1 4 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 9 1 9 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 10 1 10 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 14 1 14 1 , SrcSpan "tests/examples/UnicodeSubscript.hs" 14 1 14 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 2 1 2 18 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 2 1 2 7 , SrcSpan "tests/examples/UnicodeSubscript.hs" 2 13 2 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 2 8 2 12 , srcInfoPoints = [] } "Main") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 1 1 1 31 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 1 1 1 13 , SrcSpan "tests/examples/UnicodeSubscript.hs" 1 28 1 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 1 14 1 27 , srcInfoPoints = [] } "UnicodeSyntax" ] ] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 1 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 4 12 4 13 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 1 4 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 6 4 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 6 4 11 , srcInfoPoints = [] } "Point")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 14 7 6 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 5 5 5 6 , SrcSpan "tests/examples/UnicodeSubscript.hs" 6 5 6 6 , SrcSpan "tests/examples/UnicodeSubscript.hs" 7 5 7 6 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 14 7 6 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 5 5 5 6 , SrcSpan "tests/examples/UnicodeSubscript.hs" 6 5 6 6 , SrcSpan "tests/examples/UnicodeSubscript.hs" 7 5 7 6 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 4 14 4 19 , srcInfoPoints = [] } "Point") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 7 5 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 5 13 5 14 , SrcSpan "tests/examples/UnicodeSubscript.hs" 5 22 5 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 7 5 13 , srcInfoPoints = [] } "pointX" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 15 5 21 , srcInfoPoints = [] } "pointY" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 24 5 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 24 5 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 5 24 5 30 , srcInfoPoints = [] } "Double"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 6 7 6 30 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 6 22 6 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 6 7 6 11 , srcInfoPoints = [] } "name" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 6 24 6 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 6 24 6 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 6 24 6 30 , srcInfoPoints = [] } "String"))) ]) ] [ Deriving SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 7 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 7 7 7 15 ] } Nothing [ IParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 16 7 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 7 16 7 17 , SrcSpan "tests/examples/UnicodeSubscript.hs" 7 21 7 22 ] } (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 17 7 21 , srcInfoPoints = [] } Nothing Nothing (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 17 7 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 17 7 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 7 17 7 21 , srcInfoPoints = [] } "Show")))) ] ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 1 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 9 10 9 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 1 9 9 , srcInfoPoints = [] } "distance" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 12 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 9 18 9 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 12 9 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 12 9 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 12 9 17 , srcInfoPoints = [] } "Point"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 20 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 9 26 9 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 20 9 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 20 9 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 20 9 25 , srcInfoPoints = [] } "Point"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 28 9 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 28 9 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 9 28 9 34 , srcInfoPoints = [] } "Double"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 1 13 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 1 13 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 1 10 9 , srcInfoPoints = [] } "distance") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 10 10 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 10 10 11 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 12 10 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 12 10 13 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 10 14 13 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 10 14 10 15 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 5 13 22 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 11 5 11 8 , SrcSpan "tests/examples/UnicodeSubscript.hs" 13 5 13 7 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 9 12 37 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 11 9 11 9 , SrcSpan "tests/examples/UnicodeSubscript.hs" 12 9 12 9 , SrcSpan "tests/examples/UnicodeSubscript.hs" 13 5 13 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 9 11 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 9 11 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 9 11 11 , srcInfoPoints = [] } "t\8321")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 12 11 37 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 11 12 11 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 14 11 37 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 14 11 35 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 11 14 11 15 , SrcSpan "tests/examples/UnicodeSubscript.hs" 11 34 11 35 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 15 11 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 15 11 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 15 11 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 15 11 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 15 11 21 , srcInfoPoints = [] } "pointX"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 22 11 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 22 11 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 22 11 23 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 24 11 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 24 11 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 24 11 25 , srcInfoPoints = [] } "-"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 26 11 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 26 11 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 26 11 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 26 11 32 , srcInfoPoints = [] } "pointX"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 33 11 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 33 11 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 33 11 34 , srcInfoPoints = [] } "y")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 35 11 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 35 11 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 35 11 36 , srcInfoPoints = [] } "^"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 36 11 37 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 11 36 11 37 , srcInfoPoints = [] } 2 "2")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 9 12 37 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 9 12 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 9 12 11 , srcInfoPoints = [] } "t\8322")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 12 12 37 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 12 12 12 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 14 12 37 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 14 12 35 , srcInfoPoints = [ SrcSpan "tests/examples/UnicodeSubscript.hs" 12 14 12 15 , SrcSpan "tests/examples/UnicodeSubscript.hs" 12 34 12 35 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 15 12 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 15 12 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 15 12 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 15 12 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 15 12 21 , srcInfoPoints = [] } "pointY"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 22 12 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 22 12 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 22 12 23 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 24 12 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 24 12 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 24 12 25 , srcInfoPoints = [] } "-"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 26 12 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 26 12 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 26 12 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 26 12 32 , srcInfoPoints = [] } "pointY"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 33 12 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 33 12 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 33 12 34 , srcInfoPoints = [] } "y")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 35 12 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 35 12 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 35 12 36 , srcInfoPoints = [] } "^"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 36 12 37 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 12 36 12 37 , srcInfoPoints = [] } 2 "2")))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 8 13 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 8 13 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 8 13 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 8 13 12 , srcInfoPoints = [] } "sqrt"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 13 13 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 13 13 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 13 13 14 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 15 13 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 15 13 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 15 13 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 15 13 17 , srcInfoPoints = [] } "t\8321"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 18 13 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 18 13 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 18 13 19 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 20 13 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 20 13 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnicodeSubscript.hs" 13 20 13 22 , srcInfoPoints = [] } "t\8322"))))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/t403.hs.parser.golden0000644000000000000000000005325513556712523021750 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 1 1 10 1 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 1 1 1 1 , SrcSpan "tests/examples/t403.hs" 2 1 2 1 , SrcSpan "tests/examples/t403.hs" 3 1 3 1 , SrcSpan "tests/examples/t403.hs" 4 1 4 1 , SrcSpan "tests/examples/t403.hs" 5 1 5 1 , SrcSpan "tests/examples/t403.hs" 6 1 6 1 , SrcSpan "tests/examples/t403.hs" 6 1 6 1 , SrcSpan "tests/examples/t403.hs" 8 1 8 1 , SrcSpan "tests/examples/t403.hs" 9 1 9 1 , SrcSpan "tests/examples/t403.hs" 10 1 10 1 , SrcSpan "tests/examples/t403.hs" 10 1 10 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 6 1 6 18 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 6 1 6 7 , SrcSpan "tests/examples/t403.hs" 6 13 6 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 6 8 6 12 , srcInfoPoints = [] } "T403") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 1 1 1 13 , SrcSpan "tests/examples/t403.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 2 1 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 2 1 2 13 , SrcSpan "tests/examples/t403.hs" 2 25 2 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 2 14 2 24 , srcInfoPoints = [] } "RankNTypes" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 3 1 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 3 1 3 13 , SrcSpan "tests/examples/t403.hs" 3 27 3 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 3 14 3 26 , srcInfoPoints = [] } "ViewPatterns" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 4 1 4 31 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 4 1 4 13 , SrcSpan "tests/examples/t403.hs" 4 28 4 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 4 14 4 27 , srcInfoPoints = [] } "TypeOperators" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 5 1 5 27 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 5 1 5 13 , SrcSpan "tests/examples/t403.hs" 5 24 5 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 5 14 5 23 , srcInfoPoints = [] } "DataKinds" ] ] [] [ PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 1 8 86 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 1 8 8 , SrcSpan "tests/examples/t403.hs" 8 16 8 18 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 9 8 15 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 9 8 10 , SrcSpan "tests/examples/t403.hs" 8 10 8 14 , SrcSpan "tests/examples/t403.hs" 8 14 8 15 ] } ":&&:" ] Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 19 8 24 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 19 8 20 , SrcSpan "tests/examples/t403.hs" 8 20 8 21 , SrcSpan "tests/examples/t403.hs" 8 22 8 24 ] })) (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 32 8 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 32 8 33 , srcInfoPoints = [] } "k") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 35 8 52 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 35 8 36 , SrcSpan "tests/examples/t403.hs" 8 48 8 49 , SrcSpan "tests/examples/t403.hs" 8 50 8 52 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 35 8 52 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 35 8 36 , SrcSpan "tests/examples/t403.hs" 8 48 8 49 , SrcSpan "tests/examples/t403.hs" 8 50 8 52 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 36 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 45 8 46 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 36 8 48 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 45 8 46 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 36 8 44 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 36 8 37 , SrcSpan "tests/examples/t403.hs" 8 43 8 44 ] } (TyInfix SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 37 8 43 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 37 8 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 37 8 38 , srcInfoPoints = [] } "k")) (UnpromotedName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 39 8 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 39 8 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 39 8 41 , srcInfoPoints = [] } ":+"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 42 8 43 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 42 8 43 , srcInfoPoints = [] } 1 "1")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 47 8 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 47 8 48 , srcInfoPoints = [] } "n"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 53 8 86 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 55 8 57 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 53 8 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 53 8 54 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 86 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 8 71 8 73 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 70 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 68 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 58 8 66 , srcInfoPoints = [] } "HoHeList"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 67 8 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 67 8 68 , srcInfoPoints = [] } "k"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 69 8 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 69 8 70 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 74 8 86 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 74 8 84 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 74 8 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 74 8 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 74 8 82 , srcInfoPoints = [] } "HoHeList"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 83 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 83 8 84 , srcInfoPoints = [] } "n"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 85 8 86 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 8 85 8 86 , srcInfoPoints = [] } "a"))))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 1 9 62 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 1 9 8 , SrcSpan "tests/examples/t403.hs" 9 23 9 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 9 9 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 9 9 15 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 9 9 10 , SrcSpan "tests/examples/t403.hs" 9 10 9 14 , SrcSpan "tests/examples/t403.hs" 9 14 9 15 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 9 9 15 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 9 9 10 , SrcSpan "tests/examples/t403.hs" 9 10 9 14 , SrcSpan "tests/examples/t403.hs" 9 14 9 15 ] } ":&&:")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 16 9 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 16 9 17 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 18 9 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 18 9 22 , srcInfoPoints = [] } "rest") ]) (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 26 9 62 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 26 9 27 , SrcSpan "tests/examples/t403.hs" 9 61 9 62 ] } (PViewPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 27 9 61 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 37 9 39 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 27 9 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 27 9 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 27 9 36 , srcInfoPoints = [] } "matchNext"))) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 40 9 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 40 9 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 40 9 45 , srcInfoPoints = [] } "Right")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 46 9 61 , srcInfoPoints = [ SrcSpan "tests/examples/t403.hs" 9 46 9 47 , SrcSpan "tests/examples/t403.hs" 9 48 9 49 , SrcSpan "tests/examples/t403.hs" 9 54 9 55 , SrcSpan "tests/examples/t403.hs" 9 60 9 61 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 47 9 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 47 9 48 , srcInfoPoints = [] } "x") , PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 50 9 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 50 9 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 50 9 54 , srcInfoPoints = [] } "Refl")) [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 56 9 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/t403.hs" 9 56 9 60 , srcInfoPoints = [] } "rest") ] ]))) Unidirectional ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSynonyms.hs.parser.golden0000644000000000000000000005114613534314633024444 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 1 1 17 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 3 1 3 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 5 1 5 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 7 1 7 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 9 1 9 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 11 1 11 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 13 1 13 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 15 1 15 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 17 1 17 1 , SrcSpan "tests/examples/PatternSynonyms.hs" 17 1 17 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSynonyms.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 1 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 3 1 3 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 3 11 3 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 9 3 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 9 3 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 9 3 10 , srcInfoPoints = [] } "A")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 13 3 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 13 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 3 13 3 20 , srcInfoPoints = [] } "Nothing")) []) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 1 5 21 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 5 1 5 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 5 13 5 14 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 9 5 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 9 5 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 9 5 10 , srcInfoPoints = [] } "B")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 11 5 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 11 5 12 , srcInfoPoints = [] } "a") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 15 5 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 15 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 15 5 19 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 20 5 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 5 20 5 21 , srcInfoPoints = [] } "a") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 1 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 7 1 7 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 7 17 7 18 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 9 7 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 9 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 9 7 10 , srcInfoPoints = [] } "a")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 11 7 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 11 7 14 , srcInfoPoints = [] } ":+:")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 15 7 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 15 7 16 , srcInfoPoints = [] } "b"))) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 19 7 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 7 19 7 20 , SrcSpan "tests/examples/PatternSynonyms.hs" 7 21 7 22 , SrcSpan "tests/examples/PatternSynonyms.hs" 7 23 7 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 20 7 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 20 7 21 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 22 7 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 7 22 7 23 , srcInfoPoints = [] } "b") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 1 9 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 9 1 9 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 9 19 9 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 9 9 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 9 9 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 9 9 14 , srcInfoPoints = [] } "Tuple")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 15 9 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 15 9 16 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 17 9 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 17 9 18 , srcInfoPoints = [] } "b") ]) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 21 9 26 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 9 21 9 22 , SrcSpan "tests/examples/PatternSynonyms.hs" 9 23 9 24 , SrcSpan "tests/examples/PatternSynonyms.hs" 9 25 9 26 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 22 9 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 22 9 23 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 24 9 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 9 24 9 25 , srcInfoPoints = [] } "b") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 1 11 23 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 11 1 11 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 11 14 11 15 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 12 11 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 12 11 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 12 11 13 , srcInfoPoints = [] } "A")) []) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 16 11 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 16 11 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 11 16 11 23 , srcInfoPoints = [] } "Nothing")) []) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 1 13 24 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 13 1 13 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 13 16 13 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 9 13 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 9 13 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 9 13 10 , srcInfoPoints = [] } "B")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 11 13 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 11 13 12 , srcInfoPoints = [] } "a") ]) (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 18 13 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 18 13 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 18 13 22 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 23 13 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 13 23 13 24 , srcInfoPoints = [] } "a") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 1 15 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 15 1 15 8 , SrcSpan "tests/examples/PatternSynonyms.hs" 15 17 15 18 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 9 15 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 9 15 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 9 15 10 , srcInfoPoints = [] } "a")) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 11 15 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 11 15 14 , srcInfoPoints = [] } ":+:")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 15 15 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 15 15 16 , srcInfoPoints = [] } "b"))) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 23 15 28 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonyms.hs" 15 23 15 24 , SrcSpan "tests/examples/PatternSynonyms.hs" 15 25 15 26 , SrcSpan "tests/examples/PatternSynonyms.hs" 15 27 15 28 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 24 15 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 24 15 25 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 26 15 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonyms.hs" 15 26 15 27 , srcInfoPoints = [] } "b") ]) ImplicitBidirectional ] , [] ) haskell-src-exts-1.23.1/tests/examples/BangPatterns.hs.parser.golden0000644000000000000000000011632713534314632023641 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 1 , SrcSpan "tests/examples/BangPatterns.hs" 5 1 5 1 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 1 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 7 , SrcSpan "tests/examples/BangPatterns.hs" 2 21 2 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 2 8 2 20 , srcInfoPoints = [] } "BangPatterns") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 13 , SrcSpan "tests/examples/BangPatterns.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 14 1 26 , srcInfoPoints = [] } "BangPatterns" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 15 4 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 14 , srcInfoPoints = [] } "firstnonspace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 28 4 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 35 4 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 42 4 44 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } "Int"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 8 84 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 5 14 , srcInfoPoints = [] } "firstnonspace") [ PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 15 5 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 16 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 16 5 19 , srcInfoPoints = [] } "ptr")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 20 5 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 21 5 22 , srcInfoPoints = [] } "n")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 23 5 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 24 5 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 24 5 25 , srcInfoPoints = [] } "m")) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 5 8 84 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 5 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 6 5 6 6 , SrcSpan "tests/examples/BangPatterns.hs" 6 17 6 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } ">="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } "m")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } "n")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 5 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 5 7 6 , SrcSpan "tests/examples/BangPatterns.hs" 7 17 7 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 19 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 19 7 21 , SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 22 , SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 22 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 44 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 24 7 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 23 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } "n")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 24 , SrcSpan "tests/examples/BangPatterns.hs" 8 40 8 44 , SrcSpan "tests/examples/BangPatterns.hs" 8 71 8 75 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 24 , SrcSpan "tests/examples/BangPatterns.hs" 8 40 8 44 , SrcSpan "tests/examples/BangPatterns.hs" 8 71 8 75 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } "isSpaceWord8"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } "w")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } "firstnonspace"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } "ptr")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 63 8 68 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 63 8 64 , SrcSpan "tests/examples/BangPatterns.hs" 8 67 8 68 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 66 8 67 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 66 8 67 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } "m")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 84 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } "n"))))) ]) ]) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/Overlapable.hs.parser.golden0000644000000000000000000001506213534314633023500 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapable.hs" 1 1 1 1 , SrcSpan "tests/examples/Overlapable.hs" 1 1 1 1 , SrcSpan "tests/examples/Overlapable.hs" 1 1 1 1 , SrcSpan "tests/examples/Overlapable.hs" 3 1 3 1 , SrcSpan "tests/examples/Overlapable.hs" 5 1 5 1 , SrcSpan "tests/examples/Overlapable.hs" 7 1 7 1 , SrcSpan "tests/examples/Overlapable.hs" 7 1 7 1 ] } Nothing [] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapable.hs" 1 1 1 9 ] } (Just (Overlap SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 10 1 21 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 26 1 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 26 1 29 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 26 1 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 26 1 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 26 1 27 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 28 1 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 1 28 1 29 , srcInfoPoints = [] } "a")))) Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 1 3 32 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapable.hs" 3 1 3 9 ] } (Just (NoOverlap SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 10 3 24 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 29 3 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 29 3 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 29 3 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 29 3 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 29 3 30 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 31 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 3 31 3 32 , srcInfoPoints = [] } "a")))) Nothing , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 1 5 32 , srcInfoPoints = [ SrcSpan "tests/examples/Overlapable.hs" 5 1 5 9 ] } (Just (Incoherent SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 10 5 24 , srcInfoPoints = [] })) (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 29 5 32 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 29 5 32 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 29 5 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 29 5 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 29 5 30 , srcInfoPoints = [] } "C"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 31 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/Overlapable.hs" 5 31 5 32 , srcInfoPoints = [] } "a")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/PatternSynonymSignatures.hs.parser.golden0000644000000000000000000006244613556712523026337 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 1 16 1 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 1 1 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 1 4 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 1 4 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 1 4 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 1 6 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 1 8 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 1 10 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 1 12 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 1 14 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 16 1 16 1 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 16 1 16 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 1 1 13 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 1 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 1 4 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 13 4 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 9 4 12 , srcInfoPoints = [] } "Syn" ] Nothing Nothing Nothing Nothing (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 16 4 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 16 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 4 16 4 19 , srcInfoPoints = [] } "Typ"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 1 6 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 1 6 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 13 6 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 9 6 12 , srcInfoPoints = [] } "Syn" ] Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 16 6 21 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 16 6 17 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 17 6 18 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 19 6 21 ] })) Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 22 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 22 6 23 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 23 6 24 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 25 6 27 ] })) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 28 6 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 28 6 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 6 28 6 31 , srcInfoPoints = [] } "Typ"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 1 8 39 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 1 8 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 13 8 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 9 8 12 , srcInfoPoints = [] } "Syn" ] Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 23 8 25 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 23 8 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 23 8 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 23 8 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 16 8 20 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 21 8 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 21 8 22 , srcInfoPoints = [] } "a")))))) Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 33 8 35 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 33 8 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 33 8 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 33 8 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 26 8 30 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 31 8 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 31 8 32 , srcInfoPoints = [] } "b")))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 36 8 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 36 8 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 8 36 8 39 , srcInfoPoints = [] } "Typ"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 1 10 29 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 1 10 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 13 10 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 9 10 12 , srcInfoPoints = [] } "Syn" ] Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 23 10 25 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 23 10 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 23 10 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 23 10 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 16 10 20 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 21 10 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 21 10 22 , srcInfoPoints = [] } "b")))))) Nothing Nothing (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 26 10 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 26 10 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 10 26 10 29 , srcInfoPoints = [] } "Typ"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 1 12 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 1 12 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 13 12 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 9 12 12 , srcInfoPoints = [] } "Syn" ] Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 23 12 25 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 23 12 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 23 12 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 25 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 23 12 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 16 12 20 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 21 12 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 21 12 22 , srcInfoPoints = [] } "b")))))) Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 26 12 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 26 12 27 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 27 12 28 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 29 12 31 ] })) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 32 12 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 32 12 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 12 32 12 35 , srcInfoPoints = [] } "Typ"))) , PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 1 14 35 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 1 14 8 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 13 14 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 9 14 12 , srcInfoPoints = [] } "Syn" ] Nothing (Just (CxEmpty SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 16 14 21 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 16 14 17 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 17 14 18 , SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 19 14 21 ] })) Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 29 14 31 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 29 14 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 29 14 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 31 , srcInfoPoints = [ SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 29 14 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 22 14 26 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 27 14 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 27 14 28 , srcInfoPoints = [] } "b")))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 32 14 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 32 14 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PatternSynonymSignatures.hs" 14 32 14 35 , srcInfoPoints = [] } "Typ"))) ] , [] ) haskell-src-exts-1.23.1/tests/examples/FixityTests.hs.parser.golden0000644000000000000000000004201113534314633023535 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/FixityTests.hs" 1 1 1 1 , SrcSpan "tests/examples/FixityTests.hs" 1 1 1 1 , SrcSpan "tests/examples/FixityTests.hs" 1 1 1 1 , SrcSpan "tests/examples/FixityTests.hs" 4 1 4 1 , SrcSpan "tests/examples/FixityTests.hs" 4 1 4 1 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 1 3 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 1 1 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 1 1 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 6 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/FixityTests.hs" 1 6 1 7 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 8 3 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 8 1 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 8 1 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 8 1 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 8 1 13 , srcInfoPoints = [] } "forM_"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 14 1 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 14 1 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 14 1 24 , srcInfoPoints = [] } "cmdReports")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 25 1 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 25 1 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 25 1 26 , srcInfoPoints = [] } "$"))) (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 27 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/FixityTests.hs" 1 27 1 28 , SrcSpan "tests/examples/FixityTests.hs" 1 30 1 32 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 28 1 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 28 1 29 , srcInfoPoints = [] } "x") ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 1 33 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/FixityTests.hs" 1 33 1 35 , SrcSpan "tests/examples/FixityTests.hs" 2 16 2 16 , SrcSpan "tests/examples/FixityTests.hs" 3 16 3 16 , SrcSpan "tests/examples/FixityTests.hs" 4 1 4 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 16 2 62 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 16 2 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 16 2 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 16 2 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 16 2 24 , srcInfoPoints = [] } "putStrLn"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 25 2 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 25 2 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 25 2 26 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 27 2 62 , srcInfoPoints = [] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 27 2 47 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 27 2 47 , srcInfoPoints = [] } "Writing report to " "Writing report to ")) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 48 2 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 48 2 50 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 48 2 50 , srcInfoPoints = [] } "++"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 51 2 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 51 2 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 51 2 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 51 2 52 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 53 2 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 53 2 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 53 2 55 , srcInfoPoints = [] } "++"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 56 2 62 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 2 56 2 62 , srcInfoPoints = [] } " ..." " ..."))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 16 3 27 , srcInfoPoints = [] } "writeReport"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 28 3 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 28 3 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 28 3 29 , srcInfoPoints = [] } "x")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 30 3 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 30 3 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/FixityTests.hs" 3 30 3 35 , srcInfoPoints = [] } "ideas")))) ])))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/T11727.hs.parser.golden0000644000000000000000000001405013534314633022045 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 1 1 1 1 , SrcSpan "tests/examples/T11727.hs" 3 1 3 1 , SrcSpan "tests/examples/T11727.hs" 3 1 3 1 , SrcSpan "tests/examples/T11727.hs" 5 1 5 1 , SrcSpan "tests/examples/T11727.hs" 6 1 6 1 , SrcSpan "tests/examples/T11727.hs" 7 1 7 1 , SrcSpan "tests/examples/T11727.hs" 9 1 9 1 , SrcSpan "tests/examples/T11727.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 3 1 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 3 1 3 7 , SrcSpan "tests/examples/T11727.hs" 3 15 3 20 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 3 8 3 14 , srcInfoPoints = [] } "T11727") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 1 1 1 13 , SrcSpan "tests/examples/T11727.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatSynSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 1 5 19 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 5 1 5 8 , SrcSpan "tests/examples/T11727.hs" 5 10 5 11 , SrcSpan "tests/examples/T11727.hs" 5 13 5 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 9 5 10 , srcInfoPoints = [] } "A" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 11 5 12 , srcInfoPoints = [] } "B" ] Nothing Nothing Nothing Nothing (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 16 5 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 16 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 5 16 5 19 , srcInfoPoints = [] } "Int"))) , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 1 6 14 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 6 1 6 8 , SrcSpan "tests/examples/T11727.hs" 6 11 6 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 9 6 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 9 6 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 9 6 10 , srcInfoPoints = [] } "A")) []) (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 13 6 14 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 13 6 14 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 6 13 6 14 , srcInfoPoints = [] } 5 "5")) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 1 7 14 , srcInfoPoints = [ SrcSpan "tests/examples/T11727.hs" 7 1 7 8 , SrcSpan "tests/examples/T11727.hs" 7 11 7 12 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 9 7 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 9 7 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 9 7 10 , srcInfoPoints = [] } "B")) []) (PLit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 13 7 14 , srcInfoPoints = [] } (Signless SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 13 7 14 , srcInfoPoints = [] }) (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/T11727.hs" 7 13 7 14 , srcInfoPoints = [] } 5 "5")) ImplicitBidirectional ] , [] ) haskell-src-exts-1.23.1/tests/examples/TypeEqualityParen.hs.parser.golden0000644000000000000000000002566013556712523024702 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 1 1 1 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 1 2 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 1 2 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 1 2 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 3 1 3 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 4 1 4 1 , SrcSpan "tests/examples/TypeEqualityParen.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 1 1 1 13 , SrcSpan "tests/examples/TypeEqualityParen.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 1 14 1 26 , srcInfoPoints = [] } "TypeFamilies" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 1 2 37 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 3 2 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 1 2 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 6 2 37 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 6 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 6 2 7 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 12 2 13 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 24 2 25 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 26 2 28 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 8 2 12 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 8 2 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 8 2 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 8 2 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 8 2 10 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 11 2 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 11 2 12 , srcInfoPoints = [] } "a"))) , ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 14 2 23 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 14 2 15 , SrcSpan "tests/examples/TypeEqualityParen.hs" 2 22 2 23 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 15 2 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 17 2 18 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 15 2 22 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 17 2 18 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 15 2 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 15 2 16 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 19 2 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 19 2 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 19 2 22 , srcInfoPoints = [] } "Int"))))) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 29 2 37 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 2 31 2 33 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 29 2 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 29 2 30 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 34 2 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 34 2 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 2 34 2 37 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 1 3 8 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 1 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 1 3 2 , srcInfoPoints = [] } "f") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 3 3 4 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 5 3 8 , srcInfoPoints = [ SrcSpan "tests/examples/TypeEqualityParen.hs" 3 5 3 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 7 3 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TypeEqualityParen.hs" 3 7 3 8 , srcInfoPoints = [] } 3 "3"))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/ParallelArrays.hs.parser.golden0000644000000000000000000004245113534314633024164 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 1 1 1 1 , SrcSpan "tests/examples/ParallelArrays.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelArrays.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelArrays.hs" 3 1 3 1 , SrcSpan "tests/examples/ParallelArrays.hs" 4 1 4 1 , SrcSpan "tests/examples/ParallelArrays.hs" 7 1 7 1 , SrcSpan "tests/examples/ParallelArrays.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 1 1 1 32 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 1 1 1 13 , SrcSpan "tests/examples/ParallelArrays.hs" 1 29 1 32 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 1 14 1 28 , srcInfoPoints = [] } "ParallelArrays" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 1 3 50 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 3 13 3 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 1 3 12 , srcInfoPoints = [] } "dotp_double" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 16 3 50 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 3 27 3 29 ] } (TyParArray SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 16 3 26 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 3 16 3 18 , SrcSpan "tests/examples/ParallelArrays.hs" 3 24 3 26 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 18 3 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 18 3 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 18 3 24 , srcInfoPoints = [] } "Double")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 30 3 50 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 3 41 3 43 ] } (TyParArray SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 30 3 40 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 3 30 3 32 , SrcSpan "tests/examples/ParallelArrays.hs" 3 38 3 40 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 32 3 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 32 3 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 32 3 38 , srcInfoPoints = [] } "Double")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 44 3 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 44 3 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 3 44 3 50 , srcInfoPoints = [] } "Double"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 1 4 55 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 1 4 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 1 4 12 , srcInfoPoints = [] } "dotp_double") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 13 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 13 4 15 , srcInfoPoints = [] } "xs") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 16 4 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 16 4 18 , srcInfoPoints = [] } "ys") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 19 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 19 4 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 21 4 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 21 4 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 21 4 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 21 4 25 , srcInfoPoints = [] } "sumP"))) (ParArrayComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 26 4 55 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 26 4 28 , SrcSpan "tests/examples/ParallelArrays.hs" 4 34 4 35 , SrcSpan "tests/examples/ParallelArrays.hs" 4 44 4 45 , SrcSpan "tests/examples/ParallelArrays.hs" 4 53 4 55 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 28 4 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 28 4 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 28 4 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 28 4 29 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 30 4 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 30 4 31 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 30 4 31 , srcInfoPoints = [] } "*"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 32 4 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 32 4 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 32 4 33 , srcInfoPoints = [] } "y")))) [ [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 36 4 43 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 38 4 40 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 36 4 43 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 38 4 40 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 36 4 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 36 4 37 , srcInfoPoints = [] } "x")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 41 4 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 41 4 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 41 4 43 , srcInfoPoints = [] } "xs")))) ] , [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 46 4 53 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 48 4 50 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 46 4 53 , srcInfoPoints = [ SrcSpan "tests/examples/ParallelArrays.hs" 4 48 4 50 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 46 4 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 46 4 47 , srcInfoPoints = [] } "y")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 51 4 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 51 4 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/ParallelArrays.hs" 4 51 4 53 , srcInfoPoints = [] } "ys")))) ] ]))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RecordInfixSelector.hs.parser.golden0000644000000000000000000002343113534314633025160 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 1 1 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 1 1 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 1 1 , SrcSpan "tests/examples/RecordInfixSelector.hs" 3 1 3 1 , SrcSpan "tests/examples/RecordInfixSelector.hs" 4 1 4 1 , SrcSpan "tests/examples/RecordInfixSelector.hs" 4 1 4 1 ] } Nothing [] [] [ DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 30 1 31 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 1 1 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 6 1 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 6 1 29 , srcInfoPoints = [] } "RecordWithInfixSelector")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 32 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 37 1 38 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 58 1 59 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 32 1 59 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 37 1 38 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 58 1 59 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 32 1 36 , srcInfoPoints = [] } "Cons") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 39 1 57 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 44 1 46 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 39 1 43 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 39 1 40 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 40 1 42 , SrcSpan "tests/examples/RecordInfixSelector.hs" 1 42 1 43 ] } "<>" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 47 1 57 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 1 51 1 53 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 47 1 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 47 1 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 47 1 50 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 54 1 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 54 1 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 1 54 1 57 , srcInfoPoints = [] } "Int")))) ]) ] [] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 1 3 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 1 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 1 3 9 , srcInfoPoints = [] } "idRecord")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 10 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 3 10 3 11 ] } (RecConstr SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 12 3 30 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 3 17 3 18 , SrcSpan "tests/examples/RecordInfixSelector.hs" 3 29 3 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 12 3 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 12 3 16 , srcInfoPoints = [] } "Cons")) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 19 3 28 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 3 24 3 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 19 3 23 , srcInfoPoints = [ SrcSpan "tests/examples/RecordInfixSelector.hs" 3 19 3 20 , SrcSpan "tests/examples/RecordInfixSelector.hs" 3 20 3 22 , SrcSpan "tests/examples/RecordInfixSelector.hs" 3 22 3 23 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 20 3 22 , srcInfoPoints = [] } "<>")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 26 3 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 26 3 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordInfixSelector.hs" 3 26 3 28 , srcInfoPoints = [] } "id"))) ])) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/RecordPatternSynonyms.hs.parser.golden0000644000000000000000000006707113534314633025607 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 1 17 1 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 1 1 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 1 2 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 1 2 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 1 4 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 1 6 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 1 8 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 1 12 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 1 13 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 1 15 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 1 16 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 17 1 17 1 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 17 1 17 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 1 2 27 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 1 2 7 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 22 2 27 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 2 8 2 21 , srcInfoPoints = [] } "ShouldCompile") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 1 1 33 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 1 1 13 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 30 1 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 1 14 1 29 , srcInfoPoints = [] } "PatternSynonyms" ] ] [] [ PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 1 4 24 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 1 4 8 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 19 4 20 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 9 4 18 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 15 4 16 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 17 4 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 9 4 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 9 4 15 , srcInfoPoints = [] } "Single")) [ PFieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 16 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 16 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 16 4 17 , srcInfoPoints = [] } "x")) ]) (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 21 4 24 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 21 4 22 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 23 4 24 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 22 4 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 4 22 4 23 , srcInfoPoints = [] } "x") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 1 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 1 6 8 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 21 6 22 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 9 6 20 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 15 6 16 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 17 6 18 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 19 6 20 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 9 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 9 6 15 , srcInfoPoints = [] } "Double")) [ PFieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 16 6 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 16 6 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 16 6 17 , srcInfoPoints = [] } "y")) , PFieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 18 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 18 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 18 6 19 , srcInfoPoints = [] } "z")) ]) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 23 6 28 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 23 6 24 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 25 6 26 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 27 6 28 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 24 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 24 6 25 , srcInfoPoints = [] } "y") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 26 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 6 26 6 27 , srcInfoPoints = [] } "z") ]) ImplicitBidirectional , PatSyn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 1 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 1 8 8 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 17 8 19 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 9 8 16 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 13 8 14 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 15 8 16 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 9 8 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 9 8 13 , srcInfoPoints = [] } "More")) [ PFieldPun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 14 8 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 14 8 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 14 8 15 , srcInfoPoints = [] } "x")) ]) (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 20 8 25 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 20 8 21 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 22 8 23 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 24 8 25 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 21 8 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 21 8 22 , srcInfoPoints = [] } "x") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 23 8 24 , srcInfoPoints = [] } ]) (ExplicitBidirectional SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 26 12 0 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 8 26 8 31 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 3 9 3 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 1 12 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 3 9 24 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 3 9 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 3 9 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 3 9 7 , srcInfoPoints = [] } "More")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 8 9 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 8 9 9 , srcInfoPoints = [] } "x") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 10 9 24 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 10 9 11 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 12 9 24 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 12 9 13 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 14 9 15 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 23 9 24 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 13 9 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 13 9 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 13 9 14 , srcInfoPoints = [] } "x")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 16 9 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 16 9 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 9 16 9 23 , srcInfoPoints = [] } "Nothing")) ])) Nothing ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 1 12 16 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 10 12 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 1 12 9 , srcInfoPoints = [] } "selector" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 13 12 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 13 12 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 12 13 12 16 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 1 13 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 1 13 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 1 13 9 , srcInfoPoints = [] } "selector")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 10 13 17 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 10 13 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 12 13 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 12 13 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 12 13 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 12 13 13 , srcInfoPoints = [] } "x"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 14 13 17 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 14 13 15 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 16 13 17 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 15 13 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 13 15 13 16 , srcInfoPoints = [] } 5 "5") ]))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 1 15 19 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 8 15 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 1 15 7 , srcInfoPoints = [] } "update" ] (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 11 15 19 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 11 15 12 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 18 15 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 12 15 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 12 15 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 15 12 15 18 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 1 16 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 1 16 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 1 16 7 , srcInfoPoints = [] } "update")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 8 16 38 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 8 16 9 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 10 16 38 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 21 16 22 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 37 16 38 ] } (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 10 16 20 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 10 16 11 , SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 19 16 20 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 11 16 19 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 11 16 19 , srcInfoPoints = [] } "String" "String") ]) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 23 16 36 , srcInfoPoints = [ SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 25 16 26 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 23 16 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 23 16 24 , srcInfoPoints = [] } "x")) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 27 16 36 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RecordPatternSynonyms.hs" 16 27 16 36 , srcInfoPoints = [] } "updated" "updated")) ])) Nothing ] , [ Comment False (SrcSpan "tests/examples/RecordPatternSynonyms.hs" 11 1 11 12) " Selector" ] ) haskell-src-exts-1.23.1/tests/examples/GadtRecordFields.hs.parser.golden0000644000000000000000000002057213534314633024413 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 1 1 1 1 , SrcSpan "tests/examples/GadtRecordFields.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtRecordFields.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtRecordFields.hs" 3 1 3 1 , SrcSpan "tests/examples/GadtRecordFields.hs" 6 1 6 1 , SrcSpan "tests/examples/GadtRecordFields.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 1 1 1 23 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 1 1 1 13 , SrcSpan "tests/examples/GadtRecordFields.hs" 1 20 1 23 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" ] ] [] [ GDataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 3 1 6 0 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 3 9 3 14 , SrcSpan "tests/examples/GadtRecordFields.hs" 4 3 4 3 , SrcSpan "tests/examples/GadtRecordFields.hs" 5 3 5 3 , SrcSpan "tests/examples/GadtRecordFields.hs" 6 1 6 0 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 3 1 3 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 3 6 3 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 3 6 3 8 , srcInfoPoints = [] } "Ty")) Nothing [ GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 3 4 50 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 4 8 4 10 , SrcSpan "tests/examples/GadtRecordFields.hs" 4 11 4 12 , SrcSpan "tests/examples/GadtRecordFields.hs" 4 43 4 44 , SrcSpan "tests/examples/GadtRecordFields.hs" 4 45 4 47 , SrcSpan "tests/examples/GadtRecordFields.hs" 4 26 4 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 3 4 7 , srcInfoPoints = [] } "TCon") Nothing Nothing (Just [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 13 4 26 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 4 20 4 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 13 4 19 , srcInfoPoints = [] } "field1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 23 4 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 23 4 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 23 4 26 , srcInfoPoints = [] } "Int"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 28 4 42 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 4 35 4 37 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 28 4 34 , srcInfoPoints = [] } "field2" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 38 4 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 38 4 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 38 4 42 , srcInfoPoints = [] } "Bool"))) ]) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 48 4 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 48 4 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 4 48 4 50 , srcInfoPoints = [] } "Ty"))) , GadtDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 5 3 5 14 , srcInfoPoints = [ SrcSpan "tests/examples/GadtRecordFields.hs" 5 9 5 11 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 5 3 5 8 , srcInfoPoints = [] } "TCon2") Nothing Nothing Nothing (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 5 12 5 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 5 12 5 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/GadtRecordFields.hs" 5 12 5 14 , srcInfoPoints = [] } "Ty"))) ] [] ] , [] ) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteUnit.hs.parser.golden0000644000000000000000000001300113534314633024173 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 1 6 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 2 1 2 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 6 1 6 1 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 6 1 6 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 2 1 2 33 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 2 1 2 13 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 2 30 2 33 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 2 14 2 29 , srcInfoPoints = [] } "TemplateHaskell" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 1 4 7 , srcInfoPoints = [] } "unNest") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 8 4 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 8 4 9 , srcInfoPoints = [] } "n") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 10 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 10 4 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 12 4 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 12 4 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 12 4 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 12 4 16 , srcInfoPoints = [] } "conP"))) (VarQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 17 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 17 4 18 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 18 4 19 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 19 4 20 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 18 4 19 , SrcSpan "tests/examples/QuasiQuoteUnit.hs" 4 19 4 20 ] }))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/TrailingWhere3.hs.parser.golden0000644000000000000000000001745013534314633024076 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 4 0 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 1 1 , SrcSpan "tests/examples/TrailingWhere3.hs" 4 1 4 0 ] } Nothing [] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 3 31 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 1 10 1 15 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 1 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 1 1 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 6 1 9 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 1 6 1 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 8 1 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 8 1 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 1 8 1 9 , srcInfoPoints = [] } "f")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 5 3 31 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 2 5 2 5 , SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 5 , SrcSpan "tests/examples/TrailingWhere3.hs" 4 1 4 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 5 3 5 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 2 11 2 16 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 5 2 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 5 2 6 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 7 2 10 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 2 7 2 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 9 2 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 9 2 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 2 9 2 10 , srcInfoPoints = [] } "g")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 0 3 5 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 5 , SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 5 , SrcSpan "tests/examples/TrailingWhere3.hs" 3 0 3 0 ] } [])) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 5 3 6 , srcInfoPoints = [] } "g")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 7 3 31 , srcInfoPoints = [ SrcSpan "tests/examples/TrailingWhere3.hs" 3 7 3 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 9 3 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 9 3 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 9 3 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 9 3 17 , srcInfoPoints = [] } "putStrLn"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 18 3 31 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/TrailingWhere3.hs" 3 18 3 31 , srcInfoPoints = [] } "hello world" "hello world")))) Nothing ])) ] , [] ) haskell-src-exts-1.23.1/tests/examples/OverloadedLabels.hs.parser.golden0000644000000000000000000011545013556712523024461 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 3 1 30 1 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 3 1 3 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 11 1 11 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 11 1 11 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 11 1 11 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 13 1 13 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 16 1 16 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 19 1 19 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 20 1 20 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 22 1 22 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 24 1 24 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 25 1 25 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 27 1 27 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 30 1 30 1 , SrcSpan "tests/examples/OverloadedLabels.hs" 30 1 30 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 3 1 9 6 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 3 1 3 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 4 12 4 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 5 12 5 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 6 12 6 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 7 12 7 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 8 12 8 13 , SrcSpan "tests/examples/OverloadedLabels.hs" 9 3 9 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 3 14 3 30 , srcInfoPoints = [] } "OverloadedLabels" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 4 14 4 23 , srcInfoPoints = [] } "DataKinds" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 5 14 5 30 , srcInfoPoints = [] } "FlexibleContexts" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 6 14 6 31 , srcInfoPoints = [] } "FlexibleInstances" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 7 14 7 35 , srcInfoPoints = [] } "MultiParamTypeClasses" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 8 14 8 39 , srcInfoPoints = [] } "NoMonomorphismRestriction" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 11 1 11 28 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 11 1 11 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 11 8 11 28 , srcInfoPoints = [] } "GHC.OverloadedLabels" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 1 16 0 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 13 1 13 9 , SrcSpan "tests/examples/OverloadedLabels.hs" 13 30 13 35 , SrcSpan "tests/examples/OverloadedLabels.hs" 14 3 14 3 , SrcSpan "tests/examples/OverloadedLabels.hs" 16 1 16 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 29 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 29 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 24 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 10 13 17 , srcInfoPoints = [] } "IsLabel"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 18 13 24 , srcInfoPoints = [] } (PromotedString SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 18 13 24 , srcInfoPoints = [] } "true" "true"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 25 13 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 25 13 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 13 25 13 29 , srcInfoPoints = [] } "Bool"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 3 14 21 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 3 14 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 3 14 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 3 14 12 , srcInfoPoints = [] } "fromLabel") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 13 14 14 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 15 14 21 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 14 15 14 16 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 17 14 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 17 14 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 14 17 14 21 , srcInfoPoints = [] } "True")))) Nothing ]) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 1 19 0 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 16 1 16 9 , SrcSpan "tests/examples/OverloadedLabels.hs" 16 34 16 39 , SrcSpan "tests/examples/OverloadedLabels.hs" 17 3 17 3 , SrcSpan "tests/examples/OverloadedLabels.hs" 19 1 19 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 33 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 33 , srcInfoPoints = [] } (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 28 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 10 16 17 , srcInfoPoints = [] } "IsLabel"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 18 16 28 , srcInfoPoints = [] } (PromotedString SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 18 16 28 , srcInfoPoints = [] } "_False1'" "_False1'"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 29 16 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 29 16 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 16 29 16 33 , srcInfoPoints = [] } "Bool"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 3 17 22 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 3 17 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 3 17 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 3 17 12 , srcInfoPoints = [] } "fromLabel") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 13 17 14 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 15 17 22 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 17 15 17 16 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 17 17 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 17 17 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 17 17 17 22 , srcInfoPoints = [] } "False")))) Nothing ]) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 1 19 27 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 3 19 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 1 19 2 , srcInfoPoints = [] } "a" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 27 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 23 19 25 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 23 19 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 23 19 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 23 19 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 19 23 19 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 6 19 13 , srcInfoPoints = [] } "IsLabel"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 14 19 20 , srcInfoPoints = [] } (PromotedString SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 14 19 20 , srcInfoPoints = [] } "true" "true"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 21 19 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 21 19 22 , srcInfoPoints = [] } "t")))))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 26 19 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 19 26 19 27 , srcInfoPoints = [] } "t"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 20 1 20 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 20 1 20 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 20 1 20 2 , srcInfoPoints = [] } "a")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 20 3 20 10 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 20 3 20 4 ] } (OverloadedLabel SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 20 5 20 10 , srcInfoPoints = [] } "true")) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 22 1 22 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 22 1 22 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 22 1 22 2 , srcInfoPoints = [] } "b")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 22 3 22 14 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 22 3 22 4 ] } (OverloadedLabel SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 22 5 22 14 , srcInfoPoints = [] } "_False1'")) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 24 1 24 10 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 24 3 24 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 24 1 24 2 , srcInfoPoints = [] } "c" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 24 6 24 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 24 6 24 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 24 6 24 10 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 25 1 25 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 25 1 25 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 25 1 25 2 , srcInfoPoints = [] } "c")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 25 3 25 10 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 25 3 25 4 ] } (OverloadedLabel SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 25 5 25 10 , srcInfoPoints = [] } "true")) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 1 29 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 1 27 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 1 27 5 , srcInfoPoints = [] } "main")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 6 29 18 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 27 6 27 7 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 8 29 18 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 27 8 27 10 , SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 11 , SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 11 , SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 11 , SrcSpan "tests/examples/OverloadedLabels.hs" 30 1 30 0 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 11 27 16 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 17 27 28 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 27 17 27 18 , SrcSpan "tests/examples/OverloadedLabels.hs" 27 27 27 28 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 18 27 27 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 27 20 27 22 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 18 27 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 18 27 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 18 27 19 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 23 27 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 23 27 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 27 23 27 27 , srcInfoPoints = [] } "Bool")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 11 28 16 , srcInfoPoints = [] } "print"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 17 28 28 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 28 17 28 18 , SrcSpan "tests/examples/OverloadedLabels.hs" 28 27 28 28 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 18 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/OverloadedLabels.hs" 28 20 28 22 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 18 28 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 18 28 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 18 28 19 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 23 28 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 23 28 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 28 23 28 27 , srcInfoPoints = [] } "Bool")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 18 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 11 29 16 , srcInfoPoints = [] } "print"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 17 29 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 17 29 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/OverloadedLabels.hs" 29 17 29 18 , srcInfoPoints = [] } "c")))) ])) Nothing ] , [ Comment False (SrcSpan "tests/examples/OverloadedLabels.hs" 1 1 1 36) " Basic tests of overloaded labels" ] ) haskell-src-exts-1.23.1/tests/examples/EmptyInstance.hs.parser.golden0000644000000000000000000001235413534314633024030 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyInstance.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyInstance.hs" 3 1 3 1 , SrcSpan "tests/examples/EmptyInstance.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyInstance.hs" 5 1 5 1 , SrcSpan "tests/examples/EmptyInstance.hs" 5 1 5 1 ] } Nothing [] [] [ InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 1 3 0 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyInstance.hs" 1 1 1 9 , SrcSpan "tests/examples/EmptyInstance.hs" 1 27 1 32 , SrcSpan "tests/examples/EmptyInstance.hs" 3 1 3 1 , SrcSpan "tests/examples/EmptyInstance.hs" 3 1 3 1 , SrcSpan "tests/examples/EmptyInstance.hs" 3 0 3 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 10 1 26 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 10 1 26 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 10 1 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 10 1 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 10 1 21 , srcInfoPoints = [] } "Traversable"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 22 1 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 22 1 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 1 22 1 26 , srcInfoPoints = [] } "Tree"))))) (Just []) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 3 1 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyInstance.hs" 3 3 3 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 3 1 3 2 , srcInfoPoints = [] } "x" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 3 6 3 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 3 6 3 9 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 1 4 6 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 1 4 2 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 3 4 6 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyInstance.hs" 4 3 4 4 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 5 4 6 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyInstance.hs" 4 5 4 6 , srcInfoPoints = [] } 1 "1"))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/CApiFFI.hs.parser.golden0000644000000000000000000000466513534314632022413 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/CApiFFI.hs" 1 1 1 1 , SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 1 , SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 1 , SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 1 , SrcSpan "tests/examples/CApiFFI.hs" 4 1 4 1 , SrcSpan "tests/examples/CApiFFI.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 1 1 1 25 , srcInfoPoints = [ SrcSpan "tests/examples/CApiFFI.hs" 1 1 1 13 , SrcSpan "tests/examples/CApiFFI.hs" 1 22 1 25 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 1 14 1 21 , srcInfoPoints = [] } "CApiFFI" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 11 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 1 2 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 5 2 11 , srcInfoPoints = [ SrcSpan "tests/examples/CApiFFI.hs" 2 5 2 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 7 2 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 7 2 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/CApiFFI.hs" 2 7 2 11 , srcInfoPoints = [] } "capi")))) Nothing ] , [] ) haskell-src-exts-1.23.1/tests/examples/EmptyCase.hs.parser.golden0000644000000000000000000001405113534314633023133 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 1 1 1 1 , SrcSpan "tests/examples/EmptyCase.hs" 2 1 2 1 , SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 1 , SrcSpan "tests/examples/EmptyCase.hs" 6 1 6 1 , SrcSpan "tests/examples/EmptyCase.hs" 7 1 7 1 , SrcSpan "tests/examples/EmptyCase.hs" 7 1 7 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 1 1 1 27 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 1 1 1 13 , SrcSpan "tests/examples/EmptyCase.hs" 1 24 1 27 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 1 14 1 23 , srcInfoPoints = [] } "EmptyCase" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 2 1 2 28 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 2 1 2 13 , SrcSpan "tests/examples/EmptyCase.hs" 2 25 2 28 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 2 14 2 24 , srcInfoPoints = [] } "LambdaCase" ] ] [] [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 1 4 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 3 4 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 3 4 4 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 5 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 4 5 4 6 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 7 4 19 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 4 7 4 11 , SrcSpan "tests/examples/EmptyCase.hs" 4 14 4 16 , SrcSpan "tests/examples/EmptyCase.hs" 4 17 4 18 , SrcSpan "tests/examples/EmptyCase.hs" 4 18 4 19 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 12 4 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 12 4 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 4 12 4 13 , srcInfoPoints = [] } "x"))) [])) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 1 6 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 1 6 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 1 6 2 , srcInfoPoints = [] } "g") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 3 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 3 6 4 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 5 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 6 5 6 6 ] } (LCase SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/EmptyCase.hs" 6 7 6 15 , srcInfoPoints = [ SrcSpan "tests/examples/EmptyCase.hs" 6 7 6 8 , SrcSpan "tests/examples/EmptyCase.hs" 6 8 6 12 , SrcSpan "tests/examples/EmptyCase.hs" 6 13 6 14 , SrcSpan "tests/examples/EmptyCase.hs" 6 14 6 15 ] } [])) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/InjectiveTypeFamilies.hs.parser.golden0000644000000000000000000253064513556712523025517 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 1 256 1 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 1 1 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 2 1 2 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 3 1 3 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 4 1 4 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 5 1 5 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 6 1 6 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 7 1 7 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 8 1 8 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 1 10 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 1 10 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 12 1 12 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 1 14 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 1 15 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 1 16 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 1 17 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 1 20 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 1 22 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 1 23 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 1 24 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 1 25 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 1 29 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 1 30 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 1 32 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 1 33 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 1 36 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 1 37 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 1 40 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 1 41 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 1 42 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 1 48 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 1 53 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 1 58 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 1 61 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 1 66 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 1 73 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 1 80 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 1 88 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 1 89 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 1 92 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 1 93 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 1 96 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 1 97 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 1 99 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 1 100 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 1 103 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 1 104 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 1 107 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 1 108 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 1 111 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 1 112 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 1 114 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 1 115 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 1 118 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 1 119 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 1 121 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 1 122 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 1 124 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 1 125 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 1 127 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 1 128 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 1 130 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 1 131 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 1 133 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 1 134 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 1 136 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 1 137 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 1 139 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 1 140 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 1 142 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 1 143 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 1 148 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 1 149 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 1 151 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 1 156 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 1 157 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 1 159 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 1 162 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 1 163 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 1 165 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 1 170 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 1 176 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 1 177 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 1 178 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 1 179 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 1 181 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 1 182 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 1 184 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 1 188 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 1 189 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 1 190 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 1 191 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 1 192 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 1 194 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 1 195 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 1 196 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 1 198 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 1 199 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 1 200 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 1 202 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 1 203 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 1 204 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 1 206 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 1 207 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 1 208 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 1 210 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 1 211 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 1 213 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 1 214 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 1 217 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 1 218 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 1 222 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 1 223 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 1 226 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 1 227 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 1 228 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 1 232 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 1 233 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 1 236 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 1 238 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 1 245 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 1 249 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 1 254 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 1 255 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 256 1 256 1 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 256 1 256 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 1 10 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 1 10 7 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 14 10 19 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 10 8 10 13 , srcInfoPoints = [] } "T6018") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 1 1 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 1 1 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 40 1 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 1 14 1 23 , srcInfoPoints = [] } "DataKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 2 1 2 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 2 1 2 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 2 40 2 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 2 14 2 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 3 1 3 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 3 1 3 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 3 40 3 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 3 14 3 23 , srcInfoPoints = [] } "PolyKinds" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 4 1 4 44 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 4 1 4 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 4 41 4 44 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 4 14 4 36 , srcInfoPoints = [] } "TypeFamilyDependencies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 5 1 5 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 5 1 5 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 5 31 5 34 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 5 14 5 26 , srcInfoPoints = [] } "TypeFamilies" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 6 1 6 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 6 1 6 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 6 40 6 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 6 14 6 34 , srcInfoPoints = [] } "UndecidableInstances" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 7 1 7 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 7 1 7 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 7 40 7 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 7 14 7 33 , srcInfoPoints = [] } "ScopedTypeVariables" ] , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 8 1 8 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 8 1 8 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 8 40 8 43 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 8 14 8 39 , srcInfoPoints = [] } "NoMonomorphismRestriction" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 12 1 12 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 12 1 12 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 12 8 12 14 , srcInfoPoints = [] } "T6018a" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 1 14 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 1 14 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 6 14 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 13 14 20 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 13 14 18 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 13 14 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 13 14 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 13 14 14 , srcInfoPoints = [] } "F")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 15 14 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 15 14 16 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 17 14 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 17 14 18 , srcInfoPoints = [] } "b"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 19 14 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 19 14 20 , srcInfoPoints = [] } "c"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 21 14 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 21 14 22 ] } (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 23 14 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 23 14 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 31 14 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 35 14 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 24 14 30 , srcInfoPoints = [] } "result") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 34 14 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 34 14 35 , srcInfoPoints = [] } "k"))))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 37 14 50 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 37 14 38 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 46 14 48 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 39 14 45 , srcInfoPoints = [] } "result") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 49 14 50 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 51 14 52 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 14 53 14 54 , srcInfoPoints = [] } "c" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 1 15 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 1 15 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 6 15 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 32 15 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 15 15 16 , srcInfoPoints = [] } "F"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 17 15 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 17 15 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 17 15 20 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 22 15 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 22 15 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 22 15 26 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 27 15 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 27 15 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 27 15 31 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 34 15 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 34 15 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 15 34 15 38 , srcInfoPoints = [] } "Bool"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 1 16 37 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 1 16 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 6 16 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 32 16 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 15 16 16 , srcInfoPoints = [] } "F"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 17 16 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 17 16 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 17 16 21 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 22 16 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 22 16 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 22 16 26 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 27 16 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 27 16 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 27 16 30 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 34 16 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 34 16 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 16 34 16 37 , srcInfoPoints = [] } "Int"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 1 17 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 1 17 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 6 17 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 32 17 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 25 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 15 17 16 , srcInfoPoints = [] } "F"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 17 17 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 17 17 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 17 17 21 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 22 17 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 22 17 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 22 17 25 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 27 17 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 27 17 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 27 17 31 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 34 17 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 34 17 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 17 34 17 38 , srcInfoPoints = [] } "Char"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 1 20 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 1 20 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 6 20 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 32 20 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 25 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 15 20 16 , srcInfoPoints = [] } "G"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 17 20 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 17 20 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 17 20 21 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 22 20 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 22 20 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 22 20 25 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 27 20 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 27 20 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 27 20 31 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 34 20 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 34 20 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 20 34 20 38 , srcInfoPoints = [] } "Char"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 1 22 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 1 22 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 6 22 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 13 22 34 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 13 22 25 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 13 22 23 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 13 22 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 13 22 14 , srcInfoPoints = [] } "I")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 15 22 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 15 22 16 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 18 22 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 22 22 23 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 16 22 17 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 21 22 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 21 22 22 , srcInfoPoints = [] } "k")))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 24 22 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 24 22 25 , srcInfoPoints = [] } "b"))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 26 22 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 26 22 27 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 29 22 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 33 22 34 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 27 22 28 , srcInfoPoints = [] } "c") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 32 22 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 32 22 33 , srcInfoPoints = [] } "k")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 35 22 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 35 22 36 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 37 22 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 37 22 38 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 39 22 47 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 39 22 40 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 43 22 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 41 22 42 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 46 22 47 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 22 48 22 49 , srcInfoPoints = [] } "b" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 1 23 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 1 23 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 6 23 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 32 23 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 15 23 16 , srcInfoPoints = [] } "I"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 17 23 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 17 23 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 17 23 20 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 22 23 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 22 23 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 22 23 26 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 27 23 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 27 23 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 27 23 31 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 34 23 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 34 23 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 23 34 23 38 , srcInfoPoints = [] } "Bool"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 1 24 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 1 24 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 6 24 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 32 24 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 15 24 16 , srcInfoPoints = [] } "I"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 17 24 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 17 24 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 17 24 20 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 22 24 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 22 24 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 22 24 26 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 27 24 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 27 24 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 27 24 30 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 34 24 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 34 24 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 24 34 24 38 , srcInfoPoints = [] } "Bool"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 1 25 37 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 1 25 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 6 25 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 32 25 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 25 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 15 25 16 , srcInfoPoints = [] } "I"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 17 25 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 17 25 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 17 25 21 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 22 25 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 22 25 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 22 25 25 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 27 25 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 27 25 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 27 25 30 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 34 25 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 34 25 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 25 34 25 37 , srcInfoPoints = [] } "Int"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 1 29 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 1 29 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 6 29 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 13 29 25 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 13 29 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 13 29 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 13 29 14 , srcInfoPoints = [] } "J")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 15 29 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 15 29 16 , srcInfoPoints = [] } "a"))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 17 29 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 17 29 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 20 29 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 24 29 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 18 29 19 , srcInfoPoints = [] } "b") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 23 29 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 23 29 24 , srcInfoPoints = [] } "k")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 26 29 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 26 29 27 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 28 29 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 28 29 29 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 30 29 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 30 29 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 34 29 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 32 29 33 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 29 37 29 38 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 1 30 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 1 30 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 6 30 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 23 30 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 15 30 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 15 30 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 15 30 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 15 30 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 15 30 16 , srcInfoPoints = [] } "J"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 17 30 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 17 30 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 17 30 20 , srcInfoPoints = [] } "Int")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 21 30 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 21 30 22 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 25 30 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 25 30 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 30 25 30 29 , srcInfoPoints = [] } "Char"))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 1 32 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 1 32 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 17 32 18 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 6 32 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 6 32 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 6 32 14 , srcInfoPoints = [] } "MaybeSyn")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 15 32 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 15 32 16 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 19 32 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 19 32 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 19 32 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 19 32 24 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 25 32 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 32 25 32 26 , srcInfoPoints = [] } "a"))) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 1 33 40 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 20 33 21 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 1 33 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 9 33 19 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 9 33 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 9 33 17 , srcInfoPoints = [] } "MaybeNew")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 18 33 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 18 33 19 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 22 33 40 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 22 33 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 22 33 30 , srcInfoPoints = [] } "MaybeNew") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 31 33 40 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 31 33 32 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 39 33 40 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 32 33 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 32 33 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 32 33 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 32 33 37 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 38 33 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 33 38 33 39 , srcInfoPoints = [] } "a"))) ]) ] [] , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 1 36 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 1 36 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 6 36 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 13 36 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 13 36 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 13 36 14 , srcInfoPoints = [] } "K")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 15 36 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 15 36 16 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 17 36 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 17 36 18 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 19 36 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 19 36 20 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 21 36 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 21 36 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 25 36 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 23 36 24 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 36 28 36 29 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 1 37 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 1 37 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 6 37 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 19 37 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 15 37 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 15 37 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 15 37 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 15 37 16 , srcInfoPoints = [] } "K"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 17 37 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 17 37 18 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 21 37 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 21 37 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 21 37 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 21 37 29 , srcInfoPoints = [] } "MaybeSyn"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 30 37 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 37 30 37 31 , srcInfoPoints = [] } "a"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 1 40 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 1 40 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 6 40 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 13 40 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 13 40 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 13 40 14 , srcInfoPoints = [] } "M")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 15 40 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 15 40 16 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 17 40 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 17 40 18 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 19 40 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 19 40 20 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 21 40 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 21 40 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 25 40 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 23 40 24 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 40 28 40 29 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 1 41 42 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 1 41 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 6 41 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 30 41 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 15 41 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 15 41 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 15 41 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 15 41 16 , srcInfoPoints = [] } "M"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 17 41 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 17 41 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 25 41 26 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 18 41 25 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 18 41 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 18 41 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 18 41 23 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 24 41 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 24 41 25 , srcInfoPoints = [] } "a"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 32 41 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 32 41 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 32 41 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 32 41 40 , srcInfoPoints = [] } "MaybeSyn"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 41 41 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 41 41 41 42 , srcInfoPoints = [] } "a"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 1 42 42 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 1 42 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 6 42 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 30 42 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 15 42 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 15 42 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 15 42 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 15 42 16 , srcInfoPoints = [] } "M"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 17 42 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 17 42 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 28 42 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 18 42 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 18 42 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 18 42 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 18 42 26 , srcInfoPoints = [] } "MaybeNew"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 27 42 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 27 42 28 , srcInfoPoints = [] } "a"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 32 42 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 32 42 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 32 42 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 32 42 40 , srcInfoPoints = [] } "MaybeNew"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 41 42 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 42 41 42 42 , srcInfoPoints = [] } "a"))) , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 1 48 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 1 48 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 6 48 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 54 48 59 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 13 48 26 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 13 48 24 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 13 48 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 13 48 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 13 48 20 , srcInfoPoints = [] } "FClosed")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 21 48 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 21 48 22 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 23 48 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 23 48 24 , srcInfoPoints = [] } "b"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 25 48 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 25 48 26 , srcInfoPoints = [] } "c"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 27 48 35 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 27 48 28 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 29 48 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 29 48 35 , srcInfoPoints = [] } "result")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 36 48 49 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 36 48 37 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 45 48 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 38 48 44 , srcInfoPoints = [] } "result") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 48 48 49 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 50 48 51 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 48 52 48 53 , srcInfoPoints = [] } "c" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 28 49 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 5 49 12 , srcInfoPoints = [] } "FClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 13 49 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 13 49 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 13 49 16 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 18 49 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 18 49 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 18 49 22 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 23 49 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 23 49 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 23 49 27 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 30 49 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 30 49 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 49 30 49 34 , srcInfoPoints = [] } "Bool"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 28 50 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 5 50 12 , srcInfoPoints = [] } "FClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 13 50 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 13 50 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 13 50 17 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 18 50 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 18 50 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 18 50 22 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 23 50 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 23 50 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 23 50 26 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 30 50 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 30 50 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 50 30 50 33 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 28 51 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 21 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 5 51 12 , srcInfoPoints = [] } "FClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 13 51 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 13 51 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 13 51 17 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 18 51 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 18 51 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 18 51 21 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 23 51 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 23 51 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 23 51 27 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 30 51 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 30 51 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 51 30 51 34 , srcInfoPoints = [] } "Char"))) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 1 53 47 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 1 53 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 6 53 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 63 53 68 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 13 53 47 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 13 53 38 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 13 53 29 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 13 53 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 13 53 20 , srcInfoPoints = [] } "IClosed")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 21 53 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 21 53 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 24 53 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 28 53 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 22 53 23 , srcInfoPoints = [] } "a") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 27 53 28 , srcInfoPoints = [] }))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 30 53 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 30 53 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 33 53 35 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 37 53 38 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 31 53 32 , srcInfoPoints = [] } "b") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 36 53 37 , srcInfoPoints = [] }))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 39 53 47 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 39 53 40 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 42 53 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 46 53 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 40 53 41 , srcInfoPoints = [] } "c") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 45 53 46 , srcInfoPoints = [] }))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 48 53 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 48 53 49 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 50 53 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 50 53 51 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 52 53 60 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 52 53 53 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 56 53 58 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 54 53 55 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 59 53 60 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 53 61 53 62 , srcInfoPoints = [] } "b" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 28 54 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 5 54 12 , srcInfoPoints = [] } "IClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 13 54 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 13 54 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 13 54 16 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 18 54 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 18 54 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 18 54 22 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 23 54 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 23 54 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 23 54 27 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 30 54 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 30 54 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 54 30 54 34 , srcInfoPoints = [] } "Bool"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 28 55 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 5 55 12 , srcInfoPoints = [] } "IClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 13 55 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 13 55 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 13 55 16 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 18 55 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 18 55 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 18 55 22 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 23 55 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 23 55 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 23 55 26 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 30 55 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 30 55 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 55 30 55 34 , srcInfoPoints = [] } "Bool"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 28 56 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 21 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 5 56 12 , srcInfoPoints = [] } "IClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 13 56 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 13 56 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 13 56 17 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 18 56 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 18 56 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 18 56 21 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 23 56 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 23 56 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 23 56 26 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 30 56 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 30 56 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 56 30 56 33 , srcInfoPoints = [] } "Int"))) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 1 58 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 1 58 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 6 58 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 45 58 50 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 13 58 31 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 13 58 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 13 58 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 13 58 20 , srcInfoPoints = [] } "JClosed")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 21 58 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 21 58 22 , srcInfoPoints = [] } "a"))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 23 58 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 23 58 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 26 58 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 30 58 31 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 24 58 25 , srcInfoPoints = [] } "b") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 29 58 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 29 58 30 , srcInfoPoints = [] } "k")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 32 58 35 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 32 58 33 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 34 58 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 34 58 35 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 36 58 44 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 36 58 37 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 40 58 42 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 38 58 39 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 58 43 58 44 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 19 59 20 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 5 59 12 , srcInfoPoints = [] } "JClosed"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 13 59 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 13 59 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 13 59 16 , srcInfoPoints = [] } "Int")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 17 59 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 17 59 18 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 21 59 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 21 59 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 59 21 59 25 , srcInfoPoints = [] } "Char"))) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 1 61 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 1 61 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 6 61 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 36 61 41 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 13 61 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 13 61 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 13 61 20 , srcInfoPoints = [] } "KClosed")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 21 61 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 21 61 22 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 23 61 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 23 61 24 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 25 61 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 25 61 26 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 27 61 35 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 27 61 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 31 61 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 29 61 30 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 61 34 61 35 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 5 62 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 15 62 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 5 62 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 5 62 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 5 62 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 5 62 12 , srcInfoPoints = [] } "KClosed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 13 62 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 13 62 14 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 17 62 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 17 62 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 17 62 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 17 62 25 , srcInfoPoints = [] } "MaybeSyn"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 26 62 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 62 26 62 27 , srcInfoPoints = [] } "a"))) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 1 66 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 1 66 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 6 66 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 32 66 37 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 13 66 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 13 66 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 13 66 16 , srcInfoPoints = [] } "Bak")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 17 66 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 17 66 18 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 19 66 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 19 66 20 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 21 66 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 21 66 22 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 23 66 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 23 66 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 27 66 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 25 66 26 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 66 30 66 31 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 6 67 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 15 67 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 6 67 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 6 67 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 6 67 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 6 67 9 , srcInfoPoints = [] } "Bak"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 10 67 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 10 67 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 10 67 13 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 17 67 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 17 67 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 67 17 67 21 , srcInfoPoints = [] } "Char"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 6 68 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 15 68 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 6 68 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 6 68 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 6 68 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 6 68 9 , srcInfoPoints = [] } "Bak"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 10 68 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 10 68 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 10 68 14 , srcInfoPoints = [] } "Char")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 17 68 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 17 68 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 68 17 68 20 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 6 69 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 15 69 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 6 69 11 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 6 69 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 6 69 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 6 69 9 , srcInfoPoints = [] } "Bak"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 10 69 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 10 69 11 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 17 69 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 69 17 69 18 , srcInfoPoints = [] } "a")) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 1 73 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 1 73 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 6 73 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 32 73 37 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 13 73 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 13 73 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 13 73 16 , srcInfoPoints = [] } "Foo")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 17 73 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 17 73 18 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 19 73 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 19 73 20 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 21 73 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 21 73 22 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 23 73 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 23 73 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 27 73 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 25 73 26 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 73 30 73 31 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 5 74 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 14 74 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 5 74 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 5 74 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 5 74 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 5 74 8 , srcInfoPoints = [] } "Foo"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 9 74 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 9 74 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 9 74 12 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 16 74 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 16 74 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 74 16 74 20 , srcInfoPoints = [] } "Bool"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 5 75 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 14 75 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 5 75 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 5 75 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 5 75 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 5 75 8 , srcInfoPoints = [] } "Foo"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 9 75 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 9 75 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 9 75 13 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 16 75 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 16 75 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 75 16 75 19 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 5 76 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 14 76 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 5 76 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 5 76 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 5 76 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 5 76 8 , srcInfoPoints = [] } "Foo"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 9 76 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 9 76 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 9 76 13 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 16 76 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 16 76 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 76 16 76 20 , srcInfoPoints = [] } "Bool"))) ] , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 1 80 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 1 80 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 6 80 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 32 80 37 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 13 80 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 13 80 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 13 80 16 , srcInfoPoints = [] } "Bar")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 17 80 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 17 80 18 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 19 80 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 19 80 20 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 21 80 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 21 80 22 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 23 80 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 23 80 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 27 80 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 25 80 26 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 80 30 80 31 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 5 81 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 14 81 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 5 81 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 5 81 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 5 81 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 5 81 8 , srcInfoPoints = [] } "Bar"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 9 81 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 9 81 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 9 81 12 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 16 81 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 16 81 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 81 16 81 20 , srcInfoPoints = [] } "Bool"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 5 82 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 14 82 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 5 82 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 5 82 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 5 82 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 5 82 8 , srcInfoPoints = [] } "Bar"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 9 82 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 9 82 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 9 82 13 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 16 82 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 16 82 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 82 16 82 19 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 5 83 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 14 83 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 5 83 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 5 83 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 5 83 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 5 83 8 , srcInfoPoints = [] } "Bar"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 9 83 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 9 83 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 9 83 13 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 16 83 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 16 83 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 83 16 83 20 , srcInfoPoints = [] } "Char"))) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 1 88 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 3 88 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 1 88 2 , srcInfoPoints = [] } "f" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 14 88 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 13 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 11 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 9 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 6 88 7 , srcInfoPoints = [] } "F"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 8 88 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 8 88 9 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 10 88 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 10 88 11 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 12 88 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 12 88 13 , srcInfoPoints = [] } "c"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 17 88 18 , srcInfoPoints = [] } "F"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 19 88 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 19 88 20 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 21 88 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 21 88 22 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 23 88 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 88 23 88 24 , srcInfoPoints = [] } "c")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 1 89 8 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 1 89 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 1 89 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 3 89 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 3 89 4 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 5 89 8 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 5 89 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 7 89 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 7 89 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 89 7 89 8 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 1 92 13 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 6 92 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 1 92 5 , srcInfoPoints = [] } "fapp" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 9 92 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 9 92 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 92 9 92 13 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 1 93 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 1 93 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 1 93 5 , srcInfoPoints = [] } "fapp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 6 93 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 6 93 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 8 93 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 8 93 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 8 93 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 8 93 9 , srcInfoPoints = [] } "f"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 10 93 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 10 93 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 93 10 93 14 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 1 96 37 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 4 96 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 1 96 3 , srcInfoPoints = [] } "fc" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 37 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 21 96 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 20 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 7 96 14 , srcInfoPoints = [] } "FClosed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 15 96 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 15 96 16 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 17 96 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 17 96 18 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 19 96 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 19 96 20 , srcInfoPoints = [] } "c"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 35 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 24 96 31 , srcInfoPoints = [] } "FClosed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 32 96 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 32 96 33 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 34 96 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 34 96 35 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 36 96 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 96 36 96 37 , srcInfoPoints = [] } "c")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 1 97 9 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 1 97 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 1 97 3 , srcInfoPoints = [] } "fc") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 4 97 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 4 97 5 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 6 97 9 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 6 97 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 8 97 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 8 97 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 97 8 97 9 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 1 99 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 7 99 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 1 99 6 , srcInfoPoints = [] } "fcapp" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 10 99 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 10 99 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 99 10 99 14 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 1 100 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 1 100 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 1 100 6 , srcInfoPoints = [] } "fcapp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 7 100 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 7 100 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 9 100 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 9 100 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 9 100 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 9 100 11 , srcInfoPoints = [] } "fc"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 12 100 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 12 100 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 100 12 100 16 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 1 103 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 3 103 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 1 103 2 , srcInfoPoints = [] } "i" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 16 103 18 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 15 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 11 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 9 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 6 103 7 , srcInfoPoints = [] } "I"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 8 103 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 8 103 9 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 10 103 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 10 103 11 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 12 103 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 12 103 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 12 103 15 , srcInfoPoints = [] } "Int")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 19 103 20 , srcInfoPoints = [] } "I"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 21 103 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 21 103 22 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 23 103 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 23 103 24 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 25 103 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 25 103 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 103 25 103 28 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 1 104 8 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 1 104 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 1 104 2 , srcInfoPoints = [] } "i") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 3 104 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 3 104 4 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 5 104 8 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 5 104 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 7 104 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 7 104 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 104 7 104 8 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 1 107 13 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 6 107 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 1 107 5 , srcInfoPoints = [] } "iapp" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 9 107 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 9 107 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 107 9 107 13 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 1 108 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 1 108 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 1 108 5 , srcInfoPoints = [] } "iapp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 6 108 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 6 108 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 8 108 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 8 108 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 8 108 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 8 108 9 , srcInfoPoints = [] } "i"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 10 108 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 10 108 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 108 10 108 14 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 1 111 41 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 4 111 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 1 111 3 , srcInfoPoints = [] } "ic" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 41 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 23 111 25 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 22 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 7 111 14 , srcInfoPoints = [] } "IClosed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 15 111 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 15 111 16 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 17 111 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 17 111 18 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 19 111 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 19 111 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 19 111 22 , srcInfoPoints = [] } "Int")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 41 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 37 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 26 111 33 , srcInfoPoints = [] } "IClosed"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 34 111 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 34 111 35 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 36 111 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 36 111 37 , srcInfoPoints = [] } "b"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 38 111 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 38 111 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 111 38 111 41 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 1 112 9 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 1 112 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 1 112 3 , srcInfoPoints = [] } "ic") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 4 112 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 4 112 5 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 6 112 9 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 6 112 7 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 8 112 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 8 112 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 112 8 112 9 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 1 114 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 7 114 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 1 114 6 , srcInfoPoints = [] } "icapp" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 10 114 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 10 114 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 114 10 114 14 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 1 115 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 1 115 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 1 115 6 , srcInfoPoints = [] } "icapp")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 7 115 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 7 115 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 9 115 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 9 115 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 9 115 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 9 115 11 , srcInfoPoints = [] } "ic"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 12 115 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 12 115 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 115 12 115 16 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 1 118 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 5 118 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 1 118 4 , srcInfoPoints = [] } "bak" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 8 118 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 14 118 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 8 118 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 8 118 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 8 118 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 8 118 11 , srcInfoPoints = [] } "Bak"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 12 118 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 12 118 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 17 118 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 17 118 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 17 118 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 17 118 20 , srcInfoPoints = [] } "Bak"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 21 118 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 118 21 118 22 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 1 119 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 1 119 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 1 119 4 , srcInfoPoints = [] } "bak") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 5 119 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 5 119 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 7 119 10 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 7 119 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 9 119 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 9 119 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 119 9 119 10 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 1 121 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 9 121 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 1 121 8 , srcInfoPoints = [] } "bakapp1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 12 121 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 12 121 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 121 12 121 16 , srcInfoPoints = [] } "Char"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 1 122 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 1 122 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 1 122 8 , srcInfoPoints = [] } "bakapp1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 9 122 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 9 122 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 11 122 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 11 122 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 11 122 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 11 122 14 , srcInfoPoints = [] } "bak"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 15 122 18 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 122 15 122 18 , srcInfoPoints = [] } 'c' "c")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 1 124 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 9 124 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 1 124 8 , srcInfoPoints = [] } "bakapp2" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 12 124 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 12 124 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 124 12 124 18 , srcInfoPoints = [] } "Double"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 1 125 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 1 125 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 1 125 8 , srcInfoPoints = [] } "bakapp2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 9 125 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 9 125 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 11 125 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 11 125 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 11 125 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 11 125 14 , srcInfoPoints = [] } "bak"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 15 125 18 , srcInfoPoints = [] } (Frac SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 125 15 125 18 , srcInfoPoints = [] } (1 % 1) "1.0")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 1 127 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 9 127 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 1 127 8 , srcInfoPoints = [] } "bakapp3" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 13 127 14 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 13 127 14 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 14 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 12 127 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 127 13 127 14 ] }))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 1 128 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 1 128 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 1 128 8 , srcInfoPoints = [] } "bakapp3")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 9 128 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 9 128 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 11 128 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 11 128 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 11 128 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 11 128 14 , srcInfoPoints = [] } "bak"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 16 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 16 128 17 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 16 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 16 128 17 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 15 128 16 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 128 16 128 17 ] }))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 1 130 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 5 130 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 1 130 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 8 130 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 14 130 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 8 130 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 8 130 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 8 130 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 8 130 11 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 12 130 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 12 130 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 17 130 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 17 130 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 17 130 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 17 130 20 , srcInfoPoints = [] } "Foo"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 21 130 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 130 21 130 22 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 1 131 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 1 131 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 1 131 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 5 131 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 5 131 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 7 131 10 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 7 131 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 9 131 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 9 131 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 131 9 131 10 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 1 133 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 9 133 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 1 133 8 , srcInfoPoints = [] } "fooapp1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 12 133 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 12 133 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 133 12 133 16 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 1 134 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 1 134 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 1 134 8 , srcInfoPoints = [] } "fooapp1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 9 134 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 9 134 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 11 134 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 11 134 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 11 134 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 11 134 14 , srcInfoPoints = [] } "foo"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 15 134 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 15 134 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 134 15 134 19 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 1 136 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 5 136 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 1 136 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 8 136 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 14 136 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 8 136 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 8 136 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 8 136 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 8 136 11 , srcInfoPoints = [] } "Bar"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 12 136 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 12 136 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 17 136 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 17 136 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 17 136 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 17 136 20 , srcInfoPoints = [] } "Bar"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 21 136 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 136 21 136 22 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 1 137 10 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 1 137 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 1 137 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 5 137 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 5 137 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 7 137 10 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 7 137 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 9 137 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 9 137 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 137 9 137 10 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 1 139 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 9 139 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 1 139 8 , srcInfoPoints = [] } "barapp1" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 12 139 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 12 139 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 139 12 139 16 , srcInfoPoints = [] } "Bool"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 1 140 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 1 140 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 1 140 8 , srcInfoPoints = [] } "barapp1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 9 140 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 9 140 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 11 140 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 11 140 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 11 140 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 11 140 14 , srcInfoPoints = [] } "bar"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 15 140 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 15 140 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 140 15 140 19 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 1 142 15 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 9 142 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 1 142 8 , srcInfoPoints = [] } "barapp2" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 12 142 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 12 142 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 142 12 142 15 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 1 143 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 1 143 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 1 143 8 , srcInfoPoints = [] } "barapp2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 9 143 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 9 143 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 11 143 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 11 143 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 11 143 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 11 143 14 , srcInfoPoints = [] } "bar"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 15 143 16 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 143 15 143 16 , srcInfoPoints = [] } 1 "1")))) Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 1 148 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 1 148 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 6 148 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 13 148 18 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 13 148 16 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 13 148 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 13 148 14 , srcInfoPoints = [] } "H")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 15 148 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 15 148 16 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 17 148 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 17 148 18 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 19 148 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 19 148 20 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 21 148 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 21 148 22 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 23 148 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 23 148 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 27 148 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 25 148 26 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 30 148 31 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 148 32 148 33 , srcInfoPoints = [] } "a" ])) , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 1 149 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 1 149 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 6 149 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 35 149 40 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 13 149 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 13 149 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 13 149 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 13 149 15 , srcInfoPoints = [] } "Hc")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 16 149 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 16 149 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 18 149 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 18 149 19 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 20 149 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 20 149 21 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 22 149 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 22 149 23 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 24 149 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 24 149 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 28 149 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 26 149 27 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 31 149 32 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 149 33 149 34 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 15 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 10 150 11 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 9 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 7 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 5 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 3 150 5 , srcInfoPoints = [] } "Hc"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 6 150 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 6 150 7 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 8 150 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 8 150 9 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 12 150 15 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 12 150 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 12 150 13 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 14 150 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 150 14 150 15 , srcInfoPoints = [] } "b"))) ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 1 152 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 1 151 6 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 15 151 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 3 152 3 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 1 156 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 7 151 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 7 151 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 7 151 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 7 151 10 , srcInfoPoints = [] } "Hcl")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 11 151 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 11 151 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 13 151 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 151 13 151 14 , srcInfoPoints = [] } "b"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 3 152 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 3 152 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 8 152 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 8 152 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 8 152 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 8 152 10 , srcInfoPoints = [] } "Ht")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 11 152 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 11 152 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 13 152 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 13 152 14 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 15 152 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 15 152 16 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 17 152 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 17 152 18 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 19 152 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 19 152 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 23 152 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 21 152 22 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 26 152 27 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 152 28 152 29 , srcInfoPoints = [] } "a" ])) ]) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 1 156 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 1 156 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 6 156 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 13 156 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 13 156 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 13 156 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 13 156 15 , srcInfoPoints = [] } "Jx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 16 156 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 16 156 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 18 156 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 18 156 19 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 20 156 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 20 156 21 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 22 156 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 22 156 23 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 24 156 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 24 156 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 28 156 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 26 156 27 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 31 156 32 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 156 33 156 34 , srcInfoPoints = [] } "a" ])) , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 1 157 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 1 157 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 6 157 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 36 157 41 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 13 157 20 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 13 157 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 13 157 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 13 157 16 , srcInfoPoints = [] } "Jcx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 17 157 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 17 157 18 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 19 157 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 19 157 20 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 21 157 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 21 157 22 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 23 157 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 23 157 24 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 25 157 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 25 157 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 29 157 31 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 27 157 28 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 32 157 33 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 157 34 157 35 , srcInfoPoints = [] } "a" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 11 158 12 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 10 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 8 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 3 158 6 , srcInfoPoints = [] } "Jcx"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 7 158 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 7 158 8 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 9 158 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 9 158 10 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 13 158 16 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 13 158 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 13 158 14 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 15 158 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 158 15 158 16 , srcInfoPoints = [] } "b"))) ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 1 160 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 1 159 6 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 15 159 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 3 160 3 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 1 162 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 7 159 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 7 159 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 7 159 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 7 159 10 , srcInfoPoints = [] } "Jcl")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 11 159 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 11 159 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 13 159 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 159 13 159 14 , srcInfoPoints = [] } "b"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 3 160 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 3 160 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 8 160 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 8 160 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 8 160 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 8 160 10 , srcInfoPoints = [] } "Jt")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 11 160 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 11 160 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 13 160 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 13 160 14 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 15 160 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 15 160 16 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 17 160 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 17 160 18 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 19 160 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 19 160 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 23 160 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 21 160 22 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 26 160 27 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 160 28 160 29 , srcInfoPoints = [] } "a" ])) ]) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 1 162 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 1 162 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 6 162 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 13 162 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 13 162 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 13 162 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 13 162 15 , srcInfoPoints = [] } "Kx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 16 162 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 16 162 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 18 162 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 18 162 19 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 20 162 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 20 162 21 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 22 162 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 22 162 23 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 24 162 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 24 162 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 28 162 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 26 162 27 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 31 162 32 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 33 162 34 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 162 35 162 36 , srcInfoPoints = [] } "b" ])) , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 1 163 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 1 163 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 6 163 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 38 163 43 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 13 163 20 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 13 163 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 13 163 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 13 163 16 , srcInfoPoints = [] } "Kcx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 17 163 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 17 163 18 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 19 163 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 19 163 20 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 21 163 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 21 163 22 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 23 163 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 23 163 24 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 25 163 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 25 163 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 29 163 31 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 27 163 28 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 32 163 33 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 34 163 35 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 163 36 163 37 , srcInfoPoints = [] } "b" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 11 164 12 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 10 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 8 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 3 164 6 , srcInfoPoints = [] } "Kcx"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 7 164 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 7 164 8 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 9 164 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 9 164 10 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 13 164 16 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 13 164 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 13 164 14 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 15 164 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 164 15 164 16 , srcInfoPoints = [] } "b"))) ] , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 1 166 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 1 165 6 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 15 165 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 3 166 3 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 1 170 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 7 165 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 7 165 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 7 165 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 7 165 10 , srcInfoPoints = [] } "Kcl")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 11 165 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 11 165 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 13 165 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 165 13 165 14 , srcInfoPoints = [] } "b"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 3 166 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 3 166 7 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 8 166 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 8 166 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 8 166 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 8 166 10 , srcInfoPoints = [] } "Kt")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 11 166 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 11 166 12 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 13 166 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 13 166 14 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 15 166 18 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 15 166 16 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 17 166 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 17 166 18 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 19 166 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 19 166 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 23 166 25 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 21 166 22 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 26 166 27 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 28 166 29 , srcInfoPoints = [] } "b" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 166 30 166 31 , srcInfoPoints = [] } "b" ])) ]) , ClosedTypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 1 170 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 1 170 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 6 170 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 47 170 52 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 13 170 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 13 170 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 13 170 14 , srcInfoPoints = [] } "L")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 15 170 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 15 170 16 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 18 170 20 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 23 170 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 16 170 17 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 21 170 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 21 170 23 , srcInfoPoints = [] } "k1")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 25 170 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 25 170 26 ] } (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 27 170 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 27 170 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 30 170 32 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 35 170 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 28 170 29 , srcInfoPoints = [] } "r") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 33 170 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 33 170 35 , srcInfoPoints = [] } "k2"))))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 37 170 46 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 37 170 38 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 41 170 43 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 39 170 40 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 170 44 170 46 , srcInfoPoints = [] } "k1" ])) [ TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 5 171 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 14 171 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 5 171 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 5 171 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 5 171 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 5 171 6 , srcInfoPoints = [] } "L"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 7 171 12 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 7 171 8 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 7 171 12 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 7 171 8 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 8 171 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 8 171 12 , srcInfoPoints = [] } "True"))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 16 171 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 16 171 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 171 16 171 19 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 5 172 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 14 172 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 5 172 13 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 5 172 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 5 172 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 5 172 6 , srcInfoPoints = [] } "L"))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 7 172 13 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 7 172 8 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 7 172 13 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 7 172 8 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 8 172 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 8 172 13 , srcInfoPoints = [] } "False"))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 16 172 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 16 172 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 172 16 172 19 , srcInfoPoints = [] } "Int"))) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 5 173 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 14 173 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 5 173 12 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 5 173 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 5 173 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 5 173 6 , srcInfoPoints = [] } "L"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 7 173 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 7 173 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 7 173 12 , srcInfoPoints = [] } "Maybe")))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 16 173 17 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 173 16 173 17 , srcInfoPoints = [] } 3 "3")) , TypeEqn SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 5 174 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 14 174 15 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 5 174 9 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 5 174 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 5 174 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 5 174 6 , srcInfoPoints = [] } "L"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 7 174 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 7 174 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 7 174 9 , srcInfoPoints = [] } "IO")))) (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 16 174 17 , srcInfoPoints = [] } (PromotedInteger SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 174 16 174 17 , srcInfoPoints = [] } 3 "3")) ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 1 176 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 22 176 23 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 1 176 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 6 176 21 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 6 176 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 6 176 12 , srcInfoPoints = [] } "KProxy")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 13 176 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 13 176 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 16 176 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 20 176 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 14 176 15 , srcInfoPoints = [] } "a") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 19 176 20 , srcInfoPoints = [] }))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 24 176 30 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 24 176 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 176 24 176 30 , srcInfoPoints = [] } "KProxy") []) ] [] , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 1 177 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 1 177 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 6 177 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 13 177 36 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 13 177 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 13 177 15 , srcInfoPoints = [] } "KP")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 16 177 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 16 177 17 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 24 177 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 35 177 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 17 177 23 , srcInfoPoints = [] } "kproxy") (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 27 177 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 27 177 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 27 177 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 27 177 33 , srcInfoPoints = [] } "KProxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 34 177 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 34 177 35 , srcInfoPoints = [] } "k"))))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 37 177 40 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 37 177 38 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 39 177 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 39 177 40 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 41 177 49 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 41 177 42 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 45 177 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 43 177 44 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 177 48 177 49 , srcInfoPoints = [] } "k" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 1 178 48 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 1 178 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 6 178 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 43 178 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 15 178 42 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 15 178 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 15 178 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 15 178 17 , srcInfoPoints = [] } "KP"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 18 178 42 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 18 178 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 27 178 29 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 41 178 42 ] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 19 178 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 19 178 20 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 19 178 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 19 178 20 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 20 178 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 20 178 26 , srcInfoPoints = [] } "KProxy")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 30 178 41 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 30 178 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 30 178 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 30 178 36 , srcInfoPoints = [] } "KProxy"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 37 178 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 37 178 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 37 178 41 , srcInfoPoints = [] } "Bool")))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 45 178 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 45 178 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 178 45 178 48 , srcInfoPoints = [] } "Int"))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 1 179 49 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 1 179 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 6 179 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 43 179 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 15 179 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 15 179 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 15 179 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 15 179 17 , srcInfoPoints = [] } "KP"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 18 179 39 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 18 179 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 27 179 29 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 38 179 39 ] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 19 179 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 19 179 20 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 19 179 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 19 179 20 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 20 179 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 20 179 26 , srcInfoPoints = [] } "KProxy")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 30 179 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 30 179 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 30 179 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 30 179 36 , srcInfoPoints = [] } "KProxy"))) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 37 179 38 , srcInfoPoints = [] })))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 45 179 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 45 179 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 179 45 179 49 , srcInfoPoints = [] } "Char"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 1 181 66 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 11 181 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 1 181 10 , srcInfoPoints = [] } "kproxy_id" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 14 181 66 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 39 181 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 14 181 38 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 14 181 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 14 181 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 14 181 16 , srcInfoPoints = [] } "KP"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 17 181 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 17 181 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 26 181 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 37 181 38 ] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 18 181 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 18 181 19 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 18 181 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 18 181 19 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 19 181 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 19 181 25 , srcInfoPoints = [] } "KProxy")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 29 181 37 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 29 181 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 29 181 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 29 181 35 , srcInfoPoints = [] } "KProxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 36 181 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 36 181 37 , srcInfoPoints = [] } "k"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 42 181 66 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 42 181 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 42 181 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 42 181 44 , srcInfoPoints = [] } "KP"))) (TyKind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 45 181 66 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 45 181 46 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 54 181 56 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 65 181 66 ] } (TyPromoted SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 46 181 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 46 181 47 ] } (PromotedCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 46 181 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 46 181 47 ] } True (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 47 181 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 47 181 53 , srcInfoPoints = [] } "KProxy")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 57 181 65 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 57 181 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 57 181 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 57 181 63 , srcInfoPoints = [] } "KProxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 64 181 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 181 64 181 65 , srcInfoPoints = [] } "k")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 1 182 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 1 182 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 1 182 10 , srcInfoPoints = [] } "kproxy_id") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 11 182 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 11 182 12 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 13 182 16 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 13 182 14 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 15 182 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 15 182 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 182 15 182 16 , srcInfoPoints = [] } "x")))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 1 184 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 1 184 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 1 184 14 , srcInfoPoints = [] } "kproxy_id_use")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 15 184 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 15 184 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 17 184 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 17 184 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 17 184 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 17 184 26 , srcInfoPoints = [] } "kproxy_id"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 27 184 30 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 184 27 184 30 , srcInfoPoints = [] } 'a' "a")))) Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 1 188 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 1 188 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 6 188 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 13 188 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 13 188 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 13 188 15 , srcInfoPoints = [] } "Gx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 16 188 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 188 16 188 17 , srcInfoPoints = [] } "a"))) Nothing Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 1 189 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 1 189 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 6 189 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 13 189 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 13 189 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 13 189 15 , srcInfoPoints = [] } "Hx")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 16 189 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 189 16 189 17 , srcInfoPoints = [] } "a"))) Nothing Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 1 190 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 1 190 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 6 190 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 13 190 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 13 190 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 13 190 15 , srcInfoPoints = [] } "Gi")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 16 190 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 16 190 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 18 190 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 18 190 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 20 190 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 20 190 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 22 190 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 22 190 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 26 190 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 24 190 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 190 29 190 30 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 1 191 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 1 191 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 6 191 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 22 191 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 15 191 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 15 191 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 15 191 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 15 191 17 , srcInfoPoints = [] } "Gi"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 18 191 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 18 191 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 18 191 21 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 24 191 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 24 191 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 191 24 191 28 , srcInfoPoints = [] } "Char"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 1 192 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 1 192 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 6 192 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 13 192 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 13 192 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 13 192 15 , srcInfoPoints = [] } "Hi")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 16 192 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 16 192 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 18 192 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 18 192 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 20 192 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 20 192 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 22 192 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 22 192 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 26 192 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 24 192 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 192 29 192 30 , srcInfoPoints = [] } "a" ])) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 1 194 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 1 194 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 6 194 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 13 194 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 13 194 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 13 194 15 , srcInfoPoints = [] } "F2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 16 194 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 16 194 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 18 194 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 18 194 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 20 194 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 20 194 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 22 194 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 22 194 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 26 194 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 24 194 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 194 29 194 30 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 1 195 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 1 195 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 6 195 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 28 195 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 15 195 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 15 195 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 15 195 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 15 195 17 , srcInfoPoints = [] } "F2"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 18 195 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 18 195 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 20 195 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 19 195 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 19 195 20 , srcInfoPoints = [] } "a")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 30 195 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 30 195 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 35 195 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 31 195 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 31 195 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 31 195 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 31 195 33 , srcInfoPoints = [] } "Gi"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 34 195 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 195 34 195 35 , srcInfoPoints = [] } "a")))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 1 196 41 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 1 196 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 6 196 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 28 196 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 15 196 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 15 196 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 15 196 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 15 196 17 , srcInfoPoints = [] } "F2"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 18 196 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 18 196 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 26 196 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 19 196 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 19 196 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 19 196 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 19 196 24 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 25 196 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 25 196 26 , srcInfoPoints = [] } "a"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 30 196 41 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 35 196 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 30 196 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 30 196 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 30 196 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 30 196 32 , srcInfoPoints = [] } "Hi"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 33 196 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 33 196 34 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 38 196 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 38 196 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 196 38 196 41 , srcInfoPoints = [] } "Int")))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 1 198 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 1 198 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 6 198 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 13 198 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 13 198 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 13 198 15 , srcInfoPoints = [] } "F4")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 16 198 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 16 198 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 18 198 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 18 198 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 20 198 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 20 198 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 22 198 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 22 198 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 26 198 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 24 198 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 198 29 198 30 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 1 199 50 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 1 199 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 6 199 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 28 199 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 15 199 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 15 199 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 15 199 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 15 199 17 , srcInfoPoints = [] } "F4"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 18 199 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 18 199 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 20 199 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 19 199 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 19 199 20 , srcInfoPoints = [] } "a")))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 30 199 50 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 30 199 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 35 199 36 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 38 199 39 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 43 199 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 49 199 50 ] } Boxed [ TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 31 199 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 31 199 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 31 199 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 31 199 33 , srcInfoPoints = [] } "Gx"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 34 199 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 34 199 35 , srcInfoPoints = [] } "a")) , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 37 199 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 37 199 38 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 42 199 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 42 199 43 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 48 199 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 199 48 199 49 , srcInfoPoints = [] } "a") ]) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 1 200 50 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 1 200 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 6 200 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 28 200 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 15 200 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 15 200 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 15 200 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 15 200 17 , srcInfoPoints = [] } "F4"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 18 200 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 18 200 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 26 200 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 19 200 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 19 200 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 19 200 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 19 200 24 , srcInfoPoints = [] } "Maybe"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 25 200 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 25 200 26 , srcInfoPoints = [] } "a"))))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 30 200 50 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 30 200 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 35 200 36 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 38 200 39 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 43 200 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 49 200 50 ] } Boxed [ TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 31 200 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 31 200 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 31 200 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 31 200 33 , srcInfoPoints = [] } "Hx"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 34 200 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 34 200 35 , srcInfoPoints = [] } "a")) , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 37 200 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 37 200 38 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 40 200 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 40 200 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 40 200 43 , srcInfoPoints = [] } "Int")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 45 200 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 45 200 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 200 45 200 49 , srcInfoPoints = [] } "Bool")) ]) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 1 202 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 1 202 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 6 202 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 13 202 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 13 202 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 13 202 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 13 202 15 , srcInfoPoints = [] } "G2")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 16 202 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 16 202 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 18 202 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 18 202 19 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 20 202 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 20 202 21 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 22 202 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 22 202 23 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 24 202 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 24 202 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 28 202 30 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 26 202 27 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 31 202 32 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 202 33 202 34 , srcInfoPoints = [] } "b" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 1 203 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 1 203 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 6 203 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 28 203 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 15 203 27 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 15 203 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 15 203 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 15 203 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 15 203 17 , srcInfoPoints = [] } "G2"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 18 203 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 18 203 19 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 23 203 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 23 203 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 23 203 27 , srcInfoPoints = [] } "Bool")))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 30 203 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 30 203 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 32 203 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 35 203 36 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 31 203 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 31 203 32 , srcInfoPoints = [] } "a") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 34 203 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 203 34 203 35 , srcInfoPoints = [] } "a") ]) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 1 204 39 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 1 204 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 6 204 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 28 204 29 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 15 204 24 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 15 204 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 15 204 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 15 204 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 15 204 17 , srcInfoPoints = [] } "G2"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 18 204 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 18 204 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 18 204 22 , srcInfoPoints = [] } "Bool")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 23 204 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 23 204 24 , srcInfoPoints = [] } "b"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 30 204 39 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 30 204 31 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 32 204 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 38 204 39 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 31 204 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 31 204 32 , srcInfoPoints = [] } "b") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 34 204 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 34 204 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 204 34 204 38 , srcInfoPoints = [] } "Bool")) ]) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 1 206 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 1 206 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 6 206 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 13 206 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 13 206 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 13 206 15 , srcInfoPoints = [] } "G6")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 16 206 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 16 206 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 18 206 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 18 206 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 20 206 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 20 206 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 22 206 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 22 206 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 26 206 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 24 206 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 206 29 206 30 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 1 207 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 1 207 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 6 207 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 23 207 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 15 207 21 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 15 207 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 15 207 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 15 207 17 , srcInfoPoints = [] } "G6"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 18 207 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 18 207 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 20 207 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 19 207 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 19 207 20 , srcInfoPoints = [] } "a")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 25 207 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 25 207 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 30 207 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 26 207 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 26 207 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 26 207 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 26 207 28 , srcInfoPoints = [] } "Gi"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 29 207 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 207 29 207 30 , srcInfoPoints = [] } "a")))) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 1 208 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 1 208 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 6 208 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 23 208 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 15 208 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 15 208 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 15 208 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 15 208 17 , srcInfoPoints = [] } "G6"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 18 208 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 18 208 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 18 208 22 , srcInfoPoints = [] } "Bool")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 25 208 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 25 208 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 208 25 208 28 , srcInfoPoints = [] } "Int"))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 1 210 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 7 210 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 1 210 6 , srcInfoPoints = [] } "g6_id" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 10 210 22 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 15 210 17 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 10 210 14 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 10 210 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 10 210 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 10 210 12 , srcInfoPoints = [] } "G6"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 13 210 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 13 210 14 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 18 210 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 18 210 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 18 210 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 18 210 20 , srcInfoPoints = [] } "G6"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 21 210 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 210 21 210 22 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 1 211 12 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 1 211 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 1 211 6 , srcInfoPoints = [] } "g6_id") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 7 211 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 7 211 8 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 9 211 12 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 9 211 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 11 211 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 11 211 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 211 11 211 12 , srcInfoPoints = [] } "x")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 1 213 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 8 213 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 1 213 7 , srcInfoPoints = [] } "g6_use" ] (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 11 213 17 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 11 213 12 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 16 213 17 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 12 213 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 12 213 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 213 12 213 16 , srcInfoPoints = [] } "Char")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 1 214 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 1 214 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 1 214 7 , srcInfoPoints = [] } "g6_use")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 8 214 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 8 214 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 10 214 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 10 214 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 10 214 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 10 214 15 , srcInfoPoints = [] } "g6_id"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 16 214 21 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 214 16 214 21 , srcInfoPoints = [] } "foo" "foo")))) Nothing , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 1 217 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 1 217 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 6 217 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 13 217 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 13 217 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 13 217 15 , srcInfoPoints = [] } "Id")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 16 217 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 16 217 17 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 19 217 21 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 23 217 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 17 217 18 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 22 217 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 22 217 23 , srcInfoPoints = [] } "k")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 25 217 40 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 25 217 26 ] } (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 27 217 40 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 27 217 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 35 217 37 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 39 217 40 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 28 217 34 , srcInfoPoints = [] } "result") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 38 217 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 38 217 39 , srcInfoPoints = [] } "k"))))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 41 217 54 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 41 217 42 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 50 217 52 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 43 217 49 , srcInfoPoints = [] } "result") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 217 53 217 54 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 1 218 23 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 1 218 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 6 218 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 20 218 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 15 218 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 15 218 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 15 218 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 15 218 17 , srcInfoPoints = [] } "Id"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 18 218 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 18 218 19 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 22 218 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 218 22 218 23 , srcInfoPoints = [] } "a")) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 1 222 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 1 222 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 6 222 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 13 222 31 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 13 222 29 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 13 222 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 13 222 20 , srcInfoPoints = [] } "IdProxy")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 21 222 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 21 222 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 24 222 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 28 222 29 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 22 222 23 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 27 222 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 27 222 28 , srcInfoPoints = [] } "k")))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 30 222 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 30 222 31 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 32 222 35 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 32 222 33 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 34 222 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 34 222 35 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 36 222 44 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 36 222 37 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 40 222 42 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 38 222 39 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 222 43 222 44 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 1 223 37 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 1 223 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 6 223 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 27 223 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 15 223 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 15 223 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 15 223 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 15 223 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 15 223 22 , srcInfoPoints = [] } "IdProxy"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 23 223 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 23 223 24 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 25 223 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 25 223 26 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 29 223 37 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 29 223 35 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 29 223 30 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 34 223 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 30 223 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 30 223 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 30 223 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 30 223 32 , srcInfoPoints = [] } "Id"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 33 223 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 33 223 34 , srcInfoPoints = [] } "a")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 36 223 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 223 36 223 37 , srcInfoPoints = [] } "b"))) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 1 226 20 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 1 226 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 14 226 15 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 6 226 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 6 226 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 6 226 11 , srcInfoPoints = [] } "IdSyn")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 12 226 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 12 226 13 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 16 226 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 16 226 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 16 226 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 16 226 18 , srcInfoPoints = [] } "Id"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 19 226 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 226 19 226 20 , srcInfoPoints = [] } "a"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 1 227 34 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 1 227 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 6 227 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 13 227 34 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 13 227 32 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 13 227 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 13 227 23 , srcInfoPoints = [] } "IdProxySyn")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 24 227 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 24 227 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 27 227 29 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 31 227 32 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 25 227 26 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 30 227 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 30 227 31 , srcInfoPoints = [] } "k")))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 33 227 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 33 227 34 , srcInfoPoints = [] } "b"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 35 227 38 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 35 227 36 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 37 227 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 37 227 38 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 39 227 47 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 39 227 40 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 43 227 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 41 227 42 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 227 46 227 47 , srcInfoPoints = [] } "a" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 1 228 43 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 1 228 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 6 228 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 30 228 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 15 228 29 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 15 228 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 15 228 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 15 228 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 15 228 25 , srcInfoPoints = [] } "IdProxySyn"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 26 228 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 26 228 27 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 28 228 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 28 228 29 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 32 228 43 , srcInfoPoints = [] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 32 228 41 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 32 228 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 40 228 41 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 33 228 40 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 33 228 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 33 228 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 33 228 38 , srcInfoPoints = [] } "IdSyn"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 39 228 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 39 228 40 , srcInfoPoints = [] } "a")))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 42 228 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 228 42 228 43 , srcInfoPoints = [] } "b"))) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 1 232 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 1 232 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 6 232 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 13 232 33 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 13 232 24 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 13 232 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 13 232 15 , srcInfoPoints = [] } "Fa")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 16 232 24 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 16 232 17 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 19 232 21 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 23 232 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 17 232 18 , srcInfoPoints = [] } "a") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 22 232 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 22 232 23 , srcInfoPoints = [] } "k")))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 25 232 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 25 232 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 28 232 30 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 32 232 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 26 232 27 , srcInfoPoints = [] } "b") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 31 232 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 31 232 32 , srcInfoPoints = [] } "k")))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 34 232 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 34 232 35 ] } (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 36 232 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 36 232 37 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 39 232 41 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 44 232 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 37 232 38 , srcInfoPoints = [] } "r") (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 42 232 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 42 232 44 , srcInfoPoints = [] } "k2"))))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 46 232 54 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 46 232 47 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 50 232 52 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 48 232 49 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 232 53 232 54 , srcInfoPoints = [] } "k" ])) , TypeInsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 1 233 25 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 1 233 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 6 233 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 22 233 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 15 233 21 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 15 233 19 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 15 233 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 15 233 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 15 233 17 , srcInfoPoints = [] } "Fa"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 18 233 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 18 233 19 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 20 233 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 20 233 21 , srcInfoPoints = [] } "b"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 24 233 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 233 24 233 25 , srcInfoPoints = [] } "a")) , TypeFamDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 1 236 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 1 236 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 6 236 12 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 13 236 51 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 13 236 42 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 13 236 33 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 13 236 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 13 236 16 , srcInfoPoints = [] } "Arr")) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 17 236 33 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 17 236 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 23 236 25 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 32 236 33 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 18 236 22 , srcInfoPoints = [] } "repr") (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 26 236 32 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 28 236 30 ] } (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 26 236 27 , srcInfoPoints = [] }) (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 31 236 32 , srcInfoPoints = [] })))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 34 236 42 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 34 236 35 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 37 236 39 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 41 236 42 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 35 236 36 , srcInfoPoints = [] } "a") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 40 236 41 , srcInfoPoints = [] }))) (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 43 236 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 43 236 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 46 236 48 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 50 236 51 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 44 236 45 , srcInfoPoints = [] } "b") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 49 236 50 , srcInfoPoints = [] }))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 52 236 62 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 52 236 53 ] } (KindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 54 236 62 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 54 236 55 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 57 236 59 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 61 236 62 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 55 236 56 , srcInfoPoints = [] } "r") (TyStar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 60 236 61 , srcInfoPoints = [] })))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 63 236 74 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 63 236 64 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 67 236 69 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 65 236 66 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 70 236 74 , srcInfoPoints = [] } "repr" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 75 236 76 , srcInfoPoints = [] } "a" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 236 77 236 78 , srcInfoPoints = [] } "b" ])) , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 1 243 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 1 238 6 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 23 238 28 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 5 239 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 5 240 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 5 242 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 5 243 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 1 245 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 7 238 22 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 7 238 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 7 238 17 , srcInfoPoints = [] } "ESymantics")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 18 238 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 238 18 238 22 , srcInfoPoints = [] } "repr"))) [] (Just [ ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 5 239 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 9 239 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 5 239 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 9 239 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 5 239 8 , srcInfoPoints = [] } "int" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 12 239 28 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 17 239 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 12 239 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 12 239 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 12 239 15 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 20 239 28 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 20 239 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 20 239 24 , srcInfoPoints = [] } "repr")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 25 239 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 25 239 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 239 25 239 28 , srcInfoPoints = [] } "Int")))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 5 240 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 9 240 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 5 240 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 9 240 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 5 240 8 , srcInfoPoints = [] } "add" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 12 240 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 22 240 24 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 12 240 20 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 12 240 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 12 240 16 , srcInfoPoints = [] } "repr")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 17 240 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 17 240 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 17 240 20 , srcInfoPoints = [] } "Int")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 25 240 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 34 240 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 25 240 33 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 25 240 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 25 240 29 , srcInfoPoints = [] } "repr")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 30 240 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 30 240 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 30 240 33 , srcInfoPoints = [] } "Int")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 37 240 45 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 37 240 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 37 240 41 , srcInfoPoints = [] } "repr")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 42 240 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 42 240 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 240 42 240 45 , srcInfoPoints = [] } "Int"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 5 242 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 9 242 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 5 242 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 9 242 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 5 242 8 , srcInfoPoints = [] } "lam" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 12 242 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 31 242 33 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 12 242 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 12 242 13 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 29 242 30 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 13 242 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 20 242 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 13 242 19 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 13 242 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 13 242 17 , srcInfoPoints = [] } "repr")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 18 242 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 18 242 19 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 23 242 29 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 23 242 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 23 242 27 , srcInfoPoints = [] } "repr")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 28 242 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 28 242 29 , srcInfoPoints = [] } "b"))))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 34 242 53 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 34 242 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 34 242 38 , srcInfoPoints = [] } "repr")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 39 242 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 39 242 40 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 52 242 53 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 52 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 48 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 40 242 43 , srcInfoPoints = [] } "Arr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 44 242 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 44 242 48 , srcInfoPoints = [] } "repr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 49 242 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 49 242 50 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 51 242 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 242 51 242 52 , srcInfoPoints = [] } "b"))))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 5 243 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 9 243 11 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 5 243 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 9 243 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 5 243 8 , srcInfoPoints = [] } "app" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 12 243 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 32 243 34 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 12 243 31 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 12 243 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 12 243 16 , srcInfoPoints = [] } "repr")) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 17 243 31 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 17 243 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 30 243 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 18 243 21 , srcInfoPoints = [] } "Arr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 22 243 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 22 243 26 , srcInfoPoints = [] } "repr"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 27 243 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 27 243 28 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 29 243 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 29 243 30 , srcInfoPoints = [] } "b"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 35 243 51 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 42 243 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 35 243 41 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 35 243 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 35 243 39 , srcInfoPoints = [] } "repr")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 40 243 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 40 243 41 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 45 243 51 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 45 243 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 45 243 49 , srcInfoPoints = [] } "repr")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 50 243 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 243 50 243 51 , srcInfoPoints = [] } "b")))))) ]) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 1 246 63 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 1 245 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 1 245 4 , srcInfoPoints = [] } "te4")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 5 246 63 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 5 245 6 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 7 246 63 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 7 245 10 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 7 246 9 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 11 245 69 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 11 245 11 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 7 246 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 11 245 69 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 11 245 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 11 245 13 , srcInfoPoints = [] } "c3")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 14 245 69 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 14 245 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 16 245 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 16 245 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 16 245 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 16 245 19 , srcInfoPoints = [] } "lam"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 20 245 69 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 20 245 21 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 68 245 69 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 21 245 68 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 21 245 22 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 24 245 26 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 22 245 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 22 245 23 , srcInfoPoints = [] } "f") ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 27 245 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 27 245 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 27 245 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 27 245 30 , srcInfoPoints = [] } "lam"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 31 245 68 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 31 245 32 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 67 245 68 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 32 245 67 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 32 245 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 35 245 37 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 33 245 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 33 245 34 , srcInfoPoints = [] } "x") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 38 245 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 38 245 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 38 245 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 38 245 39 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 40 245 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 40 245 41 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 41 245 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 44 245 45 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 40 245 45 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 40 245 41 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 41 245 44 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 44 245 45 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 41 245 44 , srcInfoPoints = [] } "app"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 46 245 67 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 46 245 47 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 66 245 67 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 47 245 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 47 245 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 47 245 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 47 245 48 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 49 245 54 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 49 245 50 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 50 245 53 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 53 245 54 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 49 245 54 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 49 245 50 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 50 245 53 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 53 245 54 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 50 245 53 , srcInfoPoints = [] } "app"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 55 245 66 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 55 245 56 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 65 245 66 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 56 245 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 56 245 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 56 245 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 56 245 57 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 58 245 63 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 58 245 59 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 59 245 62 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 62 245 63 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 58 245 63 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 58 245 59 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 59 245 62 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 62 245 63 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 59 245 62 , srcInfoPoints = [] } "app"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 64 245 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 64 245 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 245 64 245 65 , srcInfoPoints = [] } "x"))))))))))))))) Nothing ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 10 246 63 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 10 246 49 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 10 246 11 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 48 246 49 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 11 246 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 11 246 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 11 246 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 11 246 13 , srcInfoPoints = [] } "c3"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 14 246 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 14 246 15 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 15 246 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 18 246 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 14 246 19 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 14 246 15 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 15 246 18 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 18 246 19 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 15 246 18 , srcInfoPoints = [] } "app"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 20 246 48 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 20 246 21 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 47 246 48 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 21 246 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 21 246 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 21 246 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 21 246 24 , srcInfoPoints = [] } "lam"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 25 246 47 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 25 246 26 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 46 246 47 ] } (Lambda SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 26 246 46 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 26 246 27 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 29 246 31 ] } [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 27 246 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 27 246 28 , srcInfoPoints = [] } "x") ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 32 246 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 32 246 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 32 246 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 32 246 33 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 34 246 39 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 34 246 35 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 35 246 38 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 38 246 39 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 34 246 39 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 34 246 35 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 35 246 38 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 38 246 39 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 35 246 38 , srcInfoPoints = [] } "add"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 40 246 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 40 246 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 40 246 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 40 246 43 , srcInfoPoints = [] } "int"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 44 246 46 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 44 246 46 , srcInfoPoints = [] } 14 "14")))))))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 50 246 55 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 50 246 51 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 51 246 54 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 54 246 55 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 50 246 55 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 50 246 51 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 51 246 54 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 54 246 55 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 51 246 54 , srcInfoPoints = [] } "app"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 56 246 63 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 56 246 57 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 62 246 63 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 57 246 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 57 246 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 57 246 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 57 246 60 , srcInfoPoints = [] } "int"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 61 246 62 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 246 61 246 62 , srcInfoPoints = [] } 0 "0"))))))) Nothing , ClassDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 1 252 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 1 249 6 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 19 249 24 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 5 250 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 5 251 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 5 252 5 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 1 254 0 ] } Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 7 249 18 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 7 249 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 7 249 16 , srcInfoPoints = [] } "Manifold'")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 17 249 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 249 17 249 18 , srcInfoPoints = [] } "a"))) [] (Just [ ClsTyFam SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 5 250 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 5 250 9 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 10 250 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 10 250 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 10 250 14 , srcInfoPoints = [] } "Base")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 16 250 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 16 250 17 , srcInfoPoints = [] } "a"))) (Just (TyVarSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 18 250 21 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 18 250 19 ] } (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 20 250 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 20 250 21 , srcInfoPoints = [] } "r")))) (Just (InjectivityInfo SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 22 250 30 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 22 250 23 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 26 250 28 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 24 250 25 , srcInfoPoints = [] } "r") [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 250 29 250 30 , srcInfoPoints = [] } "a" ])) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 5 251 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 13 251 15 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 5 251 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 13 251 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 5 251 12 , srcInfoPoints = [] } "project" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 16 251 27 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 18 251 20 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 16 251 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 16 251 17 , srcInfoPoints = [] } "a")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 21 251 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 21 251 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 21 251 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 21 251 25 , srcInfoPoints = [] } "Base"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 26 251 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 251 26 251 27 , srcInfoPoints = [] } "a"))))) , ClsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 5 252 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 15 252 17 ] } (TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 5 252 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 15 252 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 5 252 14 , srcInfoPoints = [] } "unproject" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 18 252 29 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 25 252 27 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 18 252 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 18 252 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 18 252 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 18 252 22 , srcInfoPoints = [] } "Base"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 23 252 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 23 252 24 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 28 252 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 252 28 252 29 , srcInfoPoints = [] } "a")))) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 1 254 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 5 254 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 1 254 4 , srcInfoPoints = [] } "id'" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 8 254 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 8 254 14 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 16 254 17 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 15 254 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 15 254 16 , srcInfoPoints = [] } "a") ]) (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 18 254 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 18 254 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 32 254 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 34 254 36 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 18 254 36 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 18 254 19 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 32 254 33 , SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 34 254 36 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 20 254 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 20 254 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 20 254 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 20 254 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 20 254 29 , srcInfoPoints = [] } "Manifold'"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 30 254 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 30 254 31 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 37 254 53 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 44 254 46 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 37 254 43 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 37 254 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 37 254 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 37 254 41 , srcInfoPoints = [] } "Base"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 42 254 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 42 254 43 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 47 254 53 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 47 254 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 47 254 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 47 254 51 , srcInfoPoints = [] } "Base"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 52 254 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 254 52 254 53 , srcInfoPoints = [] } "a"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 1 255 26 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 1 255 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 1 255 4 , srcInfoPoints = [] } "id'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 5 255 26 , srcInfoPoints = [ SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 5 255 6 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 7 255 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 7 255 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 7 255 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 7 255 14 , srcInfoPoints = [] } "project"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 15 255 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 15 255 16 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 15 255 16 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 17 255 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 17 255 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 255 17 255 26 , srcInfoPoints = [] } "unproject"))))) Nothing ] , [ Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 12 15 12 43) " defines G, identical to F" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 27 1 27 81) " this is injective - a type variable introduced in the LHS is not mentioned on" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 28 1 28 56) " RHS but we don't claim injectivity in that argument." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 35 1 35 46) " make sure we look through type synonyms..." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 39 1 39 23) " .. but not newtypes" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 44 1 44 24) " Closed type families" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 46 1 46 80) " these are simple conversions from open type families. They should behave the" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 47 1 47 8) " same" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 64 1 64 72) " Here the last equation might return both Int and Char but we have to" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 65 1 65 61) " recognize that it is not possible due to equation overlap" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 71 1 71 81) " This is similar, except that the last equation contains concrete type. Since" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 72 1 72 56) " it is overlapped it should be dropped with a warning" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 78 1 78 78) " this one was tricky in the early implementation of injectivity. Now it is" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 79 1 79 69) " identical to the above but we still keep it as a regression test." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 85 1 85 79) " Now let's use declared type families. All the below definitions should work" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 87 1 87 61) " No ambiguity for any of the arguments - all are injective" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 91 1 91 55) " From 1st instance of F: a ~ Int, b ~ Char, c ~ Bool" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 95 1 95 31) " now the closed variant of F" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 102 1 102 65) " The last argument is not injective so it must be instantiated" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 106 1 106 45) " From 1st instance of I: a ~ Int, b ~ Char" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 110 1 110 30) " again, closed variant of I" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 117 1 117 51) " Now we have to test weird closed type families:" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 145 1 145 73) " Declarations below test more liberal RHSs of injectivity annotations:" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 146 1 146 79) " permiting variables to appear in different order than the one in which they" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 147 1 147 18) " were declared." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 154 1 154 79) " repeated tyvars in the RHS of injectivity annotation: no warnings or errors" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 155 1 155 59) " (consistent with behaviour for functional dependencies)" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 168 1 168 71) " Declaring kind injectivity. Here we only claim that knowing the RHS" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 169 1 169 45) " determines the LHS kind but not the type." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 186 1 186 74) " Now test some awkward cases from The Injectivity Paper. All should be" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 187 1 187 13) " accepted." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 216 1 216 56) " A sole exception to \"bare variables in the RHS\" rule" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 220 1 220 81) " This makes sure that over-saturated type family applications at the top-level" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 221 1 221 17) " are accepted." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 225 1 225 52) " make sure we look through type synonyms properly" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 230 1 230 80) " this has bare variable in the RHS but all LHS varaiables are also bare so it" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 231 1 231 22) " should be accepted" , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 235 1 235 55) " Taken from #9587. This exposed a bug in the solver." , Comment False (SrcSpan "tests/examples/InjectiveTypeFamilies.hs" 248 1 248 40) " This used to fail during development" ] ) haskell-src-exts-1.23.1/tests/examples/PartialSignatures.hs.parser.golden0000644000000000000000000274300213556712523024715 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 1 1 294 1 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 1 1 1 1 , SrcSpan "tests/examples/PartialSignatures.hs" 3 1 3 1 , SrcSpan "tests/examples/PartialSignatures.hs" 3 1 3 1 , SrcSpan "tests/examples/PartialSignatures.hs" 3 1 3 1 , SrcSpan "tests/examples/PartialSignatures.hs" 4 1 4 1 , SrcSpan "tests/examples/PartialSignatures.hs" 7 1 7 1 , SrcSpan "tests/examples/PartialSignatures.hs" 8 1 8 1 , SrcSpan "tests/examples/PartialSignatures.hs" 13 1 13 1 , SrcSpan "tests/examples/PartialSignatures.hs" 14 1 14 1 , SrcSpan "tests/examples/PartialSignatures.hs" 19 1 19 1 , SrcSpan "tests/examples/PartialSignatures.hs" 20 1 20 1 , SrcSpan "tests/examples/PartialSignatures.hs" 25 1 25 1 , SrcSpan "tests/examples/PartialSignatures.hs" 26 1 26 1 , SrcSpan "tests/examples/PartialSignatures.hs" 31 1 31 1 , SrcSpan "tests/examples/PartialSignatures.hs" 32 1 32 1 , SrcSpan "tests/examples/PartialSignatures.hs" 37 1 37 1 , SrcSpan "tests/examples/PartialSignatures.hs" 38 1 38 1 , SrcSpan "tests/examples/PartialSignatures.hs" 43 1 43 1 , SrcSpan "tests/examples/PartialSignatures.hs" 44 1 44 1 , SrcSpan "tests/examples/PartialSignatures.hs" 47 1 47 1 , SrcSpan "tests/examples/PartialSignatures.hs" 48 1 48 1 , SrcSpan "tests/examples/PartialSignatures.hs" 51 1 51 1 , SrcSpan "tests/examples/PartialSignatures.hs" 52 1 52 1 , SrcSpan "tests/examples/PartialSignatures.hs" 55 1 55 1 , SrcSpan "tests/examples/PartialSignatures.hs" 56 1 56 1 , SrcSpan "tests/examples/PartialSignatures.hs" 58 1 58 1 , SrcSpan "tests/examples/PartialSignatures.hs" 59 1 59 1 , SrcSpan "tests/examples/PartialSignatures.hs" 61 1 61 1 , SrcSpan "tests/examples/PartialSignatures.hs" 62 1 62 1 , SrcSpan "tests/examples/PartialSignatures.hs" 65 1 65 1 , SrcSpan "tests/examples/PartialSignatures.hs" 66 1 66 1 , SrcSpan "tests/examples/PartialSignatures.hs" 67 1 67 1 , SrcSpan "tests/examples/PartialSignatures.hs" 69 1 69 1 , SrcSpan "tests/examples/PartialSignatures.hs" 70 1 70 1 , SrcSpan "tests/examples/PartialSignatures.hs" 71 1 71 1 , SrcSpan "tests/examples/PartialSignatures.hs" 74 1 74 1 , SrcSpan "tests/examples/PartialSignatures.hs" 75 1 75 1 , SrcSpan "tests/examples/PartialSignatures.hs" 77 1 77 1 , SrcSpan "tests/examples/PartialSignatures.hs" 78 1 78 1 , SrcSpan "tests/examples/PartialSignatures.hs" 79 1 79 1 , SrcSpan "tests/examples/PartialSignatures.hs" 82 1 82 1 , SrcSpan "tests/examples/PartialSignatures.hs" 83 1 83 1 , SrcSpan "tests/examples/PartialSignatures.hs" 85 1 85 1 , SrcSpan "tests/examples/PartialSignatures.hs" 86 1 86 1 , SrcSpan "tests/examples/PartialSignatures.hs" 88 1 88 1 , SrcSpan "tests/examples/PartialSignatures.hs" 89 1 89 1 , SrcSpan "tests/examples/PartialSignatures.hs" 91 1 91 1 , SrcSpan "tests/examples/PartialSignatures.hs" 92 1 92 1 , SrcSpan "tests/examples/PartialSignatures.hs" 94 1 94 1 , SrcSpan "tests/examples/PartialSignatures.hs" 95 1 95 1 , SrcSpan "tests/examples/PartialSignatures.hs" 98 1 98 1 , SrcSpan "tests/examples/PartialSignatures.hs" 99 1 99 1 , SrcSpan "tests/examples/PartialSignatures.hs" 105 1 105 1 , SrcSpan "tests/examples/PartialSignatures.hs" 106 1 106 1 , SrcSpan "tests/examples/PartialSignatures.hs" 109 1 109 1 , SrcSpan "tests/examples/PartialSignatures.hs" 110 1 110 1 , SrcSpan "tests/examples/PartialSignatures.hs" 112 1 112 1 , SrcSpan "tests/examples/PartialSignatures.hs" 113 1 113 1 , SrcSpan "tests/examples/PartialSignatures.hs" 115 1 115 1 , SrcSpan "tests/examples/PartialSignatures.hs" 116 1 116 1 , SrcSpan "tests/examples/PartialSignatures.hs" 118 1 118 1 , SrcSpan "tests/examples/PartialSignatures.hs" 119 1 119 1 , SrcSpan "tests/examples/PartialSignatures.hs" 121 1 121 1 , SrcSpan "tests/examples/PartialSignatures.hs" 122 1 122 1 , SrcSpan "tests/examples/PartialSignatures.hs" 125 1 125 1 , SrcSpan "tests/examples/PartialSignatures.hs" 126 1 126 1 , SrcSpan "tests/examples/PartialSignatures.hs" 151 1 151 1 , SrcSpan "tests/examples/PartialSignatures.hs" 153 1 153 1 , SrcSpan "tests/examples/PartialSignatures.hs" 156 1 156 1 , SrcSpan "tests/examples/PartialSignatures.hs" 160 1 160 1 , SrcSpan "tests/examples/PartialSignatures.hs" 165 1 165 1 , SrcSpan "tests/examples/PartialSignatures.hs" 166 1 166 1 , SrcSpan "tests/examples/PartialSignatures.hs" 168 1 168 1 , SrcSpan "tests/examples/PartialSignatures.hs" 169 1 169 1 , SrcSpan "tests/examples/PartialSignatures.hs" 174 1 174 1 , SrcSpan "tests/examples/PartialSignatures.hs" 175 1 175 1 , SrcSpan "tests/examples/PartialSignatures.hs" 183 1 183 1 , SrcSpan "tests/examples/PartialSignatures.hs" 184 1 184 1 , SrcSpan "tests/examples/PartialSignatures.hs" 187 1 187 1 , SrcSpan "tests/examples/PartialSignatures.hs" 188 1 188 1 , SrcSpan "tests/examples/PartialSignatures.hs" 191 1 191 1 , SrcSpan "tests/examples/PartialSignatures.hs" 192 1 192 1 , SrcSpan "tests/examples/PartialSignatures.hs" 195 1 195 1 , SrcSpan "tests/examples/PartialSignatures.hs" 196 1 196 1 , SrcSpan "tests/examples/PartialSignatures.hs" 198 1 198 1 , SrcSpan "tests/examples/PartialSignatures.hs" 199 1 199 1 , SrcSpan "tests/examples/PartialSignatures.hs" 202 1 202 1 , SrcSpan "tests/examples/PartialSignatures.hs" 203 1 203 1 , SrcSpan "tests/examples/PartialSignatures.hs" 205 1 205 1 , SrcSpan "tests/examples/PartialSignatures.hs" 206 1 206 1 , SrcSpan "tests/examples/PartialSignatures.hs" 208 1 208 1 , SrcSpan "tests/examples/PartialSignatures.hs" 209 1 209 1 , SrcSpan "tests/examples/PartialSignatures.hs" 212 1 212 1 , SrcSpan "tests/examples/PartialSignatures.hs" 213 1 213 1 , SrcSpan "tests/examples/PartialSignatures.hs" 224 1 224 1 , SrcSpan "tests/examples/PartialSignatures.hs" 225 1 225 1 , SrcSpan "tests/examples/PartialSignatures.hs" 230 1 230 1 , SrcSpan "tests/examples/PartialSignatures.hs" 231 1 231 1 , SrcSpan "tests/examples/PartialSignatures.hs" 234 1 234 1 , SrcSpan "tests/examples/PartialSignatures.hs" 235 1 235 1 , SrcSpan "tests/examples/PartialSignatures.hs" 238 1 238 1 , SrcSpan "tests/examples/PartialSignatures.hs" 240 1 240 1 , SrcSpan "tests/examples/PartialSignatures.hs" 241 1 241 1 , SrcSpan "tests/examples/PartialSignatures.hs" 243 1 243 1 , SrcSpan "tests/examples/PartialSignatures.hs" 244 1 244 1 , SrcSpan "tests/examples/PartialSignatures.hs" 246 1 246 1 , SrcSpan "tests/examples/PartialSignatures.hs" 247 1 247 1 , SrcSpan "tests/examples/PartialSignatures.hs" 251 1 251 1 , SrcSpan "tests/examples/PartialSignatures.hs" 252 1 252 1 , SrcSpan "tests/examples/PartialSignatures.hs" 255 1 255 1 , SrcSpan "tests/examples/PartialSignatures.hs" 256 1 256 1 , SrcSpan "tests/examples/PartialSignatures.hs" 259 1 259 1 , SrcSpan "tests/examples/PartialSignatures.hs" 261 1 261 1 , SrcSpan "tests/examples/PartialSignatures.hs" 263 1 263 1 , SrcSpan "tests/examples/PartialSignatures.hs" 265 1 265 1 , SrcSpan "tests/examples/PartialSignatures.hs" 267 1 267 1 , SrcSpan "tests/examples/PartialSignatures.hs" 269 1 269 1 , SrcSpan "tests/examples/PartialSignatures.hs" 270 1 270 1 , SrcSpan "tests/examples/PartialSignatures.hs" 272 1 272 1 , SrcSpan "tests/examples/PartialSignatures.hs" 273 1 273 1 , SrcSpan "tests/examples/PartialSignatures.hs" 276 1 276 1 , SrcSpan "tests/examples/PartialSignatures.hs" 282 1 282 1 , SrcSpan "tests/examples/PartialSignatures.hs" 283 1 283 1 , SrcSpan "tests/examples/PartialSignatures.hs" 285 1 285 1 , SrcSpan "tests/examples/PartialSignatures.hs" 286 1 286 1 , SrcSpan "tests/examples/PartialSignatures.hs" 289 1 289 1 , SrcSpan "tests/examples/PartialSignatures.hs" 290 1 290 1 , SrcSpan "tests/examples/PartialSignatures.hs" 292 1 292 1 , SrcSpan "tests/examples/PartialSignatures.hs" 293 1 293 1 , SrcSpan "tests/examples/PartialSignatures.hs" 294 1 294 1 , SrcSpan "tests/examples/PartialSignatures.hs" 294 1 294 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 1 1 1 60 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 1 1 1 13 , SrcSpan "tests/examples/PartialSignatures.hs" 1 19 1 20 , SrcSpan "tests/examples/PartialSignatures.hs" 1 35 1 36 , SrcSpan "tests/examples/PartialSignatures.hs" 1 57 1 60 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 1 14 1 19 , srcInfoPoints = [] } "GADTs" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 1 21 1 35 , srcInfoPoints = [] } "NamedWildCards" , Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 1 37 1 56 , srcInfoPoints = [] } "ScopedTypeVariables" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 1 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 3 5 3 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 1 3 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 8 3 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 3 12 3 14 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 8 3 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 8 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 8 3 11 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 15 3 20 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 15 3 16 , srcInfoPoints = [] } Nothing) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 17 3 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 17 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 3 17 3 20 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 1 4 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 1 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 1 4 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 5 4 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 5 4 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 7 4 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 4 7 4 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 20 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 17 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 9 4 12 , srcInfoPoints = [] } "Foo"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 13 4 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 13 4 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 13 4 17 , srcInfoPoints = [] } "True")))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 19 , SrcSpan "tests/examples/PartialSignatures.hs" 4 19 4 20 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 19 , SrcSpan "tests/examples/PartialSignatures.hs" 4 19 4 20 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 4 18 4 19 , SrcSpan "tests/examples/PartialSignatures.hs" 4 19 4 20 ] })))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 21 4 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 21 4 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 4 21 4 22 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 7 1 7 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 7 11 7 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 7 1 7 10 , srcInfoPoints = [] } "addAndOr1" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 7 14 7 15 , srcInfoPoints = [] } Nothing) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 1 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 3 9 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 1 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 3 9 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 1 8 10 , srcInfoPoints = [] } "addAndOr1") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 11 8 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 11 8 12 , SrcSpan "tests/examples/PartialSignatures.hs" 8 13 8 14 , SrcSpan "tests/examples/PartialSignatures.hs" 8 16 8 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 12 8 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 12 8 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 15 8 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 15 8 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 18 8 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 18 8 19 , SrcSpan "tests/examples/PartialSignatures.hs" 8 20 8 21 , SrcSpan "tests/examples/PartialSignatures.hs" 8 23 8 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 19 8 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 19 8 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 22 8 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 22 8 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 25 8 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 25 8 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 27 8 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 27 8 28 , SrcSpan "tests/examples/PartialSignatures.hs" 8 38 8 39 , SrcSpan "tests/examples/PartialSignatures.hs" 8 46 8 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 28 8 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 28 8 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 28 8 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 28 8 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 30 8 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 30 8 31 , SrcSpan "tests/examples/PartialSignatures.hs" 8 31 8 35 , SrcSpan "tests/examples/PartialSignatures.hs" 8 35 8 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 30 8 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 8 30 8 31 , SrcSpan "tests/examples/PartialSignatures.hs" 8 31 8 35 , SrcSpan "tests/examples/PartialSignatures.hs" 8 35 8 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 31 8 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 37 8 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 37 8 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 37 8 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 40 8 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 40 8 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 40 8 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 40 8 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 42 8 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 42 8 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 42 8 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 45 8 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 45 8 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 8 45 8 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 9 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 9 9 9 , SrcSpan "tests/examples/PartialSignatures.hs" 10 9 10 9 , SrcSpan "tests/examples/PartialSignatures.hs" 13 1 13 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 9 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 14 9 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 9 9 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 17 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 21 9 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 17 9 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 17 9 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 17 9 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 24 9 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 9 28 9 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 24 9 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 24 9 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 24 9 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 31 9 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 31 9 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 9 31 9 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 9 10 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 9 10 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 9 10 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 9 10 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 12 10 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 10 11 10 12 , SrcSpan "tests/examples/PartialSignatures.hs" 10 12 10 16 , SrcSpan "tests/examples/PartialSignatures.hs" 10 16 10 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 18 10 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 18 10 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 20 10 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 10 20 10 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 22 10 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 22 10 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 22 10 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 22 10 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 24 10 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 24 10 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 24 10 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 26 10 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 26 10 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 10 26 10 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 13 1 13 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 13 11 13 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 13 1 13 10 , srcInfoPoints = [] } "addAndOr2" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 13 14 13 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 13 16 13 18 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 13 14 13 15 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 13 19 13 20 , srcInfoPoints = [] } Nothing)) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 1 16 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 3 15 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 1 16 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 3 15 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 1 14 10 , srcInfoPoints = [] } "addAndOr2") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 11 14 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 11 14 12 , SrcSpan "tests/examples/PartialSignatures.hs" 14 13 14 14 , SrcSpan "tests/examples/PartialSignatures.hs" 14 16 14 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 12 14 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 12 14 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 15 14 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 15 14 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 18 14 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 18 14 19 , SrcSpan "tests/examples/PartialSignatures.hs" 14 20 14 21 , SrcSpan "tests/examples/PartialSignatures.hs" 14 23 14 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 19 14 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 19 14 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 22 14 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 22 14 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 25 14 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 25 14 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 27 14 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 27 14 28 , SrcSpan "tests/examples/PartialSignatures.hs" 14 38 14 39 , SrcSpan "tests/examples/PartialSignatures.hs" 14 46 14 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 28 14 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 28 14 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 28 14 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 28 14 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 30 14 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 30 14 31 , SrcSpan "tests/examples/PartialSignatures.hs" 14 31 14 35 , SrcSpan "tests/examples/PartialSignatures.hs" 14 35 14 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 30 14 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 14 30 14 31 , SrcSpan "tests/examples/PartialSignatures.hs" 14 31 14 35 , SrcSpan "tests/examples/PartialSignatures.hs" 14 35 14 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 31 14 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 37 14 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 37 14 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 37 14 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 40 14 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 40 14 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 40 14 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 40 14 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 42 14 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 42 14 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 42 14 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 45 14 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 45 14 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 14 45 14 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 9 16 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 9 15 9 , SrcSpan "tests/examples/PartialSignatures.hs" 16 9 16 9 , SrcSpan "tests/examples/PartialSignatures.hs" 19 1 19 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 9 15 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 14 15 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 9 15 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 17 15 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 21 15 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 17 15 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 17 15 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 17 15 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 24 15 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 15 28 15 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 24 15 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 24 15 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 24 15 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 31 15 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 31 15 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 15 31 15 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 9 16 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 9 16 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 9 16 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 9 16 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 12 16 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 16 11 16 12 , SrcSpan "tests/examples/PartialSignatures.hs" 16 12 16 16 , SrcSpan "tests/examples/PartialSignatures.hs" 16 16 16 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 18 16 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 18 16 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 20 16 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 16 20 16 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 22 16 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 22 16 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 22 16 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 22 16 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 24 16 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 24 16 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 24 16 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 26 16 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 26 16 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 16 26 16 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 1 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 19 11 19 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 1 19 10 , srcInfoPoints = [] } "addAndOr3" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 14 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 19 16 19 18 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 14 19 15 , srcInfoPoints = [] } Nothing) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 19 19 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 19 21 19 23 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 19 19 20 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 19 24 19 25 , srcInfoPoints = [] } Nothing))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 1 22 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 3 21 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 1 22 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 3 21 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 1 20 10 , srcInfoPoints = [] } "addAndOr3") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 11 20 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 11 20 12 , SrcSpan "tests/examples/PartialSignatures.hs" 20 13 20 14 , SrcSpan "tests/examples/PartialSignatures.hs" 20 16 20 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 12 20 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 12 20 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 15 20 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 15 20 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 18 20 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 18 20 19 , SrcSpan "tests/examples/PartialSignatures.hs" 20 20 20 21 , SrcSpan "tests/examples/PartialSignatures.hs" 20 23 20 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 19 20 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 19 20 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 22 20 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 22 20 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 25 20 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 25 20 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 27 20 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 27 20 28 , SrcSpan "tests/examples/PartialSignatures.hs" 20 38 20 39 , SrcSpan "tests/examples/PartialSignatures.hs" 20 46 20 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 28 20 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 28 20 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 28 20 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 28 20 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 30 20 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 30 20 31 , SrcSpan "tests/examples/PartialSignatures.hs" 20 31 20 35 , SrcSpan "tests/examples/PartialSignatures.hs" 20 35 20 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 30 20 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 20 30 20 31 , SrcSpan "tests/examples/PartialSignatures.hs" 20 31 20 35 , SrcSpan "tests/examples/PartialSignatures.hs" 20 35 20 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 31 20 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 37 20 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 37 20 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 37 20 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 40 20 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 40 20 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 40 20 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 40 20 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 42 20 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 42 20 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 42 20 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 45 20 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 45 20 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 20 45 20 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 9 22 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 9 21 9 , SrcSpan "tests/examples/PartialSignatures.hs" 22 9 22 9 , SrcSpan "tests/examples/PartialSignatures.hs" 25 1 25 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 9 21 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 14 21 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 9 21 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 17 21 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 21 21 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 17 21 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 17 21 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 17 21 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 24 21 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 21 28 21 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 24 21 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 24 21 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 24 21 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 31 21 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 31 21 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 21 31 21 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 9 22 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 9 22 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 9 22 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 9 22 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 12 22 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 22 11 22 12 , SrcSpan "tests/examples/PartialSignatures.hs" 22 12 22 16 , SrcSpan "tests/examples/PartialSignatures.hs" 22 16 22 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 18 22 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 18 22 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 20 22 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 22 20 22 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 22 22 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 22 22 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 22 22 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 22 22 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 24 22 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 24 22 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 24 22 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 26 22 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 26 22 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 22 26 22 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 1 25 43 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 11 25 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 1 25 10 , srcInfoPoints = [] } "addAndOr4" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 14 25 43 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 22 25 24 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 14 25 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 14 25 15 , SrcSpan "tests/examples/PartialSignatures.hs" 25 20 25 21 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 15 25 20 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 15 25 18 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 15 25 16 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 17 25 18 , srcInfoPoints = [] } Nothing)) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 19 25 20 , srcInfoPoints = [] } Nothing))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 25 25 43 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 33 25 35 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 25 25 32 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 25 25 26 , SrcSpan "tests/examples/PartialSignatures.hs" 25 31 25 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 26 25 31 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 26 25 29 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 26 25 27 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 28 25 29 , srcInfoPoints = [] } Nothing)) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 30 25 31 , srcInfoPoints = [] } Nothing))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 36 25 43 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 25 36 25 37 , SrcSpan "tests/examples/PartialSignatures.hs" 25 42 25 43 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 37 25 42 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 37 25 40 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 37 25 38 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 39 25 40 , srcInfoPoints = [] } Nothing)) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 25 41 25 42 , srcInfoPoints = [] } Nothing))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 1 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 3 27 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 1 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 3 27 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 1 26 10 , srcInfoPoints = [] } "addAndOr4") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 11 26 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 11 26 12 , SrcSpan "tests/examples/PartialSignatures.hs" 26 13 26 14 , SrcSpan "tests/examples/PartialSignatures.hs" 26 16 26 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 12 26 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 12 26 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 15 26 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 15 26 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 18 26 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 18 26 19 , SrcSpan "tests/examples/PartialSignatures.hs" 26 20 26 21 , SrcSpan "tests/examples/PartialSignatures.hs" 26 23 26 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 19 26 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 19 26 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 22 26 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 22 26 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 25 26 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 25 26 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 27 26 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 27 26 28 , SrcSpan "tests/examples/PartialSignatures.hs" 26 38 26 39 , SrcSpan "tests/examples/PartialSignatures.hs" 26 46 26 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 28 26 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 28 26 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 28 26 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 28 26 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 30 26 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 30 26 31 , SrcSpan "tests/examples/PartialSignatures.hs" 26 31 26 35 , SrcSpan "tests/examples/PartialSignatures.hs" 26 35 26 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 30 26 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 26 30 26 31 , SrcSpan "tests/examples/PartialSignatures.hs" 26 31 26 35 , SrcSpan "tests/examples/PartialSignatures.hs" 26 35 26 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 31 26 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 37 26 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 37 26 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 37 26 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 40 26 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 40 26 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 40 26 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 40 26 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 42 26 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 42 26 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 42 26 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 45 26 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 45 26 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 26 45 26 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 9 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 9 27 9 , SrcSpan "tests/examples/PartialSignatures.hs" 28 9 28 9 , SrcSpan "tests/examples/PartialSignatures.hs" 31 1 31 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 9 27 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 14 27 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 9 27 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 17 27 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 21 27 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 17 27 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 17 27 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 17 27 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 24 27 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 27 28 27 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 24 27 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 24 27 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 24 27 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 31 27 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 31 27 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 27 31 27 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 9 28 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 9 28 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 9 28 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 9 28 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 12 28 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 28 11 28 12 , SrcSpan "tests/examples/PartialSignatures.hs" 28 12 28 16 , SrcSpan "tests/examples/PartialSignatures.hs" 28 16 28 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 18 28 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 18 28 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 20 28 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 28 20 28 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 22 28 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 22 28 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 22 28 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 22 28 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 24 28 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 24 28 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 24 28 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 26 28 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 26 28 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 28 26 28 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 1 31 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 11 31 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 1 31 10 , srcInfoPoints = [] } "addAndOr5" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 14 31 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 21 31 23 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 14 31 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 14 31 15 , SrcSpan "tests/examples/PartialSignatures.hs" 31 16 31 17 , SrcSpan "tests/examples/PartialSignatures.hs" 31 19 31 20 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 15 31 16 , srcInfoPoints = [] } Nothing , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 18 31 19 , srcInfoPoints = [] } Nothing ]) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 24 31 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 31 31 33 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 24 31 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 24 31 25 , SrcSpan "tests/examples/PartialSignatures.hs" 31 26 31 27 , SrcSpan "tests/examples/PartialSignatures.hs" 31 29 31 30 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 25 31 26 , srcInfoPoints = [] } Nothing , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 28 31 29 , srcInfoPoints = [] } Nothing ]) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 34 31 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 31 34 31 35 , SrcSpan "tests/examples/PartialSignatures.hs" 31 36 31 37 , SrcSpan "tests/examples/PartialSignatures.hs" 31 39 31 40 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 35 31 36 , srcInfoPoints = [] } Nothing , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 31 38 31 39 , srcInfoPoints = [] } Nothing ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 1 34 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 3 33 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 1 34 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 3 33 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 1 32 10 , srcInfoPoints = [] } "addAndOr5") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 11 32 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 11 32 12 , SrcSpan "tests/examples/PartialSignatures.hs" 32 13 32 14 , SrcSpan "tests/examples/PartialSignatures.hs" 32 16 32 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 12 32 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 12 32 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 15 32 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 15 32 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 18 32 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 18 32 19 , SrcSpan "tests/examples/PartialSignatures.hs" 32 20 32 21 , SrcSpan "tests/examples/PartialSignatures.hs" 32 23 32 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 19 32 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 19 32 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 22 32 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 22 32 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 25 32 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 25 32 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 27 32 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 27 32 28 , SrcSpan "tests/examples/PartialSignatures.hs" 32 38 32 39 , SrcSpan "tests/examples/PartialSignatures.hs" 32 46 32 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 28 32 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 28 32 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 28 32 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 28 32 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 30 32 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 30 32 31 , SrcSpan "tests/examples/PartialSignatures.hs" 32 31 32 35 , SrcSpan "tests/examples/PartialSignatures.hs" 32 35 32 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 30 32 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 32 30 32 31 , SrcSpan "tests/examples/PartialSignatures.hs" 32 31 32 35 , SrcSpan "tests/examples/PartialSignatures.hs" 32 35 32 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 31 32 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 37 32 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 37 32 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 37 32 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 40 32 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 40 32 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 40 32 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 40 32 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 42 32 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 42 32 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 42 32 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 45 32 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 45 32 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 32 45 32 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 9 34 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 9 33 9 , SrcSpan "tests/examples/PartialSignatures.hs" 34 9 34 9 , SrcSpan "tests/examples/PartialSignatures.hs" 37 1 37 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 9 33 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 14 33 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 9 33 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 17 33 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 21 33 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 17 33 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 17 33 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 17 33 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 24 33 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 33 28 33 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 24 33 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 24 33 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 24 33 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 31 33 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 31 33 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 33 31 33 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 9 34 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 9 34 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 9 34 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 9 34 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 12 34 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 34 11 34 12 , SrcSpan "tests/examples/PartialSignatures.hs" 34 12 34 16 , SrcSpan "tests/examples/PartialSignatures.hs" 34 16 34 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 18 34 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 18 34 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 20 34 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 34 20 34 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 22 34 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 22 34 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 22 34 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 22 34 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 24 34 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 24 34 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 24 34 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 26 34 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 26 34 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 34 26 34 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 1 37 51 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 11 37 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 1 37 10 , srcInfoPoints = [] } "addAndOr6" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 14 37 51 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 23 37 25 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 14 37 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 14 37 15 , SrcSpan "tests/examples/PartialSignatures.hs" 37 18 37 19 , SrcSpan "tests/examples/PartialSignatures.hs" 37 21 37 22 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 15 37 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 15 37 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 15 37 18 , srcInfoPoints = [] } "Int")) , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 20 37 21 , srcInfoPoints = [] } Nothing ]) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 26 37 51 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 36 37 38 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 26 37 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 26 37 27 , SrcSpan "tests/examples/PartialSignatures.hs" 37 31 37 32 , SrcSpan "tests/examples/PartialSignatures.hs" 37 34 37 35 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 27 37 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 27 37 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 27 37 31 , srcInfoPoints = [] } "Bool")) , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 33 37 34 , srcInfoPoints = [] } Nothing ]) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 39 37 51 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 37 39 37 40 , SrcSpan "tests/examples/PartialSignatures.hs" 37 50 37 51 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 40 37 50 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 40 37 45 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 40 37 41 , srcInfoPoints = [] } Nothing) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 42 37 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 42 37 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 42 37 45 , srcInfoPoints = [] } "Int")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 46 37 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 46 37 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 37 46 37 50 , srcInfoPoints = [] } "Bool"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 1 40 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 3 39 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 1 40 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 3 39 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 1 38 10 , srcInfoPoints = [] } "addAndOr6") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 11 38 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 11 38 12 , SrcSpan "tests/examples/PartialSignatures.hs" 38 13 38 14 , SrcSpan "tests/examples/PartialSignatures.hs" 38 16 38 17 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 12 38 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 12 38 13 , srcInfoPoints = [] } "a") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 15 38 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 15 38 16 , srcInfoPoints = [] } "b") ] , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 18 38 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 18 38 19 , SrcSpan "tests/examples/PartialSignatures.hs" 38 20 38 21 , SrcSpan "tests/examples/PartialSignatures.hs" 38 23 38 24 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 19 38 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 19 38 20 , srcInfoPoints = [] } "c") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 22 38 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 22 38 23 , srcInfoPoints = [] } "d") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 25 38 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 25 38 26 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 27 38 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 27 38 28 , SrcSpan "tests/examples/PartialSignatures.hs" 38 38 38 39 , SrcSpan "tests/examples/PartialSignatures.hs" 38 46 38 47 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 28 38 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 28 38 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 28 38 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 28 38 29 , srcInfoPoints = [] } "a"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 30 38 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 30 38 31 , SrcSpan "tests/examples/PartialSignatures.hs" 38 31 38 35 , SrcSpan "tests/examples/PartialSignatures.hs" 38 35 38 36 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 30 38 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 38 30 38 31 , SrcSpan "tests/examples/PartialSignatures.hs" 38 31 38 35 , SrcSpan "tests/examples/PartialSignatures.hs" 38 35 38 36 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 31 38 35 , srcInfoPoints = [] } "plus"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 37 38 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 37 38 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 37 38 38 , srcInfoPoints = [] } "d"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 40 38 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 40 38 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 40 38 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 40 38 41 , srcInfoPoints = [] } "b"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 42 38 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 42 38 44 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 42 38 44 , srcInfoPoints = [] } "||"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 45 38 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 45 38 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 38 45 38 46 , srcInfoPoints = [] } "c"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 9 40 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 9 39 9 , SrcSpan "tests/examples/PartialSignatures.hs" 40 9 40 9 , SrcSpan "tests/examples/PartialSignatures.hs" 43 1 43 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 9 39 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 14 39 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 9 39 13 , srcInfoPoints = [] } "plus" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 17 39 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 21 39 23 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 17 39 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 17 39 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 17 39 20 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 24 39 34 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 39 28 39 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 24 39 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 24 39 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 24 39 27 , srcInfoPoints = [] } "Int"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 31 39 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 31 39 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 39 31 39 34 , srcInfoPoints = [] } "Int"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 9 40 27 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 9 40 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 9 40 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 9 40 10 , srcInfoPoints = [] } "x")) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 12 40 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 40 11 40 12 , SrcSpan "tests/examples/PartialSignatures.hs" 40 12 40 16 , SrcSpan "tests/examples/PartialSignatures.hs" 40 16 40 17 ] } "plus") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 18 40 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 18 40 19 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 20 40 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 40 20 40 21 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 22 40 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 22 40 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 22 40 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 22 40 23 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 24 40 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 24 40 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 24 40 25 , srcInfoPoints = [] } "+"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 26 40 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 26 40 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 40 26 40 27 , srcInfoPoints = [] } "y"))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 43 1 43 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 43 5 43 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 43 1 43 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 43 8 43 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 43 10 43 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 43 8 43 9 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 43 13 43 14 , srcInfoPoints = [] } Nothing)) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 1 44 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 1 44 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 1 44 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 5 44 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 5 44 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 7 44 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 44 7 44 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 9 44 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 9 44 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 9 44 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 9 44 12 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 13 44 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 13 44 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 44 13 44 14 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 47 1 47 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 47 7 47 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 47 1 47 6 , srcInfoPoints = [] } "alpha" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 47 10 47 11 , srcInfoPoints = [] } Nothing) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 1 48 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 1 48 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 1 48 6 , srcInfoPoints = [] } "alpha")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 7 48 10 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 48 7 48 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 9 48 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 48 9 48 10 , srcInfoPoints = [] } 3 "3"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 1 51 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 51 7 51 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 1 51 6 , srcInfoPoints = [] } "bravo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 10 51 16 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 10 51 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 51 12 51 14 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 10 51 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 51 12 51 14 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 10 51 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 51 12 51 14 ] } Nothing)))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 51 15 51 16 , srcInfoPoints = [] } Nothing)) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 1 52 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 1 52 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 1 52 6 , srcInfoPoints = [] } "bravo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 7 52 10 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 52 7 52 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 9 52 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 52 9 52 10 , srcInfoPoints = [] } 3 "3"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 1 55 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 55 7 55 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 1 55 6 , srcInfoPoints = [] } "bravo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 10 55 16 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 10 55 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 55 12 55 14 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 10 55 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 55 12 55 14 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 10 55 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 55 12 55 14 ] } Nothing)))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 55 15 55 16 , srcInfoPoints = [] } Nothing)) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 1 56 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 1 56 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 1 56 6 , srcInfoPoints = [] } "bravo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 7 56 10 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 56 7 56 8 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 9 56 10 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 56 9 56 10 , srcInfoPoints = [] } 3 "3"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 1 58 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 58 7 58 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 1 58 6 , srcInfoPoints = [] } "barry" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 10 58 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 58 13 58 15 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 10 58 12 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 11 58 12 , srcInfoPoints = [] } "a"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 16 58 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 58 16 58 17 , SrcSpan "tests/examples/PartialSignatures.hs" 58 22 58 23 , SrcSpan "tests/examples/PartialSignatures.hs" 58 28 58 29 ] } Boxed [ TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 17 58 22 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 17 58 19 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 18 58 19 , srcInfoPoints = [] } "b"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 20 58 22 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 21 58 22 , srcInfoPoints = [] } "a"))) , TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 24 58 28 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 24 58 26 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 25 58 26 , srcInfoPoints = [] } "b"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 58 27 58 28 , srcInfoPoints = [] } Nothing) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 1 59 30 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 1 59 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 1 59 6 , srcInfoPoints = [] } "barry") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 7 59 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 7 59 8 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 9 59 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 59 9 59 10 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 11 59 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 59 11 59 12 , SrcSpan "tests/examples/PartialSignatures.hs" 59 20 59 21 , SrcSpan "tests/examples/PartialSignatures.hs" 59 29 59 30 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 12 59 20 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 12 59 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 12 59 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 12 59 16 , srcInfoPoints = [] } "Left"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 17 59 20 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 17 59 20 , srcInfoPoints = [] } "x" "x")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 22 59 29 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 22 59 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 22 59 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 22 59 27 , srcInfoPoints = [] } "Right"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 28 59 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 28 59 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 59 28 59 29 , srcInfoPoints = [] } "x"))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 1 61 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 61 5 61 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 1 61 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 26 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 61 10 61 11 , SrcSpan "tests/examples/PartialSignatures.hs" 61 17 61 19 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 61 10 61 11 , SrcSpan "tests/examples/PartialSignatures.hs" 61 17 61 19 ] } (TyEquals SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 61 10 61 11 , SrcSpan "tests/examples/PartialSignatures.hs" 61 17 61 19 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 8 61 9 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 12 61 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 12 61 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 12 61 16 , srcInfoPoints = [] } "Bool"))))))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 20 61 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 61 20 61 21 , SrcSpan "tests/examples/PartialSignatures.hs" 61 22 61 23 , SrcSpan "tests/examples/PartialSignatures.hs" 61 25 61 26 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 21 61 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 21 61 22 , srcInfoPoints = [] } "a") , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 61 24 61 25 , srcInfoPoints = [] } Nothing ])) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 1 62 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 1 62 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 1 62 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 5 62 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 62 5 62 6 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 7 62 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 62 7 62 8 , SrcSpan "tests/examples/PartialSignatures.hs" 62 12 62 13 , SrcSpan "tests/examples/PartialSignatures.hs" 62 19 62 20 ] } Boxed [ Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 8 62 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 8 62 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 8 62 12 , srcInfoPoints = [] } "True")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 14 62 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 14 62 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 62 14 62 19 , srcInfoPoints = [] } "False")) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 1 65 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 65 7 65 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 1 65 6 , srcInfoPoints = [] } "every" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 10 65 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 65 12 65 14 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 10 65 11 , srcInfoPoints = [] } Nothing) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 15 65 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 65 17 65 19 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 15 65 16 , srcInfoPoints = [] } Nothing) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 20 65 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 20 65 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 65 20 65 24 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 1 67 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 1 66 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 1 66 6 , srcInfoPoints = [] } "every") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 7 66 8 , srcInfoPoints = [] } , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 9 66 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 66 9 66 10 , SrcSpan "tests/examples/PartialSignatures.hs" 66 10 66 11 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 12 66 18 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 66 12 66 13 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 14 66 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 14 66 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 66 14 66 18 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 1 67 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 1 67 6 , srcInfoPoints = [] } "every") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 7 67 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 7 67 8 , srcInfoPoints = [] } "p") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 9 67 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 67 9 67 10 , SrcSpan "tests/examples/PartialSignatures.hs" 67 14 67 15 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 10 67 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 10 67 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 10 67 11 , srcInfoPoints = [] } "x")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 11 67 12 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 11 67 12 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 12 67 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 12 67 14 , srcInfoPoints = [] } "xs"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 16 67 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 67 16 67 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 18 67 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 18 67 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 18 67 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 18 67 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 18 67 19 , srcInfoPoints = [] } "p"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 20 67 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 20 67 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 20 67 21 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 22 67 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 22 67 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 22 67 24 , srcInfoPoints = [] } "&&"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 25 67 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 25 67 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 25 67 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 25 67 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 25 67 30 , srcInfoPoints = [] } "every"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 31 67 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 31 67 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 31 67 32 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 33 67 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 33 67 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 67 33 67 35 , srcInfoPoints = [] } "xs")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 1 69 38 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 7 69 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 1 69 6 , srcInfoPoints = [] } "every" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 10 69 38 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 23 69 25 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 10 69 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 10 69 11 , SrcSpan "tests/examples/PartialSignatures.hs" 69 21 69 22 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 11 69 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 14 69 16 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 11 69 13 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 12 69 13 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 17 69 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 17 69 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 17 69 21 , srcInfoPoints = [] } "Bool"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 26 69 38 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 31 69 33 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 26 69 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 69 26 69 27 , SrcSpan "tests/examples/PartialSignatures.hs" 69 29 69 30 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 27 69 29 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 28 69 29 , srcInfoPoints = [] } "a")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 34 69 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 34 69 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 69 34 69 38 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 1 71 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 1 70 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 1 70 6 , srcInfoPoints = [] } "every") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 7 70 8 , srcInfoPoints = [] } , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 9 70 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 70 9 70 10 , SrcSpan "tests/examples/PartialSignatures.hs" 70 10 70 11 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 12 70 18 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 70 12 70 13 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 14 70 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 14 70 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 70 14 70 18 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 1 71 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 1 71 6 , srcInfoPoints = [] } "every") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 7 71 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 7 71 8 , srcInfoPoints = [] } "p") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 9 71 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 71 9 71 10 , SrcSpan "tests/examples/PartialSignatures.hs" 71 14 71 15 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 10 71 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 10 71 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 10 71 11 , srcInfoPoints = [] } "x")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 11 71 12 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 11 71 12 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 12 71 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 12 71 14 , srcInfoPoints = [] } "xs"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 16 71 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 71 16 71 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 18 71 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 18 71 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 18 71 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 18 71 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 18 71 19 , srcInfoPoints = [] } "p"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 20 71 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 20 71 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 20 71 21 , srcInfoPoints = [] } "x")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 22 71 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 22 71 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 22 71 24 , srcInfoPoints = [] } "&&"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 25 71 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 25 71 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 25 71 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 25 71 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 25 71 30 , srcInfoPoints = [] } "every"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 31 71 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 31 71 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 31 71 32 , srcInfoPoints = [] } "p")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 33 71 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 33 71 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 71 33 71 35 , srcInfoPoints = [] } "xs")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 1 74 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 74 5 74 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 1 74 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 8 74 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 74 13 74 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 8 74 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 8 74 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 8 74 12 , srcInfoPoints = [] } "Bool"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 16 74 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 16 74 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 74 16 74 20 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 1 75 17 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 1 75 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 1 75 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 5 75 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 5 75 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 7 75 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 75 7 75 8 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 9 75 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 75 9 75 10 , SrcSpan "tests/examples/PartialSignatures.hs" 75 16 75 17 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 10 75 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 75 12 75 14 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 10 75 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 10 75 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 10 75 11 , srcInfoPoints = [] } "x"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 75 15 75 16 , srcInfoPoints = [] } Nothing)))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 1 77 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 77 5 77 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 1 77 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 8 77 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 77 11 77 13 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 8 77 10 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 9 77 10 , srcInfoPoints = [] } "a"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 14 77 16 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 77 15 77 16 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 1 79 25 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 1 78 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 1 78 4 , srcInfoPoints = [] } "bar") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 5 78 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 5 78 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 5 78 9 , srcInfoPoints = [] } "True")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 11 78 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 78 11 78 12 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 13 78 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 78 13 78 14 , SrcSpan "tests/examples/PartialSignatures.hs" 78 25 78 26 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 14 78 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 78 20 78 22 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 14 78 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 14 78 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 14 78 19 , srcInfoPoints = [] } "False"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 23 78 25 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 78 24 78 25 , srcInfoPoints = [] } "a")))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 1 79 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 1 79 4 , srcInfoPoints = [] } "bar") [ PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 5 79 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 5 79 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 5 79 10 , srcInfoPoints = [] } "False")) [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 11 79 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 79 11 79 12 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 13 79 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 79 13 79 14 , SrcSpan "tests/examples/PartialSignatures.hs" 79 24 79 25 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 14 79 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 79 19 79 21 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 14 79 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 14 79 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 14 79 18 , srcInfoPoints = [] } "True"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 22 79 24 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 79 23 79 24 , srcInfoPoints = [] } "a")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 1 82 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 82 10 82 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 1 82 9 , srcInfoPoints = [] } "arbitCs1" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 13 82 29 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 13 82 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 82 15 82 17 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 13 82 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 82 15 82 17 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 13 82 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 82 15 82 17 ] } Nothing)))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 18 82 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 82 20 82 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 18 82 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 18 82 19 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 23 82 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 23 82 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 82 23 82 29 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 1 83 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 1 83 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 1 83 9 , srcInfoPoints = [] } "arbitCs1") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 10 83 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 10 83 11 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 12 83 44 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 83 12 83 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 14 83 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 14 83 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 14 83 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 14 83 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 14 83 18 , srcInfoPoints = [] } "show"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 19 83 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 83 19 83 20 , SrcSpan "tests/examples/PartialSignatures.hs" 83 26 83 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 20 83 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 20 83 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 20 83 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 20 83 24 , srcInfoPoints = [] } "succ"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 25 83 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 25 83 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 25 83 26 , srcInfoPoints = [] } "x")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 28 83 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 28 83 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 28 83 30 , srcInfoPoints = [] } "++"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 31 83 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 31 83 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 31 83 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 31 83 35 , srcInfoPoints = [] } "show"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 36 83 44 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 83 36 83 37 , SrcSpan "tests/examples/PartialSignatures.hs" 83 43 83 44 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 37 83 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 37 83 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 37 83 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 37 83 38 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 39 83 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 39 83 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 39 83 41 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 42 83 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 42 83 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 83 42 83 43 , srcInfoPoints = [] } "x")))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 1 85 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 85 10 85 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 1 85 9 , srcInfoPoints = [] } "arbitCs2" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 13 85 39 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 13 85 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 85 13 85 14 , SrcSpan "tests/examples/PartialSignatures.hs" 85 20 85 21 , SrcSpan "tests/examples/PartialSignatures.hs" 85 23 85 24 , SrcSpan "tests/examples/PartialSignatures.hs" 85 25 85 27 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 14 85 20 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 14 85 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 14 85 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 14 85 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 14 85 18 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 19 85 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 19 85 20 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 22 85 23 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 22 85 23 , srcInfoPoints = [] } Nothing) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 28 85 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 85 30 85 32 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 28 85 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 28 85 29 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 33 85 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 33 85 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 85 33 85 39 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 1 86 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 1 86 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 1 86 9 , srcInfoPoints = [] } "arbitCs2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 10 86 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 10 86 11 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 12 86 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 86 12 86 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 14 86 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 14 86 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 14 86 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 14 86 22 , srcInfoPoints = [] } "arbitCs1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 23 86 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 23 86 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 86 23 86 24 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 1 88 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 88 10 88 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 1 88 9 , srcInfoPoints = [] } "arbitCs3" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 13 88 47 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 13 88 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 88 13 88 14 , SrcSpan "tests/examples/PartialSignatures.hs" 88 20 88 21 , SrcSpan "tests/examples/PartialSignatures.hs" 88 28 88 29 , SrcSpan "tests/examples/PartialSignatures.hs" 88 31 88 32 , SrcSpan "tests/examples/PartialSignatures.hs" 88 33 88 35 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 14 88 20 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 14 88 20 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 14 88 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 14 88 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 14 88 18 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 19 88 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 19 88 20 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 22 88 28 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 22 88 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 22 88 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 22 88 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 22 88 26 , srcInfoPoints = [] } "Enum"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 27 88 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 27 88 28 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 30 88 31 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 30 88 31 , srcInfoPoints = [] } Nothing) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 36 88 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 88 38 88 40 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 36 88 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 36 88 37 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 41 88 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 41 88 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 88 41 88 47 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 1 89 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 1 89 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 1 89 9 , srcInfoPoints = [] } "arbitCs3") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 10 89 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 10 89 11 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 12 89 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 89 12 89 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 14 89 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 14 89 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 14 89 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 14 89 22 , srcInfoPoints = [] } "arbitCs1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 23 89 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 23 89 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 89 23 89 24 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 1 91 37 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 91 10 91 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 1 91 9 , srcInfoPoints = [] } "arbitCs4" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 13 91 37 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 13 91 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 91 13 91 14 , SrcSpan "tests/examples/PartialSignatures.hs" 91 18 91 19 , SrcSpan "tests/examples/PartialSignatures.hs" 91 21 91 22 , SrcSpan "tests/examples/PartialSignatures.hs" 91 23 91 25 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 14 91 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 14 91 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 14 91 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 14 91 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 14 91 16 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 17 91 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 17 91 18 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 20 91 21 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 20 91 21 , srcInfoPoints = [] } Nothing) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 26 91 37 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 91 28 91 30 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 26 91 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 26 91 27 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 31 91 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 31 91 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 91 31 91 37 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 1 92 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 1 92 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 1 92 9 , srcInfoPoints = [] } "arbitCs4") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 10 92 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 10 92 11 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 12 92 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 92 12 92 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 14 92 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 14 92 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 14 92 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 14 92 22 , srcInfoPoints = [] } "arbitCs1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 23 92 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 23 92 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 92 23 92 24 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 1 94 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 94 10 94 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 1 94 9 , srcInfoPoints = [] } "arbitCs5" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 13 94 53 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 13 94 41 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 94 13 94 14 , SrcSpan "tests/examples/PartialSignatures.hs" 94 18 94 19 , SrcSpan "tests/examples/PartialSignatures.hs" 94 26 94 27 , SrcSpan "tests/examples/PartialSignatures.hs" 94 34 94 35 , SrcSpan "tests/examples/PartialSignatures.hs" 94 37 94 38 , SrcSpan "tests/examples/PartialSignatures.hs" 94 39 94 41 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 14 94 18 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 14 94 18 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 14 94 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 14 94 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 14 94 16 , srcInfoPoints = [] } "Eq"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 17 94 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 17 94 18 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 20 94 26 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 20 94 26 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 20 94 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 20 94 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 20 94 24 , srcInfoPoints = [] } "Enum"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 25 94 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 25 94 26 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 28 94 34 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 28 94 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 28 94 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 28 94 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 28 94 32 , srcInfoPoints = [] } "Show"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 33 94 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 33 94 34 , srcInfoPoints = [] } "a"))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 36 94 37 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 36 94 37 , srcInfoPoints = [] } Nothing) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 42 94 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 94 44 94 46 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 42 94 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 42 94 43 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 47 94 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 47 94 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 94 47 94 53 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 1 95 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 1 95 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 1 95 9 , srcInfoPoints = [] } "arbitCs5") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 10 95 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 10 95 11 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 12 95 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 95 12 95 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 14 95 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 14 95 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 14 95 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 14 95 22 , srcInfoPoints = [] } "arbitCs1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 23 95 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 23 95 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 95 23 95 24 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 1 98 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 98 5 98 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 1 98 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 8 98 19 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 8 98 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 98 10 98 12 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 8 98 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 98 10 98 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 8 98 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 98 10 98 12 ] } Nothing)))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 13 98 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 13 98 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 98 13 98 19 , srcInfoPoints = [] } "String")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 1 99 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 1 99 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 1 99 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 5 99 10 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 99 5 99 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 7 99 10 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 99 7 99 10 , srcInfoPoints = [] } "x" "x"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 1 105 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 105 5 105 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 1 105 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 8 105 14 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 8 105 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 105 10 105 12 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 8 105 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 105 10 105 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 8 105 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 105 10 105 12 ] } Nothing)))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 13 105 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 105 13 105 14 , srcInfoPoints = [] } "a"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 1 106 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 1 106 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 1 106 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 5 106 8 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 106 5 106 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 7 106 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 106 7 106 8 , srcInfoPoints = [] } 3 "3"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 1 109 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 109 5 109 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 1 109 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 8 109 14 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 8 109 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 109 10 109 12 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 8 109 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 109 10 109 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 8 109 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 109 10 109 12 ] } Nothing)))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 13 109 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 109 13 109 14 , srcInfoPoints = [] } "a"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 1 110 8 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 1 110 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 1 110 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 5 110 8 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 110 5 110 6 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 7 110 8 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 110 7 110 8 , srcInfoPoints = [] } 3 "3"))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 1 112 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 112 6 112 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 1 112 5 , srcInfoPoints = [] } "fall" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 9 112 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 112 9 112 15 , SrcSpan "tests/examples/PartialSignatures.hs" 112 18 112 19 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 16 112 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 16 112 17 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 20 112 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 112 22 112 24 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 20 112 21 , srcInfoPoints = [] } Nothing) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 25 112 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 112 25 112 26 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 1 113 11 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 1 113 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 1 113 5 , srcInfoPoints = [] } "fall") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 6 113 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 6 113 7 , srcInfoPoints = [] } "v") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 8 113 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 113 8 113 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 10 113 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 10 113 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 113 10 113 11 , srcInfoPoints = [] } "v")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 1 115 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 115 5 115 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 1 115 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 8 115 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 115 11 115 13 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 8 115 10 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 9 115 10 , srcInfoPoints = [] } "a"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 14 115 16 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 115 15 115 16 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 1 116 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 1 116 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 1 116 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 5 116 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 5 116 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 7 116 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 116 7 116 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 9 116 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 9 116 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 9 116 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 9 116 12 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 13 116 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 13 116 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 116 13 116 14 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 1 118 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 5 118 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 1 118 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 8 118 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 31 118 33 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 8 118 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 8 118 9 , SrcSpan "tests/examples/PartialSignatures.hs" 118 29 118 30 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 9 118 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 9 118 15 , SrcSpan "tests/examples/PartialSignatures.hs" 118 17 118 18 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 16 118 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 16 118 17 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 19 118 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 23 118 25 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 19 118 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 19 118 20 , SrcSpan "tests/examples/PartialSignatures.hs" 118 21 118 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 20 118 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 20 118 21 , srcInfoPoints = [] } "a"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 26 118 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 118 26 118 27 , SrcSpan "tests/examples/PartialSignatures.hs" 118 28 118 29 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 27 118 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 27 118 28 , srcInfoPoints = [] } "a")))))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 118 34 118 35 , srcInfoPoints = [] } Nothing)) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 1 119 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 1 119 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 1 119 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 5 119 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 5 119 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 7 119 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 119 7 119 8 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 9 119 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 119 9 119 10 , SrcSpan "tests/examples/PartialSignatures.hs" 119 25 119 26 , SrcSpan "tests/examples/PartialSignatures.hs" 119 39 119 40 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 10 119 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 10 119 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 10 119 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 10 119 11 , srcInfoPoints = [] } "x"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 12 119 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 119 12 119 13 , SrcSpan "tests/examples/PartialSignatures.hs" 119 17 119 18 , SrcSpan "tests/examples/PartialSignatures.hs" 119 24 119 25 ] } [ Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 13 119 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 13 119 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 13 119 17 , srcInfoPoints = [] } "True")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 19 119 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 19 119 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 19 119 24 , srcInfoPoints = [] } "False")) ]) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 27 119 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 27 119 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 27 119 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 27 119 28 , srcInfoPoints = [] } "x"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 29 119 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 119 29 119 30 , SrcSpan "tests/examples/PartialSignatures.hs" 119 33 119 34 , SrcSpan "tests/examples/PartialSignatures.hs" 119 38 119 39 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 30 119 33 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 30 119 33 , srcInfoPoints = [] } 'a' "a") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 35 119 38 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 119 35 119 38 , srcInfoPoints = [] } 'b' "b") ]) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 1 121 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 5 121 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 1 121 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 8 121 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 31 121 33 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 8 121 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 8 121 9 , SrcSpan "tests/examples/PartialSignatures.hs" 121 29 121 30 ] } (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 9 121 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 9 121 15 , SrcSpan "tests/examples/PartialSignatures.hs" 121 17 121 18 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 16 121 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 16 121 17 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 19 121 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 23 121 25 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 19 121 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 19 121 20 , SrcSpan "tests/examples/PartialSignatures.hs" 121 21 121 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 20 121 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 20 121 21 , srcInfoPoints = [] } "a"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 26 121 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 26 121 27 , SrcSpan "tests/examples/PartialSignatures.hs" 121 28 121 29 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 27 121 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 27 121 28 , srcInfoPoints = [] } "a")))))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 34 121 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 121 34 121 35 , SrcSpan "tests/examples/PartialSignatures.hs" 121 36 121 37 , SrcSpan "tests/examples/PartialSignatures.hs" 121 41 121 42 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 35 121 36 , srcInfoPoints = [] } Nothing , TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 38 121 41 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 38 121 39 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 121 40 121 41 , srcInfoPoints = [] } Nothing) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 1 122 40 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 1 122 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 1 122 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 5 122 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 5 122 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 7 122 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 122 7 122 8 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 9 122 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 122 9 122 10 , SrcSpan "tests/examples/PartialSignatures.hs" 122 25 122 26 , SrcSpan "tests/examples/PartialSignatures.hs" 122 39 122 40 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 10 122 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 10 122 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 10 122 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 10 122 11 , srcInfoPoints = [] } "x"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 12 122 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 122 12 122 13 , SrcSpan "tests/examples/PartialSignatures.hs" 122 17 122 18 , SrcSpan "tests/examples/PartialSignatures.hs" 122 24 122 25 ] } [ Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 13 122 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 13 122 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 13 122 17 , srcInfoPoints = [] } "True")) , Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 19 122 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 19 122 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 19 122 24 , srcInfoPoints = [] } "False")) ]) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 27 122 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 27 122 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 27 122 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 27 122 28 , srcInfoPoints = [] } "x"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 29 122 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 122 29 122 30 , SrcSpan "tests/examples/PartialSignatures.hs" 122 33 122 34 , SrcSpan "tests/examples/PartialSignatures.hs" 122 38 122 39 ] } [ Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 30 122 33 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 30 122 33 , srcInfoPoints = [] } 'a' "a") , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 35 122 38 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 122 35 122 38 , srcInfoPoints = [] } 'b' "b") ]) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 1 125 48 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 9 125 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 1 125 8 , srcInfoPoints = [] } "monoLoc" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 12 125 48 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 12 125 18 , SrcSpan "tests/examples/PartialSignatures.hs" 125 20 125 21 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 19 125 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 19 125 20 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 22 125 48 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 24 125 26 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 22 125 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 22 125 23 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 27 125 48 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 27 125 28 , SrcSpan "tests/examples/PartialSignatures.hs" 125 39 125 40 , SrcSpan "tests/examples/PartialSignatures.hs" 125 47 125 48 ] } Boxed [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 28 125 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 28 125 29 , SrcSpan "tests/examples/PartialSignatures.hs" 125 30 125 31 , SrcSpan "tests/examples/PartialSignatures.hs" 125 38 125 39 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 29 125 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 29 125 30 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 32 125 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 32 125 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 32 125 38 , srcInfoPoints = [] } "String")) ] , TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 41 125 47 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 125 41 125 42 , SrcSpan "tests/examples/PartialSignatures.hs" 125 43 125 44 , SrcSpan "tests/examples/PartialSignatures.hs" 125 46 125 47 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 42 125 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 42 125 43 , srcInfoPoints = [] } "a") , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 125 45 125 46 , srcInfoPoints = [] } Nothing ] ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 1 129 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 127 3 127 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 1 129 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 127 3 127 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 1 126 8 , srcInfoPoints = [] } "monoLoc") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 9 126 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 9 126 10 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 11 126 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 126 11 126 12 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 13 126 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 126 13 126 14 , SrcSpan "tests/examples/PartialSignatures.hs" 126 21 126 22 , SrcSpan "tests/examples/PartialSignatures.hs" 126 30 126 31 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 14 126 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 14 126 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 14 126 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 14 126 15 , srcInfoPoints = [] } "g"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 16 126 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 16 126 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 16 126 20 , srcInfoPoints = [] } "True"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 23 126 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 23 126 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 23 126 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 23 126 24 , srcInfoPoints = [] } "g"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 25 126 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 25 126 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 126 25 126 30 , srcInfoPoints = [] } "False"))) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 5 129 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 128 5 128 5 , SrcSpan "tests/examples/PartialSignatures.hs" 129 5 129 5 , SrcSpan "tests/examples/PartialSignatures.hs" 151 1 151 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 5 128 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 128 7 128 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 5 128 6 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 10 128 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 128 12 128 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 10 128 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 10 128 11 , srcInfoPoints = [] } "t")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 15 128 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 128 15 128 16 , SrcSpan "tests/examples/PartialSignatures.hs" 128 17 128 18 , SrcSpan "tests/examples/PartialSignatures.hs" 128 25 128 26 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 16 128 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 16 128 17 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 19 128 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 19 128 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 128 19 128 25 , srcInfoPoints = [] } "String")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 5 129 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 5 129 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 5 129 6 , srcInfoPoints = [] } "g") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 7 129 8 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 9 129 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 129 9 129 10 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 11 129 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 129 11 129 12 , SrcSpan "tests/examples/PartialSignatures.hs" 129 13 129 14 , SrcSpan "tests/examples/PartialSignatures.hs" 129 20 129 21 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 12 129 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 12 129 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 12 129 13 , srcInfoPoints = [] } "x")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 15 129 20 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 129 15 129 20 , srcInfoPoints = [] } "foo" "foo") ])) Nothing ] ])) ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 1 151 5 , srcInfoPoints = [] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 1 151 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 6 151 21 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 6 151 19 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 6 151 17 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 6 151 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 6 151 15 , srcInfoPoints = [] } "NukeMonad")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 16 151 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 16 151 17 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 18 151 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 18 151 19 , srcInfoPoints = [] } "b"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 20 151 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 151 20 151 21 , srcInfoPoints = [] } "c"))) [] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 1 156 0 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 153 1 153 9 , SrcSpan "tests/examples/PartialSignatures.hs" 153 34 153 39 , SrcSpan "tests/examples/PartialSignatures.hs" 154 3 154 3 , SrcSpan "tests/examples/PartialSignatures.hs" 156 1 156 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 10 153 33 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 10 153 33 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 10 153 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 10 153 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 10 153 17 , srcInfoPoints = [] } "Functor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 18 153 33 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 153 18 153 19 , SrcSpan "tests/examples/PartialSignatures.hs" 153 32 153 33 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 19 153 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 19 153 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 19 153 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 19 153 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 19 153 28 , srcInfoPoints = [] } "NukeMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 29 153 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 29 153 30 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 31 153 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 153 31 153 32 , srcInfoPoints = [] } "b")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 3 154 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 3 154 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 3 154 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 3 154 7 , srcInfoPoints = [] } "fmap")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 8 154 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 154 8 154 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 10 154 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 10 154 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 154 10 154 19 , srcInfoPoints = [] } "undefined")))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 1 160 0 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 156 1 156 9 , SrcSpan "tests/examples/PartialSignatures.hs" 156 38 156 43 , SrcSpan "tests/examples/PartialSignatures.hs" 157 3 157 3 , SrcSpan "tests/examples/PartialSignatures.hs" 158 3 158 3 , SrcSpan "tests/examples/PartialSignatures.hs" 160 1 160 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 10 156 37 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 10 156 37 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 10 156 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 10 156 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 10 156 21 , srcInfoPoints = [] } "Applicative"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 22 156 37 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 156 22 156 23 , SrcSpan "tests/examples/PartialSignatures.hs" 156 36 156 37 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 23 156 36 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 23 156 34 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 23 156 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 23 156 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 23 156 32 , srcInfoPoints = [] } "NukeMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 33 156 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 33 156 34 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 35 156 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 156 35 156 36 , srcInfoPoints = [] } "b")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 3 157 19 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 3 157 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 3 157 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 3 157 7 , srcInfoPoints = [] } "pure")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 8 157 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 157 8 157 9 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 10 157 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 10 157 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 157 10 157 19 , srcInfoPoints = [] } "undefined")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 3 158 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 3 158 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 3 158 8 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 158 3 158 4 , SrcSpan "tests/examples/PartialSignatures.hs" 158 4 158 7 , SrcSpan "tests/examples/PartialSignatures.hs" 158 7 158 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 4 158 7 , srcInfoPoints = [] } "<*>")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 9 158 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 158 9 158 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 11 158 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 11 158 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 158 11 158 20 , srcInfoPoints = [] } "undefined")))) Nothing) ]) , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 1 165 0 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 160 1 160 9 , SrcSpan "tests/examples/PartialSignatures.hs" 160 32 160 37 , SrcSpan "tests/examples/PartialSignatures.hs" 161 3 161 3 , SrcSpan "tests/examples/PartialSignatures.hs" 162 3 162 3 , SrcSpan "tests/examples/PartialSignatures.hs" 165 1 165 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 10 160 31 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 10 160 31 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 10 160 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 10 160 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 10 160 15 , srcInfoPoints = [] } "Monad"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 16 160 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 160 16 160 17 , SrcSpan "tests/examples/PartialSignatures.hs" 160 30 160 31 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 17 160 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 17 160 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 17 160 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 17 160 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 17 160 26 , srcInfoPoints = [] } "NukeMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 27 160 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 27 160 28 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 29 160 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 160 29 160 30 , srcInfoPoints = [] } "b")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 3 161 21 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 3 161 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 3 161 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 3 161 9 , srcInfoPoints = [] } "return")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 10 161 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 161 10 161 11 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 12 161 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 12 161 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 161 12 161 21 , srcInfoPoints = [] } "undefined")))) Nothing) , InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 3 162 20 , srcInfoPoints = [] } (PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 3 162 20 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 3 162 8 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 162 3 162 4 , SrcSpan "tests/examples/PartialSignatures.hs" 162 4 162 7 , SrcSpan "tests/examples/PartialSignatures.hs" 162 7 162 8 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 4 162 7 , srcInfoPoints = [] } ">>=")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 9 162 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 162 9 162 10 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 11 162 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 11 162 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 162 11 162 20 , srcInfoPoints = [] } "undefined")))) Nothing) ]) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 1 165 43 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 165 12 165 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 1 165 11 , srcInfoPoints = [] } "isMeltdown" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 43 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 38 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 31 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 15 165 24 , srcInfoPoints = [] } "NukeMonad"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 25 165 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 25 165 31 , srcInfoPoints = [] } "param1"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 32 165 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 32 165 38 , srcInfoPoints = [] } "param2"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 39 165 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 39 165 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 165 39 165 43 , srcInfoPoints = [] } "Bool")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 1 166 23 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 1 166 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 1 166 11 , srcInfoPoints = [] } "isMeltdown")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 12 166 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 166 12 166 13 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 14 166 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 14 166 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 166 14 166 23 , srcInfoPoints = [] } "undefined")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 1 168 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 16 168 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 1 168 15 , srcInfoPoints = [] } "unlessMeltdown" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 19 168 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 26 168 28 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 19 168 25 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 19 168 22 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 20 168 22 , srcInfoPoints = [] } "nm"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 24 , SrcSpan "tests/examples/PartialSignatures.hs" 168 24 168 25 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 24 , SrcSpan "tests/examples/PartialSignatures.hs" 168 24 168 25 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 23 168 24 , SrcSpan "tests/examples/PartialSignatures.hs" 168 24 168 25 ] })))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 30 168 36 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 30 168 33 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 31 168 33 , srcInfoPoints = [] } "nm"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 35 , SrcSpan "tests/examples/PartialSignatures.hs" 168 35 168 36 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 35 , SrcSpan "tests/examples/PartialSignatures.hs" 168 35 168 36 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 168 34 168 35 , SrcSpan "tests/examples/PartialSignatures.hs" 168 35 168 36 ] }))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 1 170 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 1 170 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 1 169 15 , srcInfoPoints = [] } "unlessMeltdown") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 16 169 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 16 169 17 , srcInfoPoints = [] } "c") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 18 170 49 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 169 18 169 19 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 20 170 49 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 169 20 169 22 , SrcSpan "tests/examples/PartialSignatures.hs" 169 23 169 23 , SrcSpan "tests/examples/PartialSignatures.hs" 170 23 170 23 , SrcSpan "tests/examples/PartialSignatures.hs" 174 1 174 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 23 169 38 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 169 25 169 27 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 23 169 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 23 169 24 , srcInfoPoints = [] } "m")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 28 169 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 28 169 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 169 28 169 38 , srcInfoPoints = [] } "isMeltdown"))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 23 170 49 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 170 23 170 25 , SrcSpan "tests/examples/PartialSignatures.hs" 170 28 170 32 , SrcSpan "tests/examples/PartialSignatures.hs" 170 43 170 47 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 23 170 49 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 170 23 170 25 , SrcSpan "tests/examples/PartialSignatures.hs" 170 28 170 32 , SrcSpan "tests/examples/PartialSignatures.hs" 170 43 170 47 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 26 170 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 26 170 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 26 170 27 , srcInfoPoints = [] } "m"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 33 170 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 33 170 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 33 170 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 33 170 39 , srcInfoPoints = [] } "return"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 41 , SrcSpan "tests/examples/PartialSignatures.hs" 170 41 170 42 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 41 , SrcSpan "tests/examples/PartialSignatures.hs" 170 41 170 42 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 170 40 170 41 , SrcSpan "tests/examples/PartialSignatures.hs" 170 41 170 42 ] })))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 48 170 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 48 170 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 170 48 170 49 , srcInfoPoints = [] } "c")))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 1 174 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 9 174 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 1 174 8 , srcInfoPoints = [] } "monoLoc" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 12 174 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 12 174 18 , SrcSpan "tests/examples/PartialSignatures.hs" 174 20 174 21 ] } (Just [ UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 19 174 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 19 174 20 , srcInfoPoints = [] } "a") ]) Nothing (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 22 174 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 24 174 26 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 22 174 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 22 174 23 , srcInfoPoints = [] } "a")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 27 174 53 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 27 174 28 , SrcSpan "tests/examples/PartialSignatures.hs" 174 39 174 40 , SrcSpan "tests/examples/PartialSignatures.hs" 174 52 174 53 ] } Boxed [ TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 28 174 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 28 174 29 , SrcSpan "tests/examples/PartialSignatures.hs" 174 30 174 31 , SrcSpan "tests/examples/PartialSignatures.hs" 174 38 174 39 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 29 174 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 29 174 30 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 32 174 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 32 174 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 32 174 38 , srcInfoPoints = [] } "String")) ] , TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 41 174 52 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 174 41 174 42 , SrcSpan "tests/examples/PartialSignatures.hs" 174 43 174 44 , SrcSpan "tests/examples/PartialSignatures.hs" 174 51 174 52 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 42 174 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 42 174 43 , srcInfoPoints = [] } "a") , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 45 174 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 45 174 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 174 45 174 51 , srcInfoPoints = [] } "String")) ] ]))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 1 179 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 176 3 176 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 1 179 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 176 3 176 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 1 175 8 , srcInfoPoints = [] } "monoLoc") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 9 175 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 9 175 10 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 11 175 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 175 11 175 12 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 13 175 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 175 13 175 14 , SrcSpan "tests/examples/PartialSignatures.hs" 175 21 175 22 , SrcSpan "tests/examples/PartialSignatures.hs" 175 28 175 29 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 14 175 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 14 175 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 14 175 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 14 175 15 , srcInfoPoints = [] } "g"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 16 175 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 16 175 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 16 175 20 , srcInfoPoints = [] } "True"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 23 175 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 23 175 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 23 175 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 23 175 24 , srcInfoPoints = [] } "g"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 25 175 28 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 175 25 175 28 , srcInfoPoints = [] } 'v' "v")) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 5 179 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 178 5 178 5 , SrcSpan "tests/examples/PartialSignatures.hs" 179 5 179 5 , SrcSpan "tests/examples/PartialSignatures.hs" 183 1 183 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 5 178 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 178 7 178 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 5 178 6 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 10 178 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 178 12 178 14 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 10 178 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 10 178 11 , srcInfoPoints = [] } "b")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 15 178 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 178 15 178 16 , SrcSpan "tests/examples/PartialSignatures.hs" 178 17 178 18 , SrcSpan "tests/examples/PartialSignatures.hs" 178 20 178 21 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 16 178 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 16 178 17 , srcInfoPoints = [] } "a") , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 178 19 178 20 , srcInfoPoints = [] } Nothing ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 5 179 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 5 179 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 5 179 6 , srcInfoPoints = [] } "g") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 7 179 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 7 179 8 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 9 179 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 179 9 179 10 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 11 179 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 179 11 179 12 , SrcSpan "tests/examples/PartialSignatures.hs" 179 13 179 14 , SrcSpan "tests/examples/PartialSignatures.hs" 179 20 179 21 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 12 179 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 12 179 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 12 179 13 , srcInfoPoints = [] } "x")) , Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 15 179 20 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 179 15 179 20 , srcInfoPoints = [] } "foo" "foo") ])) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 1 183 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 183 5 183 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 1 183 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 8 183 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 183 16 183 18 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 8 183 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 183 8 183 9 , SrcSpan "tests/examples/PartialSignatures.hs" 183 11 183 12 , SrcSpan "tests/examples/PartialSignatures.hs" 183 14 183 15 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 9 183 11 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 10 183 11 , srcInfoPoints = [] } "a")) , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 13 183 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 13 183 14 , srcInfoPoints = [] } "b") ]) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 19 183 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 183 19 183 20 , SrcSpan "tests/examples/PartialSignatures.hs" 183 21 183 22 , SrcSpan "tests/examples/PartialSignatures.hs" 183 25 183 26 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 20 183 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 20 183 21 , srcInfoPoints = [] } "a") , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 23 183 25 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 183 24 183 25 , srcInfoPoints = [] } "b")) ])) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 1 184 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 1 184 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 1 184 4 , srcInfoPoints = [] } "foo") [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 5 184 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 184 5 184 6 , SrcSpan "tests/examples/PartialSignatures.hs" 184 7 184 8 , SrcSpan "tests/examples/PartialSignatures.hs" 184 10 184 11 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 6 184 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 6 184 7 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 9 184 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 9 184 10 , srcInfoPoints = [] } "y") ] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 12 184 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 184 12 184 13 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 14 184 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 184 14 184 15 , SrcSpan "tests/examples/PartialSignatures.hs" 184 16 184 17 , SrcSpan "tests/examples/PartialSignatures.hs" 184 19 184 20 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 15 184 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 15 184 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 15 184 16 , srcInfoPoints = [] } "x")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 18 184 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 18 184 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 184 18 184 19 , srcInfoPoints = [] } "y")) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 1 187 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 187 3 187 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 1 187 2 , srcInfoPoints = [] } "f" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 6 187 27 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 6 187 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 187 6 187 7 , SrcSpan "tests/examples/PartialSignatures.hs" 187 8 187 9 , SrcSpan "tests/examples/PartialSignatures.hs" 187 10 187 12 ] } (ParenA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 6 187 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 187 6 187 7 , SrcSpan "tests/examples/PartialSignatures.hs" 187 8 187 9 , SrcSpan "tests/examples/PartialSignatures.hs" 187 10 187 12 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 7 187 8 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 7 187 8 , srcInfoPoints = [] } Nothing))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 13 187 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 187 15 187 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 13 187 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 13 187 14 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 18 187 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 187 20 187 22 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 18 187 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 18 187 19 , srcInfoPoints = [] } "a")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 23 187 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 23 187 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 187 23 187 27 , srcInfoPoints = [] } "Bool")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 1 188 15 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 1 188 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 1 188 2 , srcInfoPoints = [] } "f") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 3 188 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 3 188 4 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 5 188 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 5 188 6 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 7 188 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 188 7 188 8 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 9 188 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 9 188 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 9 188 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 9 188 10 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 11 188 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 11 188 13 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 11 188 13 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 14 188 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 14 188 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 188 14 188 15 , srcInfoPoints = [] } "y"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 191 1 191 9 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 191 5 191 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 191 1 191 4 , srcInfoPoints = [] } "foo" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 191 8 191 9 , srcInfoPoints = [] } Nothing) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 1 192 19 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 1 192 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 1 192 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 1 192 5 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 6 192 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 6 192 9 , srcInfoPoints = [] } "foo") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 10 192 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 192 10 192 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 12 192 19 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 12 192 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 12 192 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 12 192 16 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 17 192 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 17 192 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 192 17 192 19 , srcInfoPoints = [] } "id"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 1 195 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 195 5 195 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 1 195 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 8 195 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 195 13 195 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 8 195 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 8 195 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 8 195 12 , srcInfoPoints = [] } "Bool"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 195 16 195 17 , srcInfoPoints = [] } Nothing)) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 1 196 19 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 1 196 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 1 196 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 1 196 5 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 6 196 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 6 196 9 , srcInfoPoints = [] } "foo") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 10 196 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 196 10 196 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 12 196 19 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 12 196 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 12 196 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 12 196 16 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 17 196 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 17 196 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 196 17 196 19 , srcInfoPoints = [] } "id"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 1 198 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 198 5 198 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 1 198 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 8 198 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 198 13 198 15 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 8 198 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 8 198 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 8 198 12 , srcInfoPoints = [] } "Bool"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 16 198 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 16 198 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 198 16 198 20 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 1 199 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 1 199 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 1 199 4 , srcInfoPoints = [] } "bar") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 5 199 13 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 199 5 199 6 , SrcSpan "tests/examples/PartialSignatures.hs" 199 12 199 13 ] } (PatTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 6 199 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 199 8 199 10 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 6 199 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 6 199 7 , srcInfoPoints = [] } "x")) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 11 199 12 , srcInfoPoints = [] } Nothing)) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 14 199 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 199 14 199 15 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 16 199 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 16 199 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 199 16 199 20 , srcInfoPoints = [] } "True")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 1 202 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 202 5 202 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 1 202 4 , srcInfoPoints = [] } "orr" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 8 202 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 202 10 202 12 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 8 202 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 8 202 9 , srcInfoPoints = [] } "a")) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 13 202 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 202 15 202 17 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 13 202 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 13 202 14 , srcInfoPoints = [] } "a")) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 18 202 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 202 18 202 19 , srcInfoPoints = [] } "a")))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 1 203 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 1 203 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 1 203 4 , srcInfoPoints = [] } "orr")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 5 203 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 203 5 203 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 7 203 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 7 203 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 203 7 203 16 , srcInfoPoints = [] } "undefined")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 205 1 205 7 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 205 3 205 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 205 1 205 2 , srcInfoPoints = [] } "g" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 205 6 205 7 , srcInfoPoints = [] } Nothing) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 1 206 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 1 206 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 1 206 2 , srcInfoPoints = [] } "g")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 3 206 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 206 3 206 4 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 5 206 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 5 206 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 5 206 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 5 206 6 , srcInfoPoints = [] } "f"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 7 206 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 206 7 206 8 , SrcSpan "tests/examples/PartialSignatures.hs" 206 8 206 11 , SrcSpan "tests/examples/PartialSignatures.hs" 206 11 206 12 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 7 206 12 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 206 7 206 8 , SrcSpan "tests/examples/PartialSignatures.hs" 206 8 206 11 , SrcSpan "tests/examples/PartialSignatures.hs" 206 11 206 12 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 8 206 11 , srcInfoPoints = [] } "orr"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 13 206 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 13 206 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 206 13 206 17 , srcInfoPoints = [] } "True"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 208 1 208 7 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 208 3 208 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 208 1 208 2 , srcInfoPoints = [] } "f" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 208 6 208 7 , srcInfoPoints = [] } Nothing) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 1 209 6 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 1 209 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 1 209 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 3 209 6 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 209 3 209 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 5 209 6 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 5 209 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 209 5 209 6 , srcInfoPoints = [] } "g")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 212 1 212 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 212 7 212 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 212 1 212 6 , srcInfoPoints = [] } "test3" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 212 10 212 11 , srcInfoPoints = [] } Nothing) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 1 217 16 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 1 217 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 1 213 6 , srcInfoPoints = [] } "test3") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 7 213 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 7 213 8 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 9 217 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 213 9 213 10 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 11 217 16 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 11 214 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 11 213 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 11 213 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 11 213 16 , srcInfoPoints = [] } "const"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 17 214 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 213 17 213 18 , SrcSpan "tests/examples/PartialSignatures.hs" 214 39 214 40 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 18 214 39 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 213 18 213 21 , SrcSpan "tests/examples/PartialSignatures.hs" 214 31 214 33 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 22 214 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 213 22 213 22 , SrcSpan "tests/examples/PartialSignatures.hs" 214 22 214 22 , SrcSpan "tests/examples/PartialSignatures.hs" 214 31 214 31 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 22 213 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 213 24 213 26 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 22 213 23 , srcInfoPoints = [] } "x" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 27 213 29 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 213 28 213 29 , srcInfoPoints = [] } "b"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 22 214 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 22 214 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 22 214 23 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 24 214 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 214 24 214 25 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 26 214 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 26 214 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 26 214 30 , srcInfoPoints = [] } "True")))) Nothing ]) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 34 214 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 34 214 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 34 214 39 , srcInfoPoints = [] } "False")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 41 214 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 41 214 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 214 41 214 42 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 11 217 16 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 11 216 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 11 215 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 11 215 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 11 215 16 , srcInfoPoints = [] } "const"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 17 216 38 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 215 17 215 18 , SrcSpan "tests/examples/PartialSignatures.hs" 216 37 216 38 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 18 216 37 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 215 18 215 21 , SrcSpan "tests/examples/PartialSignatures.hs" 216 30 216 32 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 22 216 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 215 22 215 22 , SrcSpan "tests/examples/PartialSignatures.hs" 216 22 216 22 , SrcSpan "tests/examples/PartialSignatures.hs" 216 30 216 30 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 22 215 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 215 24 215 26 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 22 215 23 , srcInfoPoints = [] } "x" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 27 215 29 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 215 28 215 29 , srcInfoPoints = [] } "b"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 22 216 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 22 216 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 22 216 23 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 24 216 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 216 24 216 25 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 26 216 29 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 26 216 29 , srcInfoPoints = [] } 'a' "a"))) Nothing ]) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 33 216 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 33 216 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 33 216 37 , srcInfoPoints = [] } "True")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 39 216 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 39 216 40 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 216 39 216 40 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 11 217 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 11 217 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 11 217 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 11 217 14 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 15 217 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 15 217 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 217 15 217 16 , srcInfoPoints = [] } "x"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 1 224 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 224 5 224 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 1 224 4 , srcInfoPoints = [] } "foo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 8 224 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 224 11 224 13 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 8 224 10 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 9 224 10 , srcInfoPoints = [] } "a"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 224 14 224 15 , srcInfoPoints = [] } Nothing)) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 1 228 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 1 228 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 1 225 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 5 225 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 5 225 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 7 228 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 225 7 225 8 ] } (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 9 228 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 225 9 225 12 , SrcSpan "tests/examples/PartialSignatures.hs" 228 9 228 11 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 13 227 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 225 13 225 13 , SrcSpan "tests/examples/PartialSignatures.hs" 226 13 226 13 , SrcSpan "tests/examples/PartialSignatures.hs" 227 13 227 13 , SrcSpan "tests/examples/PartialSignatures.hs" 228 9 228 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 13 225 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 13 225 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 13 225 14 , srcInfoPoints = [] } "v")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 15 225 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 225 15 225 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 17 225 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 17 225 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 17 225 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 17 225 20 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 21 225 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 21 225 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 225 21 225 22 , srcInfoPoints = [] } "x"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 13 226 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 226 15 226 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 13 226 14 , srcInfoPoints = [] } "g" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 18 226 26 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 226 21 226 23 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 18 226 20 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 19 226 20 , srcInfoPoints = [] } "a"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 24 226 26 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 226 25 226 26 , srcInfoPoints = [] } "a")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 13 227 20 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 13 227 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 13 227 14 , srcInfoPoints = [] } "g") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 15 227 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 15 227 16 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 17 227 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 227 17 227 18 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 19 227 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 19 227 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 227 19 227 20 , srcInfoPoints = [] } "x")))) Nothing ] ]) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 12 228 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 228 12 228 13 , SrcSpan "tests/examples/PartialSignatures.hs" 228 18 228 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 13 228 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 13 228 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 13 228 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 13 228 14 , srcInfoPoints = [] } "g"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 15 228 18 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 228 15 228 18 , srcInfoPoints = [] } 'x' "x")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 1 230 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 9 230 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 1 230 8 , srcInfoPoints = [] } "showTwo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 35 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 20 230 22 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 20 230 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 20 230 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 20 230 22 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 12 230 16 , srcInfoPoints = [] } "Show"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 17 230 19 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 18 230 19 , srcInfoPoints = [] } "a"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 23 230 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 230 26 230 28 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 23 230 25 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 24 230 25 , srcInfoPoints = [] } "a"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 29 230 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 29 230 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 230 29 230 35 , srcInfoPoints = [] } "String"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 1 231 19 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 1 231 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 1 231 8 , srcInfoPoints = [] } "showTwo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 9 231 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 9 231 10 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 11 231 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 231 11 231 12 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 13 231 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 13 231 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 13 231 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 13 231 17 , srcInfoPoints = [] } "show"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 18 231 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 18 231 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 231 18 231 19 , srcInfoPoints = [] } "x"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 1 234 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 234 5 234 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 1 234 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 8 234 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 234 10 234 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 8 234 9 , srcInfoPoints = [] } Nothing) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 13 234 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 13 234 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 234 13 234 17 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 1 235 13 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 1 235 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 1 235 4 , srcInfoPoints = [] } "bar") [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 5 235 6 , srcInfoPoints = [] } ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 7 235 13 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 235 7 235 8 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 9 235 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 9 235 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 235 9 235 13 , srcInfoPoints = [] } "True")))) Nothing ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 1 238 45 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 238 25 238 26 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 1 238 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 6 238 24 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 6 238 22 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 6 238 19 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 6 238 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 6 238 15 , srcInfoPoints = [] } "GenParser")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 16 238 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 16 238 19 , srcInfoPoints = [] } "tok"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 20 238 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 20 238 22 , srcInfoPoints = [] } "st"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 23 238 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 23 238 24 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 27 238 45 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 27 238 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 27 238 36 , srcInfoPoints = [] } "GenParser") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 37 238 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 37 238 40 , srcInfoPoints = [] } "tok") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 41 238 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 41 238 43 , srcInfoPoints = [] } "st") , TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 44 238 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 238 44 238 45 , srcInfoPoints = [] } "a") ]) ] [] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 1 240 55 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 240 11 240 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 1 240 10 , srcInfoPoints = [] } "skipMany'" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 55 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 240 33 240 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 30 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 14 240 23 , srcInfoPoints = [] } "GenParser"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 24 240 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 24 240 27 , srcInfoPoints = [] } "tok"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 28 240 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 28 240 30 , srcInfoPoints = [] } "st"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 31 240 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 31 240 32 , srcInfoPoints = [] } "a"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 55 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 52 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 49 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 36 240 45 , srcInfoPoints = [] } "GenParser"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 46 240 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 46 240 49 , srcInfoPoints = [] } "tok"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 50 240 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 50 240 52 , srcInfoPoints = [] } "st"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 55 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 54 , SrcSpan "tests/examples/PartialSignatures.hs" 240 54 240 55 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 55 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 54 , SrcSpan "tests/examples/PartialSignatures.hs" 240 54 240 55 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 55 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 240 53 240 54 , SrcSpan "tests/examples/PartialSignatures.hs" 240 54 240 55 ] }))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 1 241 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 1 241 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 1 241 10 , srcInfoPoints = [] } "skipMany'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 11 241 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 241 11 241 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 13 241 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 13 241 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 241 13 241 22 , srcInfoPoints = [] } "undefined")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 1 243 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 243 10 243 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 1 243 9 , srcInfoPoints = [] } "skipMany" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 13 243 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 243 15 243 17 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 13 243 14 , srcInfoPoints = [] } Nothing) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 18 243 22 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 18 243 19 , srcInfoPoints = [] } Nothing) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 21 , SrcSpan "tests/examples/PartialSignatures.hs" 243 21 243 22 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 21 , SrcSpan "tests/examples/PartialSignatures.hs" 243 21 243 22 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 243 20 243 21 , SrcSpan "tests/examples/PartialSignatures.hs" 243 21 243 22 ] }))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 1 244 21 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 1 244 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 1 244 9 , srcInfoPoints = [] } "skipMany")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 10 244 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 244 10 244 11 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 12 244 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 12 244 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 244 12 244 21 , srcInfoPoints = [] } "skipMany'")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 1 246 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 19 246 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 1 246 18 , srcInfoPoints = [] } "somethingShowable" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 40 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 32 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 30 246 32 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 32 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 30 246 32 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 32 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 30 246 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 32 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 30 246 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 22 246 26 , srcInfoPoints = [] } "Show"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 27 246 29 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 28 246 29 , srcInfoPoints = [] } "x"))))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 33 246 40 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 246 36 246 38 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 33 246 35 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 34 246 35 , srcInfoPoints = [] } "x"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 246 39 246 40 , srcInfoPoints = [] } Nothing))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 1 247 35 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 1 247 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 1 247 18 , srcInfoPoints = [] } "somethingShowable") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 19 247 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 19 247 20 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 21 247 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 247 21 247 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 23 247 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 23 247 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 23 247 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 23 247 27 , srcInfoPoints = [] } "show"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 28 247 35 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 247 28 247 29 , SrcSpan "tests/examples/PartialSignatures.hs" 247 34 247 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 29 247 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 29 247 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 29 247 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 29 247 32 , srcInfoPoints = [] } "not"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 33 247 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 33 247 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 247 33 247 34 , srcInfoPoints = [] } "x"))))))) Nothing ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 1 251 15 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 251 10 251 11 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 1 251 5 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 6 251 9 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 6 251 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 6 251 7 , srcInfoPoints = [] } "I")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 8 251 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 8 251 9 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 12 251 15 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 12 251 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 12 251 13 , srcInfoPoints = [] } "I") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 14 251 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 251 14 251 15 , srcInfoPoints = [] } "a") ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 1 255 0 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 252 1 252 9 , SrcSpan "tests/examples/PartialSignatures.hs" 252 20 252 25 , SrcSpan "tests/examples/PartialSignatures.hs" 253 5 253 5 , SrcSpan "tests/examples/PartialSignatures.hs" 255 1 255 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 10 252 19 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 10 252 19 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 10 252 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 10 252 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 10 252 17 , srcInfoPoints = [] } "Functor"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 18 252 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 18 252 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 252 18 252 19 , srcInfoPoints = [] } "I"))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 5 253 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 5 253 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 5 253 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 5 253 9 , srcInfoPoints = [] } "fmap") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 10 253 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 10 253 11 , srcInfoPoints = [] } "f") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 12 253 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 253 12 253 13 , SrcSpan "tests/examples/PartialSignatures.hs" 253 16 253 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 13 253 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 13 253 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 13 253 14 , srcInfoPoints = [] } "I")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 15 253 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 15 253 16 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 18 253 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 253 18 253 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 20 253 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 20 253 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 20 253 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 20 253 21 , srcInfoPoints = [] } "I"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 22 253 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 253 22 253 23 , SrcSpan "tests/examples/PartialSignatures.hs" 253 26 253 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 23 253 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 23 253 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 23 253 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 23 253 24 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 25 253 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 25 253 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 253 25 253 26 , srcInfoPoints = [] } "a"))))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 1 255 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 255 15 255 16 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 1 255 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 9 255 14 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 9 255 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 9 255 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 9 255 10 , srcInfoPoints = [] } "B")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 11 255 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 11 255 12 , srcInfoPoints = [] } "t"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 13 255 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 13 255 14 , srcInfoPoints = [] } "a"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 17 255 20 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 17 255 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 17 255 18 , srcInfoPoints = [] } "B") [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 19 255 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 255 19 255 20 , srcInfoPoints = [] } "a") ]) ] [] , InstDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 1 259 0 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 256 1 256 9 , SrcSpan "tests/examples/PartialSignatures.hs" 256 24 256 29 , SrcSpan "tests/examples/PartialSignatures.hs" 257 5 257 5 , SrcSpan "tests/examples/PartialSignatures.hs" 259 1 259 0 ] } Nothing (IRule SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 10 256 23 , srcInfoPoints = [] } Nothing Nothing (IHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 10 256 23 , srcInfoPoints = [] } (IHCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 10 256 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 10 256 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 10 256 17 , srcInfoPoints = [] } "Functor"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 18 256 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 256 18 256 19 , SrcSpan "tests/examples/PartialSignatures.hs" 256 22 256 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 19 256 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 19 256 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 19 256 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 19 256 20 , srcInfoPoints = [] } "B"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 21 256 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 256 21 256 22 , srcInfoPoints = [] } "t")))))) (Just [ InsDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 5 257 27 , srcInfoPoints = [] } (FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 5 257 27 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 5 257 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 5 257 9 , srcInfoPoints = [] } "fmap") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 10 257 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 10 257 11 , srcInfoPoints = [] } "f") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 12 257 17 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 257 12 257 13 , SrcSpan "tests/examples/PartialSignatures.hs" 257 16 257 17 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 13 257 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 13 257 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 13 257 14 , srcInfoPoints = [] } "B")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 15 257 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 15 257 16 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 18 257 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 257 18 257 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 20 257 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 20 257 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 20 257 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 20 257 21 , srcInfoPoints = [] } "B"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 22 257 27 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 257 22 257 23 , SrcSpan "tests/examples/PartialSignatures.hs" 257 26 257 27 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 23 257 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 23 257 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 23 257 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 23 257 24 , srcInfoPoints = [] } "f"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 25 257 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 25 257 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 257 25 257 26 , srcInfoPoints = [] } "a"))))))) Nothing ]) ]) , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 1 259 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 259 13 259 14 ] } (NewType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 1 259 8 , srcInfoPoints = [] }) Nothing (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 9 259 12 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 9 259 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 9 259 10 , srcInfoPoints = [] } "H")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 11 259 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 11 259 12 , srcInfoPoints = [] } "f"))) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 15 259 23 , srcInfoPoints = [] } Nothing Nothing (ConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 15 259 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 15 259 16 , srcInfoPoints = [] } "H") [ TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 17 259 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 259 17 259 18 , SrcSpan "tests/examples/PartialSignatures.hs" 259 22 259 23 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 18 259 22 , srcInfoPoints = [] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 18 259 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 18 259 19 , srcInfoPoints = [] } "f")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 21 , SrcSpan "tests/examples/PartialSignatures.hs" 259 21 259 22 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 21 , SrcSpan "tests/examples/PartialSignatures.hs" 259 21 259 22 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 259 20 259 21 , SrcSpan "tests/examples/PartialSignatures.hs" 259 21 259 22 ] })))) ]) ] [] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 1 261 13 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 261 4 261 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 1 261 3 , srcInfoPoints = [] } "h1" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 7 261 13 , srcInfoPoints = [] } Nothing (Just (CxSingle SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 7 261 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 261 9 261 11 ] } (TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 7 261 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 261 9 261 11 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 7 261 11 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 261 9 261 11 ] } Nothing)))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 261 12 261 13 , srcInfoPoints = [] } Nothing)) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 1 263 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 1 263 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 1 263 3 , srcInfoPoints = [] } "h1") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 4 263 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 4 263 5 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 6 263 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 6 263 7 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 8 263 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 8 263 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 10 263 42 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 10 263 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 10 263 11 , SrcSpan "tests/examples/PartialSignatures.hs" 263 30 263 31 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 11 263 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 11 263 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 11 263 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 11 263 12 , srcInfoPoints = [] } "H"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 13 263 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 13 263 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 13 263 14 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 15 263 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 15 263 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 15 263 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 15 263 19 , srcInfoPoints = [] } "fmap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 20 263 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 20 263 21 , SrcSpan "tests/examples/PartialSignatures.hs" 263 29 263 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 21 263 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 21 263 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 21 263 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 21 263 26 , srcInfoPoints = [] } "const"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 28 , SrcSpan "tests/examples/PartialSignatures.hs" 263 28 263 29 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 28 , SrcSpan "tests/examples/PartialSignatures.hs" 263 28 263 29 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 27 263 28 , SrcSpan "tests/examples/PartialSignatures.hs" 263 28 263 29 ] })))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 32 263 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 263 32 263 33 , SrcSpan "tests/examples/PartialSignatures.hs" 263 41 263 42 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 33 263 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 33 263 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 33 263 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 33 263 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 33 263 37 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 38 263 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 38 263 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 38 263 39 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 40 263 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 40 263 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 263 40 263 41 , srcInfoPoints = [] } "b"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 265 1 265 8 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 265 4 265 6 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 265 1 265 3 , srcInfoPoints = [] } "h2" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 265 7 265 8 , srcInfoPoints = [] } Nothing) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 1 267 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 1 267 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 1 267 3 , srcInfoPoints = [] } "h2") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 4 267 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 4 267 5 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 6 267 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 6 267 7 , srcInfoPoints = [] } "b") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 8 267 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 8 267 9 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 10 267 42 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 10 267 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 10 267 11 , SrcSpan "tests/examples/PartialSignatures.hs" 267 30 267 31 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 11 267 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 11 267 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 11 267 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 11 267 12 , srcInfoPoints = [] } "H"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 13 267 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 13 267 14 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 13 267 14 , srcInfoPoints = [] } "."))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 15 267 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 15 267 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 15 267 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 15 267 19 , srcInfoPoints = [] } "fmap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 20 267 30 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 20 267 21 , SrcSpan "tests/examples/PartialSignatures.hs" 267 29 267 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 21 267 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 21 267 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 21 267 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 21 267 26 , srcInfoPoints = [] } "const"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 28 , SrcSpan "tests/examples/PartialSignatures.hs" 267 28 267 29 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 28 , SrcSpan "tests/examples/PartialSignatures.hs" 267 28 267 29 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 29 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 27 267 28 , SrcSpan "tests/examples/PartialSignatures.hs" 267 28 267 29 ] })))))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 32 267 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 267 32 267 33 , SrcSpan "tests/examples/PartialSignatures.hs" 267 41 267 42 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 33 267 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 33 267 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 33 267 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 33 267 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 33 267 37 , srcInfoPoints = [] } "fmap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 38 267 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 38 267 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 38 267 39 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 40 267 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 40 267 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 267 40 267 41 , srcInfoPoints = [] } "b"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 1 269 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 269 6 269 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 1 269 5 , srcInfoPoints = [] } "app1" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 9 269 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 9 269 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 9 269 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 9 269 10 , srcInfoPoints = [] } "H"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 11 269 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 269 11 269 12 , SrcSpan "tests/examples/PartialSignatures.hs" 269 15 269 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 12 269 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 12 269 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 12 269 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 12 269 13 , srcInfoPoints = [] } "B"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 14 269 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 269 14 269 15 , srcInfoPoints = [] } "t"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 1 270 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 1 270 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 1 270 5 , srcInfoPoints = [] } "app1")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 6 270 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 6 270 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 8 270 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 8 270 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 8 270 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 8 270 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 8 270 10 , srcInfoPoints = [] } "h1"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 11 270 18 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 11 270 12 , SrcSpan "tests/examples/PartialSignatures.hs" 270 17 270 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 12 270 17 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 12 270 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 12 270 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 12 270 13 , srcInfoPoints = [] } "H"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 14 270 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 14 270 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 14 270 15 , srcInfoPoints = [] } "."))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 16 270 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 16 270 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 16 270 17 , srcInfoPoints = [] } "I")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 19 270 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 19 270 20 , SrcSpan "tests/examples/PartialSignatures.hs" 270 24 270 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 20 270 24 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 20 270 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 20 270 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 20 270 21 , srcInfoPoints = [] } "B"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 23 , SrcSpan "tests/examples/PartialSignatures.hs" 270 23 270 24 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 23 , SrcSpan "tests/examples/PartialSignatures.hs" 270 23 270 24 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 270 22 270 23 , SrcSpan "tests/examples/PartialSignatures.hs" 270 23 270 24 ] }))))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 1 272 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 272 6 272 8 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 1 272 5 , srcInfoPoints = [] } "app2" ] (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 9 272 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 9 272 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 9 272 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 9 272 10 , srcInfoPoints = [] } "H"))) (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 11 272 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 272 11 272 12 , SrcSpan "tests/examples/PartialSignatures.hs" 272 15 272 16 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 12 272 15 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 12 272 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 12 272 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 12 272 13 , srcInfoPoints = [] } "B"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 14 272 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 272 14 272 15 , srcInfoPoints = [] } "t"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 1 273 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 1 273 5 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 1 273 5 , srcInfoPoints = [] } "app2")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 6 273 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 6 273 7 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 8 273 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 8 273 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 8 273 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 8 273 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 8 273 10 , srcInfoPoints = [] } "h2"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 11 273 18 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 11 273 12 , SrcSpan "tests/examples/PartialSignatures.hs" 273 17 273 18 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 12 273 17 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 12 273 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 12 273 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 12 273 13 , srcInfoPoints = [] } "H"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 14 273 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 14 273 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 14 273 15 , srcInfoPoints = [] } "."))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 16 273 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 16 273 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 16 273 17 , srcInfoPoints = [] } "I")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 19 273 25 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 19 273 20 , SrcSpan "tests/examples/PartialSignatures.hs" 273 24 273 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 20 273 24 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 20 273 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 20 273 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 20 273 21 , srcInfoPoints = [] } "B"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 23 , SrcSpan "tests/examples/PartialSignatures.hs" 273 23 273 24 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 23 , SrcSpan "tests/examples/PartialSignatures.hs" 273 23 273 24 ] } (UnitCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 273 22 273 23 , SrcSpan "tests/examples/PartialSignatures.hs" 273 23 273 24 ] }))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 1 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 277 3 277 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 1 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 277 3 277 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 1 276 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 5 276 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 5 276 6 , srcInfoPoints = [] } "f") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 7 276 10 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 276 7 276 8 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 9 276 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 9 276 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 276 9 276 10 , srcInfoPoints = [] } "g")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 9 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 277 9 277 9 , SrcSpan "tests/examples/PartialSignatures.hs" 282 1 282 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 9 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 278 11 278 16 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 9 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 278 11 278 16 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 9 277 10 , srcInfoPoints = [] } "g") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 11 277 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 11 277 12 , srcInfoPoints = [] } "r") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 13 277 16 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 277 13 277 14 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 15 277 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 15 277 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 277 15 277 16 , srcInfoPoints = [] } "x")))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 278 17 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 278 17 278 17 , SrcSpan "tests/examples/PartialSignatures.hs" 279 17 279 17 , SrcSpan "tests/examples/PartialSignatures.hs" 282 1 282 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 278 17 278 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 278 19 278 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 278 17 278 18 , srcInfoPoints = [] } "x" ] (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 278 22 278 23 , srcInfoPoints = [] } Nothing) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 17 279 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 17 279 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 17 279 18 , srcInfoPoints = [] } "x")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 19 279 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 279 19 279 20 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 21 279 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 21 279 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 279 21 279 22 , srcInfoPoints = [] } "r")))) Nothing ])) ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 1 282 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 5 282 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 1 282 4 , srcInfoPoints = [] } "unc" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 8 282 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 22 282 24 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 8 282 21 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 8 282 9 , SrcSpan "tests/examples/PartialSignatures.hs" 282 20 282 21 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 9 282 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 11 282 13 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 9 282 10 , srcInfoPoints = [] } Nothing) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 14 282 20 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 16 282 18 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 14 282 15 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 19 282 20 , srcInfoPoints = [] } Nothing)))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 25 282 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 32 282 34 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 25 282 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 282 25 282 26 , SrcSpan "tests/examples/PartialSignatures.hs" 282 27 282 28 , SrcSpan "tests/examples/PartialSignatures.hs" 282 30 282 31 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 26 282 27 , srcInfoPoints = [] } Nothing , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 29 282 30 , srcInfoPoints = [] } Nothing ]) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 282 35 282 36 , srcInfoPoints = [] } Nothing))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 1 283 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 1 283 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 1 283 4 , srcInfoPoints = [] } "unc")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 5 283 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 283 5 283 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 7 283 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 7 283 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 283 7 283 14 , srcInfoPoints = [] } "uncurry")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 1 285 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 5 285 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 1 285 4 , srcInfoPoints = [] } "unc" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 8 285 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 25 285 27 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 8 285 24 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 8 285 9 , SrcSpan "tests/examples/PartialSignatures.hs" 285 23 285 24 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 9 285 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 12 285 14 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 9 285 11 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 10 285 11 , srcInfoPoints = [] } "a"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 15 285 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 18 285 20 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 15 285 17 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 16 285 17 , srcInfoPoints = [] } "b"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 21 285 23 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 22 285 23 , srcInfoPoints = [] } "c")))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 28 285 42 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 37 285 39 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 28 285 36 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 285 28 285 29 , SrcSpan "tests/examples/PartialSignatures.hs" 285 31 285 32 , SrcSpan "tests/examples/PartialSignatures.hs" 285 35 285 36 ] } Boxed [ TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 29 285 31 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 30 285 31 , srcInfoPoints = [] } "a")) , TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 33 285 35 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 34 285 35 , srcInfoPoints = [] } "b")) ]) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 40 285 42 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 285 41 285 42 , srcInfoPoints = [] } "c"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 1 286 14 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 1 286 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 1 286 4 , srcInfoPoints = [] } "unc")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 5 286 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 286 5 286 6 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 7 286 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 7 286 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 286 7 286 14 , srcInfoPoints = [] } "uncurry")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 1 289 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 289 5 289 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 1 289 4 , srcInfoPoints = [] } "foo" ] (TyForall SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 8 289 31 , srcInfoPoints = [] } Nothing (Just (CxTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 8 289 23 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 289 8 289 9 , SrcSpan "tests/examples/PartialSignatures.hs" 289 16 289 17 , SrcSpan "tests/examples/PartialSignatures.hs" 289 19 289 20 , SrcSpan "tests/examples/PartialSignatures.hs" 289 21 289 23 ] } [ TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 9 289 16 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 9 289 16 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 9 289 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 9 289 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 9 289 13 , srcInfoPoints = [] } "Show"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 14 289 16 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 15 289 16 , srcInfoPoints = [] } "a")))) , TypeA SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 18 289 19 , srcInfoPoints = [] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 18 289 19 , srcInfoPoints = [] } Nothing) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 24 289 31 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 289 27 289 29 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 24 289 26 , srcInfoPoints = [] } (Just (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 25 289 26 , srcInfoPoints = [] } "a"))) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 289 30 289 31 , srcInfoPoints = [] } Nothing))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 1 290 22 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 1 290 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 1 290 4 , srcInfoPoints = [] } "foo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 5 290 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 5 290 6 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 7 290 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 290 7 290 8 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 9 290 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 9 290 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 9 290 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 9 290 13 , srcInfoPoints = [] } "show"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 14 290 22 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 290 14 290 15 , SrcSpan "tests/examples/PartialSignatures.hs" 290 21 290 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 15 290 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 15 290 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 15 290 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 15 290 19 , srcInfoPoints = [] } "succ"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 20 290 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 20 290 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 290 20 290 21 , srcInfoPoints = [] } "x"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 1 292 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 292 5 292 7 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 1 292 4 , srcInfoPoints = [] } "bar" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 8 292 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 292 10 292 12 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 8 292 9 , srcInfoPoints = [] } Nothing) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 13 292 19 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 292 15 292 17 ] } (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 13 292 14 , srcInfoPoints = [] } Nothing) (TyWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 292 18 292 19 , srcInfoPoints = [] } Nothing))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 1 293 14 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 1 293 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 1 293 4 , srcInfoPoints = [] } "bar") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 5 293 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 5 293 6 , srcInfoPoints = [] } "x") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 7 293 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 7 293 8 , srcInfoPoints = [] } "y") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 9 293 14 , srcInfoPoints = [ SrcSpan "tests/examples/PartialSignatures.hs" 293 9 293 10 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 11 293 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 11 293 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 11 293 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 11 293 12 , srcInfoPoints = [] } "y"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 13 293 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 13 293 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/PartialSignatures.hs" 293 13 293 14 , srcInfoPoints = [] } "x"))))) Nothing ] ] , [ Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 101 1 101 24) " No extra constraints" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 131 1 131 84) " Test case for (fixed) bug that previously generated the following error message:" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 133 1 133 31) " LocalDefinitionBug.hs:9:16:" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 134 1 134 95) " GHC internal error: \8216a\8217 is not in scope during type checking, but it passed the renamer" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 135 1 135 63) " tcl_env of environment: [alA :-> Type variable \8216_\8217 = _," , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 136 1 136 73) " alC :-> Identifier[x::a, ]," , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 137 1 137 63) " alE :-> Type variable \8216t\8217 = t," , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 138 1 138 62) " rjF :-> Identifier[monoLoc::a" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 139 1 139 102) " -> ((a, String), (a, _)), ]]" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 140 1 140 60) " In the type signature for \8216g\8217: g :: t -> (a, String)" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 141 1 141 37) " In an equation for \8216monoLoc\8217:" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 142 1 142 21) " monoLoc x" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 143 1 143 33) " = (g True, g False)" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 144 1 144 19) " where" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 145 1 145 39) " g :: t -> (a, String)" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 146 1 146 34) " g _ = (x, \"foo\")" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 149 1 149 64) " Fixed by using tcExtendTyVarEnv2 instead of tcExtendTyVarEnv" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 177 5 177 35) " g :: b -> (a, String) -- #1" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 178 22 178 27) " #2" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 181 1 181 51) " For #2, we should infer the same type as in #1." , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 220 1 220 74) " The named wildcards aren't scoped as the ScopedTypeVariables extension" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 221 1 221 79) " isn't enabled, of which the behaviour is copied. Thus, the _a annotation of" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 222 1 222 70) " x, which must be Bool, isn't the same as the _a in g, which is now" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 223 1 223 21) " generalised over." , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 248 1 248 33) " Inferred type: Bool -> String" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 262 1 262 44) " h :: Functor m => (a -> b) -> m a -> H m" , Comment False (SrcSpan "tests/examples/PartialSignatures.hs" 266 1 266 45) " h2 :: Functor m => (a -> b) -> m a -> H m" ] ) haskell-src-exts-1.23.1/tests/examples/InfixParser.hs.parser.golden0000644000000000000000000005163113534314633023500 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 1 1 7 1 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixParser.hs" 1 1 1 1 , SrcSpan "tests/examples/InfixParser.hs" 3 1 3 1 , SrcSpan "tests/examples/InfixParser.hs" 5 1 5 1 , SrcSpan "tests/examples/InfixParser.hs" 6 1 6 1 , SrcSpan "tests/examples/InfixParser.hs" 7 1 7 1 , SrcSpan "tests/examples/InfixParser.hs" 7 1 7 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 1 1 1 25 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 1 1 1 7 , SrcSpan "tests/examples/InfixParser.hs" 1 20 1 25 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 1 8 1 19 , srcInfoPoints = [] } "InfixParser") Nothing Nothing)) [] [] [ TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 1 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 1 3 5 , SrcSpan "tests/examples/InfixParser.hs" 3 16 3 17 ] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 6 3 15 , srcInfoPoints = [] } (DHApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 6 3 13 , srcInfoPoints = [] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 6 3 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 6 3 11 , srcInfoPoints = [] } "Parse")) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 12 3 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 12 3 13 , srcInfoPoints = [] } "a"))) (UnkindedVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 14 3 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 14 3 15 , srcInfoPoints = [] } "b"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 18 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 22 3 24 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 18 3 21 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 18 3 19 , SrcSpan "tests/examples/InfixParser.hs" 3 20 3 21 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 19 3 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 19 3 20 , srcInfoPoints = [] } "a"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 25 3 35 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 25 3 26 , SrcSpan "tests/examples/InfixParser.hs" 3 34 3 35 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 26 3 34 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 26 3 27 , SrcSpan "tests/examples/InfixParser.hs" 3 28 3 29 , SrcSpan "tests/examples/InfixParser.hs" 3 33 3 34 ] } Boxed [ TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 27 3 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 27 3 28 , srcInfoPoints = [] } "b") , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 30 3 33 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 3 30 3 31 , SrcSpan "tests/examples/InfixParser.hs" 3 32 3 33 ] } (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 31 3 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 3 31 3 32 , srcInfoPoints = [] } "a")) ]))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 1 5 45 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 5 7 5 9 ] } [ Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 1 5 6 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 5 1 5 2 , SrcSpan "tests/examples/InfixParser.hs" 5 2 5 5 , SrcSpan "tests/examples/InfixParser.hs" 5 5 5 6 ] } "<|>" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 45 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 5 20 5 22 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 19 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 17 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 10 5 15 , srcInfoPoints = [] } "Parse"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 16 5 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 16 5 17 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 18 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 18 5 19 , srcInfoPoints = [] } "b"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 45 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 5 33 5 35 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 32 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 30 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 23 5 28 , srcInfoPoints = [] } "Parse"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 29 5 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 29 5 30 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 31 5 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 31 5 32 , srcInfoPoints = [] } "b"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 36 5 45 , srcInfoPoints = [] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 36 5 43 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 36 5 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 36 5 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 36 5 41 , srcInfoPoints = [] } "Parse"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 42 5 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 42 5 43 , srcInfoPoints = [] } "a"))) (TyVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 44 5 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 5 44 5 45 , srcInfoPoints = [] } "b"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 1 6 29 , srcInfoPoints = [] } [ InfixMatch SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 1 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 6 1 6 2 , SrcSpan "tests/examples/InfixParser.hs" 6 11 6 12 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 2 6 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 2 6 4 , srcInfoPoints = [] } "p1")) (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 5 6 8 , srcInfoPoints = [] } "<|>") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 9 6 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 9 6 11 , srcInfoPoints = [] } "p2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 13 6 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 13 6 14 , srcInfoPoints = [] } "i") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 15 6 29 , srcInfoPoints = [ SrcSpan "tests/examples/InfixParser.hs" 6 15 6 16 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 17 6 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 17 6 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 17 6 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 17 6 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 17 6 19 , srcInfoPoints = [] } "p1"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 20 6 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 20 6 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 20 6 21 , srcInfoPoints = [] } "i")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 22 6 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 22 6 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 22 6 24 , srcInfoPoints = [] } "++"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 25 6 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 25 6 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 25 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 25 6 27 , srcInfoPoints = [] } "p2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 28 6 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 28 6 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/InfixParser.hs" 6 28 6 29 , srcInfoPoints = [] } "i")))))) Nothing ] ] , [] ) haskell-src-exts-1.23.1/tests/examples/RealGHC.lhs.parser.golden0000644000000000000000001025732713534314633022642 0ustar0000000000000000ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 7 1 915 1 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 1 , SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 1 , SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 1 , SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 1 , SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 1 , SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 1 , SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 1 , SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 1 , SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 1 , SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 1 , SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 1 , SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 1 , SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 1 , SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 1 , SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 1 , SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 1 , SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 1 , SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 1 , SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 1 , SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 1 , SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 1 , SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 1 , SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 1 , SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 1 , SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 1 , SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 1 , SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 1 , SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 1 , SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 1 , SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 1 , SrcSpan "tests/examples/RealGHC.lhs" 104 1 104 1 , SrcSpan "tests/examples/RealGHC.lhs" 108 1 108 1 , SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 1 , SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 1 , SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 1 , SrcSpan "tests/examples/RealGHC.lhs" 129 1 129 1 , SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 1 , SrcSpan "tests/examples/RealGHC.lhs" 133 1 133 1 , SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 1 , SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 1 , SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 1 , SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 1 , SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 1 , SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 1 , SrcSpan "tests/examples/RealGHC.lhs" 162 1 162 1 , SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 1 , SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 1 , SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 1 , SrcSpan "tests/examples/RealGHC.lhs" 185 1 185 1 , SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 1 , SrcSpan "tests/examples/RealGHC.lhs" 189 1 189 1 , SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 1 , SrcSpan "tests/examples/RealGHC.lhs" 193 1 193 1 , SrcSpan "tests/examples/RealGHC.lhs" 195 1 195 1 , SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 1 , SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 1 , SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 1 , SrcSpan "tests/examples/RealGHC.lhs" 208 1 208 1 , SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 1 , SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 1 , SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 1 , SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 1 , SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 1 , SrcSpan "tests/examples/RealGHC.lhs" 235 1 235 1 , SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 1 , SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 1 , SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 1 , SrcSpan "tests/examples/RealGHC.lhs" 242 1 242 1 , SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 1 , SrcSpan "tests/examples/RealGHC.lhs" 246 1 246 1 , SrcSpan "tests/examples/RealGHC.lhs" 278 1 278 1 , SrcSpan "tests/examples/RealGHC.lhs" 284 1 284 1 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 1 , SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 1 , SrcSpan "tests/examples/RealGHC.lhs" 307 1 307 1 , SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 1 , SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 1 , SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 1 , SrcSpan "tests/examples/RealGHC.lhs" 327 1 327 1 , SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 1 , SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 1 , SrcSpan "tests/examples/RealGHC.lhs" 338 1 338 1 , SrcSpan "tests/examples/RealGHC.lhs" 364 1 364 1 , SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 1 , SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 1 , SrcSpan "tests/examples/RealGHC.lhs" 397 1 397 1 , SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 1 , SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 1 , SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 1 , SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 1 , SrcSpan "tests/examples/RealGHC.lhs" 473 1 473 1 , SrcSpan "tests/examples/RealGHC.lhs" 495 1 495 1 , SrcSpan "tests/examples/RealGHC.lhs" 499 1 499 1 , SrcSpan "tests/examples/RealGHC.lhs" 513 1 513 1 , SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 1 , SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 1 , SrcSpan "tests/examples/RealGHC.lhs" 601 1 601 1 , SrcSpan "tests/examples/RealGHC.lhs" 605 1 605 1 , SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 1 , SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 1 , SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 1 , SrcSpan "tests/examples/RealGHC.lhs" 636 1 636 1 , SrcSpan "tests/examples/RealGHC.lhs" 639 1 639 1 , SrcSpan "tests/examples/RealGHC.lhs" 670 1 670 1 , SrcSpan "tests/examples/RealGHC.lhs" 674 1 674 1 , SrcSpan "tests/examples/RealGHC.lhs" 679 1 679 1 , SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 1 , SrcSpan "tests/examples/RealGHC.lhs" 728 1 728 1 , SrcSpan "tests/examples/RealGHC.lhs" 730 1 730 1 , SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 1 , SrcSpan "tests/examples/RealGHC.lhs" 750 1 750 1 , SrcSpan "tests/examples/RealGHC.lhs" 755 1 755 1 , SrcSpan "tests/examples/RealGHC.lhs" 813 1 813 1 , SrcSpan "tests/examples/RealGHC.lhs" 818 1 818 1 , SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 1 , SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 1 , SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 1 , SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 1 , SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 1 , SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 1 , SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 1 , SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 1 , SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 1 , SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 1 , SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 1 , SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 1 , SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 1 , SrcSpan "tests/examples/RealGHC.lhs" 850 1 850 1 , SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 1 , SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 1 , SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 1 , SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 1 , SrcSpan "tests/examples/RealGHC.lhs" 863 1 863 1 , SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 1 , SrcSpan "tests/examples/RealGHC.lhs" 871 1 871 1 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 1 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 1 36 12 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 7 , SrcSpan "tests/examples/RealGHC.lhs" 36 7 36 12 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 8 17 13 , srcInfoPoints = [] } "Rules") Nothing (Just (ExportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 14 36 6 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 17 14 17 15 , SrcSpan "tests/examples/RealGHC.lhs" 19 13 19 14 , SrcSpan "tests/examples/RealGHC.lhs" 22 18 22 19 , SrcSpan "tests/examples/RealGHC.lhs" 22 30 22 31 , SrcSpan "tests/examples/RealGHC.lhs" 22 50 22 51 , SrcSpan "tests/examples/RealGHC.lhs" 23 18 23 19 , SrcSpan "tests/examples/RealGHC.lhs" 23 31 23 32 , SrcSpan "tests/examples/RealGHC.lhs" 26 21 26 22 , SrcSpan "tests/examples/RealGHC.lhs" 29 15 29 16 , SrcSpan "tests/examples/RealGHC.lhs" 29 31 29 32 , SrcSpan "tests/examples/RealGHC.lhs" 29 44 29 45 , SrcSpan "tests/examples/RealGHC.lhs" 30 25 30 26 , SrcSpan "tests/examples/RealGHC.lhs" 33 21 33 22 , SrcSpan "tests/examples/RealGHC.lhs" 33 31 33 32 , SrcSpan "tests/examples/RealGHC.lhs" 33 48 33 49 , SrcSpan "tests/examples/RealGHC.lhs" 35 19 35 20 , SrcSpan "tests/examples/RealGHC.lhs" 35 32 35 33 , SrcSpan "tests/examples/RealGHC.lhs" 36 5 36 6 ] } [ EAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 , srcInfoPoints = [] }) (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 , srcInfoPoints = [] } "RuleBase")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 , srcInfoPoints = [] } "emptyRuleBase")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 , srcInfoPoints = [] } "mkRuleBase")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 , srcInfoPoints = [] } "extendRuleBaseList")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 , srcInfoPoints = [] } "unionRuleBase")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 , srcInfoPoints = [] } "pprRuleBase")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 , srcInfoPoints = [] } "ruleCheckProgram")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 , srcInfoPoints = [] } "mkSpecInfo")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 , srcInfoPoints = [] } "extendSpecInfo")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 , srcInfoPoints = [] } "addSpecInfo")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 , srcInfoPoints = [] } "addIdSpecialisations")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 , srcInfoPoints = [] } "rulesOfBinds")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 , srcInfoPoints = [] } "getRules")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 , srcInfoPoints = [] } "pprRulesForUser")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 , srcInfoPoints = [] } "lookupRule")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 , srcInfoPoints = [] } "mkLocalRule")) , EVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 , srcInfoPoints = [] } "roughTopNames")) ])))) [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 19 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 16 , SrcSpan "tests/examples/RealGHC.lhs" 7 16 7 19 ] } Nothing "-w " , LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 13 , SrcSpan "tests/examples/RealGHC.lhs" 8 28 8 31 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 8 14 8 27 , srcInfoPoints = [] } "PatternGuards" ] ] [ ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 40 8 40 15 , srcInfoPoints = [] } "CoreSyn" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 8 41 17 , srcInfoPoints = [] } "OccurAnal" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 21 41 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 41 21 41 22 , SrcSpan "tests/examples/RealGHC.lhs" 41 40 41 41 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 23 41 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 23 41 39 , srcInfoPoints = [] } "occurAnalyseExpr") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 81 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 8 42 15 , srcInfoPoints = [] } "CoreFVs" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 21 42 81 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 42 21 42 22 , SrcSpan "tests/examples/RealGHC.lhs" 42 35 42 36 , SrcSpan "tests/examples/RealGHC.lhs" 42 50 42 51 , SrcSpan "tests/examples/RealGHC.lhs" 42 64 42 65 , SrcSpan "tests/examples/RealGHC.lhs" 42 80 42 81 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 23 42 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 23 42 35 , srcInfoPoints = [] } "exprFreeVars") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 37 42 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 37 42 50 , srcInfoPoints = [] } "exprsFreeVars") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 52 42 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 52 42 64 , srcInfoPoints = [] } "bindFreeVars") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 66 42 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 66 42 79 , srcInfoPoints = [] } "rulesFreeVars") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 8 43 17 , srcInfoPoints = [] } "CoreUtils" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 21 43 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 43 21 43 22 , SrcSpan "tests/examples/RealGHC.lhs" 43 32 43 33 , SrcSpan "tests/examples/RealGHC.lhs" 43 43 43 44 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 23 43 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 23 43 32 , srcInfoPoints = [] } "tcEqExprX") , IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 34 43 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 34 43 42 , srcInfoPoints = [] } "exprType") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 8 44 15 , srcInfoPoints = [] } "PprCore" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 21 44 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 44 21 44 22 , SrcSpan "tests/examples/RealGHC.lhs" 44 32 44 33 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 23 44 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 23 44 31 , srcInfoPoints = [] } "pprRules") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 8 45 12 , srcInfoPoints = [] } "Type" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 17 45 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 45 17 45 18 , SrcSpan "tests/examples/RealGHC.lhs" 45 23 45 24 , SrcSpan "tests/examples/RealGHC.lhs" 45 36 45 37 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 , srcInfoPoints = [] } "Type") , IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 , srcInfoPoints = [] } "TvSubstEnv") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 8 46 16 , srcInfoPoints = [] } "Coercion" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 25 46 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 46 25 46 26 , SrcSpan "tests/examples/RealGHC.lhs" 46 40 46 41 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 27 46 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 27 46 39 , srcInfoPoints = [] } "coercionKind") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 8 47 14 , srcInfoPoints = [] } "TcType" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 21 47 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 47 21 47 22 , SrcSpan "tests/examples/RealGHC.lhs" 47 45 47 46 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 23 47 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 23 47 44 , srcInfoPoints = [] } "tcSplitTyConApp_maybe") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 8 48 16 , srcInfoPoints = [] } "CoreTidy" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 21 48 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 48 21 48 22 , SrcSpan "tests/examples/RealGHC.lhs" 48 33 48 34 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 23 48 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 23 48 32 , srcInfoPoints = [] } "tidyRules") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 10 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 49 8 49 10 , srcInfoPoints = [] } "Id" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 8 50 14 , srcInfoPoints = [] } "IdInfo" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 21 50 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 50 21 50 22 , SrcSpan "tests/examples/RealGHC.lhs" 50 44 50 45 ] } False [ IThingWith SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 23 50 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 50 31 50 32 , SrcSpan "tests/examples/RealGHC.lhs" 50 42 50 43 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 23 50 31 , srcInfoPoints = [] } "SpecInfo") [ ConName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 33 50 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 33 50 41 , srcInfoPoints = [] } "SpecInfo") ] ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 8 51 11 , srcInfoPoints = [] } "Var" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 17 51 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 51 17 51 18 , SrcSpan "tests/examples/RealGHC.lhs" 51 23 51 24 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 , srcInfoPoints = [] } "Var") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 14 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 52 8 52 14 , srcInfoPoints = [] } "VarEnv" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 14 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 53 8 53 14 , srcInfoPoints = [] } "VarSet" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 8 54 12 , srcInfoPoints = [] } "Name" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 17 54 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 54 17 54 18 , SrcSpan "tests/examples/RealGHC.lhs" 54 23 54 24 , SrcSpan "tests/examples/RealGHC.lhs" 54 40 54 41 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 , srcInfoPoints = [] } "Name") , IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 25 54 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 54 35 54 36 , SrcSpan "tests/examples/RealGHC.lhs" 54 36 54 38 , SrcSpan "tests/examples/RealGHC.lhs" 54 38 54 39 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 25 54 35 , srcInfoPoints = [] } "NamedThing") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 55 8 55 15 , srcInfoPoints = [] } "NameEnv" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 8 56 13 , srcInfoPoints = [] } "Unify" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 21 56 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 56 21 56 22 , SrcSpan "tests/examples/RealGHC.lhs" 56 35 56 36 , SrcSpan "tests/examples/RealGHC.lhs" 56 50 56 51 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 23 56 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 23 56 35 , srcInfoPoints = [] } "ruleMatchTyX") , IThingAll SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 37 56 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 56 45 56 46 , SrcSpan "tests/examples/RealGHC.lhs" 56 46 56 48 , SrcSpan "tests/examples/RealGHC.lhs" 56 48 56 49 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 37 56 45 , srcInfoPoints = [] } "MatchEnv") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 8 57 18 , srcInfoPoints = [] } "BasicTypes" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 21 57 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 57 21 57 22 , SrcSpan "tests/examples/RealGHC.lhs" 57 34 57 35 ] } False [ IAbs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 , srcInfoPoints = [] } (NoNamespace SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 , srcInfoPoints = [] }) (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 , srcInfoPoints = [] } "Activation") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 8 58 19 , srcInfoPoints = [] } "StaticFlags" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Just (ImportSpecList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 21 58 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 58 21 58 22 , SrcSpan "tests/examples/RealGHC.lhs" 58 42 58 43 ] } False [ IVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 23 58 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 23 58 41 , srcInfoPoints = [] } "opt_PprStyle_Debug") ]) } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 18 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 59 8 59 18 , srcInfoPoints = [] } "Outputable" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 18 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 60 8 60 18 , srcInfoPoints = [] } "FastString" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 14 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 61 8 61 14 , srcInfoPoints = [] } "Maybes" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 62 8 62 15 , srcInfoPoints = [] } "OrdList" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 11 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 63 8 63 11 , srcInfoPoints = [] } "Bag" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 12 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 64 8 64 12 , srcInfoPoints = [] } "Util" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } , ImportDecl { importAnn = SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 17 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 7 ] } , importModule = ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 65 8 65 17 , srcInfoPoints = [] } "Data.List" , importQualified = False , importSrc = False , importSafe = False , importPkg = Nothing , importAs = Nothing , importSpecs = Nothing } ] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 1 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 104 13 104 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 1 104 12 , srcInfoPoints = [] } "mkLocalRule" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 104 25 104 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 , srcInfoPoints = [] } "RuleName"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 9 105 11 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 , srcInfoPoints = [] } "Activation"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 17 105 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 , srcInfoPoints = [] } "Name"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 31 105 33 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 21 , SrcSpan "tests/examples/RealGHC.lhs" 105 29 105 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 , srcInfoPoints = [] } "CoreBndr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 45 105 47 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 35 , SrcSpan "tests/examples/RealGHC.lhs" 105 43 105 44 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 , srcInfoPoints = [] } "CoreExpr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 105 57 105 59 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 , srcInfoPoints = [] } "CoreExpr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 , srcInfoPoints = [] } "CoreRule"))))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 112 25 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 112 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 108 12 , srcInfoPoints = [] } "mkLocalRule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 13 108 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 13 108 17 , srcInfoPoints = [] } "name") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 18 108 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 18 108 21 , srcInfoPoints = [] } "act") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 22 108 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 22 108 24 , srcInfoPoints = [] } "fn") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 25 108 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 25 108 30 , srcInfoPoints = [] } "bndrs") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 31 108 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 31 108 35 , srcInfoPoints = [] } "args") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 36 108 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 36 108 39 , srcInfoPoints = [] } "rhs") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 3 112 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 109 3 109 4 ] } (RecConstr SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 112 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 109 10 109 11 , SrcSpan "tests/examples/RealGHC.lhs" 109 26 109 27 , SrcSpan "tests/examples/RealGHC.lhs" 109 38 109 39 , SrcSpan "tests/examples/RealGHC.lhs" 109 52 109 53 , SrcSpan "tests/examples/RealGHC.lhs" 110 24 110 25 , SrcSpan "tests/examples/RealGHC.lhs" 110 40 110 41 , SrcSpan "tests/examples/RealGHC.lhs" 111 20 111 21 , SrcSpan "tests/examples/RealGHC.lhs" 111 51 111 52 , SrcSpan "tests/examples/RealGHC.lhs" 112 24 112 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 109 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 109 9 , srcInfoPoints = [] } "Rule")) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 109 20 109 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 19 , srcInfoPoints = [] } "ru_name")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 , srcInfoPoints = [] } "name"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 109 34 109 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 33 , srcInfoPoints = [] } "ru_fn")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 , srcInfoPoints = [] } "fn"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 109 47 109 48 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 46 , srcInfoPoints = [] } "ru_act")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 , srcInfoPoints = [] } "act"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 110 17 110 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 16 , srcInfoPoints = [] } "ru_bndrs")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 , srcInfoPoints = [] } "bndrs"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 110 34 110 35 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 33 , srcInfoPoints = [] } "ru_args")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 , srcInfoPoints = [] } "args"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 20 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 111 15 111 16 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 14 , srcInfoPoints = [] } "ru_rhs")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 , srcInfoPoints = [] } "rhs"))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 111 31 111 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 30 , srcInfoPoints = [] } "ru_rough")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 , srcInfoPoints = [] } "roughTopNames"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 , srcInfoPoints = [] } "args")))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 112 17 112 18 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 16 , srcInfoPoints = [] } "ru_local")) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 , srcInfoPoints = [] } "True"))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 115 15 115 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 14 , srcInfoPoints = [] } "roughTopNames" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 115 29 115 31 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 19 , SrcSpan "tests/examples/RealGHC.lhs" 115 27 115 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 , srcInfoPoints = [] } "CoreExpr")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 32 115 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 115 32 115 33 , SrcSpan "tests/examples/RealGHC.lhs" 115 43 115 44 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 43 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 , srcInfoPoints = [] } "Name")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 43 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 14 , srcInfoPoints = [] } "roughTopNames") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 15 126 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 15 126 19 , srcInfoPoints = [] } "args") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 20 126 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 126 20 126 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 , srcInfoPoints = [] } "roughTopName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 , srcInfoPoints = [] } "args"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 128 14 128 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 13 , srcInfoPoints = [] } "roughTopName" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 128 26 128 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 , srcInfoPoints = [] } "CoreExpr"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 39 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 , srcInfoPoints = [] } "Name"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 135 29 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 131 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 129 13 , srcInfoPoints = [] } "roughTopName") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 14 129 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 129 14 129 15 , SrcSpan "tests/examples/RealGHC.lhs" 129 22 129 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 19 , srcInfoPoints = [] } "Type")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 20 129 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 20 129 22 , srcInfoPoints = [] } "ty") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 24 131 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 129 24 129 25 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 26 131 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 129 26 129 30 , SrcSpan "tests/examples/RealGHC.lhs" 129 56 129 58 , SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 15 , SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 15 , SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 , srcInfoPoints = [] } "tcSplitTyConApp_maybe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 , srcInfoPoints = [] } "ty")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 47 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 19 , srcInfoPoints = [] } "Just")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 20 130 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 130 20 130 21 , SrcSpan "tests/examples/RealGHC.lhs" 130 23 130 24 , SrcSpan "tests/examples/RealGHC.lhs" 130 25 130 26 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 21 130 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 21 130 23 , srcInfoPoints = [] } "tc") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 24 130 25 , srcInfoPoints = [] } ] ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 27 130 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 130 27 130 29 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 47 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 35 130 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 130 35 130 36 , SrcSpan "tests/examples/RealGHC.lhs" 130 46 130 47 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 43 , srcInfoPoints = [] } "getName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 44 130 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 44 130 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 44 130 46 , srcInfoPoints = [] } "tc"))))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 37 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 27 131 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 131 27 131 29 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 , srcInfoPoints = [] } "Nothing")))) Nothing ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 13 , srcInfoPoints = [] } "roughTopName") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 14 132 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 132 14 132 15 , SrcSpan "tests/examples/RealGHC.lhs" 132 22 132 23 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 18 , srcInfoPoints = [] } "App")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 19 132 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 19 132 20 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 21 132 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 21 132 22 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 24 132 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 132 24 132 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 , srcInfoPoints = [] } "roughTopName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 , srcInfoPoints = [] } "f"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 1 134 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 1 133 13 , srcInfoPoints = [] } "roughTopName") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 14 133 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 133 14 133 15 , SrcSpan "tests/examples/RealGHC.lhs" 133 20 133 21 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 18 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 19 133 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 19 133 20 , srcInfoPoints = [] } "f") ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 22 134 38 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 22 133 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 133 22 133 23 , SrcSpan "tests/examples/RealGHC.lhs" 133 37 133 38 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 , srcInfoPoints = [] } "isGlobalId"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 , srcInfoPoints = [] } "f")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 44 133 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 133 44 133 45 , SrcSpan "tests/examples/RealGHC.lhs" 133 53 133 54 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 , srcInfoPoints = [] } "idName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 , srcInfoPoints = [] } "f")))))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 14 134 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 134 14 134 15 , SrcSpan "tests/examples/RealGHC.lhs" 134 29 134 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 , srcInfoPoints = [] } "otherwise"))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 , srcInfoPoints = [] } "Nothing"))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 13 , srcInfoPoints = [] } "roughTopName") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 14 135 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 14 135 19 , srcInfoPoints = [] } "other") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 20 135 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 135 20 135 21 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 , srcInfoPoints = [] } "Nothing")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 137 15 137 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 14 , srcInfoPoints = [] } "ruleCantMatch" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 137 31 137 33 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 19 , SrcSpan "tests/examples/RealGHC.lhs" 137 29 137 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 29 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 , srcInfoPoints = [] } "Name"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 137 47 137 49 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 35 , SrcSpan "tests/examples/RealGHC.lhs" 137 45 137 46 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 45 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 , srcInfoPoints = [] } "Name"))))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 152 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 14 , srcInfoPoints = [] } "ruleCantMatch") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 15 150 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 150 15 150 16 , SrcSpan "tests/examples/RealGHC.lhs" 150 28 150 29 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 28 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 20 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 21 150 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 21 150 23 , srcInfoPoints = [] } "n1") ]) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 24 150 25 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 24 150 25 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 26 150 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 26 150 28 , srcInfoPoints = [] } "ts"))) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 30 150 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 150 30 150 31 , SrcSpan "tests/examples/RealGHC.lhs" 150 43 150 44 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 43 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 35 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 36 150 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 36 150 38 , srcInfoPoints = [] } "n2") ]) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 39 150 40 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 39 150 40 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 41 150 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 41 150 43 , srcInfoPoints = [] } "as"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 45 150 78 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 150 45 150 46 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 78 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 , srcInfoPoints = [] } "n1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 , srcInfoPoints = [] } "/="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 , srcInfoPoints = [] } "n2")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 , srcInfoPoints = [] } "||"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 75 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 , srcInfoPoints = [] } "ruleCantMatch"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 , srcInfoPoints = [] } "ts")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 , srcInfoPoints = [] } "as")))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 14 , srcInfoPoints = [] } "ruleCantMatch") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 15 151 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 151 15 151 16 , SrcSpan "tests/examples/RealGHC.lhs" 151 28 151 29 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 17 , srcInfoPoints = [] } "t")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 24 151 25 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 24 151 25 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 26 151 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 26 151 28 , srcInfoPoints = [] } "ts"))) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 30 151 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 151 30 151 31 , SrcSpan "tests/examples/RealGHC.lhs" 151 43 151 44 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 32 , srcInfoPoints = [] } "a")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 39 151 40 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 39 151 40 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 41 151 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 41 151 43 , srcInfoPoints = [] } "as"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 45 151 66 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 151 45 151 46 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 , srcInfoPoints = [] } "ruleCantMatch"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 , srcInfoPoints = [] } "ts")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 , srcInfoPoints = [] } "as"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 14 , srcInfoPoints = [] } "ruleCantMatch") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 15 152 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 15 152 17 , srcInfoPoints = [] } "ts") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 26 152 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 26 152 28 , srcInfoPoints = [] } "as") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 37 152 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 152 37 152 38 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 156 17 156 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 16 , srcInfoPoints = [] } "pprRulesForUser" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 156 31 156 33 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 21 , SrcSpan "tests/examples/RealGHC.lhs" 156 29 156 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 , srcInfoPoints = [] } "SDoc")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 168 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 167 3 167 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 168 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 167 3 167 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 162 16 , srcInfoPoints = [] } "pprRulesForUser") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 17 162 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 17 162 22 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 3 166 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 163 3 163 4 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 166 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 , srcInfoPoints = [] } "withPprStyle"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 , srcInfoPoints = [] } "defaultUserStyle")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 166 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 , srcInfoPoints = [] } "pprRules"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 166 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 19 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 , srcInfoPoints = [] } "sortLe"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 , srcInfoPoints = [] } "le_rule")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 , srcInfoPoints = [] } "tidyRules"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 , srcInfoPoints = [] } "emptyTidyEnv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 , srcInfoPoints = [] } "rules")))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 5 , SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 12 , srcInfoPoints = [] } "le_rule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 13 168 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 13 168 15 , srcInfoPoints = [] } "r1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 16 168 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 16 168 18 , srcInfoPoints = [] } "r2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 19 168 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 168 19 168 20 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 28 , srcInfoPoints = [] } "ru_name"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 29 168 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 29 168 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 29 168 31 , srcInfoPoints = [] } "r1")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 , srcInfoPoints = [] } "<="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 42 , srcInfoPoints = [] } "ru_name"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 43 168 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 43 168 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 43 168 45 , srcInfoPoints = [] } "r2")))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 181 12 181 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 11 , srcInfoPoints = [] } "mkSpecInfo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 181 26 181 28 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 16 , SrcSpan "tests/examples/RealGHC.lhs" 181 24 181 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 , srcInfoPoints = [] } "SpecInfo")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 56 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 11 , srcInfoPoints = [] } "mkSpecInfo") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 12 182 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 12 182 17 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 18 182 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 182 18 182 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 34 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 , srcInfoPoints = [] } "SpecInfo"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 , srcInfoPoints = [] } "rules")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 35 182 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 182 35 182 36 , SrcSpan "tests/examples/RealGHC.lhs" 182 55 182 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 , srcInfoPoints = [] } "rulesFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 , srcInfoPoints = [] } "rules"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 184 16 184 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 15 , srcInfoPoints = [] } "extendSpecInfo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 184 28 184 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 , srcInfoPoints = [] } "SpecInfo"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 184 42 184 44 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 32 , SrcSpan "tests/examples/RealGHC.lhs" 184 40 184 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 , srcInfoPoints = [] } "SpecInfo"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 186 65 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 186 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 185 15 , srcInfoPoints = [] } "extendSpecInfo") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 16 185 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 185 16 185 17 , SrcSpan "tests/examples/RealGHC.lhs" 185 34 185 35 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 25 , srcInfoPoints = [] } "SpecInfo")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 26 185 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 26 185 29 , srcInfoPoints = [] } "rs1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 30 185 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 30 185 34 , srcInfoPoints = [] } "fvs1") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 36 185 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 36 185 39 , srcInfoPoints = [] } "rs2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 3 186 65 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 186 3 186 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 65 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 26 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 , srcInfoPoints = [] } "SpecInfo"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 14 186 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 186 14 186 15 , SrcSpan "tests/examples/RealGHC.lhs" 186 25 186 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 , srcInfoPoints = [] } "rs2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 , srcInfoPoints = [] } "rs1")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 27 186 65 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 186 27 186 28 , SrcSpan "tests/examples/RealGHC.lhs" 186 64 186 65 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 , srcInfoPoints = [] } "rulesFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 , srcInfoPoints = [] } "rs2")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 47 , SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 , SrcSpan "tests/examples/RealGHC.lhs" 186 58 186 59 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 47 , SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 , SrcSpan "tests/examples/RealGHC.lhs" 186 58 186 59 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 , srcInfoPoints = [] } "unionVarSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 , srcInfoPoints = [] } "fvs1"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 188 13 188 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 12 , srcInfoPoints = [] } "addSpecInfo" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 188 25 188 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 , srcInfoPoints = [] } "SpecInfo"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 188 37 188 39 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 , srcInfoPoints = [] } "SpecInfo"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 , srcInfoPoints = [] } "SpecInfo"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 190 52 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 190 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 189 12 , srcInfoPoints = [] } "addSpecInfo") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 13 189 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 189 13 189 14 , SrcSpan "tests/examples/RealGHC.lhs" 189 31 189 32 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 22 , srcInfoPoints = [] } "SpecInfo")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 23 189 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 23 189 26 , srcInfoPoints = [] } "rs1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 27 189 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 27 189 31 , srcInfoPoints = [] } "fvs1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 33 189 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 189 33 189 34 , SrcSpan "tests/examples/RealGHC.lhs" 189 51 189 52 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 42 , srcInfoPoints = [] } "SpecInfo")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 43 189 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 43 189 46 , srcInfoPoints = [] } "rs2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 47 189 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 47 189 51 , srcInfoPoints = [] } "fvs2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 3 190 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 190 3 190 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 26 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 , srcInfoPoints = [] } "SpecInfo"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 14 190 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 190 14 190 15 , SrcSpan "tests/examples/RealGHC.lhs" 190 25 190 26 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 , srcInfoPoints = [] } "rs1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 , srcInfoPoints = [] } "++"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 , srcInfoPoints = [] } "rs2")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 27 190 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 190 27 190 28 , SrcSpan "tests/examples/RealGHC.lhs" 190 51 190 52 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 , srcInfoPoints = [] } "fvs1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 34 , SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 , SrcSpan "tests/examples/RealGHC.lhs" 190 45 190 46 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 34 , SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 , SrcSpan "tests/examples/RealGHC.lhs" 190 45 190 46 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 , srcInfoPoints = [] } "unionVarSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 , srcInfoPoints = [] } "fvs2"))))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 192 22 192 24 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 21 , srcInfoPoints = [] } "addIdSpecialisations" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 192 28 192 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 , srcInfoPoints = [] } "Id"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 192 42 192 44 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 32 , SrcSpan "tests/examples/RealGHC.lhs" 192 40 192 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 , srcInfoPoints = [] } "Id"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 197 47 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 194 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 193 21 , srcInfoPoints = [] } "addIdSpecialisations") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 22 193 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 22 193 24 , srcInfoPoints = [] } "id") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 25 193 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 193 25 193 26 , SrcSpan "tests/examples/RealGHC.lhs" 193 26 193 27 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 3 194 7 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 194 3 194 4 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 , srcInfoPoints = [] } "id")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 1 197 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 1 195 21 , srcInfoPoints = [] } "addIdSpecialisations") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 22 195 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 22 195 24 , srcInfoPoints = [] } "id") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 25 195 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 25 195 30 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 3 197 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 196 3 196 4 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 197 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 , srcInfoPoints = [] } "setIdSpecialisation"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 , srcInfoPoints = [] } "id")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 , srcInfoPoints = [] } "extendSpecInfo"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 20 197 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 197 20 197 21 , SrcSpan "tests/examples/RealGHC.lhs" 197 40 197 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 , srcInfoPoints = [] } "idSpecialisation"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 , srcInfoPoints = [] } "id")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 , srcInfoPoints = [] } "rules")))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 200 14 200 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 13 , srcInfoPoints = [] } "rulesOfBinds" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 200 28 200 30 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 18 , SrcSpan "tests/examples/RealGHC.lhs" 200 26 200 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 , srcInfoPoints = [] } "CoreBind")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 31 200 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 200 31 200 32 , SrcSpan "tests/examples/RealGHC.lhs" 200 40 200 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 , srcInfoPoints = [] } "CoreRule"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 73 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 13 , srcInfoPoints = [] } "rulesOfBinds") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 14 201 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 14 201 19 , srcInfoPoints = [] } "binds") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 20 201 73 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 201 20 201 21 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 , srcInfoPoints = [] } "concatMap"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 32 201 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 201 32 201 33 , SrcSpan "tests/examples/RealGHC.lhs" 201 66 201 67 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 , srcInfoPoints = [] } "concatMap"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 , srcInfoPoints = [] } "idCoreRules")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 , srcInfoPoints = [] } "."))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 , srcInfoPoints = [] } "bindersOf")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 , srcInfoPoints = [] } "binds"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 203 10 203 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 9 , srcInfoPoints = [] } "getRules" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 203 22 203 24 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 , srcInfoPoints = [] } "RuleBase"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 203 28 203 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 , srcInfoPoints = [] } "Id"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 31 203 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 203 31 203 32 , SrcSpan "tests/examples/RealGHC.lhs" 203 40 203 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 , srcInfoPoints = [] } "CoreRule")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 212 80 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 212 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 208 9 , srcInfoPoints = [] } "getRules") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 10 208 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 10 208 19 , srcInfoPoints = [] } "rule_base") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 20 208 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 20 208 22 , srcInfoPoints = [] } "fn") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 3 212 80 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 3 209 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 209 3 209 4 , SrcSpan "tests/examples/RealGHC.lhs" 209 19 209 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 17 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 , srcInfoPoints = [] } "isLocalId"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 , srcInfoPoints = [] } "fn")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 , srcInfoPoints = [] } "idCoreRules"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 , srcInfoPoints = [] } "fn")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 3 212 80 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 210 3 210 4 , SrcSpan "tests/examples/RealGHC.lhs" 210 19 210 20 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 , srcInfoPoints = [] } "otherwise"))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 211 48 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 , srcInfoPoints = [] } "WARN"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 25 211 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 210 25 210 26 , SrcSpan "tests/examples/RealGHC.lhs" 210 74 210 75 , SrcSpan "tests/examples/RealGHC.lhs" 211 47 211 48 ] } Boxed [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 30 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 31 210 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 210 31 210 32 , SrcSpan "tests/examples/RealGHC.lhs" 210 45 210 46 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 32 210 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 32 210 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 32 210 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 32 210 42 , srcInfoPoints = [] } "isPrimOpId"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 43 210 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 43 210 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 43 210 45 , srcInfoPoints = [] } "fn")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 47 210 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 47 210 49 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 47 210 49 , srcInfoPoints = [] } "&&"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 50 210 74 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 50 210 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 50 210 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 50 210 57 , srcInfoPoints = [] } "notNull"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 58 210 74 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 210 58 210 59 , SrcSpan "tests/examples/RealGHC.lhs" 210 73 210 74 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 59 210 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 59 210 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 59 210 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 59 210 70 , srcInfoPoints = [] } "idCoreRules"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 71 210 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 71 210 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 71 210 73 , srcInfoPoints = [] } "fn")))))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 18 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 19 211 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 19 211 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 19 211 21 , srcInfoPoints = [] } "fn")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 22 211 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 22 211 25 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 22 211 25 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 26 211 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 26 211 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 26 211 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 26 211 29 , srcInfoPoints = [] } "ppr"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 30 211 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 211 30 211 31 , SrcSpan "tests/examples/RealGHC.lhs" 211 45 211 46 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 31 211 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 31 211 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 31 211 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 31 211 42 , srcInfoPoints = [] } "idCoreRules"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 43 211 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 43 211 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 211 43 211 45 , srcInfoPoints = [] } "fn")))))) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 , srcInfoPoints = [] } "idCoreRules")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 , srcInfoPoints = [] } "fn")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 , srcInfoPoints = [] } "++"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 31 212 80 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 212 31 212 32 , SrcSpan "tests/examples/RealGHC.lhs" 212 79 212 80 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 45 , srcInfoPoints = [] } "lookupNameEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 46 212 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 46 212 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 46 212 55 , srcInfoPoints = [] } "rule_base")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 56 212 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 212 56 212 57 , SrcSpan "tests/examples/RealGHC.lhs" 212 66 212 67 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 63 , srcInfoPoints = [] } "idName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 64 212 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 64 212 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 64 212 66 , srcInfoPoints = [] } "fn")))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 69 , SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 , SrcSpan "tests/examples/RealGHC.lhs" 212 75 212 76 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 69 , SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 , SrcSpan "tests/examples/RealGHC.lhs" 212 75 212 76 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 , srcInfoPoints = [] } "orElse"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 77 212 79 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 212 77 212 78 , SrcSpan "tests/examples/RealGHC.lhs" 212 78 212 79 ] } [])))) ]) Nothing ] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 5 , SrcSpan "tests/examples/RealGHC.lhs" 225 15 225 16 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 6 225 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 6 225 14 , srcInfoPoints = [] } "RuleBase")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 , srcInfoPoints = [] } "NameEnv"))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 25 225 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 225 25 225 26 , SrcSpan "tests/examples/RealGHC.lhs" 225 34 225 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 , srcInfoPoints = [] } "CoreRule"))))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 29 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 14 , srcInfoPoints = [] } "emptyRuleBase")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 15 229 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 229 15 229 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 , srcInfoPoints = [] } "emptyNameEnv")))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 231 12 231 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 11 , srcInfoPoints = [] } "mkRuleBase" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 231 26 231 28 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 16 , SrcSpan "tests/examples/RealGHC.lhs" 231 24 231 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 , srcInfoPoints = [] } "RuleBase")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 58 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 11 , srcInfoPoints = [] } "mkRuleBase") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 12 232 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 12 232 17 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 18 232 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 232 18 232 19 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 , srcInfoPoints = [] } "extendRuleBaseList"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 , srcInfoPoints = [] } "emptyRuleBase")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 , srcInfoPoints = [] } "rules"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 234 20 234 22 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 19 , srcInfoPoints = [] } "extendRuleBaseList" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 234 32 234 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 , srcInfoPoints = [] } "RuleBase"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 234 46 234 48 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 36 , SrcSpan "tests/examples/RealGHC.lhs" 234 44 234 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 , srcInfoPoints = [] } "RuleBase"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 236 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 236 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 235 19 , srcInfoPoints = [] } "extendRuleBaseList") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 20 235 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 20 235 29 , srcInfoPoints = [] } "rule_base") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 30 235 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 30 235 38 , srcInfoPoints = [] } "new_guys") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 3 236 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 236 3 236 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 , srcInfoPoints = [] } "foldl"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 , srcInfoPoints = [] } "extendRuleBase")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 , srcInfoPoints = [] } "rule_base")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 , srcInfoPoints = [] } "new_guys"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 238 15 238 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 14 , srcInfoPoints = [] } "unionRuleBase" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 238 27 238 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 , srcInfoPoints = [] } "RuleBase"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 238 39 238 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 , srcInfoPoints = [] } "RuleBase"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 , srcInfoPoints = [] } "RuleBase"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 51 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 14 , srcInfoPoints = [] } "unionRuleBase") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 15 239 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 15 239 18 , srcInfoPoints = [] } "rb1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 19 239 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 19 239 22 , srcInfoPoints = [] } "rb2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 23 239 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 239 23 239 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 , srcInfoPoints = [] } "plusNameEnv_C"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 40 , SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 , SrcSpan "tests/examples/RealGHC.lhs" 239 42 239 43 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 40 , SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 , SrcSpan "tests/examples/RealGHC.lhs" 239 42 239 43 ] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 , srcInfoPoints = [] } "++")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 , srcInfoPoints = [] } "rb1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 , srcInfoPoints = [] } "rb2"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 241 16 241 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 15 , srcInfoPoints = [] } "extendRuleBase" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 241 28 241 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 , srcInfoPoints = [] } "RuleBase"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 241 40 241 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 , srcInfoPoints = [] } "CoreRule"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 , srcInfoPoints = [] } "RuleBase"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 243 69 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 243 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 242 15 , srcInfoPoints = [] } "extendRuleBase") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 16 242 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 16 242 25 , srcInfoPoints = [] } "rule_base") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 26 242 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 26 242 30 , srcInfoPoints = [] } "rule") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 3 243 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 243 3 243 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 , srcInfoPoints = [] } "extendNameEnv_Acc"))) (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 24 , SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 , SrcSpan "tests/examples/RealGHC.lhs" 243 25 243 26 ] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 24 , SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 , SrcSpan "tests/examples/RealGHC.lhs" 243 25 243 26 ] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 , srcInfoPoints = [] })))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 , srcInfoPoints = [] } "singleton")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 , srcInfoPoints = [] } "rule_base")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 47 243 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 243 47 243 48 , SrcSpan "tests/examples/RealGHC.lhs" 243 63 243 64 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 63 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 , srcInfoPoints = [] } "ruleIdName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 , srcInfoPoints = [] } "rule")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 , srcInfoPoints = [] } "rule"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 245 13 245 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 12 , srcInfoPoints = [] } "pprRuleBase" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 245 25 245 27 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 , srcInfoPoints = [] } "RuleBase"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 , srcInfoPoints = [] } "SDoc")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 247 41 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 247 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 246 12 , srcInfoPoints = [] } "pprRuleBase") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 13 246 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 13 246 18 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 19 247 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 246 19 246 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 247 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 , srcInfoPoints = [] } "vcat"))) (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 26 247 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 246 26 246 27 , SrcSpan "tests/examples/RealGHC.lhs" 247 14 247 15 , SrcSpan "tests/examples/RealGHC.lhs" 247 40 247 41 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 , srcInfoPoints = [] } "pprRules"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 37 246 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 246 37 246 38 , SrcSpan "tests/examples/RealGHC.lhs" 246 63 246 64 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 , srcInfoPoints = [] } "tidyRules"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 , srcInfoPoints = [] } "emptyTidyEnv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 , srcInfoPoints = [] } "rs")))))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 247 19 247 21 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 247 19 247 21 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 18 , srcInfoPoints = [] } "rs")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 , srcInfoPoints = [] } "nameEnvElts"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 , srcInfoPoints = [] } "rules"))))) ]))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 1 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 278 12 278 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 1 278 11 , srcInfoPoints = [] } "lookupRule" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 15 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 278 36 278 38 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 15 278 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 278 15 278 16 , SrcSpan "tests/examples/RealGHC.lhs" 278 34 278 35 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 278 27 278 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 , srcInfoPoints = [] } "Bool"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 279 9 279 11 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 , srcInfoPoints = [] } "InScopeSet"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 279 15 279 17 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 , srcInfoPoints = [] } "Id"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 18 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 280 9 280 11 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 18 279 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 279 18 279 19 , SrcSpan "tests/examples/RealGHC.lhs" 279 27 279 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 , srcInfoPoints = [] } "CoreExpr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 280 23 280 25 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 13 , SrcSpan "tests/examples/RealGHC.lhs" 280 21 280 22 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 , srcInfoPoints = [] } "CoreRule")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 52 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 32 280 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 280 32 280 33 , SrcSpan "tests/examples/RealGHC.lhs" 280 41 280 42 , SrcSpan "tests/examples/RealGHC.lhs" 280 51 280 52 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 , srcInfoPoints = [] } "CoreExpr")) ]))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 284 11 , srcInfoPoints = [] } "lookupRule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 12 284 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 12 284 21 , srcInfoPoints = [] } "is_active") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 22 284 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 22 284 30 , srcInfoPoints = [] } "in_scope") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 31 284 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 31 284 33 , srcInfoPoints = [] } "fn") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 34 284 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 34 284 38 , srcInfoPoints = [] } "args") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 39 284 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 39 284 44 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 285 3 288 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 285 3 285 4 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 5 288 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 286 5 286 9 , SrcSpan "tests/examples/RealGHC.lhs" 286 22 286 24 , SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 5 , SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 5 , SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 , srcInfoPoints = [] } "go"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 13 286 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 286 13 286 14 , SrcSpan "tests/examples/RealGHC.lhs" 286 14 286 15 ] } [])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 , srcInfoPoints = [] } "rules")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 22 , srcInfoPoints = [] } (PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 7 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 6 , SrcSpan "tests/examples/RealGHC.lhs" 287 6 287 7 ] } []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 12 287 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 287 12 287 14 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 , srcInfoPoints = [] } "Nothing")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 45 , srcInfoPoints = [] } (PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 11 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 6 , SrcSpan "tests/examples/RealGHC.lhs" 288 10 288 11 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 10 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 7 , srcInfoPoints = [] } "m")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 7 288 8 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 7 288 8 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 8 288 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 8 288 10 , srcInfoPoints = [] } "ms")))) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 12 288 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 288 12 288 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 20 288 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 288 20 288 21 , SrcSpan "tests/examples/RealGHC.lhs" 288 44 288 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 29 , srcInfoPoints = [] } "findBest"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 30 288 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 288 30 288 31 , SrcSpan "tests/examples/RealGHC.lhs" 288 33 288 34 , SrcSpan "tests/examples/RealGHC.lhs" 288 38 288 39 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 31 288 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 31 288 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 31 288 33 , srcInfoPoints = [] } "fn")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 34 288 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 34 288 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 34 288 38 , srcInfoPoints = [] } "args")) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 40 288 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 40 288 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 40 288 41 , srcInfoPoints = [] } "m")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 42 288 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 42 288 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 42 288 44 , srcInfoPoints = [] } "ms"))))))) Nothing ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 5 , SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 5 , SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 5 , SrcSpan "tests/examples/RealGHC.lhs" 294 5 294 5 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 15 , srcInfoPoints = [] } "rough_args")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 16 290 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 290 16 290 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 , srcInfoPoints = [] } "roughTopName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 , srcInfoPoints = [] } "args"))))) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 8 292 10 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 7 , srcInfoPoints = [] } "go" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 33 292 35 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 12 , SrcSpan "tests/examples/RealGHC.lhs" 292 31 292 32 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 12 292 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 12 292 13 , SrcSpan "tests/examples/RealGHC.lhs" 292 21 292 22 , SrcSpan "tests/examples/RealGHC.lhs" 292 30 292 31 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 , srcInfoPoints = [] } "CoreExpr")) ])) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 47 292 49 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 37 , SrcSpan "tests/examples/RealGHC.lhs" 292 45 292 46 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 , srcInfoPoints = [] } "CoreRule")))) (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 50 292 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 50 292 51 , SrcSpan "tests/examples/RealGHC.lhs" 292 70 292 71 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 51 292 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 292 51 292 52 , SrcSpan "tests/examples/RealGHC.lhs" 292 60 292 61 , SrcSpan "tests/examples/RealGHC.lhs" 292 69 292 70 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 52 292 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 52 292 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 52 292 60 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 61 292 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 61 292 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 61 292 69 , srcInfoPoints = [] } "CoreExpr")) ])))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 298 36 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 8 293 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 8 293 10 , srcInfoPoints = [] } "ms") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 11 293 13 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 293 11 293 12 , SrcSpan "tests/examples/RealGHC.lhs" 293 12 293 13 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 24 293 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 293 24 293 25 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 , srcInfoPoints = [] } "ms")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 5 298 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 5 294 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 8 294 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 8 294 10 , srcInfoPoints = [] } "ms") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 11 294 17 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 294 11 294 12 , SrcSpan "tests/examples/RealGHC.lhs" 294 16 294 17 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 16 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 13 , srcInfoPoints = [] } "r")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 13 294 14 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 13 294 14 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 14 294 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 14 294 16 , srcInfoPoints = [] } "rs"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 18 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 294 18 294 19 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 20 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 294 20 294 24 , SrcSpan "tests/examples/RealGHC.lhs" 294 74 294 76 , SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 13 , SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 13 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 0 ] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 25 294 73 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 294 25 294 26 , SrcSpan "tests/examples/RealGHC.lhs" 294 72 294 73 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 35 , srcInfoPoints = [] } "matchRule"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 36 294 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 36 294 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 36 294 45 , srcInfoPoints = [] } "is_active")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 46 294 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 46 294 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 46 294 54 , srcInfoPoints = [] } "in_scope")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 55 294 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 55 294 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 55 294 59 , srcInfoPoints = [] } "args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 60 294 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 60 294 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 60 294 70 , srcInfoPoints = [] } "rough_args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 71 294 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 71 294 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 71 294 72 , srcInfoPoints = [] } "r"))))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 40 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 17 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 18 295 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 18 295 19 , srcInfoPoints = [] } "e") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 21 295 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 295 21 295 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 26 , srcInfoPoints = [] } "go"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 27 295 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 295 27 295 28 , SrcSpan "tests/examples/RealGHC.lhs" 295 36 295 37 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 28 295 36 , srcInfoPoints = [] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 28 295 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 295 28 295 29 , SrcSpan "tests/examples/RealGHC.lhs" 295 30 295 31 , SrcSpan "tests/examples/RealGHC.lhs" 295 32 295 33 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 29 295 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 29 295 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 29 295 30 , srcInfoPoints = [] } "r")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 31 295 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 31 295 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 31 295 32 , srcInfoPoints = [] } "e")) ]) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 33 295 34 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 33 295 34 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 33 295 34 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 34 295 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 34 295 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 34 295 36 , srcInfoPoints = [] } "ms")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 38 295 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 38 295 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 295 38 295 40 , srcInfoPoints = [] } "rs"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 296 13 298 36 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 20 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 296 21 298 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 296 21 296 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 22 , srcInfoPoints = [] } "go"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 23 298 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 23 298 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 23 298 25 , srcInfoPoints = [] } "ms")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 34 298 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 34 298 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 298 34 298 36 , srcInfoPoints = [] } "rs"))))) Nothing ])) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 1 301 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 300 10 300 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 9 , srcInfoPoints = [] } "findBest" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 13 301 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 6 301 8 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 13 300 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 300 13 300 14 , SrcSpan "tests/examples/RealGHC.lhs" 300 16 300 17 , SrcSpan "tests/examples/RealGHC.lhs" 300 28 300 29 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 , srcInfoPoints = [] } "Id")) , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 18 300 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 300 18 300 19 , SrcSpan "tests/examples/RealGHC.lhs" 300 27 300 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 , srcInfoPoints = [] } "CoreExpr"))) ]) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 29 301 31 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 10 , SrcSpan "tests/examples/RealGHC.lhs" 301 18 301 19 , SrcSpan "tests/examples/RealGHC.lhs" 301 27 301 28 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 , srcInfoPoints = [] } "CoreExpr")) ]) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 54 301 56 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 33 , SrcSpan "tests/examples/RealGHC.lhs" 301 52 301 53 ] } (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 33 301 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 33 301 34 , SrcSpan "tests/examples/RealGHC.lhs" 301 42 301 43 , SrcSpan "tests/examples/RealGHC.lhs" 301 51 301 52 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 , srcInfoPoints = [] } "CoreExpr")) ])) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 57 301 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 301 57 301 58 , SrcSpan "tests/examples/RealGHC.lhs" 301 66 301 67 , SrcSpan "tests/examples/RealGHC.lhs" 301 75 301 76 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 , srcInfoPoints = [] } "CoreRule")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 , srcInfoPoints = [] } "CoreExpr")) ])))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 322 23 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 9 , srcInfoPoints = [] } "findBest") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 10 306 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 10 306 16 , srcInfoPoints = [] } "target") , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 17 306 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 306 17 306 18 , SrcSpan "tests/examples/RealGHC.lhs" 306 22 306 23 , SrcSpan "tests/examples/RealGHC.lhs" 306 26 306 27 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 18 306 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 18 306 22 , srcInfoPoints = [] } "rule") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 23 306 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 23 306 26 , srcInfoPoints = [] } "ans") ] , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 30 306 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 306 30 306 31 , SrcSpan "tests/examples/RealGHC.lhs" 306 31 306 32 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 33 306 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 306 33 306 34 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 35 306 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 306 35 306 36 , SrcSpan "tests/examples/RealGHC.lhs" 306 40 306 41 , SrcSpan "tests/examples/RealGHC.lhs" 306 44 306 45 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 , srcInfoPoints = [] } "rule")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 , srcInfoPoints = [] } "ans")) ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 1 322 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 321 3 321 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 1 307 9 , srcInfoPoints = [] } "findBest") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 10 307 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 10 307 16 , srcInfoPoints = [] } "target") , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 17 307 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 307 17 307 18 , SrcSpan "tests/examples/RealGHC.lhs" 307 23 307 24 , SrcSpan "tests/examples/RealGHC.lhs" 307 28 307 29 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 18 307 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 18 307 23 , srcInfoPoints = [] } "rule1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 24 307 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 24 307 28 , srcInfoPoints = [] } "ans1") ] , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 30 307 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 307 30 307 31 , SrcSpan "tests/examples/RealGHC.lhs" 307 47 307 48 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 47 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 32 , SrcSpan "tests/examples/RealGHC.lhs" 307 37 307 38 , SrcSpan "tests/examples/RealGHC.lhs" 307 42 307 43 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 32 307 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 32 307 37 , srcInfoPoints = [] } "rule2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 38 307 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 38 307 42 , srcInfoPoints = [] } "ans2") ]) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 43 307 44 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 43 307 44 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 44 307 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 44 307 47 , srcInfoPoints = [] } "prs"))) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 3 320 49 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 3 308 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 308 3 308 4 , SrcSpan "tests/examples/RealGHC.lhs" 308 34 308 35 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 33 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 , srcInfoPoints = [] } "rule1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 12 , SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 , SrcSpan "tests/examples/RealGHC.lhs" 308 26 308 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 12 , SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 , SrcSpan "tests/examples/RealGHC.lhs" 308 26 308 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 , srcInfoPoints = [] } "isMoreSpecific"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 , srcInfoPoints = [] } "rule2")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 , srcInfoPoints = [] } "findBest"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 , srcInfoPoints = [] } "target")))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 52 308 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 308 52 308 53 , SrcSpan "tests/examples/RealGHC.lhs" 308 58 308 59 , SrcSpan "tests/examples/RealGHC.lhs" 308 63 308 64 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 , srcInfoPoints = [] } "rule1")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 , srcInfoPoints = [] } "ans1")) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 , srcInfoPoints = [] } "prs")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 3 309 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 309 3 309 4 , SrcSpan "tests/examples/RealGHC.lhs" 309 34 309 35 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 33 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 , srcInfoPoints = [] } "rule2"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 12 , SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 , SrcSpan "tests/examples/RealGHC.lhs" 309 26 309 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 12 , SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 , SrcSpan "tests/examples/RealGHC.lhs" 309 26 309 27 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 , srcInfoPoints = [] } "isMoreSpecific"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 , srcInfoPoints = [] } "rule1")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 , srcInfoPoints = [] } "findBest"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 , srcInfoPoints = [] } "target")))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 52 309 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 309 52 309 53 , SrcSpan "tests/examples/RealGHC.lhs" 309 58 309 59 , SrcSpan "tests/examples/RealGHC.lhs" 309 63 309 64 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 , srcInfoPoints = [] } "rule2")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 , srcInfoPoints = [] } "ans2")) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 , srcInfoPoints = [] } "prs")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 3 319 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 310 3 310 4 , SrcSpan "tests/examples/RealGHC.lhs" 310 15 310 16 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 , srcInfoPoints = [] } "debugIsOn"))) ] (Let SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 17 319 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 310 17 310 20 , SrcSpan "tests/examples/RealGHC.lhs" 313 17 313 19 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 310 21 310 21 , SrcSpan "tests/examples/RealGHC.lhs" 313 17 313 0 ] } [ FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 310 28 , srcInfoPoints = [] } "pp_rule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 29 310 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 29 310 33 , srcInfoPoints = [] } "rule") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 25 312 83 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 25 311 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 311 25 311 26 , SrcSpan "tests/examples/RealGHC.lhs" 311 46 311 47 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 27 311 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 27 311 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 27 311 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 27 311 45 , srcInfoPoints = [] } "opt_PprStyle_Debug"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 48 311 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 48 311 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 48 311 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 48 311 51 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 52 311 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 52 311 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 311 52 311 56 , srcInfoPoints = [] } "rule")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 25 312 83 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 312 25 312 26 , SrcSpan "tests/examples/RealGHC.lhs" 312 46 312 47 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 27 312 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 27 312 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 27 312 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 27 312 36 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 48 312 83 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 48 312 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 48 312 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 48 312 60 , srcInfoPoints = [] } "doubleQuotes"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 61 312 83 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 312 61 312 62 , SrcSpan "tests/examples/RealGHC.lhs" 312 82 312 83 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 62 312 82 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 62 312 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 62 312 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 62 312 67 , srcInfoPoints = [] } "ftext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 68 312 82 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 312 68 312 69 , SrcSpan "tests/examples/RealGHC.lhs" 312 81 312 82 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 69 312 81 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 69 312 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 69 312 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 69 312 76 , srcInfoPoints = [] } "ru_name"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 77 312 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 77 312 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 312 77 312 81 , srcInfoPoints = [] } "rule")))))))) ]) Nothing ] ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 319 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 318 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 73 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 , srcInfoPoints = [] } "pprTrace"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 29 313 73 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 29 313 73 , srcInfoPoints = [] } "Rules.findBest: rule overlap (Rule 1 wins)" "Rules.findBest: rule overlap (Rule 1 wins)"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 22 318 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 314 22 314 23 , SrcSpan "tests/examples/RealGHC.lhs" 318 70 318 71 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 23 318 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 23 314 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 23 314 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 23 314 27 , srcInfoPoints = [] } "vcat"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 28 318 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 314 28 314 29 , SrcSpan "tests/examples/RealGHC.lhs" 316 43 316 44 , SrcSpan "tests/examples/RealGHC.lhs" 317 69 317 70 , SrcSpan "tests/examples/RealGHC.lhs" 318 69 318 70 ] } [ If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 29 316 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 314 29 314 31 , SrcSpan "tests/examples/RealGHC.lhs" 314 51 314 55 , SrcSpan "tests/examples/RealGHC.lhs" 316 33 316 37 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 32 314 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 32 314 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 314 32 314 50 , srcInfoPoints = [] } "opt_PprStyle_Debug"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 101 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 32 315 37 , srcInfoPoints = [] } "ptext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 38 315 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 315 38 315 39 , SrcSpan "tests/examples/RealGHC.lhs" 315 66 315 67 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 39 315 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 39 315 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 39 315 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 39 315 43 , srcInfoPoints = [] } "sLit"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 44 315 66 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 44 315 66 , srcInfoPoints = [] } "Expression to match:" "Expression to match:"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 68 315 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 68 315 71 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 68 315 71 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 72 315 78 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 72 315 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 72 315 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 72 315 75 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 76 315 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 76 315 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 76 315 78 , srcInfoPoints = [] } "fn"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 79 315 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 79 315 82 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 79 315 82 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 83 315 101 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 83 315 86 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 83 315 86 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 83 315 86 , srcInfoPoints = [] } "sep"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 87 315 101 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 315 87 315 88 , SrcSpan "tests/examples/RealGHC.lhs" 315 100 315 101 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 88 315 100 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 88 315 95 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 88 315 91 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 88 315 91 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 88 315 91 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 92 315 95 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 92 315 95 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 92 315 95 , srcInfoPoints = [] } "ppr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 96 315 100 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 96 315 100 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 315 96 315 100 , srcInfoPoints = [] } "args"))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 316 38 316 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 316 38 316 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 316 38 316 43 , srcInfoPoints = [] } "empty"))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 34 , srcInfoPoints = [] } "ptext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 35 317 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 317 35 317 36 , SrcSpan "tests/examples/RealGHC.lhs" 317 50 317 51 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 36 317 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 36 317 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 36 317 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 36 317 40 , srcInfoPoints = [] } "sLit"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 41 317 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 41 317 50 , srcInfoPoints = [] } "Rule 1:" "Rule 1:"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 52 317 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 52 317 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 52 317 55 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 56 317 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 56 317 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 56 317 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 56 317 63 , srcInfoPoints = [] } "pp_rule"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 64 317 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 64 317 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 317 64 317 69 , srcInfoPoints = [] } "rule1")))) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 34 , srcInfoPoints = [] } "ptext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 35 318 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 318 35 318 36 , SrcSpan "tests/examples/RealGHC.lhs" 318 50 318 51 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 36 318 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 36 318 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 36 318 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 36 318 40 , srcInfoPoints = [] } "sLit"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 41 318 50 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 41 318 50 , srcInfoPoints = [] } "Rule 2:" "Rule 2:"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 52 318 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 52 318 55 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 52 318 55 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 56 318 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 56 318 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 56 318 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 56 318 63 , srcInfoPoints = [] } "pp_rule"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 64 318 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 64 318 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 64 318 69 , srcInfoPoints = [] } "rule2")))) ])))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 , srcInfoPoints = [] } "$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 33 , srcInfoPoints = [] } "findBest"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 34 319 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 34 319 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 34 319 40 , srcInfoPoints = [] } "target")))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 41 319 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 319 41 319 42 , SrcSpan "tests/examples/RealGHC.lhs" 319 47 319 48 , SrcSpan "tests/examples/RealGHC.lhs" 319 52 319 53 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 42 319 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 42 319 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 42 319 47 , srcInfoPoints = [] } "rule1")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 48 319 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 48 319 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 48 319 52 , srcInfoPoints = [] } "ans1")) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 , srcInfoPoints = [] } "prs")))))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 3 320 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 320 3 320 4 , SrcSpan "tests/examples/RealGHC.lhs" 320 15 320 16 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 , srcInfoPoints = [] } "findBest"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 , srcInfoPoints = [] } "target")))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 33 320 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 320 33 320 34 , SrcSpan "tests/examples/RealGHC.lhs" 320 39 320 40 , SrcSpan "tests/examples/RealGHC.lhs" 320 44 320 45 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 , srcInfoPoints = [] } "rule1")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 , srcInfoPoints = [] } "ans1")) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 , srcInfoPoints = [] } "prs")))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 5 , SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 23 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 14 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 6 , SrcSpan "tests/examples/RealGHC.lhs" 322 8 322 9 , SrcSpan "tests/examples/RealGHC.lhs" 322 13 322 14 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 6 322 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 6 322 8 , srcInfoPoints = [] } "fn") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 9 322 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 9 322 13 , srcInfoPoints = [] } "args") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 15 322 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 322 15 322 16 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 , srcInfoPoints = [] } "target")))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 324 16 324 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 15 , srcInfoPoints = [] } "isMoreSpecific" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 324 28 324 30 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 , srcInfoPoints = [] } "CoreRule"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 324 40 324 42 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 , srcInfoPoints = [] } "CoreRule"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 , srcInfoPoints = [] } "Bool"))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 331 45 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 15 , srcInfoPoints = [] } "isMoreSpecific") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 16 325 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 325 16 325 17 , SrcSpan "tests/examples/RealGHC.lhs" 325 31 325 32 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 325 29 325 30 , SrcSpan "tests/examples/RealGHC.lhs" 325 30 325 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 28 , srcInfoPoints = [] } "BuiltinRule")) []) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 33 325 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 33 325 35 , srcInfoPoints = [] } "r2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 36 325 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 325 36 325 37 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 , srcInfoPoints = [] } "True")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 15 , srcInfoPoints = [] } "isMoreSpecific") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 16 326 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 16 326 18 , srcInfoPoints = [] } "r1") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 19 326 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 326 19 326 20 , SrcSpan "tests/examples/RealGHC.lhs" 326 34 326 35 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 326 32 326 33 , SrcSpan "tests/examples/RealGHC.lhs" 326 33 326 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 31 , srcInfoPoints = [] } "BuiltinRule")) []) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 36 326 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 326 36 326 37 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 , srcInfoPoints = [] } "False")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 1 331 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 330 3 330 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 1 327 15 , srcInfoPoints = [] } "isMoreSpecific") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 16 327 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 327 16 327 17 , SrcSpan "tests/examples/RealGHC.lhs" 327 60 327 61 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 327 22 327 23 , SrcSpan "tests/examples/RealGHC.lhs" 327 41 327 42 , SrcSpan "tests/examples/RealGHC.lhs" 327 59 327 60 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 21 , srcInfoPoints = [] } "Rule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 327 33 327 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 32 , srcInfoPoints = [] } "ru_bndrs")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 35 327 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 35 327 41 , srcInfoPoints = [] } "bndrs1")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 327 51 327 52 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 50 , srcInfoPoints = [] } "ru_args")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 53 327 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 53 327 58 , srcInfoPoints = [] } "args1")) ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 12 328 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 328 12 328 13 , SrcSpan "tests/examples/RealGHC.lhs" 328 56 328 57 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 328 18 328 19 , SrcSpan "tests/examples/RealGHC.lhs" 328 37 328 38 , SrcSpan "tests/examples/RealGHC.lhs" 328 55 328 56 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 17 , srcInfoPoints = [] } "Rule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 328 29 328 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 28 , srcInfoPoints = [] } "ru_bndrs")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 31 328 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 31 328 37 , srcInfoPoints = [] } "bndrs2")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 328 47 328 48 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 46 , srcInfoPoints = [] } "ru_args")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 49 328 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 49 328 54 , srcInfoPoints = [] } "args2")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 3 329 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 329 3 329 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 , srcInfoPoints = [] } "isJust"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 12 329 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 329 12 329 13 , SrcSpan "tests/examples/RealGHC.lhs" 329 47 329 48 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 , srcInfoPoints = [] } "matchN"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 , srcInfoPoints = [] } "in_scope")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 , srcInfoPoints = [] } "bndrs2")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 , srcInfoPoints = [] } "args2")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 , srcInfoPoints = [] } "args1"))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 4 , SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 45 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 12 , srcInfoPoints = [] } "in_scope")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 13 331 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 331 13 331 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 , srcInfoPoints = [] } "mkInScopeSet"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 28 331 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 331 28 331 29 , SrcSpan "tests/examples/RealGHC.lhs" 331 44 331 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 37 , srcInfoPoints = [] } "mkVarSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 38 331 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 38 331 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 38 331 44 , srcInfoPoints = [] } "bndrs1"))))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 335 13 335 15 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 12 , srcInfoPoints = [] } "noBlackList" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 335 27 335 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 , srcInfoPoints = [] } "Bool")))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 24 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 12 , srcInfoPoints = [] } "noBlackList") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 13 336 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 13 336 16 , srcInfoPoints = [] } "act") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 17 336 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 336 17 336 18 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 , srcInfoPoints = [] } "False")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 1 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 338 11 338 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 1 338 10 , srcInfoPoints = [] } "matchRule" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 14 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 338 35 338 37 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 14 338 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 338 14 338 15 , SrcSpan "tests/examples/RealGHC.lhs" 338 33 338 34 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 338 26 338 28 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 , srcInfoPoints = [] } "Bool"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 339 7 339 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 , srcInfoPoints = [] } "InScopeSet"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 10 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 339 21 339 23 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 10 339 20 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 339 10 339 11 , SrcSpan "tests/examples/RealGHC.lhs" 339 19 339 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 , srcInfoPoints = [] } "CoreExpr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 24 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 340 7 340 9 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 24 339 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 339 24 339 25 , SrcSpan "tests/examples/RealGHC.lhs" 339 35 339 36 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 35 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 , srcInfoPoints = [] } "Name"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 340 19 340 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 , srcInfoPoints = [] } "CoreRule"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 36 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 , srcInfoPoints = [] } "CoreExpr"))))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 382 53 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 368 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 364 10 , srcInfoPoints = [] } "matchRule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 11 364 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 11 364 20 , srcInfoPoints = [] } "is_active") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 21 364 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 21 364 29 , srcInfoPoints = [] } "in_scope") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 30 364 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 30 364 34 , srcInfoPoints = [] } "args") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 35 364 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 35 364 45 , srcInfoPoints = [] } "rough_args") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 7 365 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 365 7 365 8 , SrcSpan "tests/examples/RealGHC.lhs" 365 57 365 58 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 365 20 365 21 , SrcSpan "tests/examples/RealGHC.lhs" 365 36 365 37 , SrcSpan "tests/examples/RealGHC.lhs" 365 56 365 57 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 19 , srcInfoPoints = [] } "BuiltinRule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 365 30 365 31 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 29 , srcInfoPoints = [] } "ru_name")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 32 365 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 32 365 36 , srcInfoPoints = [] } "name")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 365 45 365 46 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 44 , srcInfoPoints = [] } "ru_try")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 47 365 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 47 365 55 , srcInfoPoints = [] } "match_fn")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 3 368 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 366 3 366 4 ] } (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 5 368 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 366 5 366 9 , SrcSpan "tests/examples/RealGHC.lhs" 366 24 366 26 , SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 5 , SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 5 , SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 , srcInfoPoints = [] } "match_fn"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 , srcInfoPoints = [] } "args")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 27 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 9 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 10 367 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 10 367 14 , srcInfoPoints = [] } "expr") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 15 367 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 367 15 367 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 27 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 , srcInfoPoints = [] } "expr"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 25 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 15 368 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 368 15 368 17 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 , srcInfoPoints = [] } "Nothing")))) Nothing ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 1 382 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 381 3 381 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 10 , srcInfoPoints = [] } "matchRule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 11 370 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 11 370 20 , srcInfoPoints = [] } "is_active") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 21 370 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 21 370 29 , srcInfoPoints = [] } "in_scope") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 30 370 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 30 370 34 , srcInfoPoints = [] } "args") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 35 370 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 35 370 45 , srcInfoPoints = [] } "rough_args") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 11 373 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 371 11 371 12 , SrcSpan "tests/examples/RealGHC.lhs" 373 25 373 26 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 373 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 371 17 371 18 , SrcSpan "tests/examples/RealGHC.lhs" 371 31 371 32 , SrcSpan "tests/examples/RealGHC.lhs" 371 45 371 46 , SrcSpan "tests/examples/RealGHC.lhs" 371 66 371 67 , SrcSpan "tests/examples/RealGHC.lhs" 372 30 372 31 , SrcSpan "tests/examples/RealGHC.lhs" 372 50 372 51 , SrcSpan "tests/examples/RealGHC.lhs" 373 24 373 25 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 371 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 371 16 , srcInfoPoints = [] } "Rule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 371 27 371 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 26 , srcInfoPoints = [] } "ru_name")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 29 371 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 29 371 31 , srcInfoPoints = [] } "rn")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 371 40 371 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 39 , srcInfoPoints = [] } "ru_act")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 42 371 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 42 371 45 , srcInfoPoints = [] } "act")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 66 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 371 56 371 57 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 55 , srcInfoPoints = [] } "ru_rough")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 58 371 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 58 371 66 , srcInfoPoints = [] } "tpl_tops")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 372 20 372 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 19 , srcInfoPoints = [] } "ru_bndrs")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 22 372 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 22 372 30 , srcInfoPoints = [] } "tpl_vars")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 372 40 372 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 39 , srcInfoPoints = [] } "ru_args")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 42 372 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 42 372 50 , srcInfoPoints = [] } "tpl_args")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 373 18 373 19 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 17 , srcInfoPoints = [] } "ru_rhs")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 20 373 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 20 373 23 , srcInfoPoints = [] } "rhs")) ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 3 380 47 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 3 374 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 374 3 374 4 , SrcSpan "tests/examples/RealGHC.lhs" 374 35 374 36 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 9 374 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 374 9 374 10 , SrcSpan "tests/examples/RealGHC.lhs" 374 23 374 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 , srcInfoPoints = [] } "is_active"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 , srcInfoPoints = [] } "act")))))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 , srcInfoPoints = [] } "Nothing"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 3 375 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 375 3 375 4 , SrcSpan "tests/examples/RealGHC.lhs" 375 39 375 40 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 , srcInfoPoints = [] } "ruleCantMatch"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 , srcInfoPoints = [] } "tpl_tops")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 , srcInfoPoints = [] } "rough_args")))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 , srcInfoPoints = [] } "Nothing"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 3 380 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 376 3 376 4 , SrcSpan "tests/examples/RealGHC.lhs" 377 3 377 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 , srcInfoPoints = [] } "otherwise"))) ] (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 5 380 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 377 5 377 9 , SrcSpan "tests/examples/RealGHC.lhs" 377 49 377 51 , SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 5 , SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 5 , SrcSpan "tests/examples/RealGHC.lhs" 381 3 381 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 16 , srcInfoPoints = [] } "matchN"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 17 377 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 17 377 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 17 377 25 , srcInfoPoints = [] } "in_scope")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 , srcInfoPoints = [] } "tpl_vars")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 , srcInfoPoints = [] } "tpl_args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 , srcInfoPoints = [] } "args")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 34 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 24 378 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 378 24 378 26 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 , srcInfoPoints = [] } "Nothing")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 380 47 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 9 , srcInfoPoints = [] } "Just")) [ PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 10 379 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 379 10 379 11 , SrcSpan "tests/examples/RealGHC.lhs" 379 16 379 17 , SrcSpan "tests/examples/RealGHC.lhs" 379 26 379 27 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 11 379 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 11 379 16 , srcInfoPoints = [] } "binds") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 18 379 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 18 379 26 , srcInfoPoints = [] } "tpl_vals") ] ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 28 380 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 379 28 379 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 31 380 47 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 , srcInfoPoints = [] } "Just"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 36 380 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 379 36 379 37 , SrcSpan "tests/examples/RealGHC.lhs" 380 46 380 47 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 37 380 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 37 379 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 37 379 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 37 379 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 37 379 43 , srcInfoPoints = [] } "mkLets"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 44 379 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 44 379 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 44 379 49 , srcInfoPoints = [] } "binds")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 50 379 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 50 379 51 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 50 379 51 , srcInfoPoints = [] } "$"))) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 21 380 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 21 380 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 21 380 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 21 380 28 , srcInfoPoints = [] } "rule_fn"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 29 380 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 380 29 380 30 , SrcSpan "tests/examples/RealGHC.lhs" 380 30 380 36 , SrcSpan "tests/examples/RealGHC.lhs" 380 36 380 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 29 380 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 380 29 380 30 , SrcSpan "tests/examples/RealGHC.lhs" 380 30 380 36 , SrcSpan "tests/examples/RealGHC.lhs" 380 36 380 37 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 30 380 36 , srcInfoPoints = [] } "mkApps"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 38 380 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 38 380 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 380 38 380 46 , srcInfoPoints = [] } "tpl_vals")))))))) Nothing ]) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 5 , SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 53 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 12 , srcInfoPoints = [] } "rule_fn")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 13 382 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 382 13 382 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 , srcInfoPoints = [] } "occurAnalyseExpr"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 32 382 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 382 32 382 33 , SrcSpan "tests/examples/RealGHC.lhs" 382 52 382 53 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 39 , srcInfoPoints = [] } "mkLams"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 40 382 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 40 382 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 40 382 48 , srcInfoPoints = [] } "tpl_vars")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 49 382 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 49 382 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 49 382 52 , srcInfoPoints = [] } "rhs"))))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 1 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 390 9 390 11 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 7 , srcInfoPoints = [] } "matchN" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 391 5 391 7 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 , srcInfoPoints = [] } "InScopeSet"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 8 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 392 5 392 7 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 8 391 13 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 391 8 391 9 , SrcSpan "tests/examples/RealGHC.lhs" 391 12 391 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 , srcInfoPoints = [] } "Var")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 8 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 393 5 393 7 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 8 392 18 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 392 8 392 9 , SrcSpan "tests/examples/RealGHC.lhs" 392 17 392 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 , srcInfoPoints = [] } "CoreExpr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 8 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 394 5 394 7 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 8 393 18 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 393 8 393 9 , SrcSpan "tests/examples/RealGHC.lhs" 393 17 393 18 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 , srcInfoPoints = [] } "CoreExpr")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 395 22 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 , srcInfoPoints = [] } "Maybe"))) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 14 395 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 394 14 394 15 , SrcSpan "tests/examples/RealGHC.lhs" 394 25 394 26 , SrcSpan "tests/examples/RealGHC.lhs" 395 21 395 22 ] } Boxed [ TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 15 394 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 394 15 394 16 , SrcSpan "tests/examples/RealGHC.lhs" 394 24 394 25 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 , srcInfoPoints = [] } "CoreBind"))) , TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 395 11 395 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 395 11 395 12 , SrcSpan "tests/examples/RealGHC.lhs" 395 20 395 21 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 , srcInfoPoints = [] } "CoreExpr"))) ])))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 423 89 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 402 3 402 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 423 89 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 402 3 402 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 397 7 , srcInfoPoints = [] } "matchN") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 8 397 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 8 397 16 , srcInfoPoints = [] } "in_scope") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 17 397 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 17 397 26 , srcInfoPoints = [] } "tmpl_vars") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 27 397 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 27 397 34 , srcInfoPoints = [] } "tmpl_es") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 35 397 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 35 397 44 , srcInfoPoints = [] } "target_es") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 3 401 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 398 3 398 4 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 5 401 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 398 5 398 7 , SrcSpan "tests/examples/RealGHC.lhs" 398 9 398 10 , SrcSpan "tests/examples/RealGHC.lhs" 400 5 400 6 , SrcSpan "tests/examples/RealGHC.lhs" 401 59 401 60 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 11 399 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 399 9 399 11 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 11 398 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 398 11 398 12 , SrcSpan "tests/examples/RealGHC.lhs" 398 20 398 21 , SrcSpan "tests/examples/RealGHC.lhs" 398 30 398 31 , SrcSpan "tests/examples/RealGHC.lhs" 398 37 398 38 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 12 398 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 12 398 20 , srcInfoPoints = [] } "tv_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 22 398 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 22 398 30 , srcInfoPoints = [] } "id_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 32 398 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 32 398 37 , srcInfoPoints = [] } "binds") ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 24 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 14 , srcInfoPoints = [] } "go"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 15 399 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 15 399 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 15 399 24 , srcInfoPoints = [] } "init_menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 , srcInfoPoints = [] } "emptySubstEnv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 , srcInfoPoints = [] } "tmpl_es")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 , srcInfoPoints = [] } "target_es")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 401 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 401 58 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 14 401 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 400 14 400 15 , SrcSpan "tests/examples/RealGHC.lhs" 400 27 400 28 , SrcSpan "tests/examples/RealGHC.lhs" 401 57 401 58 ] } Boxed [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 , srcInfoPoints = [] } "fromOL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 , srcInfoPoints = [] } "binds"))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 14 , srcInfoPoints = [] } "map"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 15 401 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 401 15 401 16 , SrcSpan "tests/examples/RealGHC.lhs" 401 45 401 46 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 27 , srcInfoPoints = [] } "lookup_tmpl"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 28 401 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 28 401 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 28 401 36 , srcInfoPoints = [] } "tv_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 37 401 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 37 401 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 37 401 45 , srcInfoPoints = [] } "id_subst")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 , srcInfoPoints = [] } "tmpl_vars'"))) ])) ])) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 423 89 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 5 , SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 5 , SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 5 , SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 5 , SrcSpan "tests/examples/RealGHC.lhs" 410 5 410 5 , SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 5 , SrcSpan "tests/examples/RealGHC.lhs" 414 5 414 5 , SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 5 , SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 80 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 6 , SrcSpan "tests/examples/RealGHC.lhs" 403 17 403 18 , SrcSpan "tests/examples/RealGHC.lhs" 403 29 403 30 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 6 403 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 6 403 17 , srcInfoPoints = [] } "init_rn_env") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 19 403 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 19 403 29 , srcInfoPoints = [] } "tmpl_vars'") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 31 403 80 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 403 31 403 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 80 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 42 , srcInfoPoints = [] } "mapAccumL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 43 403 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 43 403 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 43 403 50 , srcInfoPoints = [] } "rnBndrL")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 51 403 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 403 51 403 52 , SrcSpan "tests/examples/RealGHC.lhs" 403 69 403 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 60 , srcInfoPoints = [] } "mkRnEnv2"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 61 403 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 61 403 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 61 403 69 , srcInfoPoints = [] } "in_scope")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 , srcInfoPoints = [] } "tmpl_vars"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 76 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 14 , srcInfoPoints = [] } "init_menv")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 15 406 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 406 15 406 16 ] } (RecConstr SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 406 20 406 21 , SrcSpan "tests/examples/RealGHC.lhs" 406 52 406 53 , SrcSpan "tests/examples/RealGHC.lhs" 406 75 406 76 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 19 , srcInfoPoints = [] } "ME")) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 406 31 406 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 30 , srcInfoPoints = [] } "me_tmpls")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 41 , srcInfoPoints = [] } "mkVarSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 42 406 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 42 406 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 42 406 52 , srcInfoPoints = [] } "tmpl_vars'")))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 74 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 406 61 406 62 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 60 , srcInfoPoints = [] } "me_env")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 , srcInfoPoints = [] } "init_rn_env"))) ])) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 411 46 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 8 408 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 8 408 12 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 13 408 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 13 408 18 , srcInfoPoints = [] } "subst") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 19 408 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 408 19 408 20 , SrcSpan "tests/examples/RealGHC.lhs" 408 20 408 21 ] } [] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 26 408 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 26 408 28 , srcInfoPoints = [] } "es") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 33 408 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 408 33 408 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 45 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 , srcInfoPoints = [] } "subst"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 8 409 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 8 409 12 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 13 409 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 13 409 18 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 19 409 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 19 409 21 , srcInfoPoints = [] } "ts") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 26 409 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 409 26 409 27 , SrcSpan "tests/examples/RealGHC.lhs" 409 27 409 28 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 33 409 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 409 33 409 34 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 , srcInfoPoints = [] } "Nothing")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 5 411 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 5 410 7 , srcInfoPoints = [] } "go") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 8 410 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 8 410 12 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 13 410 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 13 410 18 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 19 410 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 410 19 410 20 , SrcSpan "tests/examples/RealGHC.lhs" 410 24 410 25 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 24 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 21 , srcInfoPoints = [] } "t")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 21 410 22 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 21 410 22 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 22 410 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 22 410 24 , srcInfoPoints = [] } "ts"))) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 26 410 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 410 26 410 27 , SrcSpan "tests/examples/RealGHC.lhs" 410 31 410 32 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 28 , srcInfoPoints = [] } "e")) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 28 410 29 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 28 410 29 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 29 410 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 29 410 31 , srcInfoPoints = [] } "es"))) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 33 411 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 410 33 410 34 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 35 411 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 410 35 410 37 , SrcSpan "tests/examples/RealGHC.lhs" 410 38 410 39 , SrcSpan "tests/examples/RealGHC.lhs" 411 22 411 23 , SrcSpan "tests/examples/RealGHC.lhs" 411 45 411 46 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 410 47 410 49 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 46 , srcInfoPoints = [] } "subst1")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 66 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 55 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 56 410 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 56 410 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 56 410 60 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 61 410 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 61 410 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 61 410 66 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 67 410 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 67 410 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 67 410 68 , srcInfoPoints = [] } "t")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 69 410 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 69 410 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 69 410 70 , srcInfoPoints = [] } "e")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 26 , srcInfoPoints = [] } "go"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 27 411 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 27 411 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 27 411 31 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 32 411 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 32 411 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 32 411 38 , srcInfoPoints = [] } "subst1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 39 411 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 39 411 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 39 411 41 , srcInfoPoints = [] } "ts")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 42 411 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 42 411 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 411 42 411 44 , srcInfoPoints = [] } "es")))) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 413 17 413 19 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 16 , srcInfoPoints = [] } "lookup_tmpl" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 413 31 413 33 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 , srcInfoPoints = [] } "TvSubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 413 45 413 47 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 , srcInfoPoints = [] } "IdSubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 413 52 413 54 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 , srcInfoPoints = [] } "Var"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 , srcInfoPoints = [] } "CoreExpr")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 420 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 420 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 414 16 , srcInfoPoints = [] } "lookup_tmpl") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 17 414 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 17 414 25 , srcInfoPoints = [] } "tv_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 26 414 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 26 414 34 , srcInfoPoints = [] } "id_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 35 414 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 35 414 44 , srcInfoPoints = [] } "tmpl_var'") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 9 420 44 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 9 417 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 415 9 415 10 , SrcSpan "tests/examples/RealGHC.lhs" 415 29 415 30 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 18 , srcInfoPoints = [] } "isTyVar"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 19 415 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 19 415 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 19 415 28 , srcInfoPoints = [] } "tmpl_var'")))) ] (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 31 417 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 415 31 415 35 , SrcSpan "tests/examples/RealGHC.lhs" 415 68 415 70 , SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 17 , SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 17 , SrcSpan "tests/examples/RealGHC.lhs" 418 9 418 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 67 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 48 , srcInfoPoints = [] } "lookupVarEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 49 415 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 49 415 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 49 415 57 , srcInfoPoints = [] } "tv_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 58 415 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 58 415 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 58 415 67 , srcInfoPoints = [] } "tmpl_var'")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 39 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 21 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 22 416 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 22 416 24 , srcInfoPoints = [] } "ty") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 29 416 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 416 29 416 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 32 416 39 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 32 416 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 32 416 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 32 416 36 , srcInfoPoints = [] } "Type"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 37 416 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 37 416 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 416 37 416 39 , srcInfoPoints = [] } "ty"))))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 49 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 24 , srcInfoPoints = [] } "Nothing")) []) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 29 417 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 417 29 417 31 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 32 417 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 32 417 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 32 417 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 32 417 39 , srcInfoPoints = [] } "unbound"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 40 417 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 40 417 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 417 40 417 49 , srcInfoPoints = [] } "tmpl_var'"))))) Nothing ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 9 420 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 418 9 418 10 , SrcSpan "tests/examples/RealGHC.lhs" 418 25 418 26 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 , srcInfoPoints = [] } "otherwise"))) ] (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 27 420 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 418 27 418 31 , SrcSpan "tests/examples/RealGHC.lhs" 418 64 418 66 , SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 17 , SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 17 , SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 44 , srcInfoPoints = [] } "lookupVarEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 45 418 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 45 418 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 45 418 53 , srcInfoPoints = [] } "id_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 54 418 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 54 418 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 418 54 418 63 , srcInfoPoints = [] } "tmpl_var'")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 28 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 21 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 22 419 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 22 419 23 , srcInfoPoints = [] } "e") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 24 419 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 419 24 419 26 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 27 419 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 27 419 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 419 27 419 28 , srcInfoPoints = [] } "e")))) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 22 , srcInfoPoints = [] } "other")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 24 420 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 420 24 420 26 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 27 420 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 27 420 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 27 420 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 27 420 34 , srcInfoPoints = [] } "unbound"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 35 420 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 35 420 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 420 35 420 44 , srcInfoPoints = [] } "tmpl_var'"))))) Nothing ]) ]) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 423 89 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 423 89 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 12 , srcInfoPoints = [] } "unbound") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 13 422 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 13 422 16 , srcInfoPoints = [] } "var") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 17 423 89 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 422 17 422 18 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 19 423 89 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 27 , srcInfoPoints = [] } "pprPanic"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 28 422 71 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 28 422 71 , srcInfoPoints = [] } "Template variable unbound in rewrite rule" "Template variable unbound in rewrite rule"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 13 423 89 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 423 13 423 14 , SrcSpan "tests/examples/RealGHC.lhs" 423 88 423 89 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 88 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 71 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 56 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 17 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 18 423 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 18 423 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 18 423 21 , srcInfoPoints = [] } "var")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 22 423 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 22 423 24 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 22 423 24 , srcInfoPoints = [] } "$$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 25 423 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 25 423 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 25 423 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 25 423 28 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 29 423 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 29 423 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 29 423 38 , srcInfoPoints = [] } "tmpl_vars"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 39 423 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 39 423 41 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 39 423 41 , srcInfoPoints = [] } "$$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 42 423 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 42 423 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 42 423 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 42 423 45 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 46 423 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 46 423 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 46 423 56 , srcInfoPoints = [] } "tmpl_vars'"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 57 423 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 57 423 59 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 57 423 59 , srcInfoPoints = [] } "$$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 60 423 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 60 423 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 60 423 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 60 423 63 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 64 423 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 64 423 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 64 423 71 , srcInfoPoints = [] } "tmpl_es"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 72 423 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 72 423 74 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 72 423 74 , srcInfoPoints = [] } "$$"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 75 423 88 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 75 423 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 75 423 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 75 423 78 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 79 423 88 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 79 423 88 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 423 79 423 88 , srcInfoPoints = [] } "target_es")))))))) Nothing ] ])) ] , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 5 , SrcSpan "tests/examples/RealGHC.lhs" 457 17 457 18 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 6 457 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 6 457 14 , srcInfoPoints = [] } "SubstEnv")) (TyTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 19 457 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 457 19 457 20 , SrcSpan "tests/examples/RealGHC.lhs" 457 30 457 31 , SrcSpan "tests/examples/RealGHC.lhs" 457 42 457 43 , SrcSpan "tests/examples/RealGHC.lhs" 457 60 457 61 ] } Boxed [ TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 , srcInfoPoints = [] } "TvSubstEnv")) , TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 , srcInfoPoints = [] } "IdSubstEnv")) , TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 60 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 , srcInfoPoints = [] } "OrdList"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 , srcInfoPoints = [] } "CoreBind"))) ]) , TypeDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 33 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 5 , SrcSpan "tests/examples/RealGHC.lhs" 458 17 458 18 ] } (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 6 458 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 6 458 16 , srcInfoPoints = [] } "IdSubstEnv")) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 33 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 , srcInfoPoints = [] } "IdEnv"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 , srcInfoPoints = [] } "CoreExpr")))) , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 460 15 460 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 14 , srcInfoPoints = [] } "emptySubstEnv" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 , srcInfoPoints = [] } "SubstEnv"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 50 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 14 , srcInfoPoints = [] } "emptySubstEnv")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 15 461 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 461 15 461 16 ] } (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 17 461 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 461 17 461 18 , SrcSpan "tests/examples/RealGHC.lhs" 461 29 461 30 , SrcSpan "tests/examples/RealGHC.lhs" 461 42 461 43 , SrcSpan "tests/examples/RealGHC.lhs" 461 49 461 50 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 , srcInfoPoints = [] } "emptyVarEnv")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 , srcInfoPoints = [] } "emptyVarEnv")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 , srcInfoPoints = [] } "nilOL")) ])) Nothing , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 1 477 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 473 7 473 9 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 1 473 6 , srcInfoPoints = [] } "match" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 477 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 474 7 474 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 , srcInfoPoints = [] } "MatchEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 477 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 475 7 475 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 , srcInfoPoints = [] } "SubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 477 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 476 7 476 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 , srcInfoPoints = [] } "CoreExpr"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 477 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 477 7 477 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 , srcInfoPoints = [] } "CoreExpr"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 , srcInfoPoints = [] } "SubstEnv")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 671 21 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 497 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 495 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 7 495 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 7 495 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 12 495 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 12 495 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 18 495 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 495 18 495 19 , SrcSpan "tests/examples/RealGHC.lhs" 495 25 495 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 22 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 23 495 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 23 495 25 , srcInfoPoints = [] } "v1") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 27 495 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 27 495 29 , srcInfoPoints = [] } "e2") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 3 497 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 496 3 496 4 , SrcSpan "tests/examples/RealGHC.lhs" 497 3 497 4 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 3 497 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 496 3 496 4 , SrcSpan "tests/examples/RealGHC.lhs" 497 3 497 4 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 496 16 496 18 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 9 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 10 496 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 10 496 15 , srcInfoPoints = [] } "subst") ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 45 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 28 , srcInfoPoints = [] } "match_var"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 29 496 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 29 496 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 29 496 33 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 , srcInfoPoints = [] } "v1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 , srcInfoPoints = [] } "e2")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 15 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 , srcInfoPoints = [] } "subst")))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 1 500 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 1 499 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 7 499 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 7 499 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 12 499 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 12 499 17 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 18 499 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 18 499 20 , srcInfoPoints = [] } "e1") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 21 499 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 499 21 499 22 , SrcSpan "tests/examples/RealGHC.lhs" 499 31 499 32 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 26 , srcInfoPoints = [] } "Note")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 27 499 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 27 499 28 , srcInfoPoints = [] } "n") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 29 499 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 29 499 31 , srcInfoPoints = [] } "e2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 3 500 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 500 3 500 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 , srcInfoPoints = [] } "e1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 , srcInfoPoints = [] } "e2"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 1 518 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 516 3 516 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 1 513 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 7 513 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 7 513 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 12 513 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 12 513 17 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 18 513 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 18 513 20 , srcInfoPoints = [] } "e1") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 21 513 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 513 21 513 22 , SrcSpan "tests/examples/RealGHC.lhs" 513 28 513 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 25 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 26 513 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 26 513 28 , srcInfoPoints = [] } "v2") ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 3 515 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 514 3 514 4 , SrcSpan "tests/examples/RealGHC.lhs" 515 3 515 4 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 3 515 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 514 3 514 4 , SrcSpan "tests/examples/RealGHC.lhs" 515 3 515 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 31 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 , srcInfoPoints = [] } "isCheapUnfolding"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 , srcInfoPoints = [] } "unfolding")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 21 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 15 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 , srcInfoPoints = [] } "e1")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 25 515 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 515 25 515 26 , SrcSpan "tests/examples/RealGHC.lhs" 515 53 515 54 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 53 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 , srcInfoPoints = [] } "unfoldingTemplate"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 , srcInfoPoints = [] } "unfolding")))))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 518 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 5 , SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 5 , SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 28 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 11 , srcInfoPoints = [] } "rn_env")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 15 517 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 517 15 517 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 , srcInfoPoints = [] } "menv"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 72 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 14 , srcInfoPoints = [] } "unfolding")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 15 518 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 518 15 518 16 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 , srcInfoPoints = [] } "idUnfolding"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 29 518 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 518 29 518 30 , SrcSpan "tests/examples/RealGHC.lhs" 518 71 518 72 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 52 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 45 , srcInfoPoints = [] } "lookupRnInScope"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 46 518 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 46 518 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 46 518 52 , srcInfoPoints = [] } "rn_env")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 53 518 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 518 53 518 54 , SrcSpan "tests/examples/RealGHC.lhs" 518 70 518 71 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 60 , srcInfoPoints = [] } "rnOccR"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 61 518 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 61 518 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 61 518 67 , srcInfoPoints = [] } "rn_env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 68 518 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 68 518 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 68 518 70 , srcInfoPoints = [] } "v2"))))))))) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 1 585 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 577 3 577 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 7 571 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 7 571 11 , srcInfoPoints = [] } "menv") , PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 12 571 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 571 17 571 18 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 12 571 17 , srcInfoPoints = [] } "subst") (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 18 571 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 571 18 571 19 , SrcSpan "tests/examples/RealGHC.lhs" 571 27 571 28 , SrcSpan "tests/examples/RealGHC.lhs" 571 37 571 38 , SrcSpan "tests/examples/RealGHC.lhs" 571 44 571 45 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 19 571 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 19 571 27 , srcInfoPoints = [] } "tv_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 29 571 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 29 571 37 , srcInfoPoints = [] } "id_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 39 571 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 39 571 44 , srcInfoPoints = [] } "binds") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 46 571 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 46 571 48 , srcInfoPoints = [] } "e1") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 49 571 62 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 571 49 571 50 , SrcSpan "tests/examples/RealGHC.lhs" 571 61 571 62 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 53 , srcInfoPoints = [] } "Let")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 54 571 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 54 571 58 , srcInfoPoints = [] } "bind") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 59 571 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 59 571 61 , srcInfoPoints = [] } "e2") ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 3 576 13 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 572 3 572 4 , SrcSpan "tests/examples/RealGHC.lhs" 572 28 572 29 , SrcSpan "tests/examples/RealGHC.lhs" 574 3 574 4 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 3 576 13 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 572 3 572 4 , SrcSpan "tests/examples/RealGHC.lhs" 572 28 572 29 , SrcSpan "tests/examples/RealGHC.lhs" 574 3 574 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 , srcInfoPoints = [] } "all"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 , srcInfoPoints = [] } "freshly_bound")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 , srcInfoPoints = [] } "bndrs")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 9 573 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 573 9 573 10 , SrcSpan "tests/examples/RealGHC.lhs" 573 36 573 37 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 13 , srcInfoPoints = [] } "any"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 14 573 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 14 573 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 14 573 27 , srcInfoPoints = [] } "locally_bound")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 , srcInfoPoints = [] } "bind_fvs")))))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 576 13 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 576 9 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 575 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 , srcInfoPoints = [] } "match"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 11 574 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 574 11 574 12 , SrcSpan "tests/examples/RealGHC.lhs" 574 37 574 38 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 574 17 574 18 , SrcSpan "tests/examples/RealGHC.lhs" 574 36 574 37 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 16 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 19 574 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 574 26 574 27 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 19 574 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 19 574 25 , srcInfoPoints = [] } "me_env")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 28 574 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 28 574 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 28 574 35 , srcInfoPoints = [] } "rn_env'"))) ]))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 7 575 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 575 7 575 8 , SrcSpan "tests/examples/RealGHC.lhs" 575 16 575 17 , SrcSpan "tests/examples/RealGHC.lhs" 575 26 575 27 , SrcSpan "tests/examples/RealGHC.lhs" 575 48 575 49 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 , srcInfoPoints = [] } "tv_subst")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 , srcInfoPoints = [] } "id_subst")) , InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 33 , srcInfoPoints = [] } "binds"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 35 , SrcSpan "tests/examples/RealGHC.lhs" 575 35 575 41 , SrcSpan "tests/examples/RealGHC.lhs" 575 41 575 42 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 35 , SrcSpan "tests/examples/RealGHC.lhs" 575 35 575 41 , SrcSpan "tests/examples/RealGHC.lhs" 575 41 575 42 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 35 575 41 , srcInfoPoints = [] } "snocOL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 43 575 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 43 575 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 43 575 48 , srcInfoPoints = [] } "bind'"))) ])) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 , srcInfoPoints = [] } "e1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 , srcInfoPoints = [] } "e2'")))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 585 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 5 , SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 5 , SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 5 , SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 5 , SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 5 , SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 5 , SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 5 , SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 5 , SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 27 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 11 , srcInfoPoints = [] } "rn_env")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 14 578 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 578 14 578 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 , srcInfoPoints = [] } "menv"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 31 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 10 , srcInfoPoints = [] } "bndrs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 14 579 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 579 14 579 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 , srcInfoPoints = [] } "bindersOf"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 , srcInfoPoints = [] } "bind"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 47 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 13 , srcInfoPoints = [] } "bind_fvs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 14 580 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 580 14 580 15 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 , srcInfoPoints = [] } "varSetElems"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 28 580 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 580 28 580 29 , SrcSpan "tests/examples/RealGHC.lhs" 580 46 580 47 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 41 , srcInfoPoints = [] } "bindFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 42 580 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 42 580 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 42 580 46 , srcInfoPoints = [] } "bind"))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 42 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 18 , srcInfoPoints = [] } "locally_bound") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 19 581 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 19 581 20 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 23 581 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 581 23 581 24 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 33 , srcInfoPoints = [] } "inRnEnvR"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 34 581 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 34 581 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 34 581 40 , srcInfoPoints = [] } "rn_env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 , srcInfoPoints = [] } "x"))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 49 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 18 , srcInfoPoints = [] } "freshly_bound") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 19 582 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 19 582 20 , srcInfoPoints = [] } "x") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 21 582 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 582 21 582 22 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 27 582 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 582 27 582 28 , SrcSpan "tests/examples/RealGHC.lhs" 582 48 582 49 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 29 , srcInfoPoints = [] } "x"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 30 582 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 582 30 582 31 , SrcSpan "tests/examples/RealGHC.lhs" 582 31 582 40 , SrcSpan "tests/examples/RealGHC.lhs" 582 40 582 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 30 582 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 582 30 582 31 , SrcSpan "tests/examples/RealGHC.lhs" 582 31 582 40 , SrcSpan "tests/examples/RealGHC.lhs" 582 40 582 41 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 31 582 40 , srcInfoPoints = [] } "rnInScope"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 42 582 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 42 582 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 42 582 48 , srcInfoPoints = [] } "rn_env"))))))) Nothing ] , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 17 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 10 , srcInfoPoints = [] } "bind'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 11 583 17 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 583 11 583 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 , srcInfoPoints = [] } "bind")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 15 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 8 , srcInfoPoints = [] } "e2'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 11 584 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 584 11 584 12 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 , srcInfoPoints = [] } "e2")))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 47 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 12 , srcInfoPoints = [] } "rn_env'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 13 585 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 585 13 585 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 47 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 41 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 , srcInfoPoints = [] } "extendRnInScopeList"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 , srcInfoPoints = [] } "rn_env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 , srcInfoPoints = [] } "bndrs"))))) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 1 599 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 7 597 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 7 597 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 12 597 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 12 597 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 18 597 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 597 18 597 19 , SrcSpan "tests/examples/RealGHC.lhs" 597 27 597 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 22 , srcInfoPoints = [] } "Lit")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 23 597 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 23 597 27 , srcInfoPoints = [] } "lit1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 29 597 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 597 29 597 30 , SrcSpan "tests/examples/RealGHC.lhs" 597 38 597 39 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 33 , srcInfoPoints = [] } "Lit")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 34 597 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 34 597 38 , srcInfoPoints = [] } "lit2") ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 3 599 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 598 3 598 4 , SrcSpan "tests/examples/RealGHC.lhs" 599 3 599 4 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 3 599 15 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 598 3 598 4 , SrcSpan "tests/examples/RealGHC.lhs" 599 3 599 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 17 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 , srcInfoPoints = [] } "lit1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 , srcInfoPoints = [] } "lit2")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 15 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 , srcInfoPoints = [] } "subst")))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 1 603 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 1 601 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 7 601 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 7 601 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 12 601 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 12 601 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 18 601 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 601 18 601 19 , SrcSpan "tests/examples/RealGHC.lhs" 601 28 601 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 22 , srcInfoPoints = [] } "App")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 23 601 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 23 601 25 , srcInfoPoints = [] } "f1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 26 601 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 26 601 28 , srcInfoPoints = [] } "a1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 30 601 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 601 30 601 31 , SrcSpan "tests/examples/RealGHC.lhs" 601 40 601 41 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 34 , srcInfoPoints = [] } "App")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 35 601 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 35 601 37 , srcInfoPoints = [] } "f2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 38 601 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 38 601 40 , srcInfoPoints = [] } "a2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 3 603 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 602 3 602 4 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 5 603 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 602 5 602 7 , SrcSpan "tests/examples/RealGHC.lhs" 602 9 602 10 , SrcSpan "tests/examples/RealGHC.lhs" 603 5 603 6 , SrcSpan "tests/examples/RealGHC.lhs" 603 31 603 32 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 602 18 602 20 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 17 , srcInfoPoints = [] } "subst'")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 43 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 26 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 27 602 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 27 602 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 27 602 31 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 , srcInfoPoints = [] } "f1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 , srcInfoPoints = [] } "f2")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 13 603 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 13 603 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 13 603 17 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 , srcInfoPoints = [] } "subst'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 , srcInfoPoints = [] } "a1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 , srcInfoPoints = [] } "a2")))) ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 1 608 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 607 3 607 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 1 605 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 7 605 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 7 605 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 12 605 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 12 605 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 18 605 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 605 18 605 19 , SrcSpan "tests/examples/RealGHC.lhs" 605 28 605 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 22 , srcInfoPoints = [] } "Lam")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 23 605 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 23 605 25 , srcInfoPoints = [] } "x1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 26 605 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 26 605 28 , srcInfoPoints = [] } "e1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 30 605 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 605 30 605 31 , SrcSpan "tests/examples/RealGHC.lhs" 605 40 605 41 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 34 , srcInfoPoints = [] } "Lam")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 35 605 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 35 605 37 , srcInfoPoints = [] } "x2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 38 605 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 38 605 40 , srcInfoPoints = [] } "e2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 3 606 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 606 3 606 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 , srcInfoPoints = [] } "menv'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 , srcInfoPoints = [] } "e1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 , srcInfoPoints = [] } "e2"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 5 , SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 58 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 10 , srcInfoPoints = [] } "menv'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 11 608 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 608 11 608 12 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 58 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 608 18 608 19 , SrcSpan "tests/examples/RealGHC.lhs" 608 57 608 58 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 608 27 608 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 26 , srcInfoPoints = [] } "me_env")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 36 , srcInfoPoints = [] } "rnBndr2"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 37 608 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 608 37 608 38 , SrcSpan "tests/examples/RealGHC.lhs" 608 49 608 50 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 38 608 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 38 608 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 38 608 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 38 608 44 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 45 608 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 45 608 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 45 608 49 , srcInfoPoints = [] } "menv")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 51 608 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 51 608 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 51 608 53 , srcInfoPoints = [] } "x1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 54 608 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 54 608 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 54 608 56 , srcInfoPoints = [] } "x2")))) ])) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 1 619 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 617 3 617 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 7 615 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 7 615 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 12 615 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 12 615 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 18 615 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 615 18 615 19 , SrcSpan "tests/examples/RealGHC.lhs" 615 28 615 29 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 22 , srcInfoPoints = [] } "Lam")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 23 615 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 23 615 25 , srcInfoPoints = [] } "x1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 26 615 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 26 615 28 , srcInfoPoints = [] } "e1") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 30 615 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 30 615 32 , srcInfoPoints = [] } "e2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 3 616 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 616 3 616 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 25 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 , srcInfoPoints = [] } "menv'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 , srcInfoPoints = [] } "e1")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 26 616 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 616 26 616 27 , SrcSpan "tests/examples/RealGHC.lhs" 616 55 616 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 33 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 , srcInfoPoints = [] } "App"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 , srcInfoPoints = [] } "e2")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 34 616 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 616 34 616 35 , SrcSpan "tests/examples/RealGHC.lhs" 616 54 616 55 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 , srcInfoPoints = [] } "varToCoreExpr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 , srcInfoPoints = [] } "new_x"))))))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 619 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 5 , SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 5 , SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 48 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 6 , SrcSpan "tests/examples/RealGHC.lhs" 618 13 618 14 , SrcSpan "tests/examples/RealGHC.lhs" 618 20 618 21 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 6 618 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 6 618 13 , srcInfoPoints = [] } "rn_env'") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 15 618 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 15 618 20 , srcInfoPoints = [] } "new_x") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 22 618 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 618 22 618 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 , srcInfoPoints = [] } "rnBndrL"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 32 618 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 618 32 618 33 , SrcSpan "tests/examples/RealGHC.lhs" 618 44 618 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 39 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 40 618 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 40 618 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 40 618 44 , srcInfoPoints = [] } "menv")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 , srcInfoPoints = [] } "x1"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 10 , srcInfoPoints = [] } "menv'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 11 619 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 619 11 619 12 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 619 18 619 19 , SrcSpan "tests/examples/RealGHC.lhs" 619 37 619 38 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 619 27 619 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 26 , srcInfoPoints = [] } "me_env")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 , srcInfoPoints = [] } "rn_env'"))) ])) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 1 627 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 625 3 625 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 7 623 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 7 623 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 12 623 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 12 623 17 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 18 623 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 18 623 20 , srcInfoPoints = [] } "e1") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 21 623 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 623 21 623 22 , SrcSpan "tests/examples/RealGHC.lhs" 623 31 623 32 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 25 , srcInfoPoints = [] } "Lam")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 26 623 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 26 623 28 , srcInfoPoints = [] } "x2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 29 623 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 29 623 31 , srcInfoPoints = [] } "e2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 3 624 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 624 3 624 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 53 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 22 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 , srcInfoPoints = [] } "menv'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 , srcInfoPoints = [] } "subst")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 23 624 53 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 624 23 624 24 , SrcSpan "tests/examples/RealGHC.lhs" 624 52 624 53 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 30 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 , srcInfoPoints = [] } "App"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 , srcInfoPoints = [] } "e1")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 31 624 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 624 31 624 32 , SrcSpan "tests/examples/RealGHC.lhs" 624 51 624 52 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 , srcInfoPoints = [] } "varToCoreExpr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 , srcInfoPoints = [] } "new_x")))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 , srcInfoPoints = [] } "e2"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 627 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 5 , SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 5 , SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 48 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 6 , SrcSpan "tests/examples/RealGHC.lhs" 626 13 626 14 , SrcSpan "tests/examples/RealGHC.lhs" 626 20 626 21 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 6 626 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 6 626 13 , srcInfoPoints = [] } "rn_env'") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 15 626 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 15 626 20 , srcInfoPoints = [] } "new_x") ]) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 22 626 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 626 22 626 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 , srcInfoPoints = [] } "rnBndrR"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 32 626 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 626 32 626 33 , SrcSpan "tests/examples/RealGHC.lhs" 626 44 626 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 39 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 40 626 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 40 626 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 40 626 44 , srcInfoPoints = [] } "menv")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 , srcInfoPoints = [] } "x2"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 38 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 10 , srcInfoPoints = [] } "menv'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 11 627 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 627 11 627 12 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 627 18 627 19 , SrcSpan "tests/examples/RealGHC.lhs" 627 37 627 38 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 627 27 627 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 26 , srcInfoPoints = [] } "me_env")) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 , srcInfoPoints = [] } "rn_env'"))) ])) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 1 634 6 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 7 629 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 7 629 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 12 629 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 12 629 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 18 629 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 629 18 629 19 , SrcSpan "tests/examples/RealGHC.lhs" 629 39 629 40 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 23 , srcInfoPoints = [] } "Case")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 24 629 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 24 629 26 , srcInfoPoints = [] } "e1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 27 629 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 27 629 29 , srcInfoPoints = [] } "x1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 30 629 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 30 629 33 , srcInfoPoints = [] } "ty1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 34 629 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 34 629 39 , srcInfoPoints = [] } "alts1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 41 629 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 629 41 629 42 , SrcSpan "tests/examples/RealGHC.lhs" 629 62 629 63 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 46 , srcInfoPoints = [] } "Case")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 47 629 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 47 629 49 , srcInfoPoints = [] } "e2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 50 629 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 50 629 52 , srcInfoPoints = [] } "x2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 53 629 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 53 629 56 , srcInfoPoints = [] } "ty2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 57 629 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 57 629 62 , srcInfoPoints = [] } "alts2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 3 634 6 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 630 3 630 4 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 5 634 6 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 630 5 630 7 , SrcSpan "tests/examples/RealGHC.lhs" 630 9 630 10 , SrcSpan "tests/examples/RealGHC.lhs" 631 5 631 6 , SrcSpan "tests/examples/RealGHC.lhs" 632 5 632 6 , SrcSpan "tests/examples/RealGHC.lhs" 633 5 633 6 , SrcSpan "tests/examples/RealGHC.lhs" 634 5 634 6 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 630 18 630 20 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 17 , srcInfoPoints = [] } "subst1")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 29 , srcInfoPoints = [] } "match_ty"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 30 630 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 30 630 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 30 630 34 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 , srcInfoPoints = [] } "ty1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 , srcInfoPoints = [] } "ty2")))) , Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 631 14 631 16 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 13 , srcInfoPoints = [] } "subst2")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 37 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 22 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 23 631 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 23 631 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 23 631 27 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 , srcInfoPoints = [] } "subst1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 , srcInfoPoints = [] } "e1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 , srcInfoPoints = [] } "e2")))) , LetStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 7 632 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 7 632 10 ] } (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 11 , SrcSpan "tests/examples/RealGHC.lhs" 633 5 633 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 64 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 16 , srcInfoPoints = [] } "menv'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 17 632 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 17 632 18 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 24 632 25 , SrcSpan "tests/examples/RealGHC.lhs" 632 63 632 64 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 23 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 26 632 62 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 33 632 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 26 632 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 26 632 32 , srcInfoPoints = [] } "me_env")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 56 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 42 , srcInfoPoints = [] } "rnBndr2"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 43 632 56 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 632 43 632 44 , SrcSpan "tests/examples/RealGHC.lhs" 632 55 632 56 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 44 632 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 44 632 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 44 632 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 44 632 50 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 51 632 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 51 632 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 51 632 55 , srcInfoPoints = [] } "menv")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 57 632 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 57 632 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 57 632 59 , srcInfoPoints = [] } "x1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 60 632 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 60 632 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 60 632 62 , srcInfoPoints = [] } "x2")))) ])) Nothing ]) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 36 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 , srcInfoPoints = [] } "match_alts"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 18 633 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 18 633 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 18 633 23 , srcInfoPoints = [] } "menv'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 , srcInfoPoints = [] } "subst2")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 , srcInfoPoints = [] } "alts1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 , srcInfoPoints = [] } "alts2")))) ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 1 637 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 1 636 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 7 636 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 7 636 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 12 636 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 12 636 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 18 636 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 636 18 636 19 , SrcSpan "tests/examples/RealGHC.lhs" 636 27 636 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 23 , srcInfoPoints = [] } "Type")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 24 636 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 24 636 27 , srcInfoPoints = [] } "ty1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 29 636 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 636 29 636 30 , SrcSpan "tests/examples/RealGHC.lhs" 636 38 636 39 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 34 , srcInfoPoints = [] } "Type")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 35 636 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 35 636 38 , srcInfoPoints = [] } "ty2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 3 637 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 637 3 637 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 32 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 28 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 18 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 , srcInfoPoints = [] } "match_ty"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 , srcInfoPoints = [] } "ty1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 , srcInfoPoints = [] } "ty2"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 1 641 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 1 639 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 7 639 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 7 639 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 12 639 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 12 639 17 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 18 639 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 639 18 639 19 , SrcSpan "tests/examples/RealGHC.lhs" 639 30 639 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 23 , srcInfoPoints = [] } "Cast")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 24 639 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 24 639 26 , srcInfoPoints = [] } "e1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 27 639 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 27 639 30 , srcInfoPoints = [] } "co1") ]) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 32 639 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 639 32 639 33 , SrcSpan "tests/examples/RealGHC.lhs" 639 44 639 45 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 37 , srcInfoPoints = [] } "Cast")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 38 639 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 38 639 40 , srcInfoPoints = [] } "e2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 41 639 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 41 639 44 , srcInfoPoints = [] } "co2") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 3 641 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 640 3 640 4 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 5 641 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 640 5 640 7 , SrcSpan "tests/examples/RealGHC.lhs" 640 9 640 10 , SrcSpan "tests/examples/RealGHC.lhs" 641 5 641 6 , SrcSpan "tests/examples/RealGHC.lhs" 641 31 641 32 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 640 18 640 20 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 17 , srcInfoPoints = [] } "subst1")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 29 , srcInfoPoints = [] } "match_ty"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 30 640 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 30 640 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 30 640 34 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 , srcInfoPoints = [] } "co1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 , srcInfoPoints = [] } "co2")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 27 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 24 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 13 641 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 13 641 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 13 641 17 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 , srcInfoPoints = [] } "subst1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 , srcInfoPoints = [] } "e1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 , srcInfoPoints = [] } "e2")))) ])) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 1 671 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 1 670 6 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 7 670 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 7 670 11 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 12 670 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 12 670 17 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 18 670 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 18 670 20 , srcInfoPoints = [] } "e1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 21 670 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 21 670 23 , srcInfoPoints = [] } "e2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 24 671 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 670 24 670 25 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 , srcInfoPoints = [] } "Nothing")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 1 678 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 674 11 674 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 1 674 10 , srcInfoPoints = [] } "match_var" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 678 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 675 11 675 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 , srcInfoPoints = [] } "MatchEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 678 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 676 11 676 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 , srcInfoPoints = [] } "SubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 678 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 677 11 677 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 , srcInfoPoints = [] } "Var"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 678 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 678 11 678 13 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 , srcInfoPoints = [] } "CoreExpr"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 28 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 , srcInfoPoints = [] } "SubstEnv")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 715 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 715 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 679 10 , srcInfoPoints = [] } "match_var") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 11 679 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 11 679 15 , srcInfoPoints = [] } "menv") , PAsPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 16 679 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 679 21 679 22 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 16 679 21 , srcInfoPoints = [] } "subst") (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 22 679 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 679 22 679 23 , SrcSpan "tests/examples/RealGHC.lhs" 679 31 679 32 , SrcSpan "tests/examples/RealGHC.lhs" 679 41 679 42 , SrcSpan "tests/examples/RealGHC.lhs" 679 48 679 49 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 23 679 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 23 679 31 , srcInfoPoints = [] } "tv_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 33 679 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 33 679 41 , srcInfoPoints = [] } "id_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 43 679 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 43 679 48 , srcInfoPoints = [] } "binds") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 50 679 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 50 679 52 , srcInfoPoints = [] } "v1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 53 679 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 53 679 55 , srcInfoPoints = [] } "e2") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 3 711 39 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 3 706 20 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 680 3 680 4 , SrcSpan "tests/examples/RealGHC.lhs" 681 3 681 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 35 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 , srcInfoPoints = [] } "v1'"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 10 , SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 , SrcSpan "tests/examples/RealGHC.lhs" 680 20 680 21 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 21 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 10 , SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 , SrcSpan "tests/examples/RealGHC.lhs" 680 20 680 21 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 , srcInfoPoints = [] } "elemVarSet"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 , srcInfoPoints = [] } "me_tmpls"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 , srcInfoPoints = [] } "menv"))))) ] (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 5 706 20 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 681 5 681 9 , SrcSpan "tests/examples/RealGHC.lhs" 681 36 681 38 , SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 5 , SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 5 , SrcSpan "tests/examples/RealGHC.lhs" 708 3 708 0 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 , srcInfoPoints = [] } "lookupVarEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 , srcInfoPoints = [] } "id_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 , srcInfoPoints = [] } "v1'")))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 700 72 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 , srcInfoPoints = [] } "Nothing")) []) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 13 700 72 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 13 683 19 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 682 13 682 14 , SrcSpan "tests/examples/RealGHC.lhs" 683 9 683 11 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 18 , srcInfoPoints = [] } "any"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 19 682 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 682 19 682 20 , SrcSpan "tests/examples/RealGHC.lhs" 682 35 682 36 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 20 682 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 20 682 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 20 682 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 20 682 28 , srcInfoPoints = [] } "inRnEnvR"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 29 682 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 29 682 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 29 682 35 , srcInfoPoints = [] } "rn_env")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 37 682 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 682 37 682 38 , SrcSpan "tests/examples/RealGHC.lhs" 682 67 682 68 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 38 682 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 38 682 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 38 682 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 38 682 49 , srcInfoPoints = [] } "varSetElems"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 50 682 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 682 50 682 51 , SrcSpan "tests/examples/RealGHC.lhs" 682 66 682 67 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 51 682 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 51 682 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 51 682 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 51 682 63 , srcInfoPoints = [] } "exprFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 64 682 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 64 682 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 64 682 66 , srcInfoPoints = [] } "e2")))))))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 , srcInfoPoints = [] } "Nothing"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 686 9 700 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 686 9 686 10 , SrcSpan "tests/examples/RealGHC.lhs" 698 9 698 11 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 12 700 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 698 12 698 14 , SrcSpan "tests/examples/RealGHC.lhs" 698 17 698 18 , SrcSpan "tests/examples/RealGHC.lhs" 700 13 700 14 , SrcSpan "tests/examples/RealGHC.lhs" 700 71 700 72 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 19 698 91 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 698 29 698 31 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 19 698 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 19 698 28 , srcInfoPoints = [] } "tv_subst'")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 91 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 77 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 50 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 50 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 50 , srcInfoPoints = [] } "Unify") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 32 698 50 , srcInfoPoints = [] } "ruleMatchTyX"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 51 698 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 51 698 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 51 698 55 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 56 698 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 56 698 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 56 698 64 , srcInfoPoints = [] } "tv_subst")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 65 698 77 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 698 65 698 66 , SrcSpan "tests/examples/RealGHC.lhs" 698 76 698 77 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 66 698 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 66 698 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 66 698 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 66 698 72 , srcInfoPoints = [] } "idType"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 73 698 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 73 698 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 73 698 76 , srcInfoPoints = [] } "v1'")))))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 78 698 91 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 698 78 698 79 , SrcSpan "tests/examples/RealGHC.lhs" 698 90 698 91 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 79 698 90 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 79 698 87 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 79 698 87 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 79 698 87 , srcInfoPoints = [] } "exprType"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 88 698 90 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 88 698 90 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 698 88 698 90 , srcInfoPoints = [] } "e2")))))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 21 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 22 700 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 700 22 700 23 , SrcSpan "tests/examples/RealGHC.lhs" 700 32 700 33 , SrcSpan "tests/examples/RealGHC.lhs" 700 62 700 63 , SrcSpan "tests/examples/RealGHC.lhs" 700 69 700 70 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 23 700 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 23 700 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 23 700 32 , srcInfoPoints = [] } "tv_subst'")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 62 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 34 700 46 , srcInfoPoints = [] } "extendVarEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 47 700 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 47 700 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 47 700 55 , srcInfoPoints = [] } "id_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 56 700 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 56 700 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 56 700 59 , srcInfoPoints = [] } "v1'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 60 700 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 60 700 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 60 700 62 , srcInfoPoints = [] } "e2"))) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 64 700 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 64 700 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 700 64 700 69 , srcInfoPoints = [] } "binds")) ])) ]) ]) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 706 20 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 9 , srcInfoPoints = [] } "Just")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 10 702 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 10 702 13 , srcInfoPoints = [] } "e1'") ]) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 14 706 20 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 14 703 23 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 702 14 702 15 , SrcSpan "tests/examples/RealGHC.lhs" 703 10 703 12 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 25 , srcInfoPoints = [] } "tcEqExprX"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 26 702 45 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 702 26 702 27 , SrcSpan "tests/examples/RealGHC.lhs" 702 44 702 45 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 27 702 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 27 702 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 27 702 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 27 702 37 , srcInfoPoints = [] } "nukeRnEnvL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 38 702 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 38 702 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 38 702 44 , srcInfoPoints = [] } "rn_env")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 46 702 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 46 702 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 46 702 49 , srcInfoPoints = [] } "e1'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 50 702 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 50 702 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 50 702 52 , srcInfoPoints = [] } "e2")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 23 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 17 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 18 703 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 18 703 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 703 18 703 23 , srcInfoPoints = [] } "subst")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 705 10 706 20 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 705 10 705 11 , SrcSpan "tests/examples/RealGHC.lhs" 706 10 706 12 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 , srcInfoPoints = [] } "otherwise"))) ] (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 , srcInfoPoints = [] } "Nothing"))) ]) Nothing ]) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 3 711 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 708 3 708 4 , SrcSpan "tests/examples/RealGHC.lhs" 709 3 709 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 , srcInfoPoints = [] } "otherwise"))) ] (Case SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 5 711 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 709 5 709 9 , SrcSpan "tests/examples/RealGHC.lhs" 709 13 709 15 , SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 8 , SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 8 , SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 0 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 , srcInfoPoints = [] } "e2"))) [ Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 54 , srcInfoPoints = [] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 11 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 12 710 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 12 710 14 , srcInfoPoints = [] } "v2") ]) (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 16 , SrcSpan "tests/examples/RealGHC.lhs" 710 41 710 43 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 16 , SrcSpan "tests/examples/RealGHC.lhs" 710 41 710 43 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 40 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 40 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 20 , srcInfoPoints = [] } "v1'"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 21 710 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 21 710 23 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 21 710 23 , srcInfoPoints = [] } "=="))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 24 710 40 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 24 710 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 24 710 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 24 710 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 24 710 30 , srcInfoPoints = [] } "rnOccR"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 31 710 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 31 710 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 31 710 37 , srcInfoPoints = [] } "rn_env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 38 710 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 38 710 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 38 710 40 , srcInfoPoints = [] } "v2"))))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 48 , srcInfoPoints = [] } "Just"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 49 710 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 49 710 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 49 710 54 , srcInfoPoints = [] } "subst")))) ]) Nothing , Alt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 13 , srcInfoPoints = [] } "other")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 29 711 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 711 29 711 31 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 , srcInfoPoints = [] } "Nothing")))) Nothing ]) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 715 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 5 , SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 5 , SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 11 , srcInfoPoints = [] } "rn_env")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 12 714 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 714 12 714 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 , srcInfoPoints = [] } "menv"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 30 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 8 , srcInfoPoints = [] } "v1'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 12 715 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 715 12 715 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 , srcInfoPoints = [] } "rnOccL"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 , srcInfoPoints = [] } "rn_env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 , srcInfoPoints = [] } "v1"))))) Nothing ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 1 727 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 723 12 723 14 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 11 , srcInfoPoints = [] } "match_alts" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 727 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 724 7 724 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 , srcInfoPoints = [] } "MatchEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 727 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 725 7 725 9 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 , srcInfoPoints = [] } "SubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 10 727 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 726 7 726 9 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 10 725 19 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 725 10 725 11 , SrcSpan "tests/examples/RealGHC.lhs" 725 18 725 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 , srcInfoPoints = [] } "CoreAlt")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 10 727 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 727 7 727 9 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 10 726 19 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 726 10 726 11 , SrcSpan "tests/examples/RealGHC.lhs" 726 18 726 19 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 , srcInfoPoints = [] } "CoreAlt")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 24 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 , srcInfoPoints = [] } "SubstEnv")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 739 12 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 729 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 728 11 , srcInfoPoints = [] } "match_alts") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 12 728 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 12 728 16 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 17 728 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 17 728 22 , srcInfoPoints = [] } "subst") , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 23 728 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 728 23 728 24 , SrcSpan "tests/examples/RealGHC.lhs" 728 24 728 25 ] } [] , PList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 26 728 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 728 26 728 27 , SrcSpan "tests/examples/RealGHC.lhs" 728 27 728 28 ] } [] ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 3 729 17 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 729 3 729 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 17 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 , srcInfoPoints = [] } "subst"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 1 736 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 734 3 734 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 1 730 11 , srcInfoPoints = [] } "match_alts") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 12 730 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 12 730 16 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 17 730 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 17 730 22 , srcInfoPoints = [] } "subst") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 23 730 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 730 23 730 24 , SrcSpan "tests/examples/RealGHC.lhs" 730 41 730 42 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 41 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 25 , SrcSpan "tests/examples/RealGHC.lhs" 730 27 730 28 , SrcSpan "tests/examples/RealGHC.lhs" 730 31 730 32 , SrcSpan "tests/examples/RealGHC.lhs" 730 34 730 35 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 25 730 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 25 730 27 , srcInfoPoints = [] } "c1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 28 730 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 28 730 31 , srcInfoPoints = [] } "vs1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 32 730 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 32 730 34 , srcInfoPoints = [] } "r1") ]) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 35 730 36 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 35 730 36 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 36 730 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 36 730 41 , srcInfoPoints = [] } "alts1"))) , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 43 730 62 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 730 43 730 44 , SrcSpan "tests/examples/RealGHC.lhs" 730 61 730 62 ] } (PInfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 61 , srcInfoPoints = [] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 45 , SrcSpan "tests/examples/RealGHC.lhs" 730 47 730 48 , SrcSpan "tests/examples/RealGHC.lhs" 730 51 730 52 , SrcSpan "tests/examples/RealGHC.lhs" 730 54 730 55 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 45 730 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 45 730 47 , srcInfoPoints = [] } "c2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 48 730 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 48 730 51 , srcInfoPoints = [] } "vs2") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 52 730 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 52 730 54 , srcInfoPoints = [] } "r2") ]) (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 55 730 56 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 55 730 56 , srcInfoPoints = [] })) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 56 730 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 56 730 61 , srcInfoPoints = [] } "alts2"))) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 3 733 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 731 3 731 4 , SrcSpan "tests/examples/RealGHC.lhs" 732 3 732 4 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 3 733 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 731 3 731 4 , SrcSpan "tests/examples/RealGHC.lhs" 732 3 732 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 , srcInfoPoints = [] } "c1"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 , srcInfoPoints = [] } "c2")))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 5 733 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 732 5 732 7 , SrcSpan "tests/examples/RealGHC.lhs" 732 9 732 10 , SrcSpan "tests/examples/RealGHC.lhs" 733 5 733 6 , SrcSpan "tests/examples/RealGHC.lhs" 733 42 733 43 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 732 18 732 20 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 17 , srcInfoPoints = [] } "subst1")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 38 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 32 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 26 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 27 732 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 27 732 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 27 732 32 , srcInfoPoints = [] } "menv'")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 33 732 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 33 732 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 33 732 38 , srcInfoPoints = [] } "subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 , srcInfoPoints = [] } "r1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 , srcInfoPoints = [] } "r2")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 41 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 35 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 29 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 22 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 17 , srcInfoPoints = [] } "match_alts"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 18 733 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 18 733 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 18 733 22 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 23 733 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 23 733 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 23 733 29 , srcInfoPoints = [] } "subst1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 , srcInfoPoints = [] } "alts1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 , srcInfoPoints = [] } "alts2")))) ]) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 736 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 5 , SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 5 , SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 0 ] } [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 735 11 735 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 10 , srcInfoPoints = [] } "menv'" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 , srcInfoPoints = [] } "MatchEnv"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 61 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 10 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 10 , srcInfoPoints = [] } "menv'")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 11 736 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 736 11 736 12 ] } (RecUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 736 18 736 19 , SrcSpan "tests/examples/RealGHC.lhs" 736 60 736 61 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 , srcInfoPoints = [] } "menv"))) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 736 27 736 28 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 26 , srcInfoPoints = [] } "me_env")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 55 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 51 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 37 , srcInfoPoints = [] } "rnBndrs2"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 38 736 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 736 38 736 39 , SrcSpan "tests/examples/RealGHC.lhs" 736 50 736 51 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 39 736 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 39 736 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 39 736 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 39 736 45 , srcInfoPoints = [] } "me_env"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 46 736 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 46 736 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 46 736 50 , srcInfoPoints = [] } "menv")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 52 736 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 52 736 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 52 736 55 , srcInfoPoints = [] } "vs1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 56 736 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 56 736 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 56 736 59 , srcInfoPoints = [] } "vs2")))) ])) Nothing ])) , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 1 739 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 11 , srcInfoPoints = [] } "match_alts") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 12 738 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 12 738 16 , srcInfoPoints = [] } "menv") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 17 738 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 17 738 22 , srcInfoPoints = [] } "subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 23 738 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 23 738 28 , srcInfoPoints = [] } "alts1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 29 738 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 29 738 34 , srcInfoPoints = [] } "alts2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 3 739 12 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 739 3 739 4 ] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 , srcInfoPoints = [] } "Nothing")))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 1 754 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 750 10 750 12 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 1 750 9 , srcInfoPoints = [] } "match_ty" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 754 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 751 10 751 12 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 , srcInfoPoints = [] } "MatchEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 754 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 752 10 752 12 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 , srcInfoPoints = [] } "SubstEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 754 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 753 10 753 12 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 , srcInfoPoints = [] } "Type"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 754 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 754 10 754 12 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 , srcInfoPoints = [] } "Type"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 , srcInfoPoints = [] } "Maybe"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 , srcInfoPoints = [] } "SubstEnv")))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 757 44 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 757 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 755 9 , srcInfoPoints = [] } "match_ty") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 10 755 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 10 755 14 , srcInfoPoints = [] } "menv") , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 15 755 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 755 15 755 16 , SrcSpan "tests/examples/RealGHC.lhs" 755 24 755 25 , SrcSpan "tests/examples/RealGHC.lhs" 755 34 755 35 , SrcSpan "tests/examples/RealGHC.lhs" 755 41 755 42 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 16 755 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 16 755 24 , srcInfoPoints = [] } "tv_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 26 755 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 26 755 34 , srcInfoPoints = [] } "id_subst") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 36 755 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 36 755 41 , srcInfoPoints = [] } "binds") ] , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 43 755 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 43 755 46 , srcInfoPoints = [] } "ty1") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 47 755 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 47 755 50 , srcInfoPoints = [] } "ty2") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 3 757 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 756 3 756 4 ] } (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 5 757 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 756 5 756 7 , SrcSpan "tests/examples/RealGHC.lhs" 756 9 756 10 , SrcSpan "tests/examples/RealGHC.lhs" 757 5 757 6 , SrcSpan "tests/examples/RealGHC.lhs" 757 43 757 44 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 756 21 756 23 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 20 , srcInfoPoints = [] } "tv_subst'")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 , srcInfoPoints = [] } (Qual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 , srcInfoPoints = [] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 , srcInfoPoints = [] } "Unify") (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 , srcInfoPoints = [] } "ruleMatchTyX"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 43 756 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 43 756 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 43 756 47 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 , srcInfoPoints = [] } "tv_subst")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 , srcInfoPoints = [] } "ty1")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 , srcInfoPoints = [] } "ty2")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 42 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 , srcInfoPoints = [] } "return"))) (Tuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 14 757 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 757 14 757 15 , SrcSpan "tests/examples/RealGHC.lhs" 757 24 757 25 , SrcSpan "tests/examples/RealGHC.lhs" 757 34 757 35 , SrcSpan "tests/examples/RealGHC.lhs" 757 41 757 42 ] } Boxed [ Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 , srcInfoPoints = [] } "tv_subst'")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 , srcInfoPoints = [] } "id_subst")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 , srcInfoPoints = [] } "binds")) ])) ])) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 1 817 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 813 18 813 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 1 813 17 , srcInfoPoints = [] } "ruleCheckProgram" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 21 817 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 814 18 814 20 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 21 813 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 813 21 813 22 , SrcSpan "tests/examples/RealGHC.lhs" 813 40 813 41 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 40 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 813 33 813 35 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 , srcInfoPoints = [] } "Bool"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 817 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 815 18 815 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 , srcInfoPoints = [] } "String"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 817 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 816 18 816 20 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 , srcInfoPoints = [] } "RuleBase"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 21 817 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 817 18 817 20 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 21 816 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 816 21 816 22 , SrcSpan "tests/examples/RealGHC.lhs" 816 30 816 31 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 , srcInfoPoints = [] } "CoreBind")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 , srcInfoPoints = [] } "SDoc"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 828 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 826 3 826 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 828 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 826 3 826 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 818 17 , srcInfoPoints = [] } "ruleCheckProgram") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 18 818 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 18 818 27 , srcInfoPoints = [] } "is_active") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 28 818 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 28 818 36 , srcInfoPoints = [] } "rule_pat") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 37 818 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 37 818 46 , srcInfoPoints = [] } "rule_base") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 47 818 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 47 818 52 , srcInfoPoints = [] } "binds") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 3 825 7 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 3 820 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 819 3 819 4 , SrcSpan "tests/examples/RealGHC.lhs" 820 3 820 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 23 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 , srcInfoPoints = [] } "isEmptyBag"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 , srcInfoPoints = [] } "results")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 10 820 57 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 10 820 57 , srcInfoPoints = [] } "Rule check results: no rule application sites" "Rule check results: no rule application sites"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 3 825 7 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 821 3 821 4 , SrcSpan "tests/examples/RealGHC.lhs" 822 3 822 4 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 825 7 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 , srcInfoPoints = [] } "vcat"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 10 825 7 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 822 10 822 11 , SrcSpan "tests/examples/RealGHC.lhs" 822 37 822 38 , SrcSpan "tests/examples/RealGHC.lhs" 823 11 823 12 , SrcSpan "tests/examples/RealGHC.lhs" 825 6 825 7 ] } [ App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 16 822 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 16 822 37 , srcInfoPoints = [] } "Rule check results:" "Rule check results:")) , Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 , srcInfoPoints = [] } "line")) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 50 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 , srcInfoPoints = [] } "vcat"))) (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 12 824 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 824 12 824 13 , SrcSpan "tests/examples/RealGHC.lhs" 824 24 824 25 , SrcSpan "tests/examples/RealGHC.lhs" 824 49 824 50 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 23 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 15 , srcInfoPoints = [] } "p"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 16 824 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 16 824 18 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 16 824 18 , srcInfoPoints = [] } "$$"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 19 824 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 19 824 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 19 824 23 , srcInfoPoints = [] } "line")))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 824 28 824 30 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 824 28 824 30 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 27 , srcInfoPoints = [] } "p")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 31 824 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 31 824 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 31 824 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 31 824 40 , srcInfoPoints = [] } "bagToList"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 41 824 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 41 824 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 41 824 48 , srcInfoPoints = [] } "results"))))) ]) ])) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 828 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 5 , SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 5 , SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 100 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 12 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 12 , srcInfoPoints = [] } "results")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 13 827 100 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 827 13 827 14 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 100 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 , srcInfoPoints = [] } "unionManyBags"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 29 827 100 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 827 29 827 30 , SrcSpan "tests/examples/RealGHC.lhs" 827 99 827 100 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 99 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 93 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 33 , srcInfoPoints = [] } "map"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 34 827 93 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 827 34 827 35 , SrcSpan "tests/examples/RealGHC.lhs" 827 92 827 93 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 35 827 92 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 35 827 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 35 827 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 35 827 48 , srcInfoPoints = [] } "ruleCheckBind"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 49 827 92 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 827 49 827 50 , SrcSpan "tests/examples/RealGHC.lhs" 827 91 827 92 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 91 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 81 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 72 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 50 827 62 , srcInfoPoints = [] } "RuleCheckEnv"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 63 827 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 63 827 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 63 827 72 , srcInfoPoints = [] } "is_active")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 73 827 81 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 73 827 81 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 73 827 81 , srcInfoPoints = [] } "rule_pat")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 82 827 91 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 82 827 91 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 82 827 91 , srcInfoPoints = [] } "rule_base")))))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 94 827 99 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 94 827 99 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 94 827 99 , srcInfoPoints = [] } "binds"))))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 35 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 9 , srcInfoPoints = [] } "line")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 10 828 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 828 10 828 11 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 , srcInfoPoints = [] } "text"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 17 828 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 828 17 828 18 , SrcSpan "tests/examples/RealGHC.lhs" 828 34 828 35 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 34 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 27 , srcInfoPoints = [] } "replicate"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 28 828 30 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 28 828 30 , srcInfoPoints = [] } 20 "20"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 31 828 34 , srcInfoPoints = [] } (Char SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 31 828 34 , srcInfoPoints = [] } '-' "-")))))) Nothing ])) ] , DataDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 1 834 2 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 830 19 830 20 ] } (DataType SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 5 , srcInfoPoints = [] }) Nothing (DHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 6 830 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 6 830 18 , srcInfoPoints = [] } "RuleCheckEnv")) [ QualConDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 834 2 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 830 34 830 35 , SrcSpan "tests/examples/RealGHC.lhs" 831 39 831 40 , SrcSpan "tests/examples/RealGHC.lhs" 832 25 832 26 , SrcSpan "tests/examples/RealGHC.lhs" 834 1 834 2 ] } Nothing Nothing (RecDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 834 2 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 830 34 830 35 , SrcSpan "tests/examples/RealGHC.lhs" 831 39 831 40 , SrcSpan "tests/examples/RealGHC.lhs" 832 25 832 26 , SrcSpan "tests/examples/RealGHC.lhs" 834 1 834 2 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 830 33 , srcInfoPoints = [] } "RuleCheckEnv") [ FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 5 831 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 831 18 831 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 5 831 17 , srcInfoPoints = [] } "rc_is_active" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 831 32 831 34 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 , srcInfoPoints = [] } "Bool")))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 5 832 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 832 16 832 18 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 5 832 15 , srcInfoPoints = [] } "rc_pattern" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 , srcInfoPoints = [] } "String"))) , FieldDecl SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 5 833 29 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 833 18 833 20 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 5 833 17 , srcInfoPoints = [] } "rc_rule_base" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 , srcInfoPoints = [] } "RuleBase"))) ]) ] [] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 836 15 836 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 14 , srcInfoPoints = [] } "ruleCheckBind" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 836 31 836 33 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 , srcInfoPoints = [] } "RuleCheckEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 836 43 836 45 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 , srcInfoPoints = [] } "CoreBind"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 54 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 , srcInfoPoints = [] } "Bag"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 , srcInfoPoints = [] } "SDoc")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 839 80 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 14 , srcInfoPoints = [] } "ruleCheckBind") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 15 838 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 15 838 18 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 19 838 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 838 19 838 20 , SrcSpan "tests/examples/RealGHC.lhs" 838 30 838 31 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 26 , srcInfoPoints = [] } "NonRec")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 27 838 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 27 838 28 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 29 838 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 29 838 30 , srcInfoPoints = [] } "r") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 32 838 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 838 32 838 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 49 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 , srcInfoPoints = [] } "r"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 80 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 14 , srcInfoPoints = [] } "ruleCheckBind") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 15 839 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 15 839 18 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 19 839 28 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 19 839 20 , SrcSpan "tests/examples/RealGHC.lhs" 839 27 839 28 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 23 , srcInfoPoints = [] } "Rec")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 24 839 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 24 839 27 , srcInfoPoints = [] } "prs") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 32 839 80 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 32 839 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 80 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 , srcInfoPoints = [] } "unionManyBags"))) (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 48 839 80 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 48 839 49 , SrcSpan "tests/examples/RealGHC.lhs" 839 65 839 66 , SrcSpan "tests/examples/RealGHC.lhs" 839 79 839 80 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 64 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 , srcInfoPoints = [] } "r")))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 79 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 73 839 75 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 79 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 73 839 75 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 68 , SrcSpan "tests/examples/RealGHC.lhs" 839 69 839 70 , SrcSpan "tests/examples/RealGHC.lhs" 839 71 839 72 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 68 839 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 68 839 69 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 70 839 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 70 839 71 , srcInfoPoints = [] } "r") ]) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 , srcInfoPoints = [] } "prs")))) ]))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 841 11 841 13 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 10 , srcInfoPoints = [] } "ruleCheck" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 841 27 841 29 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 , srcInfoPoints = [] } "RuleCheckEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 841 39 841 41 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 , srcInfoPoints = [] } "CoreExpr"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 50 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 , srcInfoPoints = [] } "Bag"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 , srcInfoPoints = [] } "SDoc")))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 851 68 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 11 842 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 11 842 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 15 842 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 842 15 842 16 , SrcSpan "tests/examples/RealGHC.lhs" 842 21 842 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 19 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 20 842 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 20 842 21 , srcInfoPoints = [] } "v") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 29 842 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 842 29 842 30 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 , srcInfoPoints = [] } "emptyBag")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 11 843 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 11 843 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 15 843 22 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 843 15 843 16 , SrcSpan "tests/examples/RealGHC.lhs" 843 21 843 22 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 19 , srcInfoPoints = [] } "Lit")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 20 843 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 20 843 21 , srcInfoPoints = [] } "l") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 29 843 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 843 29 843 30 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 , srcInfoPoints = [] } "emptyBag")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 11 844 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 11 844 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 15 844 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 844 15 844 16 , SrcSpan "tests/examples/RealGHC.lhs" 844 23 844 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 20 , srcInfoPoints = [] } "Type")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 21 844 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 21 844 23 , srcInfoPoints = [] } "ty") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 29 844 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 844 29 844 30 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 , srcInfoPoints = [] } "emptyBag")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 11 845 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 11 845 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 15 845 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 845 15 845 16 , SrcSpan "tests/examples/RealGHC.lhs" 845 23 845 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 19 , srcInfoPoints = [] } "App")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 20 845 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 20 845 21 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 22 845 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 22 845 23 , srcInfoPoints = [] } "a") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 29 845 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 845 29 845 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 57 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 47 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 , srcInfoPoints = [] } "ruleCheckApp"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 , srcInfoPoints = [] } "env")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 48 845 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 845 48 845 49 , SrcSpan "tests/examples/RealGHC.lhs" 845 56 845 57 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 56 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 54 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 , srcInfoPoints = [] } "App"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 , srcInfoPoints = [] } "a")))))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 58 845 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 845 58 845 59 , SrcSpan "tests/examples/RealGHC.lhs" 845 59 845 60 ] } []))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 11 846 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 11 846 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 15 846 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 846 15 846 16 , SrcSpan "tests/examples/RealGHC.lhs" 846 24 846 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 20 , srcInfoPoints = [] } "Note")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 21 846 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 21 846 22 , srcInfoPoints = [] } "n") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 23 846 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 23 846 24 , srcInfoPoints = [] } "e") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 29 846 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 846 29 846 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 , srcInfoPoints = [] } "e"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 11 847 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 11 847 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 15 847 26 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 847 15 847 16 , SrcSpan "tests/examples/RealGHC.lhs" 847 25 847 26 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 20 , srcInfoPoints = [] } "Cast")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 21 847 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 21 847 22 , srcInfoPoints = [] } "e") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 23 847 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 23 847 25 , srcInfoPoints = [] } "co") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 29 847 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 847 29 847 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 , srcInfoPoints = [] } "e"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 11 848 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 11 848 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 15 848 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 848 15 848 16 , SrcSpan "tests/examples/RealGHC.lhs" 848 24 848 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 19 , srcInfoPoints = [] } "Let")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 20 848 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 20 848 22 , srcInfoPoints = [] } "bd") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 23 848 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 23 848 24 , srcInfoPoints = [] } "e") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 29 848 79 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 848 29 848 30 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 48 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 , srcInfoPoints = [] } "ruleCheckBind"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 , srcInfoPoints = [] } "bd")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 53 , SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 , SrcSpan "tests/examples/RealGHC.lhs" 848 62 848 63 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 63 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 53 , SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 , SrcSpan "tests/examples/RealGHC.lhs" 848 62 848 63 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 , srcInfoPoints = [] } "unionBags"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 , srcInfoPoints = [] } "e")))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 11 849 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 11 849 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 15 849 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 849 15 849 16 , SrcSpan "tests/examples/RealGHC.lhs" 849 23 849 24 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 19 , srcInfoPoints = [] } "Lam")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 20 849 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 20 849 21 , srcInfoPoints = [] } "b") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 22 849 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 22 849 23 , srcInfoPoints = [] } "e") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 29 849 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 849 29 849 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 46 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 , srcInfoPoints = [] } "e"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 1 851 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 1 850 10 , srcInfoPoints = [] } "ruleCheck") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 11 850 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 11 850 14 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 15 850 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 850 15 850 16 , SrcSpan "tests/examples/RealGHC.lhs" 850 29 850 30 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 20 , srcInfoPoints = [] } "Case")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 21 850 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 21 850 22 , srcInfoPoints = [] } "e") , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 23 850 24 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 25 850 26 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 27 850 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 27 850 29 , srcInfoPoints = [] } "as") ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 31 851 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 850 31 850 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 851 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 , srcInfoPoints = [] } "e")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 50 , SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 , SrcSpan "tests/examples/RealGHC.lhs" 850 59 850 60 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 50 , SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 , SrcSpan "tests/examples/RealGHC.lhs" 850 59 850 60 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 , srcInfoPoints = [] } "unionBags"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 , srcInfoPoints = [] } "unionManyBags"))) (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 35 851 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 851 35 851 36 , SrcSpan "tests/examples/RealGHC.lhs" 851 52 851 53 , SrcSpan "tests/examples/RealGHC.lhs" 851 67 851 68 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 , srcInfoPoints = [] } "r")))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 851 62 851 64 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 851 62 851 64 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 55 , SrcSpan "tests/examples/RealGHC.lhs" 851 56 851 57 , SrcSpan "tests/examples/RealGHC.lhs" 851 58 851 59 , SrcSpan "tests/examples/RealGHC.lhs" 851 60 851 61 ] } Boxed [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 55 851 56 , srcInfoPoints = [] } , PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 57 851 58 , srcInfoPoints = [] } , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 59 851 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 59 851 60 , srcInfoPoints = [] } "r") ]) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 , srcInfoPoints = [] } "as")))) ])))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 855 52 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 86 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 13 , srcInfoPoints = [] } "ruleCheckApp") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 14 853 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 14 853 17 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 18 853 27 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 853 18 853 19 , SrcSpan "tests/examples/RealGHC.lhs" 853 26 853 27 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 22 , srcInfoPoints = [] } "App")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 23 853 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 23 853 24 , srcInfoPoints = [] } "f") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 25 853 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 25 853 26 , srcInfoPoints = [] } "a") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 28 853 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 28 853 30 , srcInfoPoints = [] } "as") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 31 853 86 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 853 31 853 32 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 86 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 , srcInfoPoints = [] } "a")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 50 , SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 , SrcSpan "tests/examples/RealGHC.lhs" 853 59 853 60 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 50 , SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 , SrcSpan "tests/examples/RealGHC.lhs" 853 59 853 60 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 , srcInfoPoints = [] } "unionBags"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 86 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 77 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 , srcInfoPoints = [] } "ruleCheckApp"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 , srcInfoPoints = [] } "f")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 80 853 86 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 853 80 853 81 , SrcSpan "tests/examples/RealGHC.lhs" 853 85 853 86 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 85 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 , srcInfoPoints = [] } "a"))) (QConOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 , srcInfoPoints = [] } (Special SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 , srcInfoPoints = [] } (Cons SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 , srcInfoPoints = [] }))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 , srcInfoPoints = [] } "as")))))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 13 , srcInfoPoints = [] } "ruleCheckApp") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 14 854 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 14 854 17 , srcInfoPoints = [] } "env") , PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 18 854 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 854 18 854 19 , SrcSpan "tests/examples/RealGHC.lhs" 854 24 854 25 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 24 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 22 , srcInfoPoints = [] } "Var")) [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 23 854 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 23 854 24 , srcInfoPoints = [] } "f") ]) , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 26 854 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 26 854 28 , srcInfoPoints = [] } "as") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 31 854 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 854 31 854 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 54 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 51 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 , srcInfoPoints = [] } "ruleCheckFun"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 , srcInfoPoints = [] } "f")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 , srcInfoPoints = [] } "as"))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 13 , srcInfoPoints = [] } "ruleCheckApp") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 14 855 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 14 855 17 , srcInfoPoints = [] } "env") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 18 855 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 18 855 23 , srcInfoPoints = [] } "other") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 24 855 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 24 855 26 , srcInfoPoints = [] } "as") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 31 855 52 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 855 31 855 32 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 52 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 46 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 , srcInfoPoints = [] } "ruleCheck"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 , srcInfoPoints = [] } "env")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 , srcInfoPoints = [] } "other"))))) Nothing ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 859 14 859 16 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 13 , srcInfoPoints = [] } "ruleCheckFun" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 859 30 859 32 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 , srcInfoPoints = [] } "RuleCheckEnv"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 859 36 859 38 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 , srcInfoPoints = [] } "Id"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 61 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 859 50 859 52 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 40 , SrcSpan "tests/examples/RealGHC.lhs" 859 48 859 49 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 , srcInfoPoints = [] } "CoreExpr")))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 61 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 , srcInfoPoints = [] } "Bag"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 , srcInfoPoints = [] } "SDoc"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 868 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 866 3 866 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 868 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 866 3 866 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 863 13 , srcInfoPoints = [] } "ruleCheckFun") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 14 863 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 14 863 17 , srcInfoPoints = [] } "env") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 18 863 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 18 863 20 , srcInfoPoints = [] } "fn") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 21 863 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 21 863 25 , srcInfoPoints = [] } "args") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 3 865 96 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 3 864 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 864 3 864 4 , SrcSpan "tests/examples/RealGHC.lhs" 864 27 864 28 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 26 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 26 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 , srcInfoPoints = [] } "null"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 , srcInfoPoints = [] } "name_match_rules")))) ] (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 , srcInfoPoints = [] } "emptyBag"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 3 865 96 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 865 3 865 4 , SrcSpan "tests/examples/RealGHC.lhs" 865 23 865 24 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 , srcInfoPoints = [] } "otherwise"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 96 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 , srcInfoPoints = [] } "unitBag"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 33 865 96 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 865 33 865 34 , SrcSpan "tests/examples/RealGHC.lhs" 865 95 865 96 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 95 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 78 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 73 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 51 , srcInfoPoints = [] } "ruleAppCheck_help"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 52 865 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 865 52 865 53 , SrcSpan "tests/examples/RealGHC.lhs" 865 69 865 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 53 865 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 53 865 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 53 865 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 53 865 65 , srcInfoPoints = [] } "rc_is_active"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 66 865 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 66 865 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 66 865 69 , srcInfoPoints = [] } "env")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 71 865 73 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 71 865 73 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 71 865 73 , srcInfoPoints = [] } "fn")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 , srcInfoPoints = [] } "args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 , srcInfoPoints = [] } "name_match_rules")))))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 868 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 5 , SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 5 , SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 69 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 21 , srcInfoPoints = [] } "name_match_rules")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 22 867 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 867 22 867 23 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 , srcInfoPoints = [] } "filter"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 , srcInfoPoints = [] } "match")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 37 867 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 867 37 867 38 , SrcSpan "tests/examples/RealGHC.lhs" 867 68 867 69 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 46 , srcInfoPoints = [] } "getRules"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 47 867 65 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 867 47 867 48 , SrcSpan "tests/examples/RealGHC.lhs" 867 64 867 65 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 48 867 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 48 867 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 48 867 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 48 867 60 , srcInfoPoints = [] } "rc_rule_base"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 61 867 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 61 867 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 61 867 64 , srcInfoPoints = [] } "env")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 66 867 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 66 867 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 66 867 68 , srcInfoPoints = [] } "fn"))))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 72 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 10 , srcInfoPoints = [] } "match") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 11 868 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 11 868 15 , srcInfoPoints = [] } "rule") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 16 868 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 868 16 868 17 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 72 , srcInfoPoints = [] } (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 19 , SrcSpan "tests/examples/RealGHC.lhs" 868 33 868 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 33 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 29 , srcInfoPoints = [] } "rc_pattern"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 30 868 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 30 868 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 30 868 33 , srcInfoPoints = [] } "env"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 36 , SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 , SrcSpan "tests/examples/RealGHC.lhs" 868 46 868 47 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 36 , SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 , SrcSpan "tests/examples/RealGHC.lhs" 868 46 868 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 , srcInfoPoints = [] } "isPrefixOf"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 72 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 56 , srcInfoPoints = [] } "unpackFS"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 57 868 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 868 57 868 58 , SrcSpan "tests/examples/RealGHC.lhs" 868 71 868 72 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 58 868 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 58 868 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 58 868 66 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 58 868 66 , srcInfoPoints = [] } "ruleName"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 67 868 71 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 67 868 71 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 67 868 71 , srcInfoPoints = [] } "rule")))))))) Nothing ] ])) ] , TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 84 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 19 870 21 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 18 , srcInfoPoints = [] } "ruleAppCheck_help" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 84 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 43 870 45 ] } (TyParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 23 , SrcSpan "tests/examples/RealGHC.lhs" 870 41 870 42 ] } (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 34 870 36 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 , srcInfoPoints = [] } "Activation"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 , srcInfoPoints = [] } "Bool"))))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 84 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 49 870 51 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 , srcInfoPoints = [] } "Id"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 84 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 63 870 65 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 62 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 53 , SrcSpan "tests/examples/RealGHC.lhs" 870 61 870 62 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 , srcInfoPoints = [] } "CoreExpr")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 84 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 77 870 79 ] } (TyList SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 67 , SrcSpan "tests/examples/RealGHC.lhs" 870 75 870 76 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 , srcInfoPoints = [] } "CoreRule")))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 , srcInfoPoints = [] } "SDoc"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 875 3 875 8 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 875 3 875 8 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 871 18 , srcInfoPoints = [] } "ruleAppCheck_help") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 19 871 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 19 871 28 , srcInfoPoints = [] } "is_active") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 29 871 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 29 871 31 , srcInfoPoints = [] } "fn") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 32 871 36 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 32 871 36 , srcInfoPoints = [] } "args") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 37 871 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 37 871 42 , srcInfoPoints = [] } "rules") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 872 3 874 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 872 3 872 4 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 874 35 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 , srcInfoPoints = [] } "vcat"))) (List SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 10 874 35 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 873 10 873 11 , SrcSpan "tests/examples/RealGHC.lhs" 873 60 873 61 , SrcSpan "tests/examples/RealGHC.lhs" 874 34 874 35 ] } [ InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 16 873 29 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 16 873 29 , srcInfoPoints = [] } "Expression:" "Expression:"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 , srcInfoPoints = [] } "ppr"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 38 873 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 873 38 873 39 , SrcSpan "tests/examples/RealGHC.lhs" 873 59 873 60 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 54 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 45 , srcInfoPoints = [] } "mkApps"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 46 873 54 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 873 46 873 47 , SrcSpan "tests/examples/RealGHC.lhs" 873 53 873 54 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 47 873 53 , srcInfoPoints = [] } (Con SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 47 873 50 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 47 873 50 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 47 873 50 , srcInfoPoints = [] } "Var"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 51 873 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 51 873 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 51 873 53 , srcInfoPoints = [] } "fn")))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 55 873 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 55 873 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 55 873 59 , srcInfoPoints = [] } "args")))))) , App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 , srcInfoPoints = [] } "vcat"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 12 874 34 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 874 12 874 13 , SrcSpan "tests/examples/RealGHC.lhs" 874 33 874 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 33 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 16 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 17 874 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 17 874 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 17 874 27 , srcInfoPoints = [] } "check_rule")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 , srcInfoPoints = [] } "rules"))))) ]))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 5 , SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 5 , SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 5 , SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 5 , SrcSpan "tests/examples/RealGHC.lhs" 882 5 882 5 , SrcSpan "tests/examples/RealGHC.lhs" 884 5 884 5 , SrcSpan "tests/examples/RealGHC.lhs" 887 5 887 5 , SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 5 , SrcSpan "tests/examples/RealGHC.lhs" 893 5 893 5 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 11 , srcInfoPoints = [] } "n_args")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 12 876 25 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 876 12 876 13 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 25 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 , srcInfoPoints = [] } "args"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 36 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 11 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 11 , srcInfoPoints = [] } "i_args")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 12 877 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 877 12 877 13 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 36 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 , srcInfoPoints = [] } "args"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 20 , SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 , SrcSpan "tests/examples/RealGHC.lhs" 877 23 877 24 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 24 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 20 , SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 , SrcSpan "tests/examples/RealGHC.lhs" 877 23 877 24 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 , srcInfoPoints = [] } "zip"))) (EnumFrom SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 25 877 36 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 877 25 877 26 , SrcSpan "tests/examples/RealGHC.lhs" 877 33 877 35 , SrcSpan "tests/examples/RealGHC.lhs" 877 35 877 36 ] } (ExpTypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 32 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 877 27 877 29 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 27 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 27 , srcInfoPoints = [] } 1 "1")) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 29 877 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 29 877 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 29 877 32 , srcInfoPoints = [] } "Int"))))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 39 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 15 , srcInfoPoints = [] } "rough_args")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 16 878 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 878 16 878 17 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 39 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 34 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 , srcInfoPoints = [] } "map"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 , srcInfoPoints = [] } "roughTopName")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 , srcInfoPoints = [] } "args"))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 67 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 15 , srcInfoPoints = [] } "check_rule") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 16 880 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 16 880 20 , srcInfoPoints = [] } "rule") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 21 880 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 880 21 880 22 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 67 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 48 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 34 , srcInfoPoints = [] } "rule_herald"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 35 880 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 35 880 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 35 880 39 , srcInfoPoints = [] } "rule")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 40 880 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 40 880 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 40 880 42 , srcInfoPoints = [] } "<>"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 43 880 48 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 43 880 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 43 880 48 , srcInfoPoints = [] } "colon")))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 62 , srcInfoPoints = [] } "rule_info"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 63 880 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 63 880 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 63 880 67 , srcInfoPoints = [] } "rule")))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 885 60 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 883 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 882 16 , srcInfoPoints = [] } "rule_herald") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 17 882 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 882 17 882 18 , SrcSpan "tests/examples/RealGHC.lhs" 882 48 882 49 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 48 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 882 30 882 31 , SrcSpan "tests/examples/RealGHC.lhs" 882 47 882 48 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 29 , srcInfoPoints = [] } "BuiltinRule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 32 882 46 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 882 40 882 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 32 882 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 32 882 39 , srcInfoPoints = [] } "ru_name")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 42 882 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 42 882 46 , srcInfoPoints = [] } "name")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 9 883 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 883 9 883 10 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 16 , srcInfoPoints = [] } "ptext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 17 883 38 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 883 17 883 18 , SrcSpan "tests/examples/RealGHC.lhs" 883 37 883 38 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 18 883 37 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 18 883 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 18 883 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 18 883 22 , srcInfoPoints = [] } "sLit"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 23 883 37 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 23 883 37 , srcInfoPoints = [] } "Builtin rule" "Builtin rule"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 55 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 55 , srcInfoPoints = [] } "doubleQuotes"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 56 883 68 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 883 56 883 57 , SrcSpan "tests/examples/RealGHC.lhs" 883 67 883 68 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 57 883 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 57 883 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 57 883 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 57 883 62 , srcInfoPoints = [] } "ftext"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 63 883 67 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 63 883 67 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 63 883 67 , srcInfoPoints = [] } "name")))))))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 5 885 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 5 884 16 , srcInfoPoints = [] } "rule_herald") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 17 884 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 884 17 884 18 , SrcSpan "tests/examples/RealGHC.lhs" 884 41 884 42 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 41 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 884 23 884 24 , SrcSpan "tests/examples/RealGHC.lhs" 884 40 884 41 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 22 , srcInfoPoints = [] } "Rule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 25 884 39 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 884 33 884 34 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 25 884 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 25 884 32 , srcInfoPoints = [] } "ru_name")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 35 884 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 35 884 39 , srcInfoPoints = [] } "name")) ]) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 9 885 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 885 9 885 10 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 60 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 16 , srcInfoPoints = [] } "ptext"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 17 885 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 885 17 885 18 , SrcSpan "tests/examples/RealGHC.lhs" 885 29 885 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 18 885 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 18 885 22 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 18 885 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 18 885 22 , srcInfoPoints = [] } "sLit"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 23 885 29 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 23 885 29 , srcInfoPoints = [] } "Rule" "Rule"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 60 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 47 , srcInfoPoints = [] } "doubleQuotes"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 48 885 60 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 885 48 885 49 , SrcSpan "tests/examples/RealGHC.lhs" 885 59 885 60 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 49 885 59 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 49 885 54 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 49 885 54 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 49 885 54 , srcInfoPoints = [] } "ftext"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 55 885 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 55 885 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 55 885 59 , srcInfoPoints = [] } "name")))))))) Nothing ] , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 911 59 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 889 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 887 14 , srcInfoPoints = [] } "rule_info") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 15 887 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 15 887 19 , srcInfoPoints = [] } "rule") ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 9 889 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 888 9 888 10 , SrcSpan "tests/examples/RealGHC.lhs" 889 13 889 14 ] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 9 889 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 888 9 888 10 , SrcSpan "tests/examples/RealGHC.lhs" 889 13 889 14 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 79 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 888 18 888 20 ] } (PApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 15 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 15 , srcInfoPoints = [] } "Just")) [ PWildCard SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 16 888 17 , srcInfoPoints = [] } ]) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 79 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 74 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 63 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 58 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 30 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 30 , srcInfoPoints = [] } "matchRule"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 31 888 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 31 888 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 31 888 42 , srcInfoPoints = [] } "noBlackList")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 43 888 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 43 888 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 43 888 58 , srcInfoPoints = [] } "emptyInScopeSet")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 59 888 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 59 888 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 59 888 63 , srcInfoPoints = [] } "args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 64 888 74 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 64 888 74 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 64 888 74 , srcInfoPoints = [] } "rough_args")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 75 888 79 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 75 888 79 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 75 888 79 , srcInfoPoints = [] } "rule")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 19 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 20 889 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 889 20 889 55 , srcInfoPoints = [] } "matches (which is very peculiar!)" "matches (which is very peculiar!)"))) ]) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 55 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 14 , srcInfoPoints = [] } "rule_info") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 15 891 31 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 891 15 891 16 , SrcSpan "tests/examples/RealGHC.lhs" 891 30 891 31 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 891 28 891 29 , SrcSpan "tests/examples/RealGHC.lhs" 891 29 891 30 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 27 , srcInfoPoints = [] } "BuiltinRule")) []) ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 32 891 55 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 891 32 891 33 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 55 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 39 891 55 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 39 891 55 , srcInfoPoints = [] } "does not match" "does not match")))) Nothing , Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 5 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 900 9 900 14 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 5 893 14 , srcInfoPoints = [] } "rule_info") [ PParen SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 15 894 67 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 893 15 893 16 , SrcSpan "tests/examples/RealGHC.lhs" 894 66 894 67 ] } (PRec SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 16 894 66 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 893 21 893 22 , SrcSpan "tests/examples/RealGHC.lhs" 893 37 893 38 , SrcSpan "tests/examples/RealGHC.lhs" 893 51 893 52 , SrcSpan "tests/examples/RealGHC.lhs" 894 44 894 45 , SrcSpan "tests/examples/RealGHC.lhs" 894 65 894 66 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 16 893 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 16 893 20 , srcInfoPoints = [] } "Rule")) [ PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 23 893 37 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 893 31 893 32 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 23 893 30 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 23 893 30 , srcInfoPoints = [] } "ru_name")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 33 893 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 33 893 37 , srcInfoPoints = [] } "name")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 39 893 51 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 893 46 893 47 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 39 893 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 39 893 45 , srcInfoPoints = [] } "ru_act")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 48 893 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 48 893 51 , srcInfoPoints = [] } "act")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 23 894 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 894 32 894 33 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 23 894 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 23 894 31 , srcInfoPoints = [] } "ru_bndrs")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 34 894 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 34 894 44 , srcInfoPoints = [] } "rule_bndrs")) , PFieldPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 46 894 65 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 894 54 894 55 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 46 894 53 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 46 894 53 , srcInfoPoints = [] } "ru_args")) (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 56 894 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 894 56 894 65 , srcInfoPoints = [] } "rule_args")) ]) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 9 899 105 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 9 895 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 895 9 895 10 , SrcSpan "tests/examples/RealGHC.lhs" 895 34 895 35 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 30 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 30 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 14 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 14 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 14 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 15 895 30 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 895 15 895 16 , SrcSpan "tests/examples/RealGHC.lhs" 895 29 895 30 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 16 895 29 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 16 895 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 16 895 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 16 895 25 , srcInfoPoints = [] } "is_active"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 26 895 29 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 26 895 29 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 26 895 29 , srcInfoPoints = [] } "act")))))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 40 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 41 895 69 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 41 895 69 , srcInfoPoints = [] } "active only in later phase" "active only in later phase"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 9 896 65 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 896 9 896 10 , SrcSpan "tests/examples/RealGHC.lhs" 896 39 896 40 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 31 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 31 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 17 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 17 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 17 , srcInfoPoints = [] } "n_args"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 18 896 19 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 18 896 19 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 18 896 19 , srcInfoPoints = [] } "<"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 20 896 31 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 20 896 31 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 20 896 31 , srcInfoPoints = [] } "n_rule_args")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 45 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 46 896 65 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 896 46 896 65 , srcInfoPoints = [] } "too few arguments" "too few arguments"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 9 897 66 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 897 9 897 10 , SrcSpan "tests/examples/RealGHC.lhs" 897 39 897 40 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 38 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 38 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 23 , srcInfoPoints = [] } "n_mismatches"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 24 897 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 24 897 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 24 897 26 , srcInfoPoints = [] } "=="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 27 897 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 27 897 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 27 897 38 , srcInfoPoints = [] } "n_rule_args")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 66 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 45 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 46 897 66 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 897 46 897 66 , srcInfoPoints = [] } "no arguments match" "no arguments match"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 9 898 119 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 898 9 898 10 , SrcSpan "tests/examples/RealGHC.lhs" 898 35 898 36 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 28 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 28 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 23 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 23 , srcInfoPoints = [] } "n_mismatches"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 24 898 26 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 24 898 26 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 24 898 26 , srcInfoPoints = [] } "=="))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 27 898 28 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 27 898 28 , srcInfoPoints = [] } 0 "0"))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 119 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 41 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 42 898 119 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 898 42 898 119 , srcInfoPoints = [] } "all arguments match (considered individually), but rule as a whole does not" "all arguments match (considered individually), but rule as a whole does not"))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 9 899 105 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 899 9 899 10 , SrcSpan "tests/examples/RealGHC.lhs" 899 31 899 32 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 , srcInfoPoints = [] } "otherwise"))) ] (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 105 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 49 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 37 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 38 899 49 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 38 899 49 , srcInfoPoints = [] } "arguments" "arguments"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 50 899 53 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 50 899 53 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 50 899 53 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 54 899 68 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 54 899 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 54 899 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 54 899 57 , srcInfoPoints = [] } "ppr"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 58 899 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 58 899 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 58 899 68 , srcInfoPoints = [] } "mismatches"))))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 69 899 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 69 899 72 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 69 899 72 , srcInfoPoints = [] } "<+>"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 105 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 77 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 77 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 77 , srcInfoPoints = [] } "text"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 78 899 105 , srcInfoPoints = [] } (String SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 899 78 899 105 , srcInfoPoints = [] } "do not match (1-indexing)" "do not match (1-indexing)")))) ]) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 11 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 11 , SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 11 , SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 11 , SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 11 , SrcSpan "tests/examples/RealGHC.lhs" 907 11 907 11 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 42 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 22 , srcInfoPoints = [] } "n_rule_args")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 24 901 42 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 901 24 901 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 26 901 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 26 901 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 26 901 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 26 901 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 33 901 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 33 901 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 901 33 901 42 , srcInfoPoints = [] } "rule_args"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 43 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 23 , srcInfoPoints = [] } "n_mismatches")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 24 902 43 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 902 24 902 25 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 26 902 43 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 26 902 32 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 26 902 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 26 902 32 , srcInfoPoints = [] } "length"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 33 902 43 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 33 902 43 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 902 33 902 43 , srcInfoPoints = [] } "mismatches"))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 11 904 72 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 21 , srcInfoPoints = [] } "mismatches")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 24 904 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 24 903 25 ] } (ListComp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 26 904 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 26 903 27 , SrcSpan "tests/examples/RealGHC.lhs" 903 29 903 30 , SrcSpan "tests/examples/RealGHC.lhs" 903 76 903 77 , SrcSpan "tests/examples/RealGHC.lhs" 904 71 904 72 ] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 27 903 28 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 27 903 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 27 903 28 , srcInfoPoints = [] } "i"))) [ QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 31 903 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 51 903 53 ] } (Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 31 903 76 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 51 903 53 ] } (PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 31 903 50 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 31 903 32 , SrcSpan "tests/examples/RealGHC.lhs" 903 40 903 41 , SrcSpan "tests/examples/RealGHC.lhs" 903 49 903 50 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 32 903 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 32 903 40 , srcInfoPoints = [] } "rule_arg") , PTuple SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 42 903 49 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 42 903 43 , SrcSpan "tests/examples/RealGHC.lhs" 903 46 903 47 , SrcSpan "tests/examples/RealGHC.lhs" 903 48 903 49 ] } Boxed [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 43 903 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 43 903 46 , srcInfoPoints = [] } "arg") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 47 903 48 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 47 903 48 , srcInfoPoints = [] } "i") ] ]) (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 54 903 76 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 54 903 63 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 54 903 63 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 54 903 63 , srcInfoPoints = [] } "rule_args"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 64 903 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 64 903 65 , SrcSpan "tests/examples/RealGHC.lhs" 903 65 903 68 , SrcSpan "tests/examples/RealGHC.lhs" 903 68 903 69 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 64 903 69 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 903 64 903 65 , SrcSpan "tests/examples/RealGHC.lhs" 903 65 903 68 , SrcSpan "tests/examples/RealGHC.lhs" 903 68 903 69 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 65 903 68 , srcInfoPoints = [] } "zip"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 70 903 76 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 70 903 76 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 903 70 903 76 , srcInfoPoints = [] } "i_args"))))) , QualStmt SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 71 , srcInfoPoints = [] } (Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 71 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 71 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 35 904 38 , srcInfoPoints = [] } "not"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 39 904 71 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 904 39 904 40 , SrcSpan "tests/examples/RealGHC.lhs" 904 70 904 71 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 40 904 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 40 904 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 40 904 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 40 904 46 , srcInfoPoints = [] } "isJust"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 47 904 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 904 47 904 48 , SrcSpan "tests/examples/RealGHC.lhs" 904 69 904 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 48 904 69 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 48 904 65 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 48 904 56 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 48 904 56 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 48 904 56 , srcInfoPoints = [] } "match_fn"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 57 904 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 57 904 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 57 904 65 , srcInfoPoints = [] } "rule_arg")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 66 904 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 66 904 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 904 66 904 69 , srcInfoPoints = [] } "arg"))))))))) ])) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 44 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 18 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 18 , srcInfoPoints = [] } "lhs_fvs")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 19 906 44 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 906 19 906 20 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 21 906 44 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 21 906 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 21 906 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 21 906 34 , srcInfoPoints = [] } "exprsFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 35 906 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 35 906 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 906 35 906 44 , srcInfoPoints = [] } "rule_args"))))) Nothing , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 11 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 908 13 908 18 ] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 11 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 908 13 908 18 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 11 907 19 , srcInfoPoints = [] } "match_fn") [ PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 20 907 28 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 20 907 28 , srcInfoPoints = [] } "rule_arg") , PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 29 907 32 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 29 907 32 , srcInfoPoints = [] } "arg") ] (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 33 907 72 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 907 33 907 34 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 72 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 59 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 45 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 40 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 40 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 35 907 40 , srcInfoPoints = [] } "match"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 41 907 45 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 41 907 45 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 41 907 45 , srcInfoPoints = [] } "menv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 46 907 59 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 46 907 59 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 46 907 59 , srcInfoPoints = [] } "emptySubstEnv")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 60 907 68 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 60 907 68 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 60 907 68 , srcInfoPoints = [] } "rule_arg")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 69 907 72 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 69 907 72 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 907 69 907 72 , srcInfoPoints = [] } "arg"))))) (Just (BDecls SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 15 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 909 15 909 15 , SrcSpan "tests/examples/RealGHC.lhs" 910 15 910 15 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 0 ] } [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 15 909 64 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 15 909 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 15 909 23 , srcInfoPoints = [] } "in_scope")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 24 909 64 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 909 24 909 25 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 26 909 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 26 909 33 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 26 909 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 26 909 33 , srcInfoPoints = [] } "lhs_fvs"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 34 909 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 909 34 909 35 , SrcSpan "tests/examples/RealGHC.lhs" 909 35 909 46 , SrcSpan "tests/examples/RealGHC.lhs" 909 46 909 47 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 34 909 47 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 909 34 909 35 , SrcSpan "tests/examples/RealGHC.lhs" 909 35 909 46 , SrcSpan "tests/examples/RealGHC.lhs" 909 46 909 47 ] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 35 909 46 , srcInfoPoints = [] } "unionVarSet"))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 48 909 64 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 48 909 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 48 909 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 48 909 60 , srcInfoPoints = [] } "exprFreeVars"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 61 909 64 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 61 909 64 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 909 61 909 64 , srcInfoPoints = [] } "arg")))))) Nothing , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 15 911 59 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 15 910 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 15 910 19 , srcInfoPoints = [] } "menv")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 20 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 910 20 910 21 ] } (RecConstr SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 22 911 59 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 910 25 910 26 , SrcSpan "tests/examples/RealGHC.lhs" 911 25 911 26 , SrcSpan "tests/examples/RealGHC.lhs" 911 58 911 59 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 22 910 24 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 22 910 24 , srcInfoPoints = [] } "ME")) [ FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 27 910 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 910 36 910 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 27 910 33 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 27 910 33 , srcInfoPoints = [] } "me_env")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 38 910 70 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 38 910 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 38 910 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 38 910 46 , srcInfoPoints = [] } "mkRnEnv2"))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 47 910 70 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 910 47 910 48 , SrcSpan "tests/examples/RealGHC.lhs" 910 69 910 70 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 48 910 69 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 48 910 60 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 48 910 60 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 48 910 60 , srcInfoPoints = [] } "mkInScopeSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 61 910 69 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 61 910 69 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 910 61 910 69 , srcInfoPoints = [] } "in_scope")))))) , FieldUpdate SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 27 911 57 , srcInfoPoints = [ SrcSpan "tests/examples/RealGHC.lhs" 911 36 911 37 ] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 27 911 35 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 27 911 35 , srcInfoPoints = [] } "me_tmpls")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 38 911 57 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 38 911 46 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 38 911 46 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 38 911 46 , srcInfoPoints = [] } "mkVarSet"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 47 911 57 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 47 911 57 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 911 47 911 57 , srcInfoPoints = [] } "rule_bndrs")))) ])) Nothing ])) ] ])) ] ])) ] ] , [ Comment False (SrcSpan "tests/examples/RealGHC.lhs" 9 1 9 60) " The above warning supression flag is a temporary kludge." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 10 1 10 72) " While working on this module you are encouraged to remove it and fix" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 11 1 11 35) " any warnings in the module. See" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 12 1 12 80) " http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 13 1 13 15) " for details" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 15 1 15 79) " | Functions for collecting together and applying rewrite rules to a module." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 16 1 16 57) " The 'CoreRule' datatype itself is declared elsewhere." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 18 5 18 18) " * RuleBase" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 21 5 21 23) " ** Constructing" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 25 5 25 37) " ** Checking rule applications" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 28 9 28 44) " ** Manipulating 'SpecInfo' rules" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 32 5 32 32) " * Misc. CoreRule helpers" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 38 1 38 27) " #include \"HsVersions.h\"" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 40 21 40 33) " All of it" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 106 1 106 69) " ^ Used to make 'CoreRule' for an 'Id' defined in the module being" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 107 1 107 41) " compiled. See also 'CoreSyn.CoreRule'" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 114 1 114 15) "------------" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 116 1 116 57) " ^ Find the \\\"top\\\" free names of several expressions." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 117 1 117 26) " Such names are either:" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 118 1 118 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 119 1 119 68) " 1. The function finally being applied to in an application chain" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 120 1 120 64) " (if that name is a GlobalId: see \"Var#globalvslocal\"), or" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 121 1 121 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 122 1 122 48) " 2. The 'TyCon' if the expression is a 'Type'" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 123 1 123 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 124 1 124 52) " This is used for the fast-match-check for rules;" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 125 1 125 49) " if the top names don't match, the rest can't" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 138 1 138 62) " ^ @ruleCantMatch tpl actual@ returns True only if @actual@" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 139 1 139 56) " definitely can't match @tpl@ by instantiating @tpl@." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 140 1 140 58) " It's only a one-way match; unlike instance matching we" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 141 1 141 31) " don't consider unification." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 142 1 142 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 143 1 143 21) " Notice that [_$_]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 144 1 144 48) " @ruleCantMatch [Nothing] [Just n2] = False@" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 145 1 145 70) " Reason: a template variable can be instantiated by a constant" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 146 1 146 9) " Also:" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 147 1 147 48) " @ruleCantMatch [Just n1] [Nothing] = False@" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 148 1 148 64) " Reason: a local variable @v@ in the actuals might [_$_]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 157 1 157 22) " (a) tidy the rules" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 158 1 158 51) " (b) sort them into order based on the rule name" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 159 1 159 51) " (c) suppress uniques (unless -dppr-debug is on)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 160 1 160 69) " This combination makes the output stable so we can use in testing" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 161 1 161 63) " It's here rather than in PprCore because it calls tidyRules" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 179 1 179 68) " | Make a 'SpecInfo' containing a number of 'CoreRule's, suitable" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 180 1 180 32) " for putting into an 'IdInfo'" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 199 1 199 83) " | Gather all the rules for locally bound identifiers from the supplied bindings" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 204 5 204 49) " The rules for an Id come from two places:" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 205 5 205 54) " (a) the ones it is born with (idCoreRules fn)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 206 5 206 60) " (b) rules added in subsequent modules (extra_rules)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 207 5 207 70) " PrimOps, for example, are born with a bunch of rules under (a)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 213 5 213 77) " Only PrimOpIds have rules inside themselves, and perhaps more besides" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 224 1 224 82) " | Gathers a collection of 'CoreRule's. Maps (the name of) an 'Id' to its rules" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 226 5 226 36) " The rules are are unordered;" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 227 5 227 42) " we sort out any overlaps on lookup" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 274 1 274 69) " | The main rule matching function. Attempts to apply all (active)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 275 1 275 64) " supplied rules to this instance of an application in a given" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 276 1 276 71) " context, returning the rule applied and the resulting expression if" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 277 1 277 15) " successful." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 282 1 282 42) " See Note [Extra args in rule matching]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 283 1 283 29) " See comments on matchRule" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 285 5 285 54) " pprTrace \"matchRules\" (ppr fn <+> ppr rules) $" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 296 24 296 72) " pprTrace \"match failed\" (ppr r $$ ppr args $$" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 297 20 297 137) " ppr [(arg_id, unfoldingTemplate unf) | Var arg_id <- args, let unf = idUnfolding arg_id, isCheapUnfolding unf] )" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 302 1 302 42) " All these pairs matched the expression" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 303 1 303 46) " Return the pair the the most specific rule" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 304 1 304 47) " The (fn,args) is just for overlap reporting" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 332 5 332 57) " Actually we should probably include the free vars" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 333 5 333 48) " of rule1's args, but I can't be bothered" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 336 29 336 55) " Nothing is black listed" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 342 1 342 52) " If (matchRule rule args) returns Just (name,rhs)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 343 1 343 57) " then (f args) matches the rule, and the corresponding" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 344 1 344 24) " rewritten RHS is rhs" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 345 1 345 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 346 1 346 44) " The bndrs and rhs is occurrence-analysed" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 347 1 347 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 348 1 348 12) " Example" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 349 1 349 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 350 1 350 12) " The rule" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 351 1 351 52) " forall f g x. map f (map g x) ==> map (f . g) x" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 352 1 352 13) " is stored" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 353 1 353 23) " CoreRule \"map/map\"" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 354 1 354 36) " [f,g,x] -- tpl_vars" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 355 1 355 40) " [f,map g x] -- tpl_args" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 356 1 356 35) " map (f.g) x) -- rhs" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 357 1 357 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 358 1 358 52) " Then the call: matchRule the_rule [e1,map e2 e3]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 359 1 359 51) " = Just (\"map/map\", (\\f,g,x -> rhs) e1 e2 e3)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 360 1 360 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 361 1 361 66) " Any 'surplus' arguments in the input are simply put on the end" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 362 1 362 18) " of the output." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 383 5 383 71) " We could do this when putting things into the rulebase, I guess" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 387 1 387 72) " For a given match template and context, find bindings to wrap around" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 388 1 388 80) " the entire result and what should be substituted for each template variable." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 389 1 389 84) " Fail if there are two few actual arguments from the target to match the template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 390 33 390 56) " ^ In-scope variables" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 391 21 391 55) " ^ Match template type variables" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 392 25 392 44) " ^ Match template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 393 25 393 78) " ^ Target; can have more elements than the template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 404 5 404 35) " See Note [Template binders]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 409 45 409 75) " Fail if too few actual args" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 448 1 448 55) " These two definitions are not the same as in Subst," , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 449 1 449 63) " but they simple and direct, and purely local to this module" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 450 1 450 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 451 1 451 66) " * The domain of the TvSubstEnv and IdSubstEnv are the template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 452 1 452 38) " variables passed into the match." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 453 1 453 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 454 1 454 71) " * The (OrdList CoreBind) in a SubstEnv are the bindings floated out" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 455 1 455 59) " from nested matches; see the Let case of match, below" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 456 1 456 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 464 1 464 57) " At one stage I tried to match even if there are more" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 465 1 465 34) " template args than real args." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 467 1 467 45) " I now think this is probably a bad idea." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 468 1 468 64) " Should the template (map f xs) match (map g)? I think not." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 469 1 469 55) " For a start, in general eta expansion wastes work." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 470 1 470 17) " SLPJ July 99" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 475 25 475 36) " Template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 476 25 476 34) " Target" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 479 1 479 55) " See the notes with Unify.match, which matches types" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 480 1 480 40) " Everything is very similar for terms" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 482 1 482 25) " Interesting examples:" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 483 1 483 21) " Consider matching" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 484 1 484 32) " \\x->f against \\f->f" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 485 1 485 70) " When we meet the lambdas we must remember to rename f to f' in the" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 486 1 486 44) " second expresion. The RnEnv2 does that." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 487 1 487 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 488 1 488 21) " Consider matching" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 489 1 489 39) " forall a. \\b->b against \\a->3" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 490 1 490 65) " We must rename the \\a. Otherwise when we meet the lambdas we" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 491 1 491 64) " might substitute [a/b] in the template, and then erroneously" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 492 1 492 76) " succeed in matching what looks like the template variable 'a' against 3." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 494 1 494 60) " The Var case follows closely what happens in Unify.match" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 501 5 501 37) " Note [Notes in RULE matching]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 502 5 502 37) " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 503 5 503 60) " Look through Notes. In particular, we don't want to" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 504 5 504 63) " be confused by InlineMe notes. Maybe we should be more" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 505 5 505 59) " careful about profiling notes, but for now I'm just" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 506 5 506 35) " riding roughshod over them." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 507 5 507 56) "- See Note [Notes in call patterns] in SpecConstr" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 509 1 509 66) " Here is another important rule: if the term being matched is a" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 510 1 510 61) " variable, we expand it so long as its unfolding is a WHNF" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 511 1 511 62) " (Its occurrence information is not necessarily up to date," , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 512 1 512 25) " so we don't use it.)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 519 5 519 53) " Notice that we look up v2 in the in-scope set" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 520 5 520 34) " See Note [Lookup in-scope]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 521 5 521 59) " Remember to apply any renaming first (hence rnOccR)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 523 1 523 24) " Note [Matching lets]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 524 1 524 24) " ~~~~~~~~~~~~~~~~~~~~" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 525 1 525 40) " Matching a let-expression. Consider" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 526 1 526 36) " RULE forall x. f (g x) = " , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 527 1 527 25) " and target expression" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 528 1 528 28) " f (let { w=R } in g E))" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 529 1 529 49) " Then we'd like the rule to match, to generate" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 530 1 530 33) " let { w=R } in (\\x. ) E" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 531 1 531 66) " In effect, we want to float the let-binding outward, to enable" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 532 1 532 67) " the match to happen. This is the WHOLE REASON for accumulating" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 533 1 533 28) " bindings in the SubstEnv" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 534 1 534 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 535 1 535 26) " We can only do this if" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 536 1 536 63) " (a) Widening the scope of w does not capture any variables" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 537 1 537 62) " We use a conservative test: w is not already in scope" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 538 1 538 53) " If not, we clone the binders, and substitute" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 539 1 539 65) " (b) The free variables of R are not bound by the part of the" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 540 1 540 56) " target expression outside the let binding; e.g." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 541 1 541 35) " f (\\v. let w = v+1 in g E)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 542 1 542 62) " Here we obviously cannot float the let-binding for w." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 543 1 543 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 544 1 544 70) " You may think rule (a) would never apply, because rule matching is" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 545 1 545 71) " mostly invoked from the simplifier, when we have just run substExpr" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 546 1 546 60) " over the argument, so there will be no shadowing anyway." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 547 1 547 65) " The fly in the ointment is that the forall'd variables of the" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 548 1 548 40) " RULE itself are considered in scope." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 549 1 549 3) "" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 550 1 550 67) " I though of various cheapo ways to solve this tiresome problem," , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 551 1 551 61) " but ended up doing the straightforward thing, which is to" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 552 1 552 63) " clone the binders if they are in scope. It's tiresome, and" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 553 1 553 63) " potentially inefficient, because of the calls to substExpr," , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 554 1 554 51) " but I don't think it'll happen much in pracice." , Comment True (SrcSpan "tests/examples/RealGHC.lhs" 556 1 569 69) " Cases to think about\n (let x=y+1 in \\x. (x,x))\n --> let x=y+1 in (\\x1. (x1,x1))\n (\\x. let x = y+1 in (x,x))\n --> let x1 = y+1 in (\\x. (x1,x1)\n (let x=y+1 in (x,x), let x=y-1 in (x,x))\n --> let x=y+1 in let x1=y-1 in ((x,x),(x1,x1))\n\nWatch out!\n (let x=y+1 in let z=x+1 in (z,z)\n --> matches (p,p) but watch out that the use of\n x on z's rhs is OK!\nI'm removing the cloning because that makes the above case\nfail, because the inner let looks as if it has locally-bound vars " , Comment True (SrcSpan "tests/examples/RealGHC.lhs" 586 1 595 3) "\n (rn_env', bndrs') = mapAccumL rnBndrR rn_env bndrs\n s_prs = [(bndr, Var bndr') | (bndr,bndr') <- zip bndrs bndrs', bndr /= bndr']\n subst = mkSubst (rnInScopeSet rn_env) emptyVarEnv (mkVarEnv s_prs)\n (bind', e2') | null s_prs = (bind, e2)\n | otherwise = (s_bind, substExpr subst e2)\n s_bind = case bind of\n NonRec {} -> NonRec (head bndrs') (head rhss)\n Rec {} -> Rec (bndrs' `zip` map (substExpr subst) rhss)\n" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 610 1 610 32) " This rule does eta expansion" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 611 1 611 38) " (\\x.M) ~ N iff M ~ N x" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 612 1 612 53) " It's important that this is *after* the let rule," , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 613 1 613 43) " so that (\\x.M) ~ (let y = e in \\y.N)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 614 1 614 60) " does the let thing, and then gets the lam/lam rule above" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 621 1 621 31) " Eta expansion the other way" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 622 1 622 39) " M ~ (\\y.N) iff M y ~ N" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 633 45 633 68) " Alts are both sorted" , Comment True (SrcSpan "tests/examples/RealGHC.lhs" 643 1 667 3) " REMOVING OLD CODE: I think that the above handling for let is\n better than the stuff here, which looks\n pretty suspicious to me. SLPJ Sept 06\n-- This is an interesting rule: we simply ignore lets in the\n-- term being matched against! The unfolding inside it is (by assumption)\n-- already inside any occurrences of the bound variables, so we'll expand\n-- them when we encounter them. This gives a chance of matching\n-- forall x,y. f (g (x,y))\n-- against\n-- f (let v = (a,b) in g v)\n\nmatch menv subst e1 (Let bind e2)\n = match (menv { me_env = rn_env' }) subst e1 e2\n where\n (rn_env', _bndrs') = mapAccumL rnBndrR (me_env menv) (bindersOf bind)\n -- It's important to do this renaming, so that the bndrs\n -- are brought into the local scope. For example:\n -- Matching\n -- forall f,x,xs. f (x:xs)\n -- against\n -- f (let y = e in (y:[]))\n -- We must not get success with x->y! So we record that y is\n -- locally bound (with rnBndrR), and proceed. The Var case\n -- will fail when trying to bind x->y\n" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 669 1 669 25) " Everything else fails" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 670 26 670 105) " pprTrace \"Failing at\" ((text \"e1:\" <+> ppr e1) $$ (text \"e2:\" <+> ppr e2)) $" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 673 1 673 43) "----------------------------------------" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 676 25 676 36) " Template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 677 29 677 38) " Target" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 683 21 683 44) " Occurs check failure" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 684 9 684 61) " e.g. match forall a. (\\x-> a x) against (\\y. y y)" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 686 21 686 68) " No renaming to do on e2, because no free var" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 687 17 687 54) " of e2 is in the rnEnvR of the envt" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 688 9 688 42) " Note [Matching variable types]" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 689 9 689 42) " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 690 9 690 52) " However, we must match the *types*; e.g." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 691 9 691 46) " forall (c::Char->Int) (x::Char)." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 692 9 692 35) " f (c x) = \"RULE FIRED\"" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 693 9 693 63) " We must only match on args that have the right type" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 694 9 694 79) " It's actually quite difficult to come up with an example that shows" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 695 9 695 80) " you need type matching, esp since matching is left-to-right, so type" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 696 9 696 77) " args get matched first. But it's possible (e.g. simplrun008) and" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 697 9 697 41) " this is the Right Thing to do" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 699 25 699 47) " c.f. match_ty below" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 708 17 708 83) " v1 is not a template variable; check for an exact match with e2" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 716 5 716 26) " If the template is" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 717 5 717 38) " forall x. f x (\\x -> x) = ..." , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 718 5 718 46) " Then the x inside the lambda isn't the" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 719 5 719 44) " template x, so we must rename first!" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 722 1 722 43) "----------------------------------------" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 725 25 725 36) " Template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 726 25 726 34) " Target" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 749 1 749 43) "----------------------------------------" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 752 25 752 36) " Template" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 753 25 753 34) " Target" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 811 1 811 67) " | Report partial matches for rules beginning with the specified" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 812 1 812 46) " string for the purposes of error reporting" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 813 45 813 70) " ^ Rule activation test" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 814 49 814 66) " ^ Rule pattern" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 815 49 815 71) " ^ Database of rules" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 816 49 816 74) " ^ Bindings to check in" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 817 49 817 77) " ^ Resulting check message" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 837 4 837 61) " The Bag returned has one SDoc for each call site found" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 860 1 860 57) " Produce a report for all rules matching the predicate" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 861 1 861 57) " saying why it doesn't match the specified application" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 872 9 872 70) " The rules match the pattern, so we want to print something" , Comment False (SrcSpan "tests/examples/RealGHC.lhs" 906 45 906 72) " Includes template tyvars" ] ) haskell-src-exts-1.23.1/tests/examples/TupleSections.hs.exactprinter.golden0000644000000000000000000000000613534314633025251 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PackageImports.hs.exactprinter.golden0000644000000000000000000000000613534314633025361 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NoStartNumIdents.hs.exactprinter.golden0000644000000000000000000000013213551227111025662 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NoStartNumIdents.hs" 2 1) "Parse error in pattern: 1" haskell-src-exts-1.23.1/tests/examples/TabWhitespace.hs.exactprinter.golden0000644000000000000000000000001713534314633025175 0ustar0000000000000000 -- hi haskell-src-exts-1.23.1/tests/examples/EmptyAnn.hs.exactprinter.golden0000644000000000000000000000000613534314633024203 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordWildcard.hs.exactprinter.golden0000644000000000000000000000011513534314633025341 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcard.hs" 3 9) "Parse error: ," haskell-src-exts-1.23.1/tests/examples/RecordPatternSynonyms.hs.exactprinter.golden0000644000000000000000000000000613534314633027004 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingVia2.hs.exactprinter.golden0000644000000000000000000000207613534314632024751 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} module DerivingVia2 where import Control.Applicative import Data.Functor.Compose import Data.Proxy import Data.Semigroup newtype App (f :: * -> *) a = App (f a) deriving newtype (Functor, Applicative) instance (Applicative f, Semigroup a) => Semigroup (App f a) where (<>) = liftA2 (<>) deriving via( App (Compose (f :: * -> *) g) a) instance (Applicative f, Applicative g, Semigroup a) => Semigroup (Compose f g a) class C (a :: k -> *) instance C Proxy newtype MyProxy a = MyProxy (Proxy a) deriving via( Proxy :: * -> *) instance C MyProxy class Z a b data T a data X1 a data X2 a data X3 a deriving via( forall a. T a) instance Z a (X1 b) deriving via( T a) instance forall b. Z a (X2 b) deriving via( forall a. T a) instance forall b. Z a (X3 b) haskell-src-exts-1.23.1/tests/examples/ForallInInstance.hs.exactprinter.golden0000644000000000000000000000000613534314633025643 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CxtWhitespace.hs.exactprinter.golden0000644000000000000000000000000613534314632025222 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HaddockComments.hs.exactprinter.golden0000644000000000000000000000000613534314633025513 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteSplice.hs.exactprinter.golden0000644000000000000000000000000613534314633025710 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordPuns.hs.exactprinter.golden0000644000000000000000000000000613534314633024534 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecursiveDo.hs.exactprinter.golden0000644000000000000000000000000613534314633024702 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Vta1.hs.exactprinter.golden0000644000000000000000000000000613534314633023263 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FamilyKindSig.hs.exactprinter.golden0000644000000000000000000000000613534314633025142 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteLines.hs.exactprinter.golden0000644000000000000000000000000613534314633025543 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixParser.hs.exactprinter.golden0000644000000000000000000000000613534314633024702 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CStyleLinePragmas.hs.exactprinter.golden0000644000000000000000000000012013534314632025772 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/CStyleLinePragmas.hs" 1 1) "Parse error: #" haskell-src-exts-1.23.1/tests/examples/DoubleHashOp.hs.exactprinter.golden0000644000000000000000000000000613534314633024765 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParallelListComp.hs.exactprinter.golden0000644000000000000000000000000613534314633025657 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSyntax.hs.exactprinter.golden0000644000000000000000000000035513534314633025254 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax, ExplicitForAll #-} module UnicodeSyntax where import System.Environment (getArgs) main ::IO () main = do as <-getArgs print $ test 0 test ::Int ->Bool test x = x*5 == x+8 id1 ::foralla.a->a id1 x = x haskell-src-exts-1.23.1/tests/examples/ForeignImportJavascript.hs.exactprinter.golden0000644000000000000000000000000613534314633027263 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtDeriving.hs.exactprinter.golden0000644000000000000000000000000613534314633025017 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/WildcardTyFam.hs.exactprinter.golden0000644000000000000000000000000613534314633025142 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere3.hs.exactprinter.golden0000644000000000000000000000000613534314633025277 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BlockArguments.hs.exactprinter.golden0000644000000000000000000000000613603723515025370 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyContext.hs.exactprinter.golden0000644000000000000000000000000613534314633025113 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Vta2.hs.exactprinter.golden0000644000000000000000000000000613534314633023264 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/OverloadedLabels.hs.exactprinter.golden0000644000000000000000000000000613534314633025657 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedWhere.hs.exactprinter.golden0000644000000000000000000000000613534314633025175 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSuperscript.hs.exactprinter.golden0000644000000000000000000000021013534314633026277 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} dumy ::Double ->Double ->Double dumy a b = let a² = a  a b² = b  b in sqrt $ a² + b² haskell-src-exts-1.23.1/tests/examples/FFIExtensions.hs.exactprinter.golden0000644000000000000000000000000613534314633025134 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExtraEndBrace.hs.exactprinter.golden0000644000000000000000000000011313534314633025116 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ExtraEndBrace.hs" 3 20) "Unexpected }" haskell-src-exts-1.23.1/tests/examples/ForeignImport.hs.exactprinter.golden0000644000000000000000000000000613534314633025234 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SpecializePhaseControl.hs.exactprinter.golden0000644000000000000000000000000613534314633027062 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InjectiveTypeFamilies.hs.exactprinter.golden0000644000000000000000000000000613534314633026704 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtRecordFields.hs.exactprinter.golden0000644000000000000000000000000613534314633025615 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonyms.hs.exactprinter.golden0000644000000000000000000000000613534314633025645 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unpack.hs.exactprinter.golden0000644000000000000000000000000613534314633023671 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonyms2.hs.exactprinter.golden0000644000000000000000000000000613534314633025727 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unicode.hs.exactprinter.golden0000644000000000000000000000477713534314633024061 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where import System.Environment main :: IO () main = do as <-getArgs print $ as print $ test 0 print $ test2 0 print $ testRewrite 0 print $ testRewriteReverse 0 print $ testRewrite2 0 print $ testRewriteReverse2 0 test :: a ->Bool test x = pi where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 test2 :: a ->(Bool,Bool) test2 x = (pf,pi) where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 testRewrite :: a ->Bool testRewrite x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = lf > 300 pi = li > 300 testRewriteReverse :: a ->Bool testRewriteReverse x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 300 d lf pi = 300 d li testRewrite2 :: a ->(Bool,Bool) testRewrite2 x = (length i > 300,300 > length i) where -- f = replicate 2000 x i = repeat x -- lf = length f -- li = length i -- pf = lf > 300 -- pi = li > 300 testRewriteReverse2 :: a ->(Bool,Bool) testRewriteReverse2 x = (2000 < length i,length i > 20) where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 2000 == lf pi = lf e li lengthOP :: (Num a, Ord a) =>Bool ->(a ->a ->Bool) ->[b] ->a ->Bool lengthOP v (œ) [] n = 0 œ n lengthOP v (œ) xxs n = co xxs 0 where co (_:xs) c | n > c = co xs (c+1) | otherwise = v co [] c = c œ n (c) = (==) (d) = (<=) (e) = (>=) (|c) = lengthOP False (c) (|<) = lengthOP False (<) (|d) = lengthOP False (d) (|>) = lengthOP True (>) (|e) = lengthOP True (e) (|=) = lengthOP False (==) (|==) = lengthOP False (==) (|<=) = lengthOP False (<=) (|>=) = lengthOP False (>=) -- cde (c|) = flip (|c) (<|) = flip (|e) (d|) = flip (|>) (>|) = flip (|d) (e|) = flip (|<) {-# RULES -- length "xs |\8803 n"forallxsn. (length xs) == n = xs |c n "xs |< n" forall xs n. (length xs) < n = xs |< n "xs |\8804 n"forallxsn. (length xs) <= n = xs |d n "xs |> n" forall xs n. (length xs) > n = xs |> n "xs |\8805 n"forallxsn. (length xs) >= n = xs |e n "n \8803| xs"forallxsn. n == (length xs) = xs |c n "n <| xs" forall xs n. n < (length xs) = xs |e n "n \8804| xs"forallxsn. n <= (length xs) = xs |> n "n >| xs" forall xs n. n > (length xs) = xs |d n "n \8805| xs"forallxsn. n >= (length xs) = xs |< n #-} haskell-src-exts-1.23.1/tests/examples/AtOperator.hs.exactprinter.golden0000644000000000000000000000000613534314632024527 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingParen.hs.exactprinter.golden0000644000000000000000000000000613534314632025204 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/StarInType.hs.exactprinter.golden0000644000000000000000000000015213534314633024514 0ustar0000000000000000{-# LANGUAGE TypeOperators, KindSignatures #-} data B = B data a * b = Foo type A = B * B main = print 1 haskell-src-exts-1.23.1/tests/examples/HashOperator.hs.exactprinter.golden0000644000000000000000000000000613534314633025047 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ClassContext.hs.exactprinter.golden0000644000000000000000000000000613534314632025061 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataKinds.hs.exactprinter.golden0000644000000000000000000000000613534314632024311 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds3.hs.exactprinter.golden0000644000000000000000000000000613534314632025647 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/t412.hs.exactprinter.golden0000644000000000000000000000000613534314633023142 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Rules.hs.exactprinter.golden0000644000000000000000000000000613534314633023542 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParallelArrays.hs.exactprinter.golden0000644000000000000000000000000613534314633025366 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixFunBind.hs.exactprinter.golden0000644000000000000000000000000613534314633024773 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds2.hs.exactprinter.golden0000644000000000000000000000000613534314632025646 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnindentedPragmaClose.hs.exactprinter.golden0000644000000000000000000000000613534314633026663 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FixityTests.hs.exactprinter.golden0000644000000000000000000000000613534314633024747 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/T13050.hs.exactprinter.golden0000644000000000000000000000000613534314633023244 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Directory.hs.exactprinter.golden0000644000000000000000000000000613534314632024413 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Bundles.hs.exactprinter.golden0000644000000000000000000000000613534314632024043 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyList.hs.exactprinter.golden0000644000000000000000000000000613534314633024402 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Testing.hs.exactprinter.golden0000644000000000000000000000000613534314633024065 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DsStrictData.hs.exactprinter.golden0000644000000000000000000000000613534314633025001 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonyms3.hs.exactprinter.golden0000644000000000000000000000000613534314633025730 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiCtxt.hs.exactprinter.golden0000644000000000000000000000000613534314633024405 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TemplateHaskellQuotedNames.hs.exactprinter.golden0000644000000000000000000000000613534314633027675 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TyQuasiQuote.hs.exactprinter.golden0000644000000000000000000000000613534314633025065 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/completesig01.hs.exactprinter.golden0000644000000000000000000000000613534314633025124 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixBang.hs.exactprinter.golden0000644000000000000000000000000613534314633024315 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiLinePragma.hs.exactprinter.golden0000644000000000000000000000000613534314633025502 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonymImport.hs.exactprinter.golden0000644000000000000000000000000613534314633026655 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyFunDepPremise.hs.exactprinter.golden0000644000000000000000000000000613534314633026175 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTypes.hs.exactprinter.golden0000644000000000000000000000000613534314633024010 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedRecordfieldPuns.hs.exactprinter.golden0000644000000000000000000000000613534314633027364 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere.hs.exactprinter.golden0000644000000000000000000000000613534314633025214 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeFunctions.hs.exactprinter.golden0000644000000000000000000000000613534314633025262 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/WhereBlock.hs.exactprinter.golden0000644000000000000000000000000613534314633024475 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ImplicitWhereBlocks.hs.exactprinter.golden0000644000000000000000000000000613534314633026353 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere2.hs.exactprinter.golden0000644000000000000000000000000613534314633025276 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyInstance.hs.exactprinter.golden0000644000000000000000000000000613534314633025233 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeRelation.hs.exactprinter.golden0000644000000000000000000000057413534314633025546 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} import Prelude.Unicode testAnd ::Int ->Int ->Bool testAnd a b = let b = a d 3 b‚ = b e 5 in b ' b‚ testOr ::Int ->Int ->Int ->Int ->Int ->Bool testOr a b c d e = let b = a d 3 b‚ = b b 5 bƒ = c n 5 b„ = d o 6 b… = e  [1,2,3,4] b† = e [5,6,7,8] in b ( b‚ ( bƒ ( b„ ( b… ( b† haskell-src-exts-1.23.1/tests/examples/MultiParam.hs.exactprinter.golden0000644000000000000000000000000613534314633024523 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeOperatorAsVariable.hs.exactprinter.golden0000644000000000000000000000000613534314633027037 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BangViewPat.hs.exactprinter.golden0000644000000000000000000000000613534314632024616 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RoleAnnotations2.hs.exactprinter.golden0000644000000000000000000000000613534314633025651 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingStrategies.hs.exactprinter.golden0000644000000000000000000000000613534314632026251 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InlineConlike.hs.exactprinter.golden0000644000000000000000000000000613534314633025173 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ReadP.hs.exactprinter.golden0000644000000000000000000000000613534314633023443 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PolyKinds.hs.exactprinter.golden0000644000000000000000000000000613534314633024364 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataHeadParen.hs.exactprinter.golden0000644000000000000000000000000613534314632025070 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ViewPatterns.hs.exactprinter.golden0000644000000000000000000000000613534314633025103 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RelaxedDo.hs.exactprinter.golden0000644000000000000000000000000613534314633024317 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ContextOrdering.hs.exactprinter.golden0000644000000000000000000000000613534314632025565 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NonDecreasing.hs.exactprinter.golden0000644000000000000000000000017513534314633025176 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NonDecreasing.hs" 8 3) "Parse error: Last statement in a do-block must be an expression" haskell-src-exts-1.23.1/tests/examples/Nounpack2.hs.exactprinter.golden0000644000000000000000000000000613534314633024310 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeEqualityParen.hs.exactprinter.golden0000644000000000000000000000000613534314633026075 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PackageImportsMissing.hs.exactprinter.golden0000644000000000000000000000030513534314633026715 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/PackageImportsMissing.hs" 3 17) "PackageImports language extension is not enabled. Please add {-# LANGUAGE PackageImports #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/RecordWildcardError.hs.exactprinter.golden0000644000000000000000000000030513534314633026354 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcardError.hs" 1 12) "RecordWildCards language extension is not enabled. Please add {-# LANGUAGE RecordWildCards #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/HexPrec.hs.exactprinter.golden0000644000000000000000000000011413534314633024006 0ustar0000000000000000module HexPrec where (%%) :: Int -> Int -> Int a %% b = 0 infixl 2 %% haskell-src-exts-1.23.1/tests/examples/ArityMismatch.hs.exactprinter.golden0000644000000000000000000000012613534314632025230 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ArityMismatch.hs" 3 1) "arity mismatch for 'foo'" haskell-src-exts-1.23.1/tests/examples/Completesig03A.hs.exactprinter.golden0000644000000000000000000000000613534314632025166 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SpecializeInstance.hs.exactprinter.golden0000644000000000000000000000032113534314633026225 0ustar0000000000000000instance Sized a => Sized (Digit a) where {-# SPECIALISE instance Sized (Digit (Elem a)) #-} {-# SPECIALISE instance Sized (Digit (Node a)) #-} size xs = foldl (\ i x -> i + size x) 0 xs haskell-src-exts-1.23.1/tests/examples/AtSign.hs.exactprinter.golden0000644000000000000000000000000613534314632023634 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTSplices.hs.exactprinter.golden0000644000000000000000000000000613534314633024432 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports2.hs.exactprinter.golden0000644000000000000000000000000613534314633024766 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Overlapable.hs.exactprinter.golden0000644000000000000000000000000613534314633024704 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unicode2.hs.exactprinter.golden0000644000000000000000000000000613534314633024120 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RegularPatterns.hs.exactprinter.golden0000644000000000000000000000000613534314633025572 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces2.hs.exactprinter.golden0000644000000000000000000000000613534314633026313 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BracketInstanceHead.hs.exactprinter.golden0000644000000000000000000000000613534314632026271 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory.hs.exactprinter.golden0000644000000000000000000000000613534314633024347 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonymSignatures.hs.exactprinter.golden0000644000000000000000000000000613534314633027527 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyCase.hs.exactprinter.golden0000644000000000000000000000000613534314633024342 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice4.hs.exactprinter.golden0000644000000000000000000000000613534314633024270 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsBad.hs.exactprinter.golden0000644000000000000000000000013013534314632026000 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BinaryLiteralsBad.hs" 3 1) "arity mismatch for 'f'" haskell-src-exts-1.23.1/tests/examples/MinimalPragma.hs.exactprinter.golden0000644000000000000000000000000613534314633025166 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingViaStealing.hs.exactprinter.golden0000644000000000000000000000000613534314632026345 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSplice.hs.exactprinter.golden0000644000000000000000000000000613534314633025225 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuantifiedConstraints.hs.exactprinter.golden0000644000000000000000000000000613556712523026775 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteOld.hs.exactprinter.golden0000644000000000000000000000020513534314633025210 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import Here str :: String str = [here|test test test test |] main :: IO() main = do putStrLn str haskell-src-exts-1.23.1/tests/examples/InfixTypeMinus.hs.exactprinter.golden0000644000000000000000000000000613534314633025403 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeListCons.hs.exactprinter.golden0000644000000000000000000000000613534314633025050 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NestedAsPat.hs.exactprinter.golden0000644000000000000000000000000613534314633024623 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FlexibleContextsWithoutVars.hs.exactprinter.golden0000644000000000000000000000000613534314633030152 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory3.hs.exactprinter.golden0000644000000000000000000000000613534314633024432 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GADTRecord2.hs.exactprinter.golden0000644000000000000000000000000613534314633024410 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixApp.hs.exactprinter.golden0000644000000000000000000000000613534314633024166 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedWhereBlock.hs.exactprinter.golden0000644000000000000000000000013113534314633026147 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedWhereBlock.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/SimpleDeriving.hs.exactprinter.golden0000644000000000000000000000000613534314633025371 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EqualityConstraints1.hs.exactprinter.golden0000644000000000000000000000000613534314633026556 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteQual2.hs.exactprinter.golden0000644000000000000000000000000613534314633025455 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyWhere.hs.exactprinter.golden0000644000000000000000000000000613534314633024541 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice3.hs.exactprinter.golden0000644000000000000000000000000613534314633024267 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NegPrimWordLiteral.hs.exactprinter.golden0000644000000000000000000000021013534314633026157 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NegPrimWordLiteral.hs" 3 1) "Parse error: negative primitive word literal: - 9223372036854775808##" haskell-src-exts-1.23.1/tests/examples/BadStringLineBreak.hs.exactprinter.golden0000644000000000000000000000014013534314632026100 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BadStringLineBreak.hs" 3 27) "Improperly terminated string" haskell-src-exts-1.23.1/tests/examples/ArrowBrackets.hs.exactprinter.golden0000644000000000000000000000000613603723515025221 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstructorAndClassOperators.hs.exactprinter.golden0000644000000000000000000000016113534314632030306 0ustar0000000000000000{-# LANGUAGE TypeOperators, MultiParamTypeClasses #-} ins :: (:=>) b h => b :- h data :><: a b = :><: a b haskell-src-exts-1.23.1/tests/examples/EqualityConstraints2.hs.exactprinter.golden0000644000000000000000000000040313534314633026560 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/EqualityConstraints2.hs" 1 19) "At least one of TypeFamilies or GADTs language extensions needs to be enabled. Please add: {-# LANGUAGE TypeFamilies #-} or {-# LANGUAGE GADTs #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsGood.hs.exactprinter.golden0000644000000000000000000000000613534314632026204 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Fixity3.hs.exactprinter.golden0000644000000000000000000000000613534314633024007 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NPlusK.hs.exactprinter.golden0000644000000000000000000000000613534314633023624 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IfThenElseLayout.hs.exactprinter.golden0000644000000000000000000000000613534314633025634 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/brackets.hs.exactprinter.golden0000644000000000000000000000011513534314633024247 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/brackets.hs" 17 3) "Parse error: \10631" haskell-src-exts-1.23.1/tests/examples/SCCPragmas.hs.exactprinter.golden0000644000000000000000000000000613534314633024373 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SingleClassAsst.hs.exactprinter.golden0000644000000000000000000000000613534314633025512 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LanguagePragma.hs.exactprinter.golden0000644000000000000000000000000613534314633025323 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordInfixSelector.hs.exactprinter.golden0000644000000000000000000000000613534314633026365 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedQQuote.hs.exactprinter.golden0000644000000000000000000000000613534314633025512 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeErrorMessage.hs.exactprinter.golden0000644000000000000000000000042213534314633025712 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/TypeErrorMessage.hs" 2 1) "At least one of ExplicitForAll or TypeOperators language extensions needs to be enabled. Please add: {-# LANGUAGE ExplicitForAll #-} or {-# LANGUAGE TypeOperators #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/Lib.hs.exactprinter.golden0000644000000000000000000000000613534314633023156 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Ppr048.hs.exactprinter.golden0000644000000000000000000000010713534314633023447 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/Ppr048.hs" 3 9) "Parse error: foo" haskell-src-exts-1.23.1/tests/examples/TensorTests.hs.exactprinter.golden0000644000000000000000000000000613534314633024745 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ArrowLayout.hs.exactprinter.golden0000644000000000000000000000000613534314632024737 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParallelArrays2.hs.exactprinter.golden0000644000000000000000000000011713534314633025453 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ParallelArrays2.hs" 2 17) "Parse error: :" haskell-src-exts-1.23.1/tests/examples/QuasiQuoteToplevel.hs.exactprinter.golden0000644000000000000000000000031313534314633026264 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} [undefined| this quasiquote is acceptable to ghc's parser. Previously hse would reject this because -XTemplateHaskell is not enabled to allow "expressions" at top-level|] haskell-src-exts-1.23.1/tests/examples/TypeInstances.hs.exactprinter.golden0000644000000000000000000000000613534314633025241 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QQType.hs.exactprinter.golden0000644000000000000000000000000613534314633023633 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GhcDeriving.hs.exactprinter.golden0000644000000000000000000000000613534314633024641 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces1.hs.exactprinter.golden0000644000000000000000000000000613534314633026312 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports1.hs.exactprinter.golden0000644000000000000000000000000613534314633024765 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataKinds2.hs.exactprinter.golden0000644000000000000000000000000613534314632024373 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LineOptionsPragma.hs.exactprinter.golden0000644000000000000000000000000613534314633026043 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeArrow.hs.exactprinter.golden0000644000000000000000000000025613534314633025060 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} arrowTest ::String -> String arrowTest input = case input of "hello" ->"world" "world" ->"hello" otherwise ->"unknow" haskell-src-exts-1.23.1/tests/examples/GADTRecord.hs.exactprinter.golden0000644000000000000000000000000613534314633024326 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatSynFix.hs.exactprinter.golden0000644000000000000000000000000613534314633024335 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParenFunBind.hs.exactprinter.golden0000644000000000000000000000000613534314633024763 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HappyDoAction.hs.exactprinter.golden0000644000000000000000000000000613534314633025152 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Attributes.hs.exactprinter.golden0000644000000000000000000000000613534314632024575 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/List2.hs.exactprinter.golden0000644000000000000000000000177613534314633023464 0ustar0000000000000000{-# LANGUAGE TypeFamilyDependencies #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} {-# LANGUAGE UndecidableInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE GADTs #-} ----------------------------------------------------------------------------- -- | -- Module : Type.Family.List -- Copyright : Copyright (C) 2015 Kyle Carter -- License : BSD3 -- -- Maintainer : Kyle Carter -- Stability : experimental -- Portability : RankNTypes -- -- Convenient aliases and type families for working with -- type-level lists. ---------------------------------------------------------------------------- module Type.Family.List where type Ø = '[] type :< = ': infixr 5 :< haskell-src-exts-1.23.1/tests/examples/AmbiguousFixities.hs.exactprinter.golden0000644000000000000000000000007713665335376026134 0ustar0000000000000000ParseFailed (SrcLoc "" (-1) (-1)) "Ambiguous infix expression" haskell-src-exts-1.23.1/tests/examples/PartialSignatures.hs.exactprinter.golden0000644000000000000000000000000613534314633026111 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeIdents.hs.exactprinter.golden0000644000000000000000000000000613551220663025203 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ScopedTypeVariables.hs.exactprinter.golden0000644000000000000000000000000613534314633026360 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NegativePatterns.hs.exactprinter.golden0000644000000000000000000000000613534314633025733 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedTopLevelWhere.hs.exactprinter.golden0000644000000000000000000000013413534314633026652 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedTopLevelWhere.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/ClassInstType.hs.exactprinter.golden0000644000000000000000000000000613534314632025214 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InstanceSigs.hs.exactprinter.golden0000644000000000000000000000000613534314633025042 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedModule2.hs.exactprinter.golden0000644000000000000000000000000613534314633025432 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeOperatorsTest.hs.exactprinter.golden0000644000000000000000000000000613534314633026130 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiWayIf.hs.exactprinter.golden0000644000000000000000000000000613534314633024502 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PrimitiveIntHexLiteral.hs.exactprinter.golden0000644000000000000000000000000613534314633027055 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FamilyVarid.hs.exactprinter.golden0000644000000000000000000000000613534314633024657 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IllDataTypeDecl.hs.exactprinter.golden0000644000000000000000000000000613534314633025414 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FFIInterruptible.hs.exactprinter.golden0000644000000000000000000000000613534314633025625 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DoRec.hs.exactprinter.golden0000644000000000000000000000000613534314633023444 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds.hs.exactprinter.golden0000644000000000000000000000000613534314632025564 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnboxedSingleton.hs.exactprinter.golden0000644000000000000000000000000613534314633025737 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/OptionsPragma.hs.exactprinter.golden0000644000000000000000000000000613534314633025233 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HaskellParser.hs.exactprinter.golden0000644000000000000000000000000613534314633025210 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Fixity2.hs.exactprinter.golden0000644000000000000000000000000613534314633024006 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MagicHashUnboxedTuples.hs.exactprinter.golden0000644000000000000000000000000613534314633027016 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtStrictness.hs.exactprinter.golden0000644000000000000000000000000613534314633025411 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Bug.hs.exactprinter.golden0000644000000000000000000000000613534314632023164 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GroupKeyword.hs.exactprinter.golden0000644000000000000000000000000613534314633025111 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice2.hs.exactprinter.golden0000644000000000000000000000000613534314633024266 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DeriveGeneric.hs.exactprinter.golden0000644000000000000000000000000613534314632025162 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BangPatterns.hs.exactprinter.golden0000644000000000000000000000000613534314632025037 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DefaultSignatures.hs.exactprinter.golden0000644000000000000000000000000613534314632026100 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTypedSplices.hs.exactprinter.golden0000644000000000000000000000017313546001445025316 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} import Language.Haskell.TH import THTypedSplices.Defs main = $$justTH ($$([|| 2 ||])) haskell-src-exts-1.23.1/tests/examples/ClassDeclSrcSpan.hs.exactprinter.golden0000644000000000000000000000000613534314632025576 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedDot.hs.exactprinter.golden0000644000000000000000000000000613534314633025022 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RoleAnnotations.hs.exactprinter.golden0000644000000000000000000000000613534314633025567 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory2.hs.exactprinter.golden0000644000000000000000000000000613534314633024431 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSubscript.hs.exactprinter.golden0000644000000000000000000000045213534314633025742 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where data Point = Point { pointX, pointY ::Double , name ::String } deriving (Show) distance ::Point ->Point ->Double distance x y = let t = (pointX x - pointX y)^2 t‚ = (pointY x - pointY y)^2 in sqrt $ t + t‚ haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces4.hs.exactprinter.golden0000644000000000000000000000016213534314633026320 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} {-# LANGUAGE TypeOperators #-} module Foo (type (:-)) where data :- = Foo haskell-src-exts-1.23.1/tests/examples/PolyKindSigs.hs.exactprinter.golden0000644000000000000000000000000613534314633025027 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingVia.hs.exactprinter.golden0000644000000000000000000002766313534314632024700 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE InstanceSigs #-} {-# LANGUAGE TypeInType #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE TypeApplications #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE MultiWayIf #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE UndecidableInstances #-} module DerivingVia where import Data.Void import Data.Complex import Data.Functor.Const import Data.Functor.Identity import Data.Ratio import Control.Monad.Reader import Control.Monad.State import Control.Monad.Writer import Control.Applicative hiding (WrappedMonad(..)) import Data.Bifunctor import Data.Monoid import Data.Kind type f ~> g = forall xx. f xx -> g xx ----- -- Simple example ----- data Foo a = MkFoo a a deriving via( Identity (Foo a))Show ----- -- Eta reduction at work ----- newtype Flip p a b = Flip { runFlip :: p b a } instance Bifunctor p => Bifunctor (Flip p) where bimap f g = Flip . bimap g f . runFlip instance Bifunctor p => Functor (Flip p a) where fmap f = Flip . first f . runFlip newtype Bar a = MkBar (Either a Int) deriving via( Flip Either Int)Functor ----- -- Monad transformers ----- type MTrans = (Type -> Type) -> (Type -> Type) -- From `constraints' data Dict c where Dict :: c => Dict c newtype a :- b = Sub (a => Dict b) infixl 1 \\ (\\) :: a => (b => r) -> (a :- b) -> r r \\ Sub Dict = r -- With `-XQuantifiedConstraints' this just becomes -- -- type Lifting cls trans = forall mm. cls mm => cls (trans mm) -- -- type LiftingMonad trans = Lifting Monad trans -- class LiftingMonad (trans :: MTrans) where proof :: Monad m :- Monad (trans m) instance LiftingMonad (StateT s :: MTrans) where proof :: Monad m :- Monad (StateT s m) proof = Sub Dict instance Monoid w => LiftingMonad (WriterT w :: MTrans) where proof :: Monad m :- Monad (WriterT w m) proof = Sub Dict instance (LiftingMonad trans, LiftingMonad trans') => LiftingMonad (ComposeT trans trans' :: MTrans) where proof :: forall m. Monad m :- Monad (ComposeT trans trans' m) proof = Sub (Dict \\ proof @trans @(trans' m) \\ proof @trans' @m) newtype Stack :: MTrans where Stack :: ReaderT Int (StateT Bool (WriterT String m)) a -> Stack m a deriving newtype ( Functor , Applicative , Monad , MonadReader Int , MonadState Bool , MonadWriter String ) deriving via( ReaderT Int `ComposeT` StateT Bool `ComposeT` WriterT String)(MonadTrans,MFunctor) class MFunctor (trans :: MTrans) where hoist :: Monad m => (m ~> m') -> (trans m ~> trans m') instance MFunctor (ReaderT r :: MTrans) where hoist :: Monad m => (m ~> m') -> (ReaderT r m ~> ReaderT r m') hoist nat = ReaderT . fmap nat . runReaderT instance MFunctor (StateT s :: MTrans) where hoist :: Monad m => (m ~> m') -> (StateT s m ~> StateT s m') hoist nat = StateT . fmap nat . runStateT instance MFunctor (WriterT w :: MTrans) where hoist :: Monad m => (m ~> m') -> (WriterT w m ~> WriterT w m') hoist nat = WriterT . nat . runWriterT infixr 9 `ComposeT` newtype ComposeT :: MTrans -> MTrans -> MTrans where ComposeT :: { getComposeT :: f (g m) a } -> ComposeT f g m a deriving newtype (Functor, Applicative, Monad) instance (MonadTrans f, MonadTrans g, LiftingMonad g) => MonadTrans (ComposeT f g) where lift :: forall m. Monad m => m ~> ComposeT f g m lift = ComposeT . lift . lift \\ proof @g @m instance (MFunctor f, MFunctor g, LiftingMonad g) => MFunctor (ComposeT f g) where hoist :: forall m m'. Monad m => (m ~> m') -> (ComposeT f g m ~> ComposeT f g m') hoist f = ComposeT . hoist (hoist f) . getComposeT \\ proof @g @m ----- -- Using tuples in a `via` type ----- newtype X a = X (a, a) deriving via (Product a, Sum a)(Semigroup,Monoid) deriving via (a, a)(Show,Eq) ----- -- Abstract data types ----- class C f where c :: f a -> Int newtype X2 f a = X2 (f a) instance C (X2 f) where c = const 0 deriving via( X2 IO) instance C IO ---- -- Testing parser ---- newtype P0 a = P0 a deriving viaaShow newtype P1 a = P1 [a] deriving via[ a]Show newtype P2 a = P2 (a, a) deriving via (a, a)Show newtype P3 a = P3 (Maybe a) deriving via( First a)Show newtype P4 a = P4 (Maybe a) deriving via( First $ a)Show newtype P5 a = P5 a deriving via( Identity $ a)Show newtype P6 a = P6 [a] deriving via( [] $ a)Show newtype P7 a = P7 (a, a) deriving via( Identity $ (a, a))Show newtype P8 a = P8 (Either () a) deriving via( ($) (Either ()))Functor newtype f $ a = APP (f a) deriving newtype Show deriving newtype Functor ---- -- From Baldur's notes ---- ---- -- 1 ---- newtype WrapApplicative f a = WrappedApplicative (f a) deriving (Functor, Applicative) instance (Applicative f, Num a) => Num (WrapApplicative f a) where (+) = liftA2 (+) (*) = liftA2 (*) negate = fmap negate fromInteger = pure . fromInteger abs = fmap abs signum = fmap signum instance (Applicative f, Fractional a) => Fractional (WrapApplicative f a) where recip = fmap recip fromRational = pure . fromRational instance (Applicative f, Floating a) => Floating (WrapApplicative f a) where pi = pure pi sqrt = fmap sqrt exp = fmap exp log = fmap log sin = fmap sin cos = fmap cos asin = fmap asin atan = fmap atan acos = fmap acos sinh = fmap sinh cosh = fmap cosh asinh = fmap asinh atanh = fmap atanh acosh = fmap acosh instance (Applicative f, Semigroup s) => Semigroup (WrapApplicative f s) where (<>) = liftA2 (<>) instance (Applicative f, Monoid m) => Monoid (WrapApplicative f m) where mempty = pure mempty ---- -- 2 ---- class Pointed p where pointed :: a -> p a newtype WrapMonad f a = WrappedMonad (f a) deriving newtype (Pointed, Monad) instance (Monad m, Pointed m) => Functor (WrapMonad m) where fmap = liftM instance (Monad m, Pointed m) => Applicative (WrapMonad m) where pure = pointed (<*>) = ap -- data data Sorted a = Sorted a a a deriving via( WrapMonad Sorted)(Functor,Applicative) deriving via( WrapApplicative Sorted a)(Num,Fractional,Floating,Semigroup,Monoid) instance Monad Sorted where (>>=) :: Sorted a -> (a -> Sorted b) -> Sorted b Sorted a b c >>= f = Sorted a' b' c' where Sorted a' _ _ = f a Sorted _ b' _ = f b Sorted _ _ c' = f c instance Pointed Sorted where pointed :: a -> Sorted a pointed a = Sorted a a a ---- -- 3 ---- class IsZero a where isZero :: a -> Bool newtype WrappedNumEq a = WrappedNumEq a newtype WrappedShow a = WrappedShow a newtype WrappedNumEq2 a = WrappedNumEq2 a instance (Num a, Eq a) => IsZero (WrappedNumEq a) where isZero :: WrappedNumEq a -> Bool isZero (WrappedNumEq a) = 0 == a instance Show a => IsZero (WrappedShow a) where isZero :: WrappedShow a -> Bool isZero (WrappedShow a) = "0" == show a instance (Num a, Eq a) => IsZero (WrappedNumEq2 a) where isZero :: WrappedNumEq2 a -> Bool isZero (WrappedNumEq2 a) = a + a == a newtype INT = INT Int deriving newtype Show deriving via( WrappedNumEq Int)IsZero newtype VOID = VOID Void deriving via( WrappedShow Void)IsZero ---- -- 4 ---- class Bifunctor p => Biapplicative p where bipure :: a -> b -> p a b biliftA2 :: (a -> b -> c) -> (a' -> b' -> c') -> p a a' -> p b b' -> p c c' instance Biapplicative (,) where bipure = (,) biliftA2 f f' (a, a') (b, b') = (f a b, f' a' b') newtype WrapBiapp p a b = WrapBiap (p a b) deriving newtype (Bifunctor, Biapplicative, Eq) instance (Biapplicative p, Num a, Num b) => Num (WrapBiapp p a b) where (+) = biliftA2 (+) (+) (-) = biliftA2 (*) (*) (*) = biliftA2 (*) (*) negate = bimap negate negate abs = bimap abs abs signum = bimap signum signum fromInteger n = fromInteger n `bipure` fromInteger n newtype INT2 = INT2 (Int, Int) deriving via( WrappedNumEq2 (WrapBiapp (,) Int Int))IsZero ---- -- 5 ---- class Monoid a => MonoidNull a where null :: a -> Bool newtype WrpMonNull a = WRM a deriving (Eq, Semigroup, Monoid) instance (Eq a, Monoid a) => MonoidNull (WrpMonNull a) where null :: WrpMonNull a -> Bool null = (== mempty) deriving via( WrpMonNull Any) instance MonoidNull Any deriving via () instance MonoidNull () deriving viaOrdering instance MonoidNull Ordering ---- -- 6 ---- -- https://github.com/mikeizbicki/subhask/blob/f53fd8f465747681c88276c7dabe3646fbdf7d50/src/SubHask/Algebra.hs#L635 class Lattice a where sup :: a -> a -> a (.>=) :: a -> a -> Bool (.>) :: a -> a -> Bool newtype WrapOrd a = WrappedOrd a deriving newtype (Eq, Ord) instance Ord a => Lattice (WrapOrd a) where sup = max (.>=) = (>=) (.>) = (>) deriving via[ a] instance Ord a => Lattice [a] deriving via (a, b) instance (Ord a, Ord b) => Lattice (a, b) --mkLattice_(Bool) deriving viaBool instance Lattice Bool --mkLattice_(Char) deriving viaChar instance Lattice Char --mkLattice_(Int) deriving viaInt instance Lattice Int --mkLattice_(Integer) deriving viaInteger instance Lattice Integer --mkLattice_(Float) deriving viaFloat instance Lattice Float --mkLattice_(Double) deriving viaDouble instance Lattice Double --mkLattice_(Rational) deriving viaRational instance Lattice Rational ---- -- 7 ---- -- https://hackage.haskell.org/package/linear-1.20.7/docs/src/Linear-Affine.html class Functor f => Additive f where zero :: Num a => f a (^+^) :: Num a => f a -> f a -> f a (^+^) = liftU2 (+) (^-^) :: Num a => f a -> f a -> f a x ^-^ y = x ^+^ fmap negate y liftU2 :: (a -> a -> a) -> f a -> f a -> f a instance Additive [] where zero = [] liftU2 f = go where go (x:xs) (y:ys) = f x y : go xs ys go [] ys = ys go xs [] = xs instance Additive Maybe where zero = Nothing liftU2 f (Just a) (Just b) = Just (f a b) liftU2 _ Nothing ys = ys liftU2 _ xs Nothing = xs instance Applicative f => Additive (WrapApplicative f) where zero = pure 0 liftU2 = liftA2 deriving via( WrapApplicative ((->) a)) instance Additive ((->) a) deriving via( WrapApplicative Complex) instance Additive Complex deriving via( WrapApplicative Identity) instance Additive Identity instance Additive ZipList where zero = ZipList [] liftU2 f (ZipList xs) (ZipList ys) = ZipList (liftU2 f xs ys) class Additive (Diff p) => Affine p where type Diff p :: Type -> Type (.-.) :: Num a => p a -> p a -> Diff p a (.+^) :: Num a => p a -> Diff p a -> p a (.-^) :: Num a => p a -> Diff p a -> p a p .-^ v = p .+^ fmap negate v -- #define ADDITIVEC(CTX,T) instance CTX => Affine T where type Diff T = T ; \ -- (.-.) = (^-^) ; {-# INLINE (.-.) #-} ; (.+^) = (^+^) ; {-# INLINE (.+^) #-} ; \ -- (.-^) = (^-^) ; {-# INLINE (.-^) #-} -- #define ADDITIVE(T) ADDITIVEC((), T) newtype WrapAdditive f a = WrappedAdditive (f a) instance Additive f => Affine (WrapAdditive f) where type Diff (WrapAdditive f) = f WrappedAdditive a .-. WrappedAdditive b = a ^-^ b WrappedAdditive a .+^ b = WrappedAdditive (a ^+^ b) WrappedAdditive a .-^ b = WrappedAdditive (a ^-^ b) -- ADDITIVE(((->) a)) deriving via( WrapAdditive ((->) a)) instance Affine ((->) a) -- ADDITIVE([]) deriving via( WrapAdditive []) instance Affine [] -- ADDITIVE(Complex) deriving via( WrapAdditive Complex) instance Affine Complex -- ADDITIVE(Maybe) deriving via( WrapAdditive Maybe) instance Affine Maybe -- ADDITIVE(ZipList) deriving via( WrapAdditive ZipList) instance Affine ZipList -- ADDITIVE(Identity) deriving via( WrapAdditive Identity) instance Affine Identity ---- -- 8 ---- class C2 a b c where c2 :: a -> b -> c instance C2 a b (Const a b) where c2 x _ = Const x newtype Fweemp a = Fweemp a deriving via( Const a (b :: Type))(C2ab) haskell-src-exts-1.23.1/tests/examples/ExprHole.hs.exactprinter.golden0000644000000000000000000000000613534314633024176 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnboxedTuples.hs.exactprinter.golden0000644000000000000000000000000613534314633025251 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice.hs.exactprinter.golden0000644000000000000000000000000613534314633024204 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/T11727.hs.exactprinter.golden0000644000000000000000000000000613534314633023255 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ClosedTypeFamily.hs.exactprinter.golden0000644000000000000000000000000613534314632025664 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedModule1.hs.exactprinter.golden0000644000000000000000000000000613534314633025431 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteUnit.hs.exactprinter.golden0000644000000000000000000000000613534314633025410 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CApiFFI.hs.exactprinter.golden0000644000000000000000000000000613534314632023610 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GenericTree.hs.exactprinter.golden0000644000000000000000000000000613534314633024644 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MagicHashN.hs.exactprinter.golden0000644000000000000000000000000613534314633024412 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Overlapping.hs.exactprinter.golden0000644000000000000000000000000613534314633024736 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ByteStringUtils.hs.exactprinter.golden0000644000000000000000000000000613534314632025562 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports3.hs.exactprinter.golden0000644000000000000000000000000613534314633024767 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LambdaCase.hs.exactprinter.golden0000644000000000000000000000000613534314633024424 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces3.hs.exactprinter.golden0000644000000000000000000000000613534314633026314 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/t403.hs.exactprinter.golden0000644000000000000000000000047513534314633023154 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ViewPatterns #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE DataKinds #-} module T403 where pattern (:&&:) :: () => ((k :+ 1) ~ n) => a -> HoHeList k a -> HoHeList n a pattern ((:&&:))xrest <- (matchNext -> Right (x, Refl, rest)) haskell-src-exts-1.23.1/tests/examples/ExtraPrettyParentheses.hs.exactprinter.golden0000644000000000000000000000000613534314633027145 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RealGHC.lhs.exactprinter.golden0000644000000000000000000006744713534314633024057 0ustar0000000000000000 {-# OPTIONS -w #-} {-# LANGUAGE PatternGuards #-} -- The above warning supression flag is a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See -- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details -- | Functions for collecting together and applying rewrite rules to a module. -- The 'CoreRule' datatype itself is declared elsewhere. module Rules ( -- * RuleBase RuleBase, -- ** Constructing emptyRuleBase, mkRuleBase, extendRuleBaseList, unionRuleBase, pprRuleBase, -- ** Checking rule applications ruleCheckProgram, -- ** Manipulating 'SpecInfo' rules mkSpecInfo, extendSpecInfo, addSpecInfo, addIdSpecialisations, -- * Misc. CoreRule helpers rulesOfBinds, getRules, pprRulesForUser, lookupRule, mkLocalRule, roughTopNames ) where -- #include "HsVersions.h" import CoreSyn -- All of it import OccurAnal ( occurAnalyseExpr ) import CoreFVs ( exprFreeVars, exprsFreeVars, bindFreeVars, rulesFreeVars ) import CoreUtils ( tcEqExprX, exprType ) import PprCore ( pprRules ) import Type ( Type, TvSubstEnv ) import Coercion ( coercionKind ) import TcType ( tcSplitTyConApp_maybe ) import CoreTidy ( tidyRules ) import Id import IdInfo ( SpecInfo( SpecInfo ) ) import Var ( Var ) import VarEnv import VarSet import Name ( Name, NamedThing(..) ) import NameEnv import Unify ( ruleMatchTyX, MatchEnv(..) ) import BasicTypes ( Activation ) import StaticFlags ( opt_PprStyle_Debug ) import Outputable import FastString import Maybes import OrdList import Bag import Util import Data.List mkLocalRule :: RuleName -> Activation -> Name -> [CoreBndr] -> [CoreExpr] -> CoreExpr -> CoreRule -- ^ Used to make 'CoreRule' for an 'Id' defined in the module being -- compiled. See also 'CoreSyn.CoreRule' mkLocalRule name act fn bndrs args rhs = Rule { ru_name = name, ru_fn = fn, ru_act = act, ru_bndrs = bndrs, ru_args = args, ru_rhs = rhs, ru_rough = roughTopNames args, ru_local = True } -------------- roughTopNames :: [CoreExpr] -> [Maybe Name] -- ^ Find the \"top\" free names of several expressions. -- Such names are either: -- -- 1. The function finally being applied to in an application chain -- (if that name is a GlobalId: see "Var#globalvslocal"), or -- -- 2. The 'TyCon' if the expression is a 'Type' -- -- This is used for the fast-match-check for rules; -- if the top names don't match, the rest can't roughTopNames args = map roughTopName args roughTopName :: CoreExpr -> Maybe Name roughTopName (Type ty) = case tcSplitTyConApp_maybe ty of Just (tc,_) -> Just (getName tc) Nothing -> Nothing roughTopName (App f a) = roughTopName f roughTopName (Var f) | isGlobalId f = Just (idName f) | otherwise = Nothing roughTopName other = Nothing ruleCantMatch :: [Maybe Name] -> [Maybe Name] -> Bool -- ^ @ruleCantMatch tpl actual@ returns True only if @actual@ -- definitely can't match @tpl@ by instantiating @tpl@. -- It's only a one-way match; unlike instance matching we -- don't consider unification. -- -- Notice that [_$_] -- @ruleCantMatch [Nothing] [Just n2] = False@ -- Reason: a template variable can be instantiated by a constant -- Also: -- @ruleCantMatch [Just n1] [Nothing] = False@ -- Reason: a local variable @v@ in the actuals might [_$_] ruleCantMatch (Just n1 : ts) (Just n2 : as) = n1 /= n2 || ruleCantMatch ts as ruleCantMatch (t : ts) (a : as) = ruleCantMatch ts as ruleCantMatch ts as = False pprRulesForUser :: [CoreRule] -> SDoc -- (a) tidy the rules -- (b) sort them into order based on the rule name -- (c) suppress uniques (unless -dppr-debug is on) -- This combination makes the output stable so we can use in testing -- It's here rather than in PprCore because it calls tidyRules pprRulesForUser rules = withPprStyle defaultUserStyle $ pprRules $ sortLe le_rule $ tidyRules emptyTidyEnv rules where le_rule r1 r2 = ru_name r1 <= ru_name r2 -- | Make a 'SpecInfo' containing a number of 'CoreRule's, suitable -- for putting into an 'IdInfo' mkSpecInfo :: [CoreRule] -> SpecInfo mkSpecInfo rules = SpecInfo rules (rulesFreeVars rules) extendSpecInfo :: SpecInfo -> [CoreRule] -> SpecInfo extendSpecInfo (SpecInfo rs1 fvs1) rs2 = SpecInfo (rs2 ++ rs1) (rulesFreeVars rs2 `unionVarSet` fvs1) addSpecInfo :: SpecInfo -> SpecInfo -> SpecInfo addSpecInfo (SpecInfo rs1 fvs1) (SpecInfo rs2 fvs2) = SpecInfo (rs1 ++ rs2) (fvs1 `unionVarSet` fvs2) addIdSpecialisations :: Id -> [CoreRule] -> Id addIdSpecialisations id [] = id addIdSpecialisations id rules = setIdSpecialisation id $ extendSpecInfo (idSpecialisation id) rules -- | Gather all the rules for locally bound identifiers from the supplied bindings rulesOfBinds :: [CoreBind] -> [CoreRule] rulesOfBinds binds = concatMap (concatMap idCoreRules . bindersOf) binds getRules :: RuleBase -> Id -> [CoreRule] -- The rules for an Id come from two places: -- (a) the ones it is born with (idCoreRules fn) -- (b) rules added in subsequent modules (extra_rules) -- PrimOps, for example, are born with a bunch of rules under (a) getRules rule_base fn | isLocalId fn = idCoreRules fn | otherwise = WARN( not (isPrimOpId fn) && notNull (idCoreRules fn), ppr fn <+> ppr (idCoreRules fn) ) idCoreRules fn ++ (lookupNameEnv rule_base (idName fn) `orElse` []) -- Only PrimOpIds have rules inside themselves, and perhaps more besides -- | Gathers a collection of 'CoreRule's. Maps (the name of) an 'Id' to its rules type RuleBase = NameEnv [CoreRule] -- The rules are are unordered; -- we sort out any overlaps on lookup emptyRuleBase = emptyNameEnv mkRuleBase :: [CoreRule] -> RuleBase mkRuleBase rules = extendRuleBaseList emptyRuleBase rules extendRuleBaseList :: RuleBase -> [CoreRule] -> RuleBase extendRuleBaseList rule_base new_guys = foldl extendRuleBase rule_base new_guys unionRuleBase :: RuleBase -> RuleBase -> RuleBase unionRuleBase rb1 rb2 = plusNameEnv_C (++) rb1 rb2 extendRuleBase :: RuleBase -> CoreRule -> RuleBase extendRuleBase rule_base rule = extendNameEnv_Acc (:) singleton rule_base (ruleIdName rule) rule pprRuleBase :: RuleBase -> SDoc pprRuleBase rules = vcat [ pprRules (tidyRules emptyTidyEnv rs) | rs <- nameEnvElts rules ] -- | The main rule matching function. Attempts to apply all (active) -- supplied rules to this instance of an application in a given -- context, returning the rule applied and the resulting expression if -- successful. lookupRule :: (Activation -> Bool) -> InScopeSet -> Id -> [CoreExpr] -> [CoreRule] -> Maybe (CoreRule, CoreExpr) -- See Note [Extra args in rule matching] -- See comments on matchRule lookupRule is_active in_scope fn args rules = -- pprTrace "matchRules" (ppr fn <+> ppr rules) $ case go [] rules of [] -> Nothing (m:ms) -> Just (findBest (fn,args) m ms) where rough_args = map roughTopName args go :: [(CoreRule,CoreExpr)] -> [CoreRule] -> [(CoreRule,CoreExpr)] go ms [] = ms go ms (r:rs) = case (matchRule is_active in_scope args rough_args r) of Just e -> go ((r,e):ms) rs Nothing -> -- pprTrace "match failed" (ppr r $$ ppr args $$ -- ppr [(arg_id, unfoldingTemplate unf) | Var arg_id <- args, let unf = idUnfolding arg_id, isCheapUnfolding unf] ) go ms rs findBest :: (Id, [CoreExpr]) -> (CoreRule,CoreExpr) -> [(CoreRule,CoreExpr)] -> (CoreRule,CoreExpr) -- All these pairs matched the expression -- Return the pair the the most specific rule -- The (fn,args) is just for overlap reporting findBest target (rule,ans) [] = (rule,ans) findBest target (rule1,ans1) ((rule2,ans2):prs) | rule1 `isMoreSpecific` rule2 = findBest target (rule1,ans1) prs | rule2 `isMoreSpecific` rule1 = findBest target (rule2,ans2) prs | debugIsOn = let pp_rule rule | opt_PprStyle_Debug = ppr rule | otherwise = doubleQuotes (ftext (ru_name rule)) in pprTrace "Rules.findBest: rule overlap (Rule 1 wins)" (vcat [if opt_PprStyle_Debug then ptext (sLit "Expression to match:") <+> ppr fn <+> sep (map ppr args) else empty, ptext (sLit "Rule 1:") <+> pp_rule rule1, ptext (sLit "Rule 2:") <+> pp_rule rule2]) $ findBest target (rule1,ans1) prs | otherwise = findBest target (rule1,ans1) prs where (fn,args) = target isMoreSpecific :: CoreRule -> CoreRule -> Bool isMoreSpecific (BuiltinRule {}) r2 = True isMoreSpecific r1 (BuiltinRule {}) = False isMoreSpecific (Rule { ru_bndrs = bndrs1, ru_args = args1 }) (Rule { ru_bndrs = bndrs2, ru_args = args2 }) = isJust (matchN in_scope bndrs2 args2 args1) where in_scope = mkInScopeSet (mkVarSet bndrs1) -- Actually we should probably include the free vars -- of rule1's args, but I can't be bothered noBlackList :: Activation -> Bool noBlackList act = False -- Nothing is black listed matchRule :: (Activation -> Bool) -> InScopeSet -> [CoreExpr] -> [Maybe Name] -> CoreRule -> Maybe CoreExpr -- If (matchRule rule args) returns Just (name,rhs) -- then (f args) matches the rule, and the corresponding -- rewritten RHS is rhs -- -- The bndrs and rhs is occurrence-analysed -- -- Example -- -- The rule -- forall f g x. map f (map g x) ==> map (f . g) x -- is stored -- CoreRule "map/map" -- [f,g,x] -- tpl_vars -- [f,map g x] -- tpl_args -- map (f.g) x) -- rhs -- -- Then the call: matchRule the_rule [e1,map e2 e3] -- = Just ("map/map", (\f,g,x -> rhs) e1 e2 e3) -- -- Any 'surplus' arguments in the input are simply put on the end -- of the output. matchRule is_active in_scope args rough_args (BuiltinRule { ru_name = name, ru_try = match_fn }) = case match_fn args of Just expr -> Just expr Nothing -> Nothing matchRule is_active in_scope args rough_args (Rule { ru_name = rn, ru_act = act, ru_rough = tpl_tops, ru_bndrs = tpl_vars, ru_args = tpl_args, ru_rhs = rhs }) | not (is_active act) = Nothing | ruleCantMatch tpl_tops rough_args = Nothing | otherwise = case matchN in_scope tpl_vars tpl_args args of Nothing -> Nothing Just (binds, tpl_vals) -> Just (mkLets binds $ rule_fn `mkApps` tpl_vals) where rule_fn = occurAnalyseExpr (mkLams tpl_vars rhs) -- We could do this when putting things into the rulebase, I guess -- For a given match template and context, find bindings to wrap around -- the entire result and what should be substituted for each template variable. -- Fail if there are two few actual arguments from the target to match the template matchN :: InScopeSet -- ^ In-scope variables -> [Var] -- ^ Match template type variables -> [CoreExpr] -- ^ Match template -> [CoreExpr] -- ^ Target; can have more elements than the template -> Maybe ([CoreBind], [CoreExpr]) matchN in_scope tmpl_vars tmpl_es target_es = do { (tv_subst, id_subst, binds) <- go init_menv emptySubstEnv tmpl_es target_es ; return (fromOL binds, map (lookup_tmpl tv_subst id_subst) tmpl_vars') } where (init_rn_env, tmpl_vars') = mapAccumL rnBndrL (mkRnEnv2 in_scope) tmpl_vars -- See Note [Template binders] init_menv = ME { me_tmpls = mkVarSet tmpl_vars', me_env = init_rn_env } go menv subst [] es = Just subst go menv subst ts [] = Nothing -- Fail if too few actual args go menv subst (t:ts) (e:es) = do { subst1 <- match menv subst t e ; go menv subst1 ts es } lookup_tmpl :: TvSubstEnv -> IdSubstEnv -> Var -> CoreExpr lookup_tmpl tv_subst id_subst tmpl_var' | isTyVar tmpl_var' = case lookupVarEnv tv_subst tmpl_var' of Just ty -> Type ty Nothing -> unbound tmpl_var' | otherwise = case lookupVarEnv id_subst tmpl_var' of Just e -> e other -> unbound tmpl_var' unbound var = pprPanic "Template variable unbound in rewrite rule" (ppr var $$ ppr tmpl_vars $$ ppr tmpl_vars' $$ ppr tmpl_es $$ ppr target_es) -- These two definitions are not the same as in Subst, -- but they simple and direct, and purely local to this module -- -- * The domain of the TvSubstEnv and IdSubstEnv are the template -- variables passed into the match. -- -- * The (OrdList CoreBind) in a SubstEnv are the bindings floated out -- from nested matches; see the Let case of match, below -- type SubstEnv = (TvSubstEnv, IdSubstEnv, OrdList CoreBind) type IdSubstEnv = IdEnv CoreExpr emptySubstEnv :: SubstEnv emptySubstEnv = (emptyVarEnv, emptyVarEnv, nilOL) -- At one stage I tried to match even if there are more -- template args than real args. -- I now think this is probably a bad idea. -- Should the template (map f xs) match (map g)? I think not. -- For a start, in general eta expansion wastes work. -- SLPJ July 99 match :: MatchEnv -> SubstEnv -> CoreExpr -- Template -> CoreExpr -- Target -> Maybe SubstEnv -- See the notes with Unify.match, which matches types -- Everything is very similar for terms -- Interesting examples: -- Consider matching -- \x->f against \f->f -- When we meet the lambdas we must remember to rename f to f' in the -- second expresion. The RnEnv2 does that. -- -- Consider matching -- forall a. \b->b against \a->3 -- We must rename the \a. Otherwise when we meet the lambdas we -- might substitute [a/b] in the template, and then erroneously -- succeed in matching what looks like the template variable 'a' against 3. -- The Var case follows closely what happens in Unify.match match menv subst (Var v1) e2 | Just subst <- match_var menv subst v1 e2 = Just subst match menv subst e1 (Note n e2) = match menv subst e1 e2 -- Note [Notes in RULE matching] -- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -- Look through Notes. In particular, we don't want to -- be confused by InlineMe notes. Maybe we should be more -- careful about profiling notes, but for now I'm just -- riding roughshod over them. --- See Note [Notes in call patterns] in SpecConstr -- Here is another important rule: if the term being matched is a -- variable, we expand it so long as its unfolding is a WHNF -- (Its occurrence information is not necessarily up to date, -- so we don't use it.) match menv subst e1 (Var v2) | isCheapUnfolding unfolding = match menv subst e1 (unfoldingTemplate unfolding) where rn_env = me_env menv unfolding = idUnfolding (lookupRnInScope rn_env (rnOccR rn_env v2)) -- Notice that we look up v2 in the in-scope set -- See Note [Lookup in-scope] -- Remember to apply any renaming first (hence rnOccR) -- Note [Matching lets] -- ~~~~~~~~~~~~~~~~~~~~ -- Matching a let-expression. Consider -- RULE forall x. f (g x) = -- and target expression -- f (let { w=R } in g E)) -- Then we'd like the rule to match, to generate -- let { w=R } in (\x. ) E -- In effect, we want to float the let-binding outward, to enable -- the match to happen. This is the WHOLE REASON for accumulating -- bindings in the SubstEnv -- -- We can only do this if -- (a) Widening the scope of w does not capture any variables -- We use a conservative test: w is not already in scope -- If not, we clone the binders, and substitute -- (b) The free variables of R are not bound by the part of the -- target expression outside the let binding; e.g. -- f (\v. let w = v+1 in g E) -- Here we obviously cannot float the let-binding for w. -- -- You may think rule (a) would never apply, because rule matching is -- mostly invoked from the simplifier, when we have just run substExpr -- over the argument, so there will be no shadowing anyway. -- The fly in the ointment is that the forall'd variables of the -- RULE itself are considered in scope. -- -- I though of various cheapo ways to solve this tiresome problem, -- but ended up doing the straightforward thing, which is to -- clone the binders if they are in scope. It's tiresome, and -- potentially inefficient, because of the calls to substExpr, -- but I don't think it'll happen much in pracice. {- Cases to think about (let x=y+1 in \x. (x,x)) --> let x=y+1 in (\x1. (x1,x1)) (\x. let x = y+1 in (x,x)) --> let x1 = y+1 in (\x. (x1,x1) (let x=y+1 in (x,x), let x=y-1 in (x,x)) --> let x=y+1 in let x1=y-1 in ((x,x),(x1,x1)) Watch out! (let x=y+1 in let z=x+1 in (z,z) --> matches (p,p) but watch out that the use of x on z's rhs is OK! I'm removing the cloning because that makes the above case fail, because the inner let looks as if it has locally-bound vars -} match menv subst@(tv_subst, id_subst, binds) e1 (Let bind e2) | all freshly_bound bndrs, not (any locally_bound bind_fvs) = match (menv { me_env = rn_env' }) (tv_subst, id_subst, binds `snocOL` bind') e1 e2' where rn_env = me_env menv bndrs = bindersOf bind bind_fvs = varSetElems (bindFreeVars bind) locally_bound x = inRnEnvR rn_env x freshly_bound x = not (x `rnInScope` rn_env) bind' = bind e2' = e2 rn_env' = extendRnInScopeList rn_env bndrs {- (rn_env', bndrs') = mapAccumL rnBndrR rn_env bndrs s_prs = [(bndr, Var bndr') | (bndr,bndr') <- zip bndrs bndrs', bndr /= bndr'] subst = mkSubst (rnInScopeSet rn_env) emptyVarEnv (mkVarEnv s_prs) (bind', e2') | null s_prs = (bind, e2) | otherwise = (s_bind, substExpr subst e2) s_bind = case bind of NonRec {} -> NonRec (head bndrs') (head rhss) Rec {} -> Rec (bndrs' `zip` map (substExpr subst) rhss) -} match menv subst (Lit lit1) (Lit lit2) | lit1 == lit2 = Just subst match menv subst (App f1 a1) (App f2 a2) = do { subst' <- match menv subst f1 f2 ; match menv subst' a1 a2 } match menv subst (Lam x1 e1) (Lam x2 e2) = match menv' subst e1 e2 where menv' = menv { me_env = rnBndr2 (me_env menv) x1 x2 } -- This rule does eta expansion -- (\x.M) ~ N iff M ~ N x -- It's important that this is *after* the let rule, -- so that (\x.M) ~ (let y = e in \y.N) -- does the let thing, and then gets the lam/lam rule above match menv subst (Lam x1 e1) e2 = match menv' subst e1 (App e2 (varToCoreExpr new_x)) where (rn_env', new_x) = rnBndrL (me_env menv) x1 menv' = menv { me_env = rn_env' } -- Eta expansion the other way -- M ~ (\y.N) iff M y ~ N match menv subst e1 (Lam x2 e2) = match menv' subst (App e1 (varToCoreExpr new_x)) e2 where (rn_env', new_x) = rnBndrR (me_env menv) x2 menv' = menv { me_env = rn_env' } match menv subst (Case e1 x1 ty1 alts1) (Case e2 x2 ty2 alts2) = do { subst1 <- match_ty menv subst ty1 ty2 ; subst2 <- match menv subst1 e1 e2 ; let menv' = menv { me_env = rnBndr2 (me_env menv) x1 x2 } ; match_alts menv' subst2 alts1 alts2 -- Alts are both sorted } match menv subst (Type ty1) (Type ty2) = match_ty menv subst ty1 ty2 match menv subst (Cast e1 co1) (Cast e2 co2) = do { subst1 <- match_ty menv subst co1 co2 ; match menv subst1 e1 e2 } {- REMOVING OLD CODE: I think that the above handling for let is better than the stuff here, which looks pretty suspicious to me. SLPJ Sept 06 -- This is an interesting rule: we simply ignore lets in the -- term being matched against! The unfolding inside it is (by assumption) -- already inside any occurrences of the bound variables, so we'll expand -- them when we encounter them. This gives a chance of matching -- forall x,y. f (g (x,y)) -- against -- f (let v = (a,b) in g v) match menv subst e1 (Let bind e2) = match (menv { me_env = rn_env' }) subst e1 e2 where (rn_env', _bndrs') = mapAccumL rnBndrR (me_env menv) (bindersOf bind) -- It's important to do this renaming, so that the bndrs -- are brought into the local scope. For example: -- Matching -- forall f,x,xs. f (x:xs) -- against -- f (let y = e in (y:[])) -- We must not get success with x->y! So we record that y is -- locally bound (with rnBndrR), and proceed. The Var case -- will fail when trying to bind x->y -} -- Everything else fails match menv subst e1 e2 = -- pprTrace "Failing at" ((text "e1:" <+> ppr e1) $$ (text "e2:" <+> ppr e2)) $ Nothing ------------------------------------------ match_var :: MatchEnv -> SubstEnv -> Var -- Template -> CoreExpr -- Target -> Maybe SubstEnv match_var menv subst@(tv_subst, id_subst, binds) v1 e2 | v1' `elemVarSet` me_tmpls menv = case lookupVarEnv id_subst v1' of Nothing | any (inRnEnvR rn_env) (varSetElems (exprFreeVars e2)) -> Nothing -- Occurs check failure -- e.g. match forall a. (\x-> a x) against (\y. y y) | otherwise -- No renaming to do on e2, because no free var -- of e2 is in the rnEnvR of the envt -- Note [Matching variable types] -- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -- However, we must match the *types*; e.g. -- forall (c::Char->Int) (x::Char). -- f (c x) = "RULE FIRED" -- We must only match on args that have the right type -- It's actually quite difficult to come up with an example that shows -- you need type matching, esp since matching is left-to-right, so type -- args get matched first. But it's possible (e.g. simplrun008) and -- this is the Right Thing to do -> do { tv_subst' <- Unify.ruleMatchTyX menv tv_subst (idType v1') (exprType e2) -- c.f. match_ty below ; return (tv_subst', extendVarEnv id_subst v1' e2, binds) } Just e1' | tcEqExprX (nukeRnEnvL rn_env) e1' e2 -> Just subst | otherwise -> Nothing | otherwise -- v1 is not a template variable; check for an exact match with e2 = case e2 of Var v2 | v1' == rnOccR rn_env v2 -> Just subst other -> Nothing where rn_env = me_env menv v1' = rnOccL rn_env v1 -- If the template is -- forall x. f x (\x -> x) = ... -- Then the x inside the lambda isn't the -- template x, so we must rename first! ------------------------------------------ match_alts :: MatchEnv -> SubstEnv -> [CoreAlt] -- Template -> [CoreAlt] -- Target -> Maybe SubstEnv match_alts menv subst [] [] = return subst match_alts menv subst ((c1,vs1,r1):alts1) ((c2,vs2,r2):alts2) | c1 == c2 = do { subst1 <- match menv' subst r1 r2 ; match_alts menv subst1 alts1 alts2 } where menv' :: MatchEnv menv' = menv { me_env = rnBndrs2 (me_env menv) vs1 vs2 } match_alts menv subst alts1 alts2 = Nothing ------------------------------------------ match_ty :: MatchEnv -> SubstEnv -> Type -- Template -> Type -- Target -> Maybe SubstEnv match_ty menv (tv_subst, id_subst, binds) ty1 ty2 = do { tv_subst' <- Unify.ruleMatchTyX menv tv_subst ty1 ty2 ; return (tv_subst', id_subst, binds) } -- | Report partial matches for rules beginning with the specified -- string for the purposes of error reporting ruleCheckProgram :: (Activation -> Bool) -- ^ Rule activation test -> String -- ^ Rule pattern -> RuleBase -- ^ Database of rules -> [CoreBind] -- ^ Bindings to check in -> SDoc -- ^ Resulting check message ruleCheckProgram is_active rule_pat rule_base binds | isEmptyBag results = text "Rule check results: no rule application sites" | otherwise = vcat [text "Rule check results:", line, vcat [ p $$ line | p <- bagToList results ] ] where results = unionManyBags (map (ruleCheckBind (RuleCheckEnv is_active rule_pat rule_base)) binds) line = text (replicate 20 '-') data RuleCheckEnv = RuleCheckEnv { rc_is_active :: Activation -> Bool, rc_pattern :: String, rc_rule_base :: RuleBase } ruleCheckBind :: RuleCheckEnv -> CoreBind -> Bag SDoc -- The Bag returned has one SDoc for each call site found ruleCheckBind env (NonRec b r) = ruleCheck env r ruleCheckBind env (Rec prs) = unionManyBags [ruleCheck env r | (b,r) <- prs] ruleCheck :: RuleCheckEnv -> CoreExpr -> Bag SDoc ruleCheck env (Var v) = emptyBag ruleCheck env (Lit l) = emptyBag ruleCheck env (Type ty) = emptyBag ruleCheck env (App f a) = ruleCheckApp env (App f a) [] ruleCheck env (Note n e) = ruleCheck env e ruleCheck env (Cast e co) = ruleCheck env e ruleCheck env (Let bd e) = ruleCheckBind env bd `unionBags` ruleCheck env e ruleCheck env (Lam b e) = ruleCheck env e ruleCheck env (Case e _ _ as) = ruleCheck env e `unionBags` unionManyBags [ruleCheck env r | (_,_,r) <- as] ruleCheckApp env (App f a) as = ruleCheck env a `unionBags` ruleCheckApp env f (a:as) ruleCheckApp env (Var f) as = ruleCheckFun env f as ruleCheckApp env other as = ruleCheck env other ruleCheckFun :: RuleCheckEnv -> Id -> [CoreExpr] -> Bag SDoc -- Produce a report for all rules matching the predicate -- saying why it doesn't match the specified application ruleCheckFun env fn args | null name_match_rules = emptyBag | otherwise = unitBag (ruleAppCheck_help (rc_is_active env) fn args name_match_rules) where name_match_rules = filter match (getRules (rc_rule_base env) fn) match rule = (rc_pattern env) `isPrefixOf` unpackFS (ruleName rule) ruleAppCheck_help :: (Activation -> Bool) -> Id -> [CoreExpr] -> [CoreRule] -> SDoc ruleAppCheck_help is_active fn args rules = -- The rules match the pattern, so we want to print something vcat [text "Expression:" <+> ppr (mkApps (Var fn) args), vcat (map check_rule rules)] where n_args = length args i_args = args `zip` [1::Int ..] rough_args = map roughTopName args check_rule rule = rule_herald rule <> colon <+> rule_info rule rule_herald (BuiltinRule { ru_name = name }) = ptext (sLit "Builtin rule") <+> doubleQuotes (ftext name) rule_herald (Rule { ru_name = name }) = ptext (sLit "Rule") <+> doubleQuotes (ftext name) rule_info rule | Just _ <- matchRule noBlackList emptyInScopeSet args rough_args rule = text "matches (which is very peculiar!)" rule_info (BuiltinRule {}) = text "does not match" rule_info (Rule { ru_name = name, ru_act = act, ru_bndrs = rule_bndrs, ru_args = rule_args}) | not (is_active act) = text "active only in later phase" | n_args < n_rule_args = text "too few arguments" | n_mismatches == n_rule_args = text "no arguments match" | n_mismatches == 0 = text "all arguments match (considered individually), but rule as a whole does not" | otherwise = text "arguments" <+> ppr mismatches <+> text "do not match (1-indexing)" where n_rule_args = length rule_args n_mismatches = length mismatches mismatches = [i | (rule_arg, (arg,i)) <- rule_args `zip` i_args, not (isJust (match_fn rule_arg arg))] lhs_fvs = exprsFreeVars rule_args -- Includes template tyvars match_fn rule_arg arg = match menv emptySubstEnv rule_arg arg where in_scope = lhs_fvs `unionVarSet` exprFreeVars arg menv = ME { me_env = mkRnEnv2 (mkInScopeSet in_scope) , me_tmpls = mkVarSet rule_bndrs } haskell-src-exts-1.23.1/tests/examples/ScopedTypeVariables.hs.prettyprinter.golden0000644000000000000000000000034013534314633026604 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} test :: IO Char test = do x :: Char <- getChar return x value :: String = "Hello" forallTest :: forall x . Eq x => x -> x forallTest x = if x == x then (undefined :: x) else x haskell-src-exts-1.23.1/tests/examples/PatternSynonymImport.hs.prettyprinter.golden0000644000000000000000000000016613534314633027107 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module Main (pattern Foo, pattern (:>)) where import Foo (pattern Foo, pattern (:>)) haskell-src-exts-1.23.1/tests/examples/NestedAsPat.hs.prettyprinter.golden0000644000000000000000000000007613534314633025055 0ustar0000000000000000module NestedAsPat where nestedAsPat [x@(Just _)] = undefined haskell-src-exts-1.23.1/tests/examples/RecordPatternSynonyms.hs.prettyprinter.golden0000644000000000000000000000040613534314633027233 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module ShouldCompile where pattern Single{x} = [x] pattern Double{y, z} = (y, z) pattern More{x} <- (x, _) where More x = (x, Nothing) selector :: Int selector = x [5] update :: [String] update = ["String"]{x = "updated"} haskell-src-exts-1.23.1/tests/examples/InfixBang.hs.prettyprinter.golden0000644000000000000000000000006013534314633024540 0ustar0000000000000000{-# LANGUAGE BangPatterns #-} (!) arr i = arr i haskell-src-exts-1.23.1/tests/examples/ClosedTypeFamily.hs.prettyprinter.golden0000644000000000000000000000021613534314632026112 0ustar0000000000000000{-# LANGUAGE TypeFamilies, DataKinds #-} module ClosedTypeFamily where type family Eq x y where Eq x x = True Eq x y = False haskell-src-exts-1.23.1/tests/examples/BangPatterns.hs.prettyprinter.golden0000644000000000000000000000042113534314632025263 0ustar0000000000000000{-# LANGUAGE BangPatterns #-} module BangPatterns where firstnonspace :: Ptr Word8 -> Int -> Int -> IO Int firstnonspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if isSpaceWord8 w then firstnonspace ptr (n + 1) m else return n haskell-src-exts-1.23.1/tests/examples/PackageImportsMissing.hs.prettyprinter.golden0000644000000000000000000000030513534314633027140 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/PackageImportsMissing.hs" 3 17) "PackageImports language extension is not enabled. Please add {-# LANGUAGE PackageImports #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/TrailingWhere.hs.prettyprinter.golden0000644000000000000000000000007513534314633025445 0ustar0000000000000000fail = x where broken = 24 where x = 413 haskell-src-exts-1.23.1/tests/examples/Attributes.hs.prettyprinter.golden0000644000000000000000000017265213534314632025041 0ustar0000000000000000module Data.GraphViz.Attributes (Attribute(..), Attributes, usedByGraphs, usedBySubGraphs, usedByClusters, usedByNodes, usedByEdges, EscString, URL(..), ArrowType(..), AspectType(..), Rect(..), ClusterMode(..), DirType(..), DEConstraints(..), DPoint(..), ModeType(..), Model(..), Label(..), Point(..), Overlap(..), LayerRange(..), LayerID(..), LayerList(..), OutputMode(..), Pack(..), PackMode(..), Pos(..), EdgeType(..), PageDir(..), Spline(..), QuadType(..), Root(..), RankType(..), RankDir(..), Shape(..), SmoothType(..), StartType(..), STStyle(..), StyleItem(..), StyleName(..), PortPos(..), CompassPoint(..), ViewPort(..), FocusType(..), VerticalPlacement(..), ScaleType(..), Justification(..), Ratios(..), module Data.GraphViz.Attributes.Colors, ArrowShape(..), ArrowModifier(..), ArrowFill(..), ArrowSide(..), box, crow, diamond, dotArrow, inv, noArrow, normal, tee, vee, oDot, invDot, invODot, oBox, oDiamond, eDiamond, openArr, halfOpen, emptyArr, invEmpty, noMods, openMod, defLayerSep, notLayerSep) where import Data.GraphViz.Attributes.Colors import Data.GraphViz.Util import Data.GraphViz.Parsing import Data.GraphViz.Printing import Data.Char (toLower) import Data.Maybe (isJust) import Control.Arrow (first) import Control.Monad (liftM, liftM2) data Attribute = Damping Double | K Double | URL URL | ArrowHead ArrowType | ArrowSize Double | ArrowTail ArrowType | Aspect AspectType | Bb Rect | BgColor Color | Center Bool | Charset String | ClusterRank ClusterMode | ColorScheme ColorScheme | Color [Color] | Comment String | Compound Bool | Concentrate Bool | Constraint Bool | Decorate Bool | DefaultDist Double | Dimen Int | Dim Int | Dir DirType | DirEdgeConstraints DEConstraints | Distortion Double | DPI Double | EdgeURL URL | EdgeTarget EscString | EdgeTooltip EscString | Epsilon Double | ESep DPoint | FillColor Color | FixedSize Bool | FontColor Color | FontName String | FontNames String | FontPath String | FontSize Double | Group String | HeadURL URL | HeadClip Bool | HeadLabel Label | HeadPort PortPos | HeadTarget EscString | HeadTooltip EscString | Height Double | ID Label | Image String | ImageScale ScaleType | LabelURL URL | LabelAngle Double | LabelDistance Double | LabelFloat Bool | LabelFontColor Color | LabelFontName String | LabelFontSize Double | LabelJust Justification | LabelLoc VerticalPlacement | LabelTarget EscString | LabelTooltip EscString | Label Label | Landscape Bool | LayerSep String | Layers LayerList | Layer LayerRange | Layout String | Len Double | LevelsGap Double | Levels Int | LHead String | LPos Point | LTail String | Margin DPoint | MaxIter Int | MCLimit Double | MinDist Double | MinLen Int | Model Model | Mode ModeType | Mosek Bool | NodeSep Double | NoJustify Bool | Normalize Bool | Nslimit1 Double | Nslimit Double | Ordering String | Orientation Double | OutputOrder OutputMode | OverlapScaling Double | Overlap Overlap | PackMode PackMode | Pack Pack | Pad DPoint | PageDir PageDir | Page Point | PenColor Color | PenWidth Double | Peripheries Int | Pin Bool | Pos Pos | QuadTree QuadType | Quantum Double | RankDir RankDir | RankSep Double | Rank RankType | Ratio Ratios | Rects Rect | Regular Bool | ReMinCross Bool | RepulsiveForce Double | Root Root | Rotate Int | SameHead String | SameTail String | SamplePoints Int | SearchSize Int | Sep DPoint | ShapeFile String | Shape Shape | ShowBoxes Int | Sides Int | Size Point | Skew Double | Smoothing SmoothType | SortV Int | Splines EdgeType | Start StartType | StyleSheet String | Style [StyleItem] | TailURL URL | TailClip Bool | TailLabel Label | TailPort PortPos | TailTarget EscString | TailTooltip EscString | Target EscString | Tooltip EscString | TrueColor Bool | Vertices [Point] | ViewPort ViewPort | VoroMargin Double | Weight Double | Width Double | Z Double deriving (Eq, Ord, Show, Read) type Attributes = [Attribute] instance PrintDot Attribute where unqtDot (Damping v) = printField "Damping" v unqtDot (K v) = printField "K" v unqtDot (URL v) = printField "URL" v unqtDot (ArrowHead v) = printField "arrowhead" v unqtDot (ArrowSize v) = printField "arrowsize" v unqtDot (ArrowTail v) = printField "arrowtail" v unqtDot (Aspect v) = printField "aspect" v unqtDot (Bb v) = printField "bb" v unqtDot (BgColor v) = printField "bgcolor" v unqtDot (Center v) = printField "center" v unqtDot (Charset v) = printField "charset" v unqtDot (ClusterRank v) = printField "clusterrank" v unqtDot (ColorScheme v) = printField "colorscheme" v unqtDot (Color v) = printField "color" v unqtDot (Comment v) = printField "comment" v unqtDot (Compound v) = printField "compound" v unqtDot (Concentrate v) = printField "concentrate" v unqtDot (Constraint v) = printField "constraint" v unqtDot (Decorate v) = printField "decorate" v unqtDot (DefaultDist v) = printField "defaultdist" v unqtDot (Dimen v) = printField "dimen" v unqtDot (Dim v) = printField "dim" v unqtDot (Dir v) = printField "dir" v unqtDot (DirEdgeConstraints v) = printField "diredgeconstraints" v unqtDot (Distortion v) = printField "distortion" v unqtDot (DPI v) = printField "dpi" v unqtDot (EdgeURL v) = printField "edgeURL" v unqtDot (EdgeTarget v) = printField "edgetarget" v unqtDot (EdgeTooltip v) = printField "edgetooltip" v unqtDot (Epsilon v) = printField "epsilon" v unqtDot (ESep v) = printField "esep" v unqtDot (FillColor v) = printField "fillcolor" v unqtDot (FixedSize v) = printField "fixedsize" v unqtDot (FontColor v) = printField "fontcolor" v unqtDot (FontName v) = printField "fontname" v unqtDot (FontNames v) = printField "fontnames" v unqtDot (FontPath v) = printField "fontpath" v unqtDot (FontSize v) = printField "fontsize" v unqtDot (Group v) = printField "group" v unqtDot (HeadURL v) = printField "headURL" v unqtDot (HeadClip v) = printField "headclip" v unqtDot (HeadLabel v) = printField "headlabel" v unqtDot (HeadPort v) = printField "headport" v unqtDot (HeadTarget v) = printField "headtarget" v unqtDot (HeadTooltip v) = printField "headtooltip" v unqtDot (Height v) = printField "height" v unqtDot (ID v) = printField "id" v unqtDot (Image v) = printField "image" v unqtDot (ImageScale v) = printField "imagescale" v unqtDot (LabelURL v) = printField "labelURL" v unqtDot (LabelAngle v) = printField "labelangle" v unqtDot (LabelDistance v) = printField "labeldistance" v unqtDot (LabelFloat v) = printField "labelfloat" v unqtDot (LabelFontColor v) = printField "labelfontcolor" v unqtDot (LabelFontName v) = printField "labelfontname" v unqtDot (LabelFontSize v) = printField "labelfontsize" v unqtDot (LabelJust v) = printField "labeljust" v unqtDot (LabelLoc v) = printField "labelloc" v unqtDot (LabelTarget v) = printField "labeltarget" v unqtDot (LabelTooltip v) = printField "labeltooltip" v unqtDot (Label v) = printField "label" v unqtDot (Landscape v) = printField "landscape" v unqtDot (LayerSep v) = printField "layersep" v unqtDot (Layers v) = printField "layers" v unqtDot (Layer v) = printField "layer" v unqtDot (Layout v) = printField "layout" v unqtDot (Len v) = printField "len" v unqtDot (LevelsGap v) = printField "levelsgap" v unqtDot (Levels v) = printField "levels" v unqtDot (LHead v) = printField "lhead" v unqtDot (LPos v) = printField "lp" v unqtDot (LTail v) = printField "ltail" v unqtDot (Margin v) = printField "margin" v unqtDot (MaxIter v) = printField "maxiter" v unqtDot (MCLimit v) = printField "mclimit" v unqtDot (MinDist v) = printField "mindist" v unqtDot (MinLen v) = printField "minlen" v unqtDot (Model v) = printField "model" v unqtDot (Mode v) = printField "mode" v unqtDot (Mosek v) = printField "mosek" v unqtDot (NodeSep v) = printField "nodesep" v unqtDot (NoJustify v) = printField "nojustify" v unqtDot (Normalize v) = printField "normalize" v unqtDot (Nslimit1 v) = printField "nslimit1" v unqtDot (Nslimit v) = printField "nslimit" v unqtDot (Ordering v) = printField "ordering" v unqtDot (Orientation v) = printField "orientation" v unqtDot (OutputOrder v) = printField "outputorder" v unqtDot (OverlapScaling v) = printField "overlap_scaling" v unqtDot (Overlap v) = printField "overlap" v unqtDot (PackMode v) = printField "packmode" v unqtDot (Pack v) = printField "pack" v unqtDot (Pad v) = printField "pad" v unqtDot (PageDir v) = printField "pagedir" v unqtDot (Page v) = printField "page" v unqtDot (PenColor v) = printField "pencolor" v unqtDot (PenWidth v) = printField "penwidth" v unqtDot (Peripheries v) = printField "peripheries" v unqtDot (Pin v) = printField "pin" v unqtDot (Pos v) = printField "pos" v unqtDot (QuadTree v) = printField "quadtree" v unqtDot (Quantum v) = printField "quantum" v unqtDot (RankDir v) = printField "rankdir" v unqtDot (RankSep v) = printField "ranksep" v unqtDot (Rank v) = printField "rank" v unqtDot (Ratio v) = printField "ratio" v unqtDot (Rects v) = printField "rects" v unqtDot (Regular v) = printField "regular" v unqtDot (ReMinCross v) = printField "remincross" v unqtDot (RepulsiveForce v) = printField "repulsiveforce" v unqtDot (Root v) = printField "root" v unqtDot (Rotate v) = printField "rotate" v unqtDot (SameHead v) = printField "samehead" v unqtDot (SameTail v) = printField "sametail" v unqtDot (SamplePoints v) = printField "samplepoints" v unqtDot (SearchSize v) = printField "searchsize" v unqtDot (Sep v) = printField "sep" v unqtDot (ShapeFile v) = printField "shapefile" v unqtDot (Shape v) = printField "shape" v unqtDot (ShowBoxes v) = printField "showboxes" v unqtDot (Sides v) = printField "sides" v unqtDot (Size v) = printField "size" v unqtDot (Skew v) = printField "skew" v unqtDot (Smoothing v) = printField "smoothing" v unqtDot (SortV v) = printField "sortv" v unqtDot (Splines v) = printField "splines" v unqtDot (Start v) = printField "start" v unqtDot (StyleSheet v) = printField "stylesheet" v unqtDot (Style v) = printField "style" v unqtDot (TailURL v) = printField "tailURL" v unqtDot (TailClip v) = printField "tailclip" v unqtDot (TailLabel v) = printField "taillabel" v unqtDot (TailPort v) = printField "tailport" v unqtDot (TailTarget v) = printField "tailtarget" v unqtDot (TailTooltip v) = printField "tailtooltip" v unqtDot (Target v) = printField "target" v unqtDot (Tooltip v) = printField "tooltip" v unqtDot (TrueColor v) = printField "truecolor" v unqtDot (Vertices v) = printField "vertices" v unqtDot (ViewPort v) = printField "viewport" v unqtDot (VoroMargin v) = printField "voro_margin" v unqtDot (Weight v) = printField "weight" v unqtDot (Width v) = printField "width" v unqtDot (Z v) = printField "z" v listToDot = unqtListToDot instance ParseDot Attribute where parseUnqt = oneOf [liftM Damping $ parseField "Damping", liftM K $ parseField "K", liftM URL $ parseFields ["URL", "href"], liftM ArrowHead $ parseField "arrowhead", liftM ArrowSize $ parseField "arrowsize", liftM ArrowTail $ parseField "arrowtail", liftM Aspect $ parseField "aspect", liftM Bb $ parseField "bb", liftM BgColor $ parseField "bgcolor", liftM Center $ parseFieldBool "center", liftM Charset $ parseField "charset", liftM ClusterRank $ parseField "clusterrank", liftM ColorScheme $ parseField "colorscheme", liftM Color $ parseField "color", liftM Comment $ parseField "comment", liftM Compound $ parseFieldBool "compound", liftM Concentrate $ parseFieldBool "concentrate", liftM Constraint $ parseFieldBool "constraint", liftM Decorate $ parseFieldBool "decorate", liftM DefaultDist $ parseField "defaultdist", liftM Dimen $ parseField "dimen", liftM Dim $ parseField "dim", liftM Dir $ parseField "dir", liftM DirEdgeConstraints $ parseFieldDef EdgeConstraints "diredgeconstraints", liftM Distortion $ parseField "distortion", liftM DPI $ parseFields ["dpi", "resolution"], liftM EdgeURL $ parseFields ["edgeURL", "edgehref"], liftM EdgeTarget $ parseField "edgetarget", liftM EdgeTooltip $ parseField "edgetooltip", liftM Epsilon $ parseField "epsilon", liftM ESep $ parseField "esep", liftM FillColor $ parseField "fillcolor", liftM FixedSize $ parseFieldBool "fixedsize", liftM FontColor $ parseField "fontcolor", liftM FontName $ parseField "fontname", liftM FontNames $ parseField "fontnames", liftM FontPath $ parseField "fontpath", liftM FontSize $ parseField "fontsize", liftM Group $ parseField "group", liftM HeadURL $ parseFields ["headURL", "headhref"], liftM HeadClip $ parseFieldBool "headclip", liftM HeadLabel $ parseField "headlabel", liftM HeadPort $ parseField "headport", liftM HeadTarget $ parseField "headtarget", liftM HeadTooltip $ parseField "headtooltip", liftM Height $ parseField "height", liftM ID $ parseField "id", liftM Image $ parseField "image", liftM ImageScale $ parseFieldDef UniformScale "imagescale", liftM LabelURL $ parseFields ["labelURL", "labelhref"], liftM LabelAngle $ parseField "labelangle", liftM LabelDistance $ parseField "labeldistance", liftM LabelFloat $ parseFieldBool "labelfloat", liftM LabelFontColor $ parseField "labelfontcolor", liftM LabelFontName $ parseField "labelfontname", liftM LabelFontSize $ parseField "labelfontsize", liftM LabelJust $ parseField "labeljust", liftM LabelLoc $ parseField "labelloc", liftM LabelTarget $ parseField "labeltarget", liftM LabelTooltip $ parseField "labeltooltip", liftM Label $ parseField "label", liftM Landscape $ parseFieldBool "landscape", liftM LayerSep $ parseField "layersep", liftM Layers $ parseField "layers", liftM Layer $ parseField "layer", liftM Layout $ parseField "layout", liftM Len $ parseField "len", liftM LevelsGap $ parseField "levelsgap", liftM Levels $ parseField "levels", liftM LHead $ parseField "lhead", liftM LPos $ parseField "lp", liftM LTail $ parseField "ltail", liftM Margin $ parseField "margin", liftM MaxIter $ parseField "maxiter", liftM MCLimit $ parseField "mclimit", liftM MinDist $ parseField "mindist", liftM MinLen $ parseField "minlen", liftM Model $ parseField "model", liftM Mode $ parseField "mode", liftM Mosek $ parseFieldBool "mosek", liftM NodeSep $ parseField "nodesep", liftM NoJustify $ parseFieldBool "nojustify", liftM Normalize $ parseFieldBool "normalize", liftM Nslimit1 $ parseField "nslimit1", liftM Nslimit $ parseField "nslimit", liftM Ordering $ parseField "ordering", liftM Orientation $ parseField "orientation", liftM OutputOrder $ parseField "outputorder", liftM OverlapScaling $ parseField "overlap_scaling", liftM Overlap $ parseFieldDef KeepOverlaps "overlap", liftM PackMode $ parseField "packmode", liftM Pack $ parseFieldDef DoPack "pack", liftM Pad $ parseField "pad", liftM PageDir $ parseField "pagedir", liftM Page $ parseField "page", liftM PenColor $ parseField "pencolor", liftM PenWidth $ parseField "penwidth", liftM Peripheries $ parseField "peripheries", liftM Pin $ parseFieldBool "pin", liftM Pos $ parseField "pos", liftM QuadTree $ parseFieldDef NormalQT "quadtree", liftM Quantum $ parseField "quantum", liftM RankDir $ parseField "rankdir", liftM RankSep $ parseField "ranksep", liftM Rank $ parseField "rank", liftM Ratio $ parseField "ratio", liftM Rects $ parseField "rects", liftM Regular $ parseFieldBool "regular", liftM ReMinCross $ parseFieldBool "remincross", liftM RepulsiveForce $ parseField "repulsiveforce", liftM Root $ parseFieldDef IsCentral "root", liftM Rotate $ parseField "rotate", liftM SameHead $ parseField "samehead", liftM SameTail $ parseField "sametail", liftM SamplePoints $ parseField "samplepoints", liftM SearchSize $ parseField "searchsize", liftM Sep $ parseField "sep", liftM ShapeFile $ parseField "shapefile", liftM Shape $ parseField "shape", liftM ShowBoxes $ parseField "showboxes", liftM Sides $ parseField "sides", liftM Size $ parseField "size", liftM Skew $ parseField "skew", liftM Smoothing $ parseField "smoothing", liftM SortV $ parseField "sortv", liftM Splines $ parseFieldDef SplineEdges "splines", liftM Start $ parseField "start", liftM StyleSheet $ parseField "stylesheet", liftM Style $ parseField "style", liftM TailURL $ parseFields ["tailURL", "tailhref"], liftM TailClip $ parseFieldBool "tailclip", liftM TailLabel $ parseField "taillabel", liftM TailPort $ parseField "tailport", liftM TailTarget $ parseField "tailtarget", liftM TailTooltip $ parseField "tailtooltip", liftM Target $ parseField "target", liftM Tooltip $ parseField "tooltip", liftM TrueColor $ parseFieldBool "truecolor", liftM Vertices $ parseField "vertices", liftM ViewPort $ parseField "viewport", liftM VoroMargin $ parseField "voro_margin", liftM Weight $ parseField "weight", liftM Width $ parseField "width", liftM Z $ parseField "z"] parse = parseUnqt parseList = parseUnqtList usedByGraphs :: Attribute -> Bool usedByGraphs Damping{} = True usedByGraphs K{} = True usedByGraphs URL{} = True usedByGraphs Aspect{} = True usedByGraphs Bb{} = True usedByGraphs BgColor{} = True usedByGraphs Center{} = True usedByGraphs Charset{} = True usedByGraphs ClusterRank{} = True usedByGraphs ColorScheme{} = True usedByGraphs Comment{} = True usedByGraphs Compound{} = True usedByGraphs Concentrate{} = True usedByGraphs DefaultDist{} = True usedByGraphs Dimen{} = True usedByGraphs Dim{} = True usedByGraphs DirEdgeConstraints{} = True usedByGraphs DPI{} = True usedByGraphs Epsilon{} = True usedByGraphs ESep{} = True usedByGraphs FontColor{} = True usedByGraphs FontName{} = True usedByGraphs FontNames{} = True usedByGraphs FontPath{} = True usedByGraphs FontSize{} = True usedByGraphs ID{} = True usedByGraphs LabelJust{} = True usedByGraphs LabelLoc{} = True usedByGraphs Label{} = True usedByGraphs Landscape{} = True usedByGraphs LayerSep{} = True usedByGraphs Layers{} = True usedByGraphs Layout{} = True usedByGraphs LevelsGap{} = True usedByGraphs Levels{} = True usedByGraphs LPos{} = True usedByGraphs Margin{} = True usedByGraphs MaxIter{} = True usedByGraphs MCLimit{} = True usedByGraphs MinDist{} = True usedByGraphs Model{} = True usedByGraphs Mode{} = True usedByGraphs Mosek{} = True usedByGraphs NodeSep{} = True usedByGraphs NoJustify{} = True usedByGraphs Normalize{} = True usedByGraphs Nslimit1{} = True usedByGraphs Nslimit{} = True usedByGraphs Ordering{} = True usedByGraphs OutputOrder{} = True usedByGraphs OverlapScaling{} = True usedByGraphs Overlap{} = True usedByGraphs PackMode{} = True usedByGraphs Pack{} = True usedByGraphs Pad{} = True usedByGraphs PageDir{} = True usedByGraphs Page{} = True usedByGraphs QuadTree{} = True usedByGraphs Quantum{} = True usedByGraphs RankDir{} = True usedByGraphs RankSep{} = True usedByGraphs Ratio{} = True usedByGraphs ReMinCross{} = True usedByGraphs RepulsiveForce{} = True usedByGraphs Root{} = True usedByGraphs Rotate{} = True usedByGraphs SearchSize{} = True usedByGraphs Sep{} = True usedByGraphs ShowBoxes{} = True usedByGraphs Size{} = True usedByGraphs Smoothing{} = True usedByGraphs SortV{} = True usedByGraphs Splines{} = True usedByGraphs Start{} = True usedByGraphs StyleSheet{} = True usedByGraphs Target{} = True usedByGraphs TrueColor{} = True usedByGraphs ViewPort{} = True usedByGraphs VoroMargin{} = True usedByGraphs _ = False usedByClusters :: Attribute -> Bool usedByClusters K{} = True usedByClusters URL{} = True usedByClusters BgColor{} = True usedByClusters ColorScheme{} = True usedByClusters Color{} = True usedByClusters FillColor{} = True usedByClusters FontColor{} = True usedByClusters FontName{} = True usedByClusters FontSize{} = True usedByClusters LabelJust{} = True usedByClusters LabelLoc{} = True usedByClusters Label{} = True usedByClusters LPos{} = True usedByClusters NoJustify{} = True usedByClusters PenColor{} = True usedByClusters PenWidth{} = True usedByClusters Peripheries{} = True usedByClusters Rank{} = True usedByClusters SortV{} = True usedByClusters Style{} = True usedByClusters Target{} = True usedByClusters Tooltip{} = True usedByClusters _ = False usedBySubGraphs :: Attribute -> Bool usedBySubGraphs Rank{} = True usedBySubGraphs _ = False usedByNodes :: Attribute -> Bool usedByNodes URL{} = True usedByNodes ColorScheme{} = True usedByNodes Color{} = True usedByNodes Comment{} = True usedByNodes Distortion{} = True usedByNodes FillColor{} = True usedByNodes FixedSize{} = True usedByNodes FontColor{} = True usedByNodes FontName{} = True usedByNodes FontSize{} = True usedByNodes Group{} = True usedByNodes Height{} = True usedByNodes ID{} = True usedByNodes Image{} = True usedByNodes ImageScale{} = True usedByNodes LabelLoc{} = True usedByNodes Label{} = True usedByNodes Layer{} = True usedByNodes Margin{} = True usedByNodes NoJustify{} = True usedByNodes Orientation{} = True usedByNodes PenWidth{} = True usedByNodes Peripheries{} = True usedByNodes Pin{} = True usedByNodes Pos{} = True usedByNodes Rects{} = True usedByNodes Regular{} = True usedByNodes Root{} = True usedByNodes SamplePoints{} = True usedByNodes ShapeFile{} = True usedByNodes Shape{} = True usedByNodes ShowBoxes{} = True usedByNodes Sides{} = True usedByNodes Skew{} = True usedByNodes SortV{} = True usedByNodes Style{} = True usedByNodes Target{} = True usedByNodes Tooltip{} = True usedByNodes Vertices{} = True usedByNodes Width{} = True usedByNodes Z{} = True usedByNodes _ = False usedByEdges :: Attribute -> Bool usedByEdges URL{} = True usedByEdges ArrowHead{} = True usedByEdges ArrowSize{} = True usedByEdges ArrowTail{} = True usedByEdges ColorScheme{} = True usedByEdges Color{} = True usedByEdges Comment{} = True usedByEdges Constraint{} = True usedByEdges Decorate{} = True usedByEdges Dir{} = True usedByEdges EdgeURL{} = True usedByEdges EdgeTarget{} = True usedByEdges EdgeTooltip{} = True usedByEdges FontColor{} = True usedByEdges FontName{} = True usedByEdges FontSize{} = True usedByEdges HeadURL{} = True usedByEdges HeadClip{} = True usedByEdges HeadLabel{} = True usedByEdges HeadPort{} = True usedByEdges HeadTarget{} = True usedByEdges HeadTooltip{} = True usedByEdges ID{} = True usedByEdges LabelURL{} = True usedByEdges LabelAngle{} = True usedByEdges LabelDistance{} = True usedByEdges LabelFloat{} = True usedByEdges LabelFontColor{} = True usedByEdges LabelFontName{} = True usedByEdges LabelFontSize{} = True usedByEdges LabelTarget{} = True usedByEdges LabelTooltip{} = True usedByEdges Label{} = True usedByEdges Layer{} = True usedByEdges Len{} = True usedByEdges LHead{} = True usedByEdges LPos{} = True usedByEdges LTail{} = True usedByEdges MinLen{} = True usedByEdges NoJustify{} = True usedByEdges PenWidth{} = True usedByEdges Pos{} = True usedByEdges SameHead{} = True usedByEdges SameTail{} = True usedByEdges ShowBoxes{} = True usedByEdges Style{} = True usedByEdges TailURL{} = True usedByEdges TailClip{} = True usedByEdges TailLabel{} = True usedByEdges TailPort{} = True usedByEdges TailTarget{} = True usedByEdges TailTooltip{} = True usedByEdges Target{} = True usedByEdges Tooltip{} = True usedByEdges Weight{} = True usedByEdges _ = False type EscString = String newtype URL = UStr{urlString :: EscString} deriving (Eq, Ord, Show, Read) instance PrintDot URL where unqtDot = wrap (char '<') (char '>') . text . urlString instance ParseDot URL where parseUnqt = liftM UStr $ bracket (character open) (character close) (many1 $ satisfy ((/=) close)) where open = '<' close = '>' parse = parseUnqt newtype ArrowType = AType [(ArrowModifier, ArrowShape)] deriving (Eq, Ord, Show, Read) box, crow, diamond, dotArrow, inv, noArrow, normal, tee, vee :: ArrowType oDot, invDot, invODot, oBox, oDiamond :: ArrowType eDiamond, openArr, halfOpen, emptyArr, invEmpty :: ArrowType normal = AType [(noMods, Normal)] inv = AType [(noMods, Inv)] dotArrow = AType [(noMods, DotArrow)] invDot = AType [(noMods, Inv), (noMods, DotArrow)] oDot = AType [(ArrMod OpenArrow BothSides, DotArrow)] invODot = AType [(noMods, Inv), (openMod, DotArrow)] noArrow = AType [(noMods, NoArrow)] tee = AType [(noMods, Tee)] emptyArr = AType [(openMod, Normal)] invEmpty = AType [(noMods, Inv), (openMod, Normal)] diamond = AType [(noMods, Diamond)] oDiamond = AType [(openMod, Diamond)] eDiamond = oDiamond crow = AType [(noMods, Crow)] box = AType [(noMods, Box)] oBox = AType [(openMod, Box)] openArr = vee halfOpen = AType [(ArrMod FilledArrow LeftSide, Vee)] vee = AType [(noMods, Vee)] instance PrintDot ArrowType where unqtDot (AType mas) = hcat $ map appMod mas where appMod (m, a) = unqtDot m <> unqtDot a instance ParseDot ArrowType where parseUnqt = do mas <- many1 $ do m <- parseUnqt a <- parseUnqt return (m, a) return $ AType mas `onFail` specialArrowParse specialArrowParse :: Parse ArrowType specialArrowParse = oneOf [stringRep eDiamond "ediamond", stringRep openArr "open", stringRep halfOpen "halfopen", stringRep emptyArr "empty", stringRep invEmpty "invempty"] data ArrowShape = Box | Crow | Diamond | DotArrow | Inv | NoArrow | Normal | Tee | Vee deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowShape where unqtDot Box = unqtDot "box" unqtDot Crow = unqtDot "crow" unqtDot Diamond = unqtDot "diamond" unqtDot DotArrow = unqtDot "dot" unqtDot Inv = unqtDot "inv" unqtDot NoArrow = unqtDot "none" unqtDot Normal = unqtDot "normal" unqtDot Tee = unqtDot "tee" unqtDot Vee = unqtDot "vee" instance ParseDot ArrowShape where parseUnqt = oneOf [stringRep Box "box", stringRep Crow "crow", stringRep Diamond "diamond", stringRep DotArrow "dot", stringRep Inv "inv", stringRep NoArrow "none", stringRep Normal "normal", stringRep Tee "tee", stringRep Vee "vee"] data ArrowModifier = ArrMod{arrowFill :: ArrowFill, arrowSide :: ArrowSide} deriving (Eq, Ord, Show, Read) noMods :: ArrowModifier noMods = ArrMod FilledArrow BothSides openMod :: ArrowModifier openMod = ArrMod OpenArrow BothSides instance PrintDot ArrowModifier where unqtDot (ArrMod f s) = unqtDot f <> unqtDot s instance ParseDot ArrowModifier where parseUnqt = do f <- parseUnqt s <- parseUnqt return $ ArrMod f s data ArrowFill = OpenArrow | FilledArrow deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowFill where unqtDot OpenArrow = char 'o' unqtDot FilledArrow = empty instance ParseDot ArrowFill where parseUnqt = liftM (bool FilledArrow OpenArrow . isJust) $ optional (character 'o') parse = parseUnqt data ArrowSide = LeftSide | RightSide | BothSides deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ArrowSide where unqtDot LeftSide = char 'l' unqtDot RightSide = char 'r' unqtDot BothSides = empty instance ParseDot ArrowSide where parseUnqt = liftM getSideType $ optional (oneOf $ map character ['l', 'r']) where getSideType = maybe BothSides (bool RightSide LeftSide . (==) 'l') parse = parseUnqt data AspectType = RatioOnly Double | RatioPassCount Double Int deriving (Eq, Ord, Show, Read) instance PrintDot AspectType where unqtDot (RatioOnly r) = unqtDot r unqtDot (RatioPassCount r p) = commaDel r p toDot at@RatioOnly{} = unqtDot at toDot at@RatioPassCount{} = doubleQuotes $ unqtDot at instance ParseDot AspectType where parseUnqt = liftM (uncurry RatioPassCount) commaSepUnqt `onFail` liftM RatioOnly parseUnqt parse = quotedParse (liftM (uncurry RatioPassCount) commaSepUnqt) `onFail` liftM RatioOnly parse data Rect = Rect Point Point deriving (Eq, Ord, Show, Read) instance PrintDot Rect where unqtDot (Rect p1 p2) = commaDel p1 p2 toDot = doubleQuotes . unqtDot instance ParseDot Rect where parseUnqt = liftM (uncurry Rect) commaSepUnqt parse = quotedParse parseUnqt data ClusterMode = Local | Global | NoCluster deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ClusterMode where unqtDot Local = unqtDot "local" unqtDot Global = unqtDot "global" unqtDot NoCluster = unqtDot "none" instance ParseDot ClusterMode where parseUnqt = oneOf [stringRep Local "local", stringRep Global "global", stringRep NoCluster "none"] data DirType = Forward | Back | Both | NoDir deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot DirType where unqtDot Forward = unqtDot "forward" unqtDot Back = unqtDot "back" unqtDot Both = unqtDot "both" unqtDot NoDir = unqtDot "none" instance ParseDot DirType where parseUnqt = oneOf [stringRep Forward "forward", stringRep Back "back", stringRep Both "both", stringRep NoDir "none"] data DEConstraints = EdgeConstraints | NoConstraints | HierConstraints deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot DEConstraints where unqtDot EdgeConstraints = unqtDot True unqtDot NoConstraints = unqtDot False unqtDot HierConstraints = text "hier" instance ParseDot DEConstraints where parseUnqt = liftM (bool NoConstraints EdgeConstraints) parse `onFail` stringRep HierConstraints "hier" data DPoint = DVal Double | PVal Point deriving (Eq, Ord, Show, Read) instance PrintDot DPoint where unqtDot (DVal d) = unqtDot d unqtDot (PVal p) = unqtDot p toDot (DVal d) = toDot d toDot (PVal p) = toDot p instance ParseDot DPoint where parseUnqt = liftM PVal parseUnqt `onFail` liftM DVal parseUnqt parse = liftM PVal parse `onFail` liftM DVal parse data ModeType = Major | KK | Hier | IpSep deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ModeType where unqtDot Major = text "major" unqtDot KK = text "KK" unqtDot Hier = text "hier" unqtDot IpSep = text "ipsep" instance ParseDot ModeType where parseUnqt = oneOf [stringRep Major "major", stringRep KK "KK", stringRep Hier "hier", stringRep IpSep "ipsep"] data Model = ShortPath | SubSet | Circuit deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Model where unqtDot ShortPath = text "shortpath" unqtDot SubSet = text "subset" unqtDot Circuit = text "circuit" instance ParseDot Model where parseUnqt = oneOf [stringRep ShortPath "shortpath", stringRep SubSet "subset", stringRep Circuit "circuit"] data Label = StrLabel EscString | URLLabel URL deriving (Eq, Ord, Show, Read) instance PrintDot Label where unqtDot (StrLabel s) = unqtDot s unqtDot (URLLabel u) = unqtDot u toDot (StrLabel s) = toDot s toDot (URLLabel u) = toDot u instance ParseDot Label where parseUnqt = liftM StrLabel parseUnqt `onFail` liftM URLLabel parseUnqt parse = liftM StrLabel parse `onFail` liftM URLLabel parse data Point = Point Int Int | PointD Double Double deriving (Eq, Ord, Show, Read) instance PrintDot Point where unqtDot (Point x y) = commaDel x y unqtDot (PointD x y) = commaDel x y toDot = doubleQuotes . unqtDot unqtListToDot = hsep . map unqtDot listToDot = doubleQuotes . unqtListToDot instance ParseDot Point where parseUnqt = intDblPoint `onFail` liftM (uncurry Point) commaSepUnqt `onFail` liftM (uncurry PointD) commaSepUnqt where intDblPoint = liftM (uncurry PointD . first fI) $ commaSep' parseUnqt parseStrictFloat fI :: Int -> Double fI = fromIntegral parse = quotedParse parseUnqt parseUnqtList = sepBy1 parseUnqt whitespace data Overlap = KeepOverlaps | RemoveOverlaps | ScaleOverlaps | ScaleXYOverlaps | PrismOverlap (Maybe Int) | CompressOverlap | VpscOverlap | IpsepOverlap deriving (Eq, Ord, Show, Read) instance PrintDot Overlap where unqtDot KeepOverlaps = unqtDot True unqtDot RemoveOverlaps = unqtDot False unqtDot ScaleOverlaps = text "scale" unqtDot ScaleXYOverlaps = text "scalexy" unqtDot (PrismOverlap i) = maybe id (flip (<>) . unqtDot) i $ text "prism" unqtDot CompressOverlap = text "compress" unqtDot VpscOverlap = text "vpsc" unqtDot IpsepOverlap = text "ipsep" instance ParseDot Overlap where parseUnqt = oneOf [stringRep KeepOverlaps "true", stringRep RemoveOverlaps "false", stringRep ScaleXYOverlaps "scalexy", stringRep ScaleOverlaps "scale", string "prism" >> liftM PrismOverlap (optional parse), stringRep CompressOverlap "compress", stringRep VpscOverlap "vpsc", stringRep IpsepOverlap "ipsep"] data LayerRange = LRID LayerID | LRS LayerID String LayerID deriving (Eq, Ord, Show, Read) instance PrintDot LayerRange where unqtDot (LRID lid) = unqtDot lid unqtDot (LRS id1 s id2) = unqtDot id1 <> unqtDot s <> unqtDot id2 toDot (LRID lid) = toDot lid toDot lrs = doubleQuotes $ unqtDot lrs instance ParseDot LayerRange where parseUnqt = do id1 <- parseUnqt s <- parseLayerSep id2 <- parseUnqt return $ LRS id1 s id2 `onFail` liftM LRID parseUnqt parse = quotedParse (do id1 <- parseUnqt s <- parseLayerSep id2 <- parseUnqt return $ LRS id1 s id2) `onFail` liftM LRID parse parseLayerSep :: Parse String parseLayerSep = many1 . oneOf $ map character defLayerSep defLayerSep :: [Char] defLayerSep = [' ', ':', '\t'] parseLayerName :: Parse String parseLayerName = many1 . orQuote $ satisfy (liftM2 (&&) notLayerSep ((/=) quoteChar)) parseLayerName' :: Parse String parseLayerName' = stringBlock `onFail` quotedParse parseLayerName notLayerSep :: Char -> Bool notLayerSep = flip notElem defLayerSep data LayerID = AllLayers | LRInt Int | LRName String deriving (Eq, Ord, Show, Read) instance PrintDot LayerID where unqtDot AllLayers = text "all" unqtDot (LRInt n) = unqtDot n unqtDot (LRName nm) = unqtDot nm toDot (LRName nm) = toDot nm toDot li = unqtDot li instance ParseDot LayerID where parseUnqt = liftM checkLayerName parseLayerName parse = oneOf [liftM checkLayerName parseLayerName', liftM LRInt parse] checkLayerName :: String -> LayerID checkLayerName str = maybe checkAll LRInt $ stringToInt str where checkAll = if map toLower str == "all" then AllLayers else LRName str data LayerList = LL String [(String, String)] deriving (Eq, Ord, Show, Read) instance PrintDot LayerList where unqtDot (LL l1 ols) = unqtDot l1 <> hcat (map subLL ols) where subLL (s, l) = unqtDot s <> unqtDot l toDot (LL l1 []) = toDot l1 toDot ll = doubleQuotes $ unqtDot ll instance ParseDot LayerList where parseUnqt = do l1 <- parseLayerName ols <- many $ do s <- parseLayerSep lnm <- parseLayerName return (s, lnm) return $ LL l1 ols parse = quotedParse parseUnqt `onFail` liftM (flip LL []) (parseLayerName' `onFail` numString) data OutputMode = BreadthFirst | NodesFirst | EdgesFirst deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot OutputMode where unqtDot BreadthFirst = text "breadthfirst" unqtDot NodesFirst = text "nodesfirst" unqtDot EdgesFirst = text "edgesfirst" instance ParseDot OutputMode where parseUnqt = oneOf [stringRep BreadthFirst "breadthfirst", stringRep NodesFirst "nodesfirst", stringRep EdgesFirst "edgesfirst"] data Pack = DoPack | DontPack | PackMargin Int deriving (Eq, Ord, Show, Read) instance PrintDot Pack where unqtDot DoPack = unqtDot True unqtDot DontPack = unqtDot False unqtDot (PackMargin m) = unqtDot m instance ParseDot Pack where parseUnqt = oneOf [liftM PackMargin parseUnqt, liftM (bool DontPack DoPack) onlyBool] data PackMode = PackNode | PackClust | PackGraph | PackArray Bool Bool (Maybe Int) deriving (Eq, Ord, Show, Read) instance PrintDot PackMode where unqtDot PackNode = text "node" unqtDot PackClust = text "clust" unqtDot PackGraph = text "graph" unqtDot (PackArray c u mi) = addNum . isU . isC . isUnder $ text "array" where addNum = maybe id (flip (<>) . unqtDot) mi isUnder = if c || u then flip (<>) $ char '_' else id isC = if c then flip (<>) $ char 'c' else id isU = if u then flip (<>) $ char 'u' else id instance ParseDot PackMode where parseUnqt = oneOf [stringRep PackNode "node", stringRep PackClust "clust", stringRep PackGraph "graph", do string "array" mcu <- optional $ do character '_' many1 $ satisfy isCU let c = hasCharacter mcu 'c' u = hasCharacter mcu 'u' mi <- optional parseUnqt return $ PackArray c u mi] where hasCharacter ms c = maybe False (elem c) ms isCU = flip elem ['c', 'u'] data Pos = PointPos Point | SplinePos [Spline] deriving (Eq, Ord, Show, Read) instance PrintDot Pos where unqtDot (PointPos p) = unqtDot p unqtDot (SplinePos ss) = unqtDot ss toDot (PointPos p) = toDot p toDot (SplinePos ss) = toDot ss instance ParseDot Pos where parseUnqt = do splns <- parseUnqt case splns of [Spline Nothing Nothing [p]] -> return $ PointPos p _ -> return $ SplinePos splns parse = quotedParse parseUnqt data EdgeType = SplineEdges | LineEdges | NoEdges | PolyLine | CompoundEdge deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot EdgeType where unqtDot SplineEdges = toDot True unqtDot LineEdges = toDot False unqtDot NoEdges = empty unqtDot PolyLine = text "polyline" unqtDot CompoundEdge = text "compound" toDot NoEdges = doubleQuotes empty toDot et = unqtDot et instance ParseDot EdgeType where parseUnqt = oneOf [liftM (bool LineEdges SplineEdges) parse, stringRep SplineEdges "spline", stringRep LineEdges "line", stringRep PolyLine "polyline", stringRep CompoundEdge "compound"] parse = stringRep NoEdges "\"\"" `onFail` optionalQuoted parseUnqt data PageDir = Bl | Br | Tl | Tr | Rb | Rt | Lb | Lt deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot PageDir where unqtDot Bl = text "BL" unqtDot Br = text "BR" unqtDot Tl = text "TL" unqtDot Tr = text "TR" unqtDot Rb = text "RB" unqtDot Rt = text "RT" unqtDot Lb = text "LB" unqtDot Lt = text "LT" instance ParseDot PageDir where parseUnqt = oneOf [stringRep Bl "BL", stringRep Br "BR", stringRep Tl "TL", stringRep Tr "TR", stringRep Rb "RB", stringRep Rt "RT", stringRep Lb "LB", stringRep Lt "LT"] data Spline = Spline (Maybe Point) (Maybe Point) [Point] deriving (Eq, Ord, Show, Read) instance PrintDot Spline where unqtDot (Spline ms me ps) = addS . addE . hsep $ map unqtDot ps where addP t = maybe id ((<+>) . commaDel t) addS = addP 's' ms addE = addP 'e' me toDot = doubleQuotes . unqtDot unqtListToDot = hcat . punctuate semi . map unqtDot listToDot = doubleQuotes . unqtListToDot instance ParseDot Spline where parseUnqt = do ms <- parseP 's' me <- parseP 'e' ps <- sepBy1 parseUnqt whitespace return $ Spline ms me ps where parseP t = optional $ do character t parseComma parseUnqt `discard` whitespace parse = quotedParse parseUnqt parseUnqtList = sepBy1 parseUnqt (character ';') data QuadType = NormalQT | FastQT | NoQT deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot QuadType where unqtDot NormalQT = text "normal" unqtDot FastQT = text "fast" unqtDot NoQT = text "none" instance ParseDot QuadType where parseUnqt = oneOf [stringRep NormalQT "normal", stringRep FastQT "fast", stringRep NoQT "none", character '2' >> return FastQT, liftM (bool NoQT NormalQT) parse] data Root = IsCentral | NotCentral | NodeName String deriving (Eq, Ord, Show, Read) instance PrintDot Root where unqtDot IsCentral = unqtDot True unqtDot NotCentral = unqtDot False unqtDot (NodeName n) = unqtDot n toDot (NodeName n) = toDot n toDot r = unqtDot r instance ParseDot Root where parseUnqt = liftM (bool NotCentral IsCentral) onlyBool `onFail` liftM NodeName parseUnqt parse = optionalQuoted (liftM (bool NotCentral IsCentral) onlyBool) `onFail` liftM NodeName parse data RankType = SameRank | MinRank | SourceRank | MaxRank | SinkRank deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot RankType where unqtDot SameRank = text "same" unqtDot MinRank = text "min" unqtDot SourceRank = text "source" unqtDot MaxRank = text "max" unqtDot SinkRank = text "sink" instance ParseDot RankType where parseUnqt = oneOf [stringRep SameRank "same", stringRep MinRank "min", stringRep SourceRank "source", stringRep MaxRank "max", stringRep SinkRank "sink"] data RankDir = FromTop | FromLeft | FromBottom | FromRight deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot RankDir where unqtDot FromTop = text "TB" unqtDot FromLeft = text "LR" unqtDot FromBottom = text "BT" unqtDot FromRight = text "RL" instance ParseDot RankDir where parseUnqt = oneOf [stringRep FromTop "TB", stringRep FromLeft "LR", stringRep FromBottom "BT", stringRep FromRight "RL"] data Shape = BoxShape | Polygon | Ellipse | Circle | PointShape | Egg | Triangle | PlainText | DiamondShape | Trapezium | Parallelogram | House | Pentagon | Hexagon | Septagon | Octagon | DoubleCircle | DoubleOctagon | TripleOctagon | InvTriangle | InvTrapezium | InvHouse | MDiamond | MSquare | MCircle | Note | Tab | Folder | Box3D | Component deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Shape where unqtDot BoxShape = text "box" unqtDot Polygon = text "polygon" unqtDot Ellipse = text "ellipse" unqtDot Circle = text "circle" unqtDot PointShape = text "point" unqtDot Egg = text "egg" unqtDot Triangle = text "triangle" unqtDot PlainText = text "plaintext" unqtDot DiamondShape = text "diamond" unqtDot Trapezium = text "trapezium" unqtDot Parallelogram = text "parallelogram" unqtDot House = text "house" unqtDot Pentagon = text "pentagon" unqtDot Hexagon = text "hexagon" unqtDot Septagon = text "septagon" unqtDot Octagon = text "octagon" unqtDot DoubleCircle = text "doublecircle" unqtDot DoubleOctagon = text "doubleoctagon" unqtDot TripleOctagon = text "tripleoctagon" unqtDot InvTriangle = text "invtriangle" unqtDot InvTrapezium = text "invtrapezium" unqtDot InvHouse = text "invhouse" unqtDot MDiamond = text "Mdiamond" unqtDot MSquare = text "Msquare" unqtDot MCircle = text "Mcircle" unqtDot Note = text "note" unqtDot Tab = text "tab" unqtDot Folder = text "folder" unqtDot Box3D = text "box3d" unqtDot Component = text "component" instance ParseDot Shape where parseUnqt = oneOf [stringRep Box3D "box3d", stringReps BoxShape ["box", "rectangle", "rect"], stringRep Polygon "polygon", stringRep Ellipse "ellipse", stringRep Circle "circle", stringRep PointShape "point", stringRep Egg "egg", stringRep Triangle "triangle", stringReps PlainText ["plaintext", "none"], stringRep DiamondShape "diamond", stringRep Trapezium "trapezium", stringRep Parallelogram "parallelogram", stringRep House "house", stringRep Pentagon "pentagon", stringRep Hexagon "hexagon", stringRep Septagon "septagon", stringRep Octagon "octagon", stringRep DoubleCircle "doublecircle", stringRep DoubleOctagon "doubleoctagon", stringRep TripleOctagon "tripleoctagon", stringRep InvTriangle "invtriangle", stringRep InvTrapezium "invtrapezium", stringRep InvHouse "invhouse", stringRep MDiamond "Mdiamond", stringRep MSquare "Msquare", stringRep MCircle "Mcircle", stringRep Note "note", stringRep Tab "tab", stringRep Folder "folder", stringRep Component "component"] data SmoothType = NoSmooth | AvgDist | GraphDist | PowerDist | RNG | Spring | TriangleSmooth deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot SmoothType where unqtDot NoSmooth = text "none" unqtDot AvgDist = text "avg_dist" unqtDot GraphDist = text "graph_dist" unqtDot PowerDist = text "power_dist" unqtDot RNG = text "rng" unqtDot Spring = text "spring" unqtDot TriangleSmooth = text "triangle" instance ParseDot SmoothType where parseUnqt = oneOf [stringRep NoSmooth "none", stringRep AvgDist "avg_dist", stringRep GraphDist "graph_dist", stringRep PowerDist "power_dist", stringRep RNG "rng", stringRep Spring "spring", stringRep TriangleSmooth "triangle"] data StartType = StartStyle STStyle | StartSeed Int | StartStyleSeed STStyle Int deriving (Eq, Ord, Show, Read) instance PrintDot StartType where unqtDot (StartStyle ss) = unqtDot ss unqtDot (StartSeed s) = unqtDot s unqtDot (StartStyleSeed ss s) = unqtDot ss <> unqtDot s instance ParseDot StartType where parseUnqt = oneOf [do ss <- parseUnqt s <- parseUnqt return $ StartStyleSeed ss s, liftM StartStyle parseUnqt, liftM StartSeed parseUnqt] data STStyle = RegularStyle | SelfStyle | RandomStyle deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot STStyle where unqtDot RegularStyle = text "regular" unqtDot SelfStyle = text "self" unqtDot RandomStyle = text "random" instance ParseDot STStyle where parseUnqt = oneOf [stringRep RegularStyle "regular", stringRep SelfStyle "self", stringRep RandomStyle "random"] data StyleItem = SItem StyleName [String] deriving (Eq, Ord, Show, Read) instance PrintDot StyleItem where unqtDot (SItem nm args) | null args = dnm | otherwise = dnm <> parens args' where dnm = unqtDot nm args' = hcat . punctuate comma $ map unqtDot args toDot si@(SItem nm args) | null args = toDot nm | otherwise = doubleQuotes $ unqtDot si unqtListToDot = hcat . punctuate comma . map unqtDot listToDot [SItem nm []] = toDot nm listToDot sis = doubleQuotes $ unqtListToDot sis instance ParseDot StyleItem where parseUnqt = do nm <- parseUnqt args <- tryParseList' parseArgs return $ SItem nm args parse = quotedParse (liftM2 SItem parseUnqt parseArgs) `onFail` liftM (flip SItem []) parse parseUnqtList = sepBy1 parseUnqt parseComma parseList = quotedParse parseUnqtList `onFail` liftM return parse parseArgs :: Parse [String] parseArgs = bracketSep (character '(') parseComma (character ')') parseStyleName data StyleName = Dashed | Dotted | Solid | Bold | Invisible | Filled | Diagonals | Rounded | DD String deriving (Eq, Ord, Show, Read) instance PrintDot StyleName where unqtDot Dashed = text "dashed" unqtDot Dotted = text "dotted" unqtDot Solid = text "solid" unqtDot Bold = text "bold" unqtDot Invisible = text "invis" unqtDot Filled = text "filled" unqtDot Diagonals = text "diagonals" unqtDot Rounded = text "rounded" unqtDot (DD nm) = unqtDot nm toDot (DD nm) = toDot nm toDot sn = unqtDot sn instance ParseDot StyleName where parseUnqt = liftM checkDD parseStyleName parse = liftM checkDD $ quotedParse parseStyleName `onFail` do f <- orQuote $ noneOf [quoteChar, '(', ')', ',', ' ', ']'] r <- many (orQuote $ noneOf [quoteChar, '(', ')', ',', ']']) return $ f : r checkDD :: String -> StyleName checkDD str = case map toLower str of "dashed" -> Dashed "dotted" -> Dotted "solid" -> Solid "bold" -> Bold "invis" -> Invisible "filled" -> Filled "diagonals" -> Diagonals "rounded" -> Rounded _ -> DD str parseStyleName :: Parse String parseStyleName = do f <- orQuote $ noneOf [quoteChar, '(', ')', ',', ' '] r <- many (orQuote $ noneOf [quoteChar, '(', ')', ',']) return $ f : r newtype PortPos = PP CompassPoint deriving (Eq, Ord, Show, Read) instance PrintDot PortPos where unqtDot (PP cp) = unqtDot cp toDot (PP cp) = toDot cp instance ParseDot PortPos where parseUnqt = liftM PP parseUnqt data CompassPoint = North | NorthEast | East | SouthEast | South | SouthWest | West | NorthWest | CenterPoint | NoCP deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot CompassPoint where unqtDot NorthEast = text "ne" unqtDot NorthWest = text "nw" unqtDot North = text "n" unqtDot East = text "e" unqtDot SouthEast = text "se" unqtDot SouthWest = text "sw" unqtDot South = text "s" unqtDot West = text "w" unqtDot CenterPoint = text "c" unqtDot NoCP = text "_" instance ParseDot CompassPoint where parseUnqt = oneOf [stringRep NorthEast "ne", stringRep NorthWest "nw", stringRep North "n", stringRep SouthEast "se", stringRep SouthWest "sw", stringRep South "s", stringRep East "e", stringRep West "w", stringRep CenterPoint "c", stringRep NoCP "_"] data ViewPort = VP{wVal :: Double, hVal :: Double, zVal :: Double, focus :: Maybe FocusType} deriving (Eq, Ord, Show, Read) instance PrintDot ViewPort where unqtDot vp = maybe vs ((<>) (vs <> comma) . unqtDot) $ focus vp where vs = hcat . punctuate comma $ map (unqtDot . flip ($) vp) [wVal, hVal, zVal] toDot = doubleQuotes . unqtDot instance ParseDot ViewPort where parseUnqt = do wv <- parseUnqt parseComma hv <- parseUnqt parseComma zv <- parseUnqt mf <- optional $ parseComma >> parseUnqt return $ VP wv hv zv mf parse = quotedParse parseUnqt data FocusType = XY Point | NodeFocus String deriving (Eq, Ord, Show, Read) instance PrintDot FocusType where unqtDot (XY p) = unqtDot p unqtDot (NodeFocus nm) = unqtDot nm toDot (XY p) = toDot p toDot (NodeFocus nm) = toDot nm instance ParseDot FocusType where parseUnqt = liftM XY parseUnqt `onFail` liftM NodeFocus parseUnqt parse = liftM XY parse `onFail` liftM NodeFocus parse data VerticalPlacement = VTop | VCenter | VBottom deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot VerticalPlacement where unqtDot VTop = char 't' unqtDot VCenter = char 'c' unqtDot VBottom = char 'b' instance ParseDot VerticalPlacement where parseUnqt = oneOf [stringRep VTop "t", stringRep VCenter "c", stringRep VBottom "b"] data ScaleType = UniformScale | NoScale | FillWidth | FillHeight | FillBoth deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot ScaleType where unqtDot UniformScale = unqtDot True unqtDot NoScale = unqtDot False unqtDot FillWidth = text "width" unqtDot FillHeight = text "height" unqtDot FillBoth = text "both" instance ParseDot ScaleType where parseUnqt = oneOf [stringRep UniformScale "true", stringRep NoScale "false", stringRep FillWidth "width", stringRep FillHeight "height", stringRep FillBoth "both"] data Justification = JLeft | JRight | JCenter deriving (Eq, Ord, Bounded, Enum, Show, Read) instance PrintDot Justification where unqtDot JLeft = char 'l' unqtDot JRight = char 'r' unqtDot JCenter = char 'c' instance ParseDot Justification where parseUnqt = oneOf [stringRep JLeft "l", stringRep JRight "r", stringRep JCenter "c"] data Ratios = AspectRatio Double | FillRatio | CompressRatio | ExpandRatio | AutoRatio deriving (Eq, Ord, Show, Read) instance PrintDot Ratios where unqtDot (AspectRatio r) = unqtDot r unqtDot FillRatio = text "fill" unqtDot CompressRatio = text "compress" unqtDot ExpandRatio = text "expand" unqtDot AutoRatio = text "auto" instance ParseDot Ratios where parseUnqt = oneOf [liftM AspectRatio parseUnqt, stringRep FillRatio "fill", stringRep CompressRatio "compress", stringRep ExpandRatio "expand", stringRep AutoRatio "auto"] haskell-src-exts-1.23.1/tests/examples/EmptyAnn.hs.prettyprinter.golden0000644000000000000000000000004613534314633024432 0ustar0000000000000000{-# ANN foo "Hlint: ignore Test4" #-} haskell-src-exts-1.23.1/tests/examples/DerivingParen.hs.prettyprinter.golden0000644000000000000000000000006513534314632025434 0ustar0000000000000000data X = X deriving Show data X = X deriving (Show) haskell-src-exts-1.23.1/tests/examples/PatSynFix.hs.prettyprinter.golden0000644000000000000000000000017613534314633024570 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern A <- (True, True) where A = (not $ False && True, True) exp = not $ False && True haskell-src-exts-1.23.1/tests/examples/TySplice4.hs.prettyprinter.golden0000644000000000000000000000021313534314633024513 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} x = [d| f :: a -> Int f x = 1 |] y = [d| f2 :: a -> Int f2 x = 1 |] haskell-src-exts-1.23.1/tests/examples/ViewPatterns.hs.prettyprinter.golden0000644000000000000000000000011613534314633025330 0ustar0000000000000000{-# LANGUAGE ViewPatterns #-} f (id -> Just _) "" = "" g (id -> True) = False haskell-src-exts-1.23.1/tests/examples/LambdaCase.hs.prettyprinter.golden0000644000000000000000000000021613534314633024652 0ustar0000000000000000{-# LANGUAGE LambdaCase #-} module LambdaCase where foo = \case Nothing -> e1 Just e2 -> e2 bar = \case _ -> True haskell-src-exts-1.23.1/tests/examples/InstanceSigs.hs.prettyprinter.golden0000644000000000000000000000041613534314633025272 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE InstanceSigs #-} {-# LANGUAGE TypeFamilies #-} instance SupportsDelta (Map k v) where type Delta (Map k v) = Map k v mkDelta :: Map k v -> Map k v -> Delta (Map k v) mkDelta = undefined haskell-src-exts-1.23.1/tests/examples/ConstraintKinds2.hs.prettyprinter.golden0000644000000000000000000000020313534314632026070 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE RankNTypes #-} data Dict p where Dict :: p => Dict p haskell-src-exts-1.23.1/tests/examples/Unicode2.hs.prettyprinter.golden0000644000000000000000000000006613534314633024351 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} lengthOP n (œ) = 0 œ n haskell-src-exts-1.23.1/tests/examples/THTypes.hs.prettyprinter.golden0000644000000000000000000000036513534314633024243 0ustar0000000000000000{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE QuasiQuotes #-} module THTypes where import Language.Haskell.TH x :: DecsQ x = [d| instance Show $( conT (mkName "Int") ) |] unit x = [t| $x |] haskell-src-exts-1.23.1/tests/examples/RecordWildcardError.hs.prettyprinter.golden0000644000000000000000000000030513534314633026577 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcardError.hs" 1 12) "RecordWildCards language extension is not enabled. Please add {-# LANGUAGE RecordWildCards #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/ExtraPrettyParentheses.hs.prettyprinter.golden0000644000000000000000000000012213534314633027367 0ustar0000000000000000data Q a = Q a a x * (-1) = negate x Just x <> Nothing = Just x f (-1 `Q` _) = () haskell-src-exts-1.23.1/tests/examples/UnicodeSuperscript.hs.prettyprinter.golden0000644000000000000000000000021213534314633026524 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} dumy :: Double -> Double -> Double dumy a b = let a² = a  a b² = b  b in sqrt $ a² + b² haskell-src-exts-1.23.1/tests/examples/InlineConlike.hs.prettyprinter.golden0000644000000000000000000000006313534314633025421 0ustar0000000000000000{-# INLINE CONLIKE size #-} size :: Int size = 64 haskell-src-exts-1.23.1/tests/examples/ForallInInstance.hs.prettyprinter.golden0000644000000000000000000000016713534314633026076 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables #-} module ForallInInstance where instance forall a . MyClass a => MyClass [a] where haskell-src-exts-1.23.1/tests/examples/t412.hs.prettyprinter.golden0000644000000000000000000000014313534314633023367 0ustar0000000000000000{-# LANGUAGE TypeInType #-} module Typeintype (App) where import Data.Kind data App (f :: k -> *) haskell-src-exts-1.23.1/tests/examples/Fixity3.hs.prettyprinter.golden0000644000000000000000000000022013534314633024230 0ustar0000000000000000class Foo f where (<^>) :: Applicative f => f a -> f (a -> b) -> f b infixr 4 <^> foo = pure 1 <^> pure 2 <^> pure (+) haskell-src-exts-1.23.1/tests/examples/ConstraintKinds.hs.prettyprinter.golden0000644000000000000000000000032213534314632026010 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} class Foo a where data Bar a type Bazable a b = (Bar a ~ Maybe b) baz :: Bazable a b => a -> a baz = id haskell-src-exts-1.23.1/tests/examples/TemplateHaskellQuotedNames.hs.prettyprinter.golden0000644000000000000000000000011413534314633030120 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} f = g 'Constructor 'function h = g '() '[] haskell-src-exts-1.23.1/tests/examples/TypeOperatorsTest.hs.prettyprinter.golden0000644000000000000000000000016013534314633026354 0ustar0000000000000000{-# LANGUAGE TypeOperators, FlexibleContexts, FlexibleInstances #-} f :: ArrowXml (~>) => a ~> a f = undefined haskell-src-exts-1.23.1/tests/examples/QuantifiedConstraints.hs.prettyprinter.golden0000644000000000000000000000015313556712523027223 0ustar0000000000000000{-# LANGUAGE ExplicitForAll #-} {-# LANGUAGE QuantifiedConstraints #-} class (forall a . Eq (f a)) => C f haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces3.hs.prettyprinter.golden0000644000000000000000000000012013534314633026534 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} module Foo (type Str) where data Str = Str haskell-src-exts-1.23.1/tests/examples/LanguagePragma.hs.prettyprinter.golden0000644000000000000000000000006613534314633025554 0ustar0000000000000000{-# LANGUAGE RecordWildCards #-} main = print "hello" haskell-src-exts-1.23.1/tests/examples/DeriveGeneric.hs.prettyprinter.golden0000644000000000000000000000021713534314632025411 0ustar0000000000000000{-# LANGUAGE DeriveGeneric #-} data UserTree a = Node a (UserTree a) (UserTree a) | Leaf deriving Generic haskell-src-exts-1.23.1/tests/examples/BangViewPat.hs.prettyprinter.golden0000644000000000000000000000011513534314632025042 0ustar0000000000000000{-# LANGUAGE BangPatterns, ViewPatterns #-} someFun (id -> !arg) = undefined haskell-src-exts-1.23.1/tests/examples/Overlapping.hs.prettyprinter.golden0000644000000000000000000000057113534314633025170 0ustar0000000000000000{-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE MultiParamTypeClasses #-} module Overlapping where class C a b where f :: a -> b -> Bool instance C a b where f _ _ = False instance {-# OVERLAPPING #-} C a a where f _ _ = True instance {-# OVERLAPS #-} C a a where f _ _ = True instance {-# OVERLAPPABLE #-} C a a where f _ _ = True haskell-src-exts-1.23.1/tests/examples/RecordWildcard.hs.prettyprinter.golden0000644000000000000000000000011513534314633025564 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcard.hs" 3 9) "Parse error: ," haskell-src-exts-1.23.1/tests/examples/UnindentedPragmaClose.hs.prettyprinter.golden0000644000000000000000000000006713534314633027115 0ustar0000000000000000{-# LANGUAGE MultiParamTypeClasses #-} f :: Int f = 4 haskell-src-exts-1.23.1/tests/examples/IndentedWhereBlock.hs.prettyprinter.golden0000644000000000000000000000013113534314633026372 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedWhereBlock.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/PackageImports.hs.prettyprinter.golden0000644000000000000000000000021613534314633025607 0ustar0000000000000000{-# LANGUAGE PackageImports #-} module PackageImports where import "wibble" PackageImports.Default import "wibble" PackageImports.Builtin.All haskell-src-exts-1.23.1/tests/examples/Ppr048.hs.prettyprinter.golden0000644000000000000000000000010713534314633023672 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/Ppr048.hs" 3 9) "Parse error: foo" haskell-src-exts-1.23.1/tests/examples/HashOperator.hs.prettyprinter.golden0000644000000000000000000000013313534314633025273 0ustar0000000000000000{-# LANGUAGE OverloadedLabels #-} ( #. ) :: Int -> Int -> Int x #. y = x + y infixr 9 #. haskell-src-exts-1.23.1/tests/examples/SafeImports1.hs.prettyprinter.golden0000644000000000000000000000006613534314633025216 0ustar0000000000000000{-# LANGUAGE SafeImports #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/DefaultSignatures.hs.prettyprinter.golden0000644000000000000000000000023613534314632026330 0ustar0000000000000000{-# LANGUAGE DefaultSignatures #-} class C a where f :: a -> a -> Bool default f :: (Eq a) => a -> a -> Bool f x y = x == y haskell-src-exts-1.23.1/tests/examples/GadtDeriving.hs.prettyprinter.golden0000644000000000000000000000014213534314633025243 0ustar0000000000000000{-# LANGUAGE GADTs #-} data Foo where Foo :: Int -> Foo deriving (Eq, Ord, Typeable) haskell-src-exts-1.23.1/tests/examples/NegativePatterns.hs.prettyprinter.golden0000644000000000000000000000036413534314633026165 0ustar0000000000000000f 1 = -1 f (-1) = 1 f (-2) = 2 f (-3) = 3 data Z a = Higher a a | Same a a | Lower a a infixr 7 `Higher` infixr 6 `Same` infixr 5 `Lower` g :: Z Int -> () g (-1 `Higher` x) = () g (-2 `Same` x) = () g (-3 `Lower` x) = () haskell-src-exts-1.23.1/tests/examples/QuasiQuoteToplevel.hs.prettyprinter.golden0000644000000000000000000000031213534314633026506 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} [undefined| this quasiquote is acceptable to ghc's parser. Previously hse would reject this because -XTemplateHaskell is not enabled to allow "expressions" at top-level |] haskell-src-exts-1.23.1/tests/examples/GroupKeyword.hs.prettyprinter.golden0000644000000000000000000000010113534314633025330 0ustar0000000000000000module GroupKeyword where a = map head $ group $ sort [1 .. 100] haskell-src-exts-1.23.1/tests/examples/Rules.hs.prettyprinter.golden0000644000000000000000000000020413534314633023765 0ustar0000000000000000{-# RULES "head/build" forall (g :: forall b . (a -> b -> b) -> b -> b) . head (build g) = g (\ x _ -> x) badHead #-} haskell-src-exts-1.23.1/tests/examples/IndentedModule2.hs.prettyprinter.golden0000644000000000000000000000010613534314633025656 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} module Main where main = putStr "foo" haskell-src-exts-1.23.1/tests/examples/TrailingWhere2.hs.prettyprinter.golden0000644000000000000000000000014013534314633025520 0ustar0000000000000000data Baz = Baz instance Show Baz where show _ = "" where show _ = "" haskell-src-exts-1.23.1/tests/examples/InjectiveTypeFamilies.hs.prettyprinter.golden0000644000000000000000000001154413534314633027140 0ustar0000000000000000{-# LANGUAGE DataKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE TypeFamilyDependencies #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE UndecidableInstances #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE NoMonomorphismRestriction #-} module T6018 where import T6018a type family F a b c = (result :: k) | result -> a b c type instance F Int Char Bool = Bool type instance F Char Bool Int = Int type instance F Bool Int Char = Char type instance G Bool Int Char = Char type family I (a :: k) b (c :: k) = r | r -> a b type instance I Int Char Bool = Bool type instance I Int Char Int = Bool type instance I Bool Int Int = Int type family J a (b :: k) = r | r -> a type instance J Int b = Char type MaybeSyn a = Maybe a newtype MaybeNew a = MaybeNew (Maybe a) type family K a = r | r -> a type instance K a = MaybeSyn a type family M a = r | r -> a type instance M (Maybe a) = MaybeSyn a type instance M (MaybeNew a) = MaybeNew a type family FClosed a b c = result | result -> a b c where FClosed Int Char Bool = Bool FClosed Char Bool Int = Int FClosed Bool Int Char = Char type family IClosed (a :: *) (b :: *) (c :: *) = r | r -> a b where IClosed Int Char Bool = Bool IClosed Int Char Int = Bool IClosed Bool Int Int = Int type family JClosed a (b :: k) = r | r -> a where JClosed Int b = Char type family KClosed a = r | r -> a where KClosed a = MaybeSyn a type family Bak a = r | r -> a where Bak Int = Char Bak Char = Int Bak a = a type family Foo a = r | r -> a where Foo Int = Bool Foo Bool = Int Foo Bool = Bool type family Bar a = r | r -> a where Bar Int = Bool Bar Bool = Int Bar Bool = Char f :: F a b c -> F a b c f x = x fapp :: Bool fapp = f True fc :: FClosed a b c -> FClosed a b c fc x = x fcapp :: Bool fcapp = fc True i :: I a b Int -> I a b Int i x = x iapp :: Bool iapp = i True ic :: IClosed a b Int -> IClosed a b Int ic x = x icapp :: Bool icapp = ic True bak :: Bak a -> Bak a bak x = x bakapp1 :: Char bakapp1 = bak 'c' bakapp2 :: Double bakapp2 = bak 1.0 bakapp3 :: () bakapp3 = bak () foo :: Foo a -> Foo a foo x = x fooapp1 :: Bool fooapp1 = foo True bar :: Bar a -> Bar a bar x = x barapp1 :: Bool barapp1 = bar True barapp2 :: Int barapp2 = bar 1 type family H a b = r | r -> b a type family Hc a b = r | r -> b a where Hc a b = a b class Hcl a b where type Ht a b = r | r -> b a type family Jx a b = r | r -> a a type family Jcx a b = r | r -> a a where Jcx a b = a b class Jcl a b where type Jt a b = r | r -> a a type family Kx a b = r | r -> a b b type family Kcx a b = r | r -> a b b where Kcx a b = a b class Kcl a b where type Kt a b = r | r -> a b b type family L (a :: k1) = (r :: k2) | r -> k1 where L 'True = Int L 'False = Int L Maybe = 3 L IO = 3 data KProxy (a :: *) = KProxy type family KP (kproxy :: KProxy k) = r | r -> k type instance KP ('KProxy :: KProxy Bool) = Int type instance KP ('KProxy :: KProxy *) = Char kproxy_id :: KP ('KProxy :: KProxy k) -> KP ('KProxy :: KProxy k) kproxy_id x = x kproxy_id_use = kproxy_id 'a' type family Gx a type family Hx a type family Gi a = r | r -> a type instance Gi Int = Char type family Hi a = r | r -> a type family F2 a = r | r -> a type instance F2 [a] = [Gi a] type instance F2 (Maybe a) = Hi a -> Int type family F4 a = r | r -> a type instance F4 [a] = (Gx a, a, a, a) type instance F4 (Maybe a) = (Hx a, a, Int, Bool) type family G2 a b = r | r -> a b type instance G2 a Bool = (a, a) type instance G2 Bool b = (b, Bool) type family G6 a = r | r -> a type instance G6 [a] = [Gi a] type instance G6 Bool = Int g6_id :: G6 a -> G6 a g6_id x = x g6_use :: [Char] g6_use = g6_id "foo" type family Id (a :: k) = (result :: k) | result -> a type instance Id a = a type family IdProxy (a :: k) b = r | r -> a type instance IdProxy a b = (Id a) b type IdSyn a = Id a type family IdProxySyn (a :: k) b = r | r -> a type instance IdProxySyn a b = (IdSyn a) b type family Fa (a :: k) (b :: k) = (r :: k2) | r -> k type instance Fa a b = a type family Arr (repr :: * -> *) (a :: *) (b :: *) = (r :: *) | r -> repr a b class ESymantics repr where int :: Int -> repr Int add :: repr Int -> repr Int -> repr Int lam :: (repr a -> repr b) -> repr (Arr repr a b) app :: repr (Arr repr a b) -> repr a -> repr b te4 = let c3 = lam (\ f -> lam (\ x -> f `app` (f `app` (f `app` x)))) in (c3 `app` (lam (\ x -> x `add` int 14))) `app` (int 0) class Manifold' a where type Base a = r | r -> a project :: a -> Base a unproject :: Base a -> a id' :: forall a . (Manifold' a) => Base a -> Base a id' = project . unproject haskell-src-exts-1.23.1/tests/examples/BracketInstanceHead.hs.prettyprinter.golden0000644000000000000000000000005213534314632026515 0ustar0000000000000000instance (Bounded a => Bounded [a]) where haskell-src-exts-1.23.1/tests/examples/QuasiQuoteSplice.hs.prettyprinter.golden0000644000000000000000000000037213534314633026141 0ustar0000000000000000{-# LANGUAGE TemplateHaskell, RankNTypes #-} {-# OPTIONS_GHC -F -pgmFtrhsx #-} import Language.Haskell.TH data PageFunction m a = PF main = let a = mkName "a" in runQ [t| forall m . PageFunction m $( conT (mkName "a") ) |] >>= print haskell-src-exts-1.23.1/tests/examples/NegPrimWordLiteral.hs.prettyprinter.golden0000644000000000000000000000021013534314633026402 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NegPrimWordLiteral.hs" 3 1) "Parse error: negative primitive word literal: - 9223372036854775808##" haskell-src-exts-1.23.1/tests/examples/RoleAnnotations.hs.prettyprinter.golden0000644000000000000000000000043413534314633026017 0ustar0000000000000000{-# LANGUAGE RoleAnnotations, PolyKinds, KindSignatures #-} module Roles where data T1 a = K1 a data T2 a = K2 a data T5 a = K5 a data T6 a = K6 data T7 a b = K7 b type role T1 nominal type role T2 representational type role T3 phantom type role T4 nominal _ type role T5 _ haskell-src-exts-1.23.1/tests/examples/Completesig03A.hs.prettyprinter.golden0000644000000000000000000000010713534314632025413 0ustar0000000000000000module Completesig03A where data A = A | B {-# COMPLETE A #-} haskell-src-exts-1.23.1/tests/examples/HaddockComments.hs.prettyprinter.golden0000644000000000000000000000056013534314633025743 0ustar0000000000000000module HaddockComments where fun1 :: Int -> Float -> IO () fun1 = undefined fun2 = undefined fun3 :: Int -> Int fun3 = undefined square :: Int -> Int square x = x * x class C a where f :: a -> Int g :: Int -> a data MyData = Cons1{cons1Field1 :: Int, cons1Field2 :: Int, cons1Field3 :: String} | Cons2 Int haskell-src-exts-1.23.1/tests/examples/WildcardTyFam.hs.prettyprinter.golden0000644000000000000000000000011313534314633025364 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} type family Foo a where Foo _ = Int haskell-src-exts-1.23.1/tests/examples/MultiWayIf.hs.prettyprinter.golden0000644000000000000000000000120613534314633024730 0ustar0000000000000000{-# LANGUAGE MultiWayIf #-} module MultiWayIf where foo = if | test1 -> e1 | test2 witharg -> e2 | otherwise -> def bar = if | test1 -> if | test2 -> e1 | test3 -> e2 | test4 -> e3 x = 10 x1 = if | x < 10 -> "< 10" | otherwise -> "" x2 = if | x < 10 -> "< 10" | otherwise -> "" x3 = if | x < 10 -> "< 10" | otherwise -> "" x4 = if | True -> "yes" x5 = if | True -> if | False -> 1 | True -> 2 x6 = if | x < 10 -> if | True -> "yes" | False -> "no" | otherwise -> "maybe" x7 = (if | True -> 0) spam = if | () <- () -> () haskell-src-exts-1.23.1/tests/examples/UnicodeIdents.hs.prettyprinter.golden0000644000000000000000000000002413551226004025421 0ustar0000000000000000+ = () êW x = x * x haskell-src-exts-1.23.1/tests/examples/LineOptionsPragma.hs.prettyprinter.golden0000644000000000000000000000004213534314633026266 0ustar0000000000000000{-# OPTIONS #-} module Fail where haskell-src-exts-1.23.1/tests/examples/TypeEqualityParen.hs.prettyprinter.golden0000644000000000000000000000011213534314633026316 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} f :: (Eq a, (a ~ Int)) => a -> Int f _ = 3 haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsBad.hs.prettyprinter.golden0000644000000000000000000000013013534314632026223 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BinaryLiteralsBad.hs" 3 1) "arity mismatch for 'f'" haskell-src-exts-1.23.1/tests/examples/ContextOrdering.hs.prettyprinter.golden0000644000000000000000000000013513534314632026013 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} module ContextOrdering where foo :: (x m a) => Int foo = 5 haskell-src-exts-1.23.1/tests/examples/DataKinds2.hs.prettyprinter.golden0000644000000000000000000000016613534314632024625 0ustar0000000000000000{-# LANGUAGE DataKinds #-} data Foo a = Foo type FooB = Foo "a" type FooC = Foo 1 instance Show (Foo "bar") where haskell-src-exts-1.23.1/tests/examples/THTypedSplices.hs.prettyprinter.golden0000644000000000000000000000017113546001445025537 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} import Language.Haskell.TH import THTypedSplices.Defs main = $$justTH ($$( [|| 2 ||] )) haskell-src-exts-1.23.1/tests/examples/InfixTypeMinus.hs.prettyprinter.golden0000644000000000000000000000065213534314633025635 0ustar0000000000000000{-# LANGUAGE DataKinds, KindSignatures, TypeOperators, GADTs #-} module Foo where data Vec (n :: Nat) where VCons :: (m ~ (n - 1)) => Double -> Vec m -> Vec n data Vec (n :: Nat) where VCons :: ((n - 1) ~ m) => Double -> Vec m -> Vec n data Vec (n :: Nat) where VCons :: ((m + 1) ~ n) => Double -> Vec m -> Vec n data Vec (n :: Nat) where VCons :: (n ~ (m + 1)) => Double -> Vec m -> Vec n haskell-src-exts-1.23.1/tests/examples/AtOperator.hs.prettyprinter.golden0000644000000000000000000000017213534314632024756 0ustar0000000000000000{-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeOperators #-} data a :+: b = Proxy foo = id @(Int :+: Int) _ @> m = m haskell-src-exts-1.23.1/tests/examples/brackets.hs.prettyprinter.golden0000644000000000000000000000011513534314633024472 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/brackets.hs" 17 3) "Parse error: \10631" haskell-src-exts-1.23.1/tests/examples/IndentedModule1.hs.prettyprinter.golden0000644000000000000000000000010613534314633025655 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} module Main where main = putStr "foo" haskell-src-exts-1.23.1/tests/examples/UnicodeArrow.hs.prettyprinter.golden0000644000000000000000000000026413534314633025302 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} arrowTest :: String -> String arrowTest input = case input of "hello" -> "world" "world" -> "hello" otherwise -> "unknow" haskell-src-exts-1.23.1/tests/examples/UnicodeRelation.hs.prettyprinter.golden0000644000000000000000000000061113534314633025761 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} import Prelude.Unicode testAnd :: Int -> Int -> Bool testAnd a b = let b = a d 3 b‚ = b e 5 in b ' b‚ testOr :: Int -> Int -> Int -> Int -> Int -> Bool testOr a b c d e = let b = a d 3 b‚ = b b 5 bƒ = c n 5 b„ = d o 6 b… = e  [1, 2, 3, 4] b† = e [5, 6, 7, 8] in b ( b‚ ( bƒ ( b„ ( b… ( b† haskell-src-exts-1.23.1/tests/examples/DataHeadParen.hs.prettyprinter.golden0000644000000000000000000000012113534314632025311 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} module DataHeadParen where data (a1 :< a2) = Foo haskell-src-exts-1.23.1/tests/examples/FamilyVarid.hs.prettyprinter.golden0000644000000000000000000000012313534314633025102 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} module FamilyVarid where f family forall = undefined haskell-src-exts-1.23.1/tests/examples/ArrowLayout.hs.prettyprinter.golden0000644000000000000000000000022513534314632025165 0ustar0000000000000000{-# LANGUAGE Arrows #-} module ArrowLayout where exp = proc () -> do rec let e = 1 + i i <- integral -< e returnA -< e haskell-src-exts-1.23.1/tests/examples/InfixFunBind.hs.prettyprinter.golden0000644000000000000000000000002613534314633025220 0ustar0000000000000000left `first` _ = left haskell-src-exts-1.23.1/tests/examples/TySplice3.hs.prettyprinter.golden0000644000000000000000000000005213534314633024513 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} [qq| abc |] haskell-src-exts-1.23.1/tests/examples/NonDecreasing.hs.prettyprinter.golden0000644000000000000000000000017513534314633025421 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NonDecreasing.hs" 8 3) "Parse error: Last statement in a do-block must be an expression" haskell-src-exts-1.23.1/tests/examples/HaskellParser.hs.prettyprinter.golden0000644000000000000000000000110013534314633025427 0ustar0000000000000000import qualified Language.Haskell.Exts.Annotated as Parser import qualified Language.Haskell.Exts.Annotated.Syntax as Syn import qualified Language.Haskell.Exts.Extension as Ext parse originalFileName input = Parser.parseModuleWithMode parseMode input where parseMode :: Parser.ParseMode parseMode = Parser.defaultParseMode{Parser.parseFilename = originalFileName, Parser.extensions = Ext.glasgowExts ++ [Ext.ExplicitForall]} main = do s <- readFile "Bug.hs" let x = parse "Bug.hs" s putStrLn (show x) haskell-src-exts-1.23.1/tests/examples/QualifiedRecordfieldPuns.hs.prettyprinter.golden0000644000000000000000000000005713534314633027615 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} f (C{M.a}) = a haskell-src-exts-1.23.1/tests/examples/IfThenElseLayout.hs.prettyprinter.golden0000644000000000000000000000054413534314633026066 0ustar0000000000000000{-# LANGUAGE DoAndIfThenElse #-} module IfThenElseLayout where askCardsForExchange :: Hand -> IO [Card] askCardsForExchange h = do putStrLn "Wich card do you want to exchange? (Max. 3)" response <- getLine if length (readCards response) > 3 || not (all (flip elem h) h) then askCardsForExchange h else return (readCards response) haskell-src-exts-1.23.1/tests/examples/FFIInterruptible.hs.prettyprinter.golden0000644000000000000000000000006613534314633026056 0ustar0000000000000000{-# LANGUAGE InterruptibleFFI #-} foo = interruptible haskell-src-exts-1.23.1/tests/examples/ParenFunBind.hs.prettyprinter.golden0000644000000000000000000000005213534314633025207 0ustar0000000000000000module ParenFunBind where foo x y = x + y haskell-src-exts-1.23.1/tests/examples/SafeImports2.hs.prettyprinter.golden0000644000000000000000000000005713534314633025217 0ustar0000000000000000{-# LANGUAGE Safe #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/DerivingVia.hs.prettyprinter.golden0000644000000000000000000002761313534314632025116 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE InstanceSigs #-} {-# LANGUAGE TypeInType #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE TypeApplications #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE MultiWayIf #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE UndecidableInstances #-} module DerivingVia where import Data.Void import Data.Complex import Data.Functor.Const import Data.Functor.Identity import Data.Ratio import Control.Monad.Reader import Control.Monad.State import Control.Monad.Writer import Control.Applicative hiding (WrappedMonad(..)) import Data.Bifunctor import Data.Monoid import Data.Kind type f ~> g = forall xx . f xx -> g xx data Foo a = MkFoo a a deriving Show via (Identity (Foo a)) newtype Flip p a b = Flip{runFlip :: p b a} instance Bifunctor p => Bifunctor (Flip p) where bimap f g = Flip . bimap g f . runFlip instance Bifunctor p => Functor (Flip p a) where fmap f = Flip . first f . runFlip newtype Bar a = MkBar (Either a Int) deriving Functor via (Flip Either Int) type MTrans = (Type -> Type) -> (Type -> Type) data Dict c where Dict :: c => Dict c newtype a :- b = Sub (a => Dict b) infixl 1 \\ (\\) :: a => (b => r) -> (a :- b) -> r r \\ Sub Dict = r class LiftingMonad (trans :: MTrans) where proof :: Monad m :- Monad (trans m) instance LiftingMonad (StateT s :: MTrans) where proof :: Monad m :- Monad (StateT s m) proof = Sub Dict instance Monoid w => LiftingMonad (WriterT w :: MTrans) where proof :: Monad m :- Monad (WriterT w m) proof = Sub Dict instance (LiftingMonad trans, LiftingMonad trans') => LiftingMonad (ComposeT trans trans' :: MTrans) where proof :: forall m . Monad m :- Monad (ComposeT trans trans' m) proof = Sub (Dict \\ proof @trans @(trans' m) \\ proof @trans' @m) newtype Stack :: MTrans where Stack :: ReaderT Int (StateT Bool (WriterT String m)) a -> Stack m a deriving newtype (Functor, Applicative, Monad, MonadReader Int, MonadState Bool, MonadWriter String) deriving (MonadTrans, MFunctor) via (ReaderT Int `ComposeT` StateT Bool `ComposeT` WriterT String) class MFunctor (trans :: MTrans) where hoist :: Monad m => (m ~> m') -> (trans m ~> trans m') instance MFunctor (ReaderT r :: MTrans) where hoist :: Monad m => (m ~> m') -> (ReaderT r m ~> ReaderT r m') hoist nat = ReaderT . fmap nat . runReaderT instance MFunctor (StateT s :: MTrans) where hoist :: Monad m => (m ~> m') -> (StateT s m ~> StateT s m') hoist nat = StateT . fmap nat . runStateT instance MFunctor (WriterT w :: MTrans) where hoist :: Monad m => (m ~> m') -> (WriterT w m ~> WriterT w m') hoist nat = WriterT . nat . runWriterT infixr 9 `ComposeT` newtype ComposeT :: MTrans -> MTrans -> MTrans where ComposeT :: {getComposeT :: f (g m) a} -> ComposeT f g m a deriving newtype (Functor, Applicative, Monad) instance (MonadTrans f, MonadTrans g, LiftingMonad g) => MonadTrans (ComposeT f g) where lift :: forall m . Monad m => m ~> ComposeT f g m lift = ComposeT . lift . lift \\ proof @g @m instance (MFunctor f, MFunctor g, LiftingMonad g) => MFunctor (ComposeT f g) where hoist :: forall m m' . Monad m => (m ~> m') -> (ComposeT f g m ~> ComposeT f g m') hoist f = ComposeT . hoist (hoist f) . getComposeT \\ proof @g @m newtype X a = X (a, a) deriving (Semigroup, Monoid) via (Product a, Sum a) deriving (Show, Eq) via (a, a) class C f where c :: f a -> Int newtype X2 f a = X2 (f a) instance C (X2 f) where c = const 0 deriving via (X2 IO) instance C IO newtype P0 a = P0 a deriving Show via a newtype P1 a = P1 [a] deriving Show via [a] newtype P2 a = P2 (a, a) deriving Show via (a, a) newtype P3 a = P3 (Maybe a) deriving Show via (First a) newtype P4 a = P4 (Maybe a) deriving Show via (First $ a) newtype P5 a = P5 a deriving Show via (Identity $ a) newtype P6 a = P6 [a] deriving Show via ([] $ a) newtype P7 a = P7 (a, a) deriving Show via (Identity $ (a, a)) newtype P8 a = P8 (Either () a) deriving Functor via (($) (Either ())) newtype f $ a = APP (f a) deriving newtype Show deriving newtype Functor newtype WrapApplicative f a = WrappedApplicative (f a) deriving (Functor, Applicative) instance (Applicative f, Num a) => Num (WrapApplicative f a) where (+) = liftA2 (+) (*) = liftA2 (*) negate = fmap negate fromInteger = pure . fromInteger abs = fmap abs signum = fmap signum instance (Applicative f, Fractional a) => Fractional (WrapApplicative f a) where recip = fmap recip fromRational = pure . fromRational instance (Applicative f, Floating a) => Floating (WrapApplicative f a) where pi = pure pi sqrt = fmap sqrt exp = fmap exp log = fmap log sin = fmap sin cos = fmap cos asin = fmap asin atan = fmap atan acos = fmap acos sinh = fmap sinh cosh = fmap cosh asinh = fmap asinh atanh = fmap atanh acosh = fmap acosh instance (Applicative f, Semigroup s) => Semigroup (WrapApplicative f s) where (<>) = liftA2 (<>) instance (Applicative f, Monoid m) => Monoid (WrapApplicative f m) where mempty = pure mempty class Pointed p where pointed :: a -> p a newtype WrapMonad f a = WrappedMonad (f a) deriving newtype (Pointed, Monad) instance (Monad m, Pointed m) => Functor (WrapMonad m) where fmap = liftM instance (Monad m, Pointed m) => Applicative (WrapMonad m) where pure = pointed (<*>) = ap data Sorted a = Sorted a a a deriving (Functor, Applicative) via (WrapMonad Sorted) deriving (Num, Fractional, Floating, Semigroup, Monoid) via (WrapApplicative Sorted a) instance Monad Sorted where (>>=) :: Sorted a -> (a -> Sorted b) -> Sorted b Sorted a b c >>= f = Sorted a' b' c' where Sorted a' _ _ = f a Sorted _ b' _ = f b Sorted _ _ c' = f c instance Pointed Sorted where pointed :: a -> Sorted a pointed a = Sorted a a a class IsZero a where isZero :: a -> Bool newtype WrappedNumEq a = WrappedNumEq a newtype WrappedShow a = WrappedShow a newtype WrappedNumEq2 a = WrappedNumEq2 a instance (Num a, Eq a) => IsZero (WrappedNumEq a) where isZero :: WrappedNumEq a -> Bool isZero (WrappedNumEq a) = 0 == a instance Show a => IsZero (WrappedShow a) where isZero :: WrappedShow a -> Bool isZero (WrappedShow a) = "0" == show a instance (Num a, Eq a) => IsZero (WrappedNumEq2 a) where isZero :: WrappedNumEq2 a -> Bool isZero (WrappedNumEq2 a) = a + a == a newtype INT = INT Int deriving newtype Show deriving IsZero via (WrappedNumEq Int) newtype VOID = VOID Void deriving IsZero via (WrappedShow Void) class Bifunctor p => Biapplicative p where bipure :: a -> b -> p a b biliftA2 :: (a -> b -> c) -> (a' -> b' -> c') -> p a a' -> p b b' -> p c c' instance Biapplicative (,) where bipure = (,) biliftA2 f f' (a, a') (b, b') = (f a b, f' a' b') newtype WrapBiapp p a b = WrapBiap (p a b) deriving newtype (Bifunctor, Biapplicative, Eq) instance (Biapplicative p, Num a, Num b) => Num (WrapBiapp p a b) where (+) = biliftA2 (+) (+) (-) = biliftA2 (*) (*) (*) = biliftA2 (*) (*) negate = bimap negate negate abs = bimap abs abs signum = bimap signum signum fromInteger n = fromInteger n `bipure` fromInteger n newtype INT2 = INT2 (Int, Int) deriving IsZero via (WrappedNumEq2 (WrapBiapp (,) Int Int)) class Monoid a => MonoidNull a where null :: a -> Bool newtype WrpMonNull a = WRM a deriving (Eq, Semigroup, Monoid) instance (Eq a, Monoid a) => MonoidNull (WrpMonNull a) where null :: WrpMonNull a -> Bool null = (== mempty) deriving via (WrpMonNull Any) instance MonoidNull Any deriving via () instance MonoidNull () deriving via Ordering instance MonoidNull Ordering class Lattice a where sup :: a -> a -> a (.>=) :: a -> a -> Bool (.>) :: a -> a -> Bool newtype WrapOrd a = WrappedOrd a deriving newtype (Eq, Ord) instance Ord a => Lattice (WrapOrd a) where sup = max (.>=) = (>=) (.>) = (>) deriving via [a] instance Ord a => Lattice [a] deriving via (a, b) instance (Ord a, Ord b) => Lattice (a, b) deriving via Bool instance Lattice Bool deriving via Char instance Lattice Char deriving via Int instance Lattice Int deriving via Integer instance Lattice Integer deriving via Float instance Lattice Float deriving via Double instance Lattice Double deriving via Rational instance Lattice Rational class Functor f => Additive f where zero :: Num a => f a (^+^) :: Num a => f a -> f a -> f a (^+^) = liftU2 (+) (^-^) :: Num a => f a -> f a -> f a x ^-^ y = x ^+^ fmap negate y liftU2 :: (a -> a -> a) -> f a -> f a -> f a instance Additive [] where zero = [] liftU2 f = go where go (x : xs) (y : ys) = f x y : go xs ys go [] ys = ys go xs [] = xs instance Additive Maybe where zero = Nothing liftU2 f (Just a) (Just b) = Just (f a b) liftU2 _ Nothing ys = ys liftU2 _ xs Nothing = xs instance Applicative f => Additive (WrapApplicative f) where zero = pure 0 liftU2 = liftA2 deriving via (WrapApplicative ((->) a)) instance Additive ((->) a) deriving via (WrapApplicative Complex) instance Additive Complex deriving via (WrapApplicative Identity) instance Additive Identity instance Additive ZipList where zero = ZipList [] liftU2 f (ZipList xs) (ZipList ys) = ZipList (liftU2 f xs ys) class Additive (Diff p) => Affine p where type Diff p :: Type -> Type (.-.) :: Num a => p a -> p a -> Diff p a (.+^) :: Num a => p a -> Diff p a -> p a (.-^) :: Num a => p a -> Diff p a -> p a p .-^ v = p .+^ fmap negate v newtype WrapAdditive f a = WrappedAdditive (f a) instance Additive f => Affine (WrapAdditive f) where type Diff (WrapAdditive f) = f WrappedAdditive a .-. WrappedAdditive b = a ^-^ b WrappedAdditive a .+^ b = WrappedAdditive (a ^+^ b) WrappedAdditive a .-^ b = WrappedAdditive (a ^-^ b) deriving via (WrapAdditive ((->) a)) instance Affine ((->) a) deriving via (WrapAdditive []) instance Affine [] deriving via (WrapAdditive Complex) instance Affine Complex deriving via (WrapAdditive Maybe) instance Affine Maybe deriving via (WrapAdditive ZipList) instance Affine ZipList deriving via (WrapAdditive Identity) instance Affine Identity class C2 a b c where c2 :: a -> b -> c instance C2 a b (Const a b) where c2 x _ = Const x newtype Fweemp a = Fweemp a deriving (C2 a b) via (Const a (b :: Type)) haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsGood.hs.prettyprinter.golden0000644000000000000000000000076513534314632026443 0ustar0000000000000000{-# LANGUAGE BinaryLiterals #-} {-# LANGUAGE MagicHash #-} import GHC.Types main = do print [I# 0#, I# - 0#, I# 1#, I# - 1#, I# 1#, I# - 1#, I# - 201#, I# - 201#, I# - 255#, I# - 255#] print [W# 0##, W# 1##, W# 201##, W# 3##, W# 255##, W# 1##] print [0, 1, 2, 3, 4, 5, 6, 7 :: Integer, -0, -1, -2, -3, -4, -5, -6, -7, 340282366920938463463374607431768211455, -340282366920938463463374607431768211455] print [I8# - 128#, I8# 127#] haskell-src-exts-1.23.1/tests/examples/MinimalPragma.hs.prettyprinter.golden0000644000000000000000000000030113534314633025407 0ustar0000000000000000class Eq a where (==) :: a -> a -> Bool (/=) :: a -> a -> Bool x == y = not (x /= y) x /= y = not (x == y) {-# MINIMAL (==) | (/=) #-} haskell-src-exts-1.23.1/tests/examples/IllDataTypeDecl.hs.prettyprinter.golden0000644000000000000000000000012213534314633025636 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} module IllDataTypeDecl where data (f :+: g) p = L haskell-src-exts-1.23.1/tests/examples/RecordPuns.hs.prettyprinter.golden0000644000000000000000000000012513534314633024761 0ustar0000000000000000{-# LANGUAGE NamedFieldPuns #-} module RecordPuns where cotile = tile{Kind.ospeedup} haskell-src-exts-1.23.1/tests/examples/List2.hs.prettyprinter.golden0000644000000000000000000000105413534314633023674 0ustar0000000000000000{-# LANGUAGE TypeFamilyDependencies #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE FunctionalDependencies #-} {-# LANGUAGE UndecidableInstances #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE KindSignatures #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE GADTs #-} module Type.Family.List where type Ø = '[] type (:<) = '(:) infixr 5 :< haskell-src-exts-1.23.1/tests/examples/T13050.hs.prettyprinter.golden0000644000000000000000000000014513534314633023473 0ustar0000000000000000module HolesInfix where f, g, q :: Int -> Int -> Int f x y = _ x y g x y = x `_` y q x y = x `_a` y haskell-src-exts-1.23.1/tests/examples/TypeOperatorAsVariable.hs.prettyprinter.golden0000644000000000000000000000010013534314633027255 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} type T (~>) = () type Foo = () haskell-src-exts-1.23.1/tests/examples/RelaxedDo.hs.prettyprinter.golden0000644000000000000000000000047113534314633024550 0ustar0000000000000000{-# LANGUAGE NondecreasingIndentation #-} module Main where import Control.Monad main :: IO () main = do when (2 > 1) $ do putStrLn "a" putStrLn "b" nestedDoBlocks = getChar >>= (\ c1 -> do getChar >>= (\ c2 -> do getChar >>= (\ c3 -> return [c1, c2, c3]))) haskell-src-exts-1.23.1/tests/examples/RCategory2.hs.prettyprinter.golden0000644000000000000000000000021313534314633024654 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds #-} import GHC.Prim class RCategory cat where type RCategoryCtxt cat a b :: Constraint haskell-src-exts-1.23.1/tests/examples/EmptyList.hs.prettyprinter.golden0000644000000000000000000000004313534314633024626 0ustar0000000000000000module EmptyList where eAttrs = [] haskell-src-exts-1.23.1/tests/examples/CStyleLinePragmas.hs.prettyprinter.golden0000644000000000000000000000012013534314632026215 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/CStyleLinePragmas.hs" 1 1) "Parse error: #" haskell-src-exts-1.23.1/tests/examples/PatternSplice.hs.prettyprinter.golden0000644000000000000000000000017413534314633025456 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} module PatternSpliceTest where foo :: Int -> Bool foo $( [p| 42 |] ) = True foo _ = False haskell-src-exts-1.23.1/tests/examples/SCCPragmas.hs.prettyprinter.golden0000644000000000000000000000006313534314633024621 0ustar0000000000000000module SCCPragmas where x = {-# SCC "wibble" #-} 3 haskell-src-exts-1.23.1/tests/examples/AtSign.hs.prettyprinter.golden0000644000000000000000000000055513534314632024070 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE TypeApplications #-} module Data.Array.Accelerate.CUFFT.Private where transform hndl@(Handle fallback mode width _) = wrap mode (A.constant width) $ A.foreignAcc (AF.CUDAForeignAcc "transformForeign" $ transformForeign hndl) (unwrap mode (A.constant width) fallback) haskell-src-exts-1.23.1/tests/examples/PatternSynonyms.hs.prettyprinter.golden0000644000000000000000000000030713534314633026074 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern A = Nothing pattern B a = Just a pattern a :+: b = (a, b) pattern Tuple a b = (a, b) pattern A = Nothing pattern B a = Just a pattern a :+: b = (a, b) haskell-src-exts-1.23.1/tests/examples/MultiParam.hs.prettyprinter.golden0000644000000000000000000000011413534314633024746 0ustar0000000000000000module MultiParam where foo :: MonadError e m => e -> m () foo = undefined haskell-src-exts-1.23.1/tests/examples/PatternSynonyms3.hs.prettyprinter.golden0000644000000000000000000000230313534314633026155 0ustar0000000000000000{-# LANGUAGE PatternSynonyms, BangPatterns, PolyKinds, DataKinds, GADTs, FlexibleContexts, ViewPatterns #-} {-# LANGUAGE ExplicitForAll #-} pattern Single x <- [x] single :: [a] -> Maybe a single (Single x) = Just x single _ = Nothing pattern Single :: a -> [a] pattern Single x = [x] pattern Single :: () => (Show a) => a -> [a] pattern Single x = [x] f :: (Show a) => [a] -> a f (Single x) = x pattern SinglePair :: (a, a) -> [(a, a)] pattern SinglePair x = [x] f :: (Show a) => [(a, a)] -> String f (SinglePair x) = show x pattern Q = D pattern C :: a -> X Maybe (Maybe a) pattern C x = Y (Just x) pattern Syn :: forall a b c . () => () => Int pattern C :: (Show (a, Bool)) => a -> X Maybe (Maybe (a, Bool)) pattern C x = Y (Just (x, True)) pattern P :: T Bool b pattern P <- MkT True pattern D :: a -> T (Maybe a) Bool pattern D x = MkT (Just x) pattern P a b = Just (a, b) pattern Single x = [x] pattern a :+: b = (a, b) pattern P x <- MkT 42 x pattern P x y <- MkT x y pattern P x <- MkT (f -> True) x data T where MkT :: b -> (b -> Bool) -> T pattern P x f <- MkT x f pattern Single x <- [x] pattern P <- Just True pattern P = 42 pattern P = () pattern Single x <- [x] haskell-src-exts-1.23.1/tests/examples/WhereBlock.hs.prettyprinter.golden0000644000000000000000000000011513534314633024721 0ustar0000000000000000hash ptr len = f len where f h = return h f p = (p `advancePtr` 1) haskell-src-exts-1.23.1/tests/examples/OptionsPragma.hs.prettyprinter.golden0000644000000000000000000000004213534314633025456 0ustar0000000000000000{-# OPTIONS -fno-warn-orphans #-} haskell-src-exts-1.23.1/tests/examples/AmbiguousFixities.hs.prettyprinter.golden0000644000000000000000000000007713665335376026357 0ustar0000000000000000ParseFailed (SrcLoc "" (-1) (-1)) "Ambiguous infix expression" haskell-src-exts-1.23.1/tests/examples/ReadP.hs.prettyprinter.golden0000644000000000000000000000012313534314633023666 0ustar0000000000000000{-# LANGUAGE TypeOperators #-} newtype ReadP a = R (forall b . (a -> P b) -> P b) haskell-src-exts-1.23.1/tests/examples/T11727.hs.prettyprinter.golden0000644000000000000000000000015013534314633023500 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module T11727 where pattern A, B :: Int pattern A = 5 pattern B = 5 haskell-src-exts-1.23.1/tests/examples/FamilyKindSig.hs.prettyprinter.golden0000644000000000000000000000014013534314633025364 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} module FamilyKindSig where type family WithKindSig (a :: * -> *) haskell-src-exts-1.23.1/tests/examples/SimpleDeriving.hs.prettyprinter.golden0000644000000000000000000000002713534314633025617 0ustar0000000000000000data T = T deriving Eq haskell-src-exts-1.23.1/tests/examples/CxtWhitespace.hs.prettyprinter.golden0000644000000000000000000000006713534314632025454 0ustar0000000000000000instance (Eq h) => Eq h instance (Eq h, Eq h) => Eq h haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces4.hs.prettyprinter.golden0000644000000000000000000000016113534314633026542 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} {-# LANGUAGE TypeOperators #-} module Foo (type (:-)) where data (:-) = Foo haskell-src-exts-1.23.1/tests/examples/TabWhitespace.hs.prettyprinter.golden0000644000000000000000000000000113534314633025411 0ustar0000000000000000 haskell-src-exts-1.23.1/tests/examples/QQType.hs.prettyprinter.golden0000644000000000000000000000030113534314633024054 0ustar0000000000000000{-# LANGUAGE FlexibleInstances, TemplateHaskell, QuasiQuotes #-} module QQType where import Language.Haskell.TH x :: DecsQ x = [d| instance Show $( conT (mkName "Int") ) |] haskell-src-exts-1.23.1/tests/examples/EqualityConstraints2.hs.prettyprinter.golden0000644000000000000000000000040313534314633027003 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/EqualityConstraints2.hs" 1 19) "At least one of TypeFamilies or GADTs language extensions needs to be enabled. Please add: {-# LANGUAGE TypeFamilies #-} or {-# LANGUAGE GADTs #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/Testing.hs.prettyprinter.golden0000644000000000000000000000002113534314633024305 0ustar0000000000000000main = return () haskell-src-exts-1.23.1/tests/examples/TrailingWhere3.hs.prettyprinter.golden0000644000000000000000000000011213534314633025520 0ustar0000000000000000main = f where f = g where g = putStrLn "hello world" haskell-src-exts-1.23.1/tests/examples/ImplicitWhereBlocks.hs.prettyprinter.golden0000644000000000000000000000005313534314633026600 0ustar0000000000000000foo = x where x = 1 z = 19 y = 2 haskell-src-exts-1.23.1/tests/examples/MultiCtxt.hs.prettyprinter.golden0000644000000000000000000000016113534314633024632 0ustar0000000000000000{-# LANGUAGE RankNTypes #-} module MultiCtxt where multipleCtx :: Eq a => (Show a => a) multipleCtx = undefined haskell-src-exts-1.23.1/tests/examples/EmptyContext.hs.prettyprinter.golden0000644000000000000000000000002713534314633025341 0ustar0000000000000000happyThen :: () => P a haskell-src-exts-1.23.1/tests/examples/Vta1.hs.prettyprinter.golden0000644000000000000000000000331013534314633023507 0ustar0000000000000000{-# LANGUAGE TypeApplications, ScopedTypeVariables, PolyKinds, TypeFamilies, RankNTypes, FlexibleContexts #-} module Vta1 where quad :: a -> b -> c -> d -> (a, b, c, d) quad = (,,,) silly = quad @_ @Bool @Char @_ 5 True 'a' "Hello" pairup_nosig x y = (x, y) pairup_sig :: a -> b -> (a, b) pairup_sig u w = (u, w) answer_sig = pairup_sig @Bool @Int False 7 answer_read = show (read @Int "3") answer_show = show @Integer (read "5") answer_showread = show @Int (read @Int "7") intcons a = (:) @Int a intpair x y = pairup_sig @Int x y answer_pairup = pairup_sig @Int 5 True answer_intpair = intpair 1 "hello" answer_intcons = intcons 7 [] type family F a type instance F Char = Bool g :: F a -> a g _ = undefined f :: Char f = g True answer = g @Char False mapSame :: forall b . (forall a . a -> a) -> [b] -> [b] mapSame _ [] = [] mapSame fun (x : xs) = fun @b x : (mapSame @b fun xs) pair :: forall a . a -> (forall b . b -> (a, b)) pair x y = (x, y) b = pair @Int 3 @Bool True c = mapSame id [1, 2, 3] d = pair 3 @Bool True pairnum :: forall a . Num a => forall b . b -> (a, b) pairnum = pair 3 e = (pair 3 :: forall a . Num a => forall b . b -> (a, b)) @Int @Bool True h = pairnum @Int @Bool True data First (a :: * -> *) = F data Proxy (a :: k) = P data Three (a :: * -> k -> *) = T foo :: Proxy a -> Int foo _ = 0 first :: First a -> Int first _ = 0 fTest = first F fMaybe = first @Maybe F test = foo P bar = foo @Bool P too :: Three a -> Int too _ = 3 threeBase = too T threeOk = too @Either T blah = Nothing @Int newtype N = MkN{unMkN :: forall a . Show a => a -> String} n = MkN show boo = unMkN n @Bool boo2 :: forall (a :: * -> *) . Proxy a -> Bool boo2 _ = False base = boo2 P bar' = boo2 @Maybe P haskell-src-exts-1.23.1/tests/examples/TupleSections.hs.prettyprinter.golden0000644000000000000000000000006213534314633025476 0ustar0000000000000000{-# LANGUAGE TupleSections #-} foo x = (1, ,) x 3 haskell-src-exts-1.23.1/tests/examples/TypeInstances.hs.prettyprinter.golden0000644000000000000000000000020713534314633025467 0ustar0000000000000000{-# LANGUAGE TypeFamilies #-} class MapType v where type Key v :: * type Key v = TileKey v type Source v :: * haskell-src-exts-1.23.1/tests/examples/PrimitiveIntHexLiteral.hs.prettyprinter.golden0000644000000000000000000000007613534314633027307 0ustar0000000000000000{-# LANGUAGE MagicHash #-} minInt = I# (9223372036854775808#) haskell-src-exts-1.23.1/tests/examples/QuasiQuoteQual2.hs.prettyprinter.golden0000644000000000000000000000006213534314633025702 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} f [True] = 1 f _ = 0 haskell-src-exts-1.23.1/tests/examples/ForeignImportJavascript.hs.prettyprinter.golden0000644000000000000000000000022313534314633027507 0ustar0000000000000000{-# LANGUAGE JavascriptFFI #-} foreign import javascript unsafe "somethingUseful_ = $1" js_set_somethingUseful :: JSFun a -> IO () haskell-src-exts-1.23.1/tests/examples/ForeignImport.hs.prettyprinter.golden0000644000000000000000000000015713534314633025466 0ustar0000000000000000foreign import ccall unsafe "getProgArgv" getProgArgv :: Ptr CInt -> Ptr (Ptr CString) -> IO () haskell-src-exts-1.23.1/tests/examples/ClassContext.hs.prettyprinter.golden0000644000000000000000000000006113534314632025305 0ustar0000000000000000f :: Ord (i Int) => i Int -> i Int f = undefined haskell-src-exts-1.23.1/tests/examples/ArrowBrackets.hs.prettyprinter.golden0000644000000000000000000000025713603723515025454 0ustar0000000000000000{-# LANGUAGE Arrows #-} module ArrowBrackets where foo = proc (x, y) -> (| f (g -< x) |) y bar = proc (x, y) -> do z <- (| f (g -< x) |) y (| f (h -< z) |) y haskell-src-exts-1.23.1/tests/examples/RecursiveDo.hs.prettyprinter.golden0000644000000000000000000000014313534314633025127 0ustar0000000000000000{-# LANGUAGE RecursiveDo #-} justOnes = do rec xs <- Just (1 : xs) return (map negate xs) haskell-src-exts-1.23.1/tests/examples/EmptyFunDepPremise.hs.prettyprinter.golden0000644000000000000000000000013213534314633026420 0ustar0000000000000000{-# LANGUAGE FunctionalDependencies #-} module EmptyFunDepPremise where class C a | -> a haskell-src-exts-1.23.1/tests/examples/DoubleHashOp.hs.prettyprinter.golden0000644000000000000000000000020113534314633025205 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} module DoubleHashOp where ( ## ) :: a -> b -> Int a ## b = 0 ( #* ) :: a -> b -> Int a #* b = 1 haskell-src-exts-1.23.1/tests/examples/SpecializePhaseControl.hs.prettyprinter.golden0000644000000000000000000000055213534314633027313 0ustar0000000000000000{-# SPECIALISE [1] x :: Integer -> Integer -> Integer, Integer -> Int -> Integer, Int -> Int -> Int #-} x :: (Num a, Integral b) => a -> b -> a x = undefined {-# SPECIALISE INLINE [999] y :: Integer -> Integer -> Integer, Integer -> Int -> Integer, Int -> Int -> Int #-} y :: (Num a, Integral b) => a -> b -> a y = undefined haskell-src-exts-1.23.1/tests/examples/MagicHashUnboxedTuples.hs.prettyprinter.golden0000644000000000000000000000020713534314633027244 0ustar0000000000000000{-# LANGUAGE MagicHash, UnboxedTuples #-} module MagicHashUnboxedTuples where f (# x, y #) = (# a#, b #) where a# = a# b = b haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces2.hs.prettyprinter.golden0000644000000000000000000000014213534314633026537 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} module ExplicitNamespaces2 (f, type (++)) where f = undefined haskell-src-exts-1.23.1/tests/examples/completesig01.hs.prettyprinter.golden0000644000000000000000000000051513534314633025354 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -Wall #-} module Simple where pattern Foo :: () pattern Foo = () a :: () -> () a Foo = () data A = B | C | D {-# COMPLETE Foo #-} {-# COMPLETE B, C #-} {-# COMPLETE B #-} b :: A -> A b B = B b C = C {-# COMPLETE Foo :: () #-} haskell-src-exts-1.23.1/tests/examples/ArityMismatch.hs.prettyprinter.golden0000644000000000000000000000012613534314632025453 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ArityMismatch.hs" 3 1) "arity mismatch for 'foo'" haskell-src-exts-1.23.1/tests/examples/QuasiQuoteUnit.hs.prettyprinter.golden0000644000000000000000000000012213534314633025632 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE TemplateHaskell #-} unNest n = conP '() haskell-src-exts-1.23.1/tests/examples/Fixity2.hs.prettyprinter.golden0000644000000000000000000000013613534314633024235 0ustar0000000000000000foo = pure 1 <^> pure 2 <^> pure (+) where (<^>) = flip (<*>) infixr 4 <^> haskell-src-exts-1.23.1/tests/examples/IndentedTopLevelWhere.hs.prettyprinter.golden0000644000000000000000000000013413534314633027075 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedTopLevelWhere.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/DerivingVia2.hs.prettyprinter.golden0000644000000000000000000000211613534314632025167 0ustar0000000000000000{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE StandaloneDeriving #-} module DerivingVia2 where import Control.Applicative import Data.Functor.Compose import Data.Proxy import Data.Semigroup newtype App (f :: * -> *) a = App (f a) deriving newtype (Functor, Applicative) instance (Applicative f, Semigroup a) => Semigroup (App f a) where (<>) = liftA2 (<>) deriving via (App (Compose (f :: * -> *) g) a) instance (Applicative f, Applicative g, Semigroup a) => Semigroup (Compose f g a) class C (a :: k -> *) instance C Proxy newtype MyProxy a = MyProxy (Proxy a) deriving via (Proxy :: * -> *) instance C MyProxy class Z a b data T a data X1 a data X2 a data X3 a deriving via (forall a . T a) instance Z a (X1 b) deriving via (T a) instance forall b . Z a (X2 b) deriving via (forall a . T a) instance forall b . Z a (X3 b) haskell-src-exts-1.23.1/tests/examples/THTSplices.hs.prettyprinter.golden0000644000000000000000000000013713534314633024662 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} import Language.Haskell.TH main = undefined :: $( undefined ) haskell-src-exts-1.23.1/tests/examples/MultiLinePragma.hs.prettyprinter.golden0000644000000000000000000000017313534314633025732 0ustar0000000000000000{-# OPTIONS_GHC -a -a -a -a -a -a -a -a -a -a -a #-} main :: IO () main = dat haskell-src-exts-1.23.1/tests/examples/ConstraintKinds3.hs.prettyprinter.golden0000644000000000000000000000017413534314632026100 0ustar0000000000000000{-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE MultiParamTypeClasses #-} class Foo c a where bar :: (c a) => a -> a haskell-src-exts-1.23.1/tests/examples/GadtStrictness.hs.prettyprinter.golden0000644000000000000000000000007413534314633025641 0ustar0000000000000000{-# LANGUAGE GADTs #-} data X where X :: !Int -> X haskell-src-exts-1.23.1/tests/examples/UnicodeSyntax.hs.prettyprinter.golden0000644000000000000000000000037613534314633025502 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax, ExplicitForAll #-} module UnicodeSyntax where import System.Environment (getArgs) main :: IO () main = do as <- getArgs print $ test 0 test :: Int -> Bool test x = x * 5 == x + 8 id1 :: forall a . a -> a id1 x = x haskell-src-exts-1.23.1/tests/examples/GADTRecord2.hs.prettyprinter.golden0000644000000000000000000000011413534314633024633 0ustar0000000000000000{-# LANGUAGE GADTs #-} data T where T :: () => {field :: Int} -> T haskell-src-exts-1.23.1/tests/examples/FlexibleContextsWithoutVars.hs.prettyprinter.golden0000644000000000000000000000010313534314633030373 0ustar0000000000000000{-# LANGUAGE FlexibleContexts #-} f :: Log.Stack => a -> a f = id haskell-src-exts-1.23.1/tests/examples/NoStartNumIdents.hs.prettyprinter.golden0000644000000000000000000000013213551227111026105 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NoStartNumIdents.hs" 2 1) "Parse error in pattern: 1" haskell-src-exts-1.23.1/tests/examples/TypeListCons.hs.prettyprinter.golden0000644000000000000000000000023713534314633025301 0ustar0000000000000000{-# LANGUAGE DataKinds, TypeOperators #-} module TypeListCons where type List1 a = a ': '[] type List2 a b = a ': '[] type List3 a b c = a ': b ': c ': '[] haskell-src-exts-1.23.1/tests/examples/ClassInstType.hs.prettyprinter.golden0000644000000000000000000000116113534314632025442 0ustar0000000000000000module ClassInstType where class Dir d where localDir :: d -> IO FilePath instance Dir Directory where localDir (Local f) = return f localDir (Darcs{url = url, darcsVersion = Patch patch, subDirectory = subDir}) = do tmp <- createTempDir 0 "haskelld" darcsOut <- runDarcsCommand tmp "get" ["--lazy", "--to-match", "hash " ++ patch, url, "fs"] print darcsOut let (ExitSuccess, "", out) = darcsOut print out return $ tmp "fs" subDir type URL = String haskell-src-exts-1.23.1/tests/examples/QuasiQuoteLines.hs.prettyprinter.golden0000644000000000000000000000020313534314633025765 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import Here str :: String str = [here|test test test test |] main :: IO () main = do putStrLn str haskell-src-exts-1.23.1/tests/examples/RCategory.hs.prettyprinter.golden0000644000000000000000000000200213534314633024570 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds, MultiParamTypeClasses #-} module Control.RCategory where import qualified Prelude import GHC.Prim infixr 9 . infixr 1 >>>, <<< class RCategory cat where type RCategoryCtxt cat a b :: Constraint id :: RCategoryCtxt cat a a => cat a a (.) :: (RCategoryCtxt cat b c, RCategoryCtxt cat a b, RCategoryCtxt cat a c) => cat b c -> cat a b -> cat a c {-# RULES "identity/left" forall p . id . p = p "identity/right" forall p . p . id = p #-} instance RCategory (->) where type RCategoryCtxt (->) a a = () id = Prelude.id (.) = (Prelude..) (<<<) :: (RCategoryCtxt cat a c, RCategoryCtxt cat a b, RCategoryCtxt cat b c, RCategory cat) => cat b c -> cat a b -> cat a c (<<<) = (.) (>>>) :: (RCategoryCtxt cat a c, RCategoryCtxt cat a b, RCategoryCtxt cat b c, RCategory cat) => cat a b -> cat b c -> cat a c f >>> g = g . f haskell-src-exts-1.23.1/tests/examples/PolyKinds.hs.prettyprinter.golden0000644000000000000000000000033513534314633024614 0ustar0000000000000000{-# LANGUAGE PolyKinds #-} data Proxy t = Proxy class Typeable t where typeOf :: Proxy t -> TypeRep instance Typeable Int where typeOf _ = TypeRep instance Typeable [] where typeOf _ = TypeRep haskell-src-exts-1.23.1/tests/examples/StarInType.hs.prettyprinter.golden0000644000000000000000000000015413534314633024741 0ustar0000000000000000{-# LANGUAGE TypeOperators, KindSignatures #-} data B = B data a * b = Foo type A = B * B main = print 1 haskell-src-exts-1.23.1/tests/examples/Nounpack2.hs.prettyprinter.golden0000644000000000000000000000004413534314633024535 0ustar0000000000000000data Foo = Foo {-# NOUNPACK #-} Int haskell-src-exts-1.23.1/tests/examples/RegularPatterns.hs.prettyprinter.golden0000644000000000000000000000035413534314633026023 0ustar0000000000000000{-# OPTIONS_GHC -F -pgmFhsx2hs #-} {-# LANGUAGE RegularPatterns #-} module RegularPatterns where f :: [Int] -> [[Int]] f [0+!, b+, 1?, (| 2, 3 |)] = [b] f [1+, (| x | x `mod` 2 == 0 |)] = [[x]] f [2, a@(| b@:_, _ |)*] = b : a f _ = [] haskell-src-exts-1.23.1/tests/examples/ConstructorAndClassOperators.hs.prettyprinter.golden0000644000000000000000000000016013534314632030530 0ustar0000000000000000{-# LANGUAGE TypeOperators, MultiParamTypeClasses #-} ins :: (:=>) b h => b :- h data (:><:) a b = (:><:) a b haskell-src-exts-1.23.1/tests/examples/UnboxedTuples.hs.prettyprinter.golden0000644000000000000000000000020013534314633025470 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} foo :: (a, b) -> (# b, a #) foo (a, b) = case (# b, a #) of (# b, a #) -> (# , #) b a haskell-src-exts-1.23.1/tests/examples/FFIExtensions.hs.prettyprinter.golden0000644000000000000000000000035713534314633025370 0ustar0000000000000000{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI, CApiFFI #-} module FFIExtensions where foreign import ccall interruptible "sleep" sleep :: CUint -> IO CUint foreign import capi "header.h f" f :: CInt -> IO CInt haskell-src-exts-1.23.1/tests/examples/Lib.hs.prettyprinter.golden0000644000000000000000000000052113534314633023403 0ustar0000000000000000{-# LANGUAGE UnboxedSums, MagicHash #-} module Lib (flip, getInt) where import GHC.Exts import Prelude (Int) {-# NOINLINE flip #-} flip :: (# Int | Int# #) -> (# Int# | Int #) flip (# i | #) = (# | i #) flip (# | i #) = (# i | #) {-# NOINLINE getInt #-} getInt :: (# Int# | Int #) -> Int getInt (# i | #) = I# i getInt (# | i #) = i haskell-src-exts-1.23.1/tests/examples/Unpack.hs.prettyprinter.golden0000644000000000000000000000021013534314633024111 0ustar0000000000000000{-# LANGUAGE GADTs #-} data CmmNode e x where CmmEntry :: {-# UNPACK #-} !Int -> CmmNode e x data UI = UI {-# UNPACK #-} !Int haskell-src-exts-1.23.1/tests/examples/FixityTests.hs.prettyprinter.golden0000644000000000000000000000020213534314633025170 0ustar0000000000000000main = forM_ cmdReports $ \ x -> do putStrLn $ "Writing report to " ++ x ++ " ..." writeReport x ideas haskell-src-exts-1.23.1/tests/examples/Bundles.hs.prettyprinter.golden0000644000000000000000000000017213534314632024272 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} module Bundles (Foo(..), Baz(.., Q), Qux(F, ..), Tux(Q, .., F)) where main = main haskell-src-exts-1.23.1/tests/examples/PolyKindSigs.hs.prettyprinter.golden0000644000000000000000000000016313534314633025256 0ustar0000000000000000{-# LANGUAGE GADTs #-} {-# LANGUAGE PolyKinds #-} module Test where data Foo :: * -> * where Foo :: Foo a haskell-src-exts-1.23.1/tests/examples/MagicHashN.hs.prettyprinter.golden0000644000000000000000000000015013534314633024635 0ustar0000000000000000{-# LANGUAGE MagicHash #-} module MagicHashN where a# = 1 b## = 2 c### = 3 main = print (a#, b##, c###) haskell-src-exts-1.23.1/tests/examples/TySplice.hs.prettyprinter.golden0000644000000000000000000000011113534314633024424 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} [| f :: $ty |] [| f :: $( fun ty ) |] haskell-src-exts-1.23.1/tests/examples/BadStringLineBreak.hs.prettyprinter.golden0000644000000000000000000000014013534314632026323 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BadStringLineBreak.hs" 3 27) "Improperly terminated string" haskell-src-exts-1.23.1/tests/examples/QualifiedDot.hs.prettyprinter.golden0000644000000000000000000000006013534314633025245 0ustar0000000000000000module QualifiedDot where twoDots = (Prelude..) haskell-src-exts-1.23.1/tests/examples/DerivingViaStealing.hs.prettyprinter.golden0000644000000000000000000000010313534314632026566 0ustar0000000000000000module DerivingViaStealing where via = () stock = () anyclass = () haskell-src-exts-1.23.1/tests/examples/Overlapable.hs.prettyprinter.golden0000644000000000000000000000013713534314633025134 0ustar0000000000000000instance {-# OVERLAP #-} C a instance {-# NO_OVERLAP #-} C a instance {-# INCOHERENT #-} C a haskell-src-exts-1.23.1/tests/examples/DoRec.hs.prettyprinter.golden0000644000000000000000000000010213534314633023664 0ustar0000000000000000{-# LANGUAGE DoRec #-} main = do rec let x = 1 return () haskell-src-exts-1.23.1/tests/examples/BlockArguments.hs.prettyprinter.golden0000644000000000000000000000061513603723515025621 0ustar0000000000000000{-# LANGUAGE BlockArguments #-} module BlockArguments where foo = when (x > 0) (do print x exitFailure) bar = withForeignPtr fptr (\ ptr -> c_memcpy buf ptr size) baz arg1 arg2 arg3 arg4 = initialValue & someFunction arg1 arg2 >>= traverse (\ (x, y) -> do a <- f x b <- g y h a b >>= anotherFunction arg3 arg4) haskell-src-exts-1.23.1/tests/examples/GADTRecord.hs.prettyprinter.golden0000644000000000000000000000010613534314633024552 0ustar0000000000000000{-# LANGUAGE GADTs #-} data T where T :: {field :: Int} -> T haskell-src-exts-1.23.1/tests/examples/SpecializeInstance.hs.prettyprinter.golden0000644000000000000000000000033413534314633026454 0ustar0000000000000000instance Sized a => Sized (Digit a) where {-# SPECIALISE instance Sized (Digit (Elem a)) #-} {-# SPECIALISE instance Sized (Digit (Node a)) #-} size xs = foldl (\ i x -> i + size x) 0 xs haskell-src-exts-1.23.1/tests/examples/t403.hs.prettyprinter.golden0000644000000000000000000000050613534314633023372 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ViewPatterns #-} {-# LANGUAGE TypeOperators #-} {-# LANGUAGE DataKinds #-} module T403 where pattern (:&&:) :: () => forall k . ((k :+ 1) ~ n) => a -> HoHeList k a -> HoHeList n a pattern (:&&:) x rest <- (matchNext -> Right (x, Refl, rest)) haskell-src-exts-1.23.1/tests/examples/TypeFunctions.hs.prettyprinter.golden0000644000000000000000000000017613534314633025515 0ustar0000000000000000{-# LANGUAGE TypeFamilies, KindSignatures #-} data Id = Id type family Rep (f :: * -> *) x :: * type instance Rep Id x = x haskell-src-exts-1.23.1/tests/examples/PatternSynonyms2.hs.prettyprinter.golden0000644000000000000000000000042113534314633026153 0ustar0000000000000000{-# LANGUAGE PatternSynonyms, ScopedTypeVariables, KindSignatures #-} module Foo (pattern Single) where pattern Single x <- [x] where Single 4 = [x] Single 5 = [x] pattern Double x = [x] single :: [a] -> Maybe a single (Single x) = Just x single _ = Nothing haskell-src-exts-1.23.1/tests/examples/ParallelArrays2.hs.prettyprinter.golden0000644000000000000000000000011713534314633025676 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ParallelArrays2.hs" 2 17) "Parse error: :" haskell-src-exts-1.23.1/tests/examples/HexPrec.hs.prettyprinter.golden0000644000000000000000000000011013534314633024225 0ustar0000000000000000module HexPrec where (%%) :: Int -> Int -> Int a %% b = 0 infixl 2 %% haskell-src-exts-1.23.1/tests/examples/Bug.hs.prettyprinter.golden0000644000000000000000000000002713534314632023412 0ustar0000000000000000import Test.QuickCheck haskell-src-exts-1.23.1/tests/examples/ExprHole.hs.prettyprinter.golden0000644000000000000000000000007013534314633024422 0ustar0000000000000000foo = _ foo = _ x foo = _ foo x = baz where foo _ = _ haskell-src-exts-1.23.1/tests/examples/UnboxedSingleton.hs.prettyprinter.golden0000644000000000000000000000005713534314633026170 0ustar0000000000000000{-# LANGUAGE UnboxedTuples #-} foo a = (# a #) haskell-src-exts-1.23.1/tests/examples/OverloadedLabels.hs.prettyprinter.golden0000644000000000000000000000066613534314633026116 0ustar0000000000000000{-# LANGUAGE OverloadedLabels, DataKinds, FlexibleContexts, FlexibleInstances, MultiParamTypeClasses, NoMonomorphismRestriction #-} import GHC.OverloadedLabels instance IsLabel "true" Bool where fromLabel _ = True instance IsLabel "_False1'" Bool where fromLabel _ = False a :: IsLabel "true" t => t a = #true b = #_False1' c :: Bool c = #true main = do print (a :: Bool) print (b :: Bool) print c haskell-src-exts-1.23.1/tests/examples/Unicode.hs.prettyprinter.golden0000644000000000000000000000463113534314633024271 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where import System.Environment main :: IO () main = do as <- getArgs print $ as print $ test 0 print $ test2 0 print $ testRewrite 0 print $ testRewriteReverse 0 print $ testRewrite2 0 print $ testRewriteReverse2 0 test :: a -> Bool test x = pi where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 test2 :: a -> (Bool, Bool) test2 x = (pf, pi) where f = replicate 2000 x i = repeat x pf = f |> 300 pi = i |> 300 testRewrite :: a -> Bool testRewrite x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = lf > 300 pi = li > 300 testRewriteReverse :: a -> Bool testRewriteReverse x = pi where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 300 d lf pi = 300 d li testRewrite2 :: a -> (Bool, Bool) testRewrite2 x = (length i > 300, 300 > length i) where i = repeat x testRewriteReverse2 :: a -> (Bool, Bool) testRewriteReverse2 x = (2000 < length i, length i > 20) where f = replicate 2000 x i = repeat x lf = length f li = length i pf = 2000 == lf pi = lf e li lengthOP :: (Num a, Ord a) => Bool -> (a -> a -> Bool) -> [b] -> a -> Bool lengthOP v (œ) [] n = 0 œ n lengthOP v (œ) xxs n = co xxs 0 where co (_ : xs) c | n > c = co xs (c + 1) | otherwise = v co [] c = c œ n (c) = (==) (d) = (<=) (e) = (>=) (|c) = lengthOP False (c) (|<) = lengthOP False (<) (|d) = lengthOP False (d) (|>) = lengthOP True (>) (|e) = lengthOP True (e) (|=) = lengthOP False (==) (|==) = lengthOP False (==) (|<=) = lengthOP False (<=) (|>=) = lengthOP False (>=) (c|) = flip (|c) (<|) = flip (|e) (d|) = flip (|>) (>|) = flip (|d) (e|) = flip (|<) {-# RULES "xs |\8803 n" forall xs n . (length xs) == n = xs |c n "xs |< n" forall xs n . (length xs) < n = xs |< n "xs |\8804 n" forall xs n . (length xs) <= n = xs |d n "xs |> n" forall xs n . (length xs) > n = xs |> n "xs |\8805 n" forall xs n . (length xs) >= n = xs |e n "n \8803| xs" forall xs n . n == (length xs) = xs |c n "n <| xs" forall xs n . n < (length xs) = xs |e n "n \8804| xs" forall xs n . n <= (length xs) = xs |> n "n >| xs" forall xs n . n > (length xs) = xs |d n "n \8805| xs" forall xs n . n >= (length xs) = xs |< n #-} haskell-src-exts-1.23.1/tests/examples/RCategory3.hs.prettyprinter.golden0000644000000000000000000000016713534314633024665 0ustar0000000000000000{-# LANGUAGE TypeFamilies, ConstraintKinds #-} instance RCategory (->) where type RCategoryCtxt (->) a a = () haskell-src-exts-1.23.1/tests/examples/ParallelListComp.hs.prettyprinter.golden0000644000000000000000000000013513534314633026105 0ustar0000000000000000{-# LANGUAGE ParallelListComp #-} f xs ys zs = [(x, y, z)| x <- xs| y <- ys, y > 2| z <- zs] haskell-src-exts-1.23.1/tests/examples/ByteStringUtils.hs.prettyprinter.golden0000644000000000000000000003534013534314632026016 0ustar0000000000000000{-# LANGUAGE BangPatterns, ForeignFunctionInterface, CPP #-} module ByteStringUtils (unsafeWithInternals, unpackPSfromUTF8, gzReadFilePS, mmapFilePS, gzWriteFilePS, gzWriteFilePSs, ifHeadThenTail, dropSpace, breakSpace, linesPS, unlinesPS, hashPS, breakFirstPS, breakLastPS, substrPS, readIntPS, is_funky, fromHex2PS, fromPS2Hex, betweenLinesPS, break_after_nth_newline, break_before_nth_newline, intercalate) where import Prelude hiding (catch) import qualified Data.ByteString as B import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Internal as BI import Data.ByteString (intercalate, uncons) import Data.ByteString.Internal (fromForeignPtr) import Control.Exception (catch) import System.IO import System.IO.Unsafe (unsafePerformIO) import Foreign.Storable (peekElemOff, peek) import Foreign.Marshal.Alloc (free) import Foreign.Marshal.Array (mallocArray, peekArray, advancePtr) import Foreign.C.Types (CInt) import Data.Bits (rotateL) import Data.Char (chr, ord, isSpace) import Data.Word (Word8) import Data.Int (Int32) import Control.Monad (when) import Foreign.Ptr (nullPtr) import Foreign.ForeignPtr (ForeignPtr) import Foreign.Ptr (plusPtr, Ptr) import Foreign.ForeignPtr (withForeignPtr) import Foreign.ForeignPtr (addForeignPtrFinalizer) import Foreign.Ptr (FunPtr) import qualified Data.ByteString.Lazy as BL import qualified Codec.Compression.GZip as GZ import Foreign.C.String (CString, withCString) import System.IO.MMap (mmapFileByteString) import System.Mem (performGC) import System.Posix.Files (fileSize, getSymbolicLinkStatus) debugForeignPtr :: ForeignPtr a -> String -> IO () foreign import ccall unsafe "static fpstring.h debug_alloc" debug_alloc :: Ptr a -> CString -> IO () foreign import ccall unsafe "static fpstring.h & debug_free" debug_free :: FunPtr (Ptr a -> IO ()) debugForeignPtr fp n = withCString n $ \ cname -> withForeignPtr fp $ \ p -> do debug_alloc p cname addForeignPtrFinalizer debug_free fp debugForeignPtr _ _ = return () unsafeWithInternals :: B.ByteString -> (Ptr Word8 -> Int -> IO a) -> IO a unsafeWithInternals ps f = case BI.toForeignPtr ps of (fp, s, l) -> withForeignPtr fp $ \ p -> f (p `plusPtr` s) l readIntPS :: B.ByteString -> Maybe (Int, B.ByteString) readIntPS = BC.readInt . BC.dropWhile isSpace unpackPSfromUTF8 :: B.ByteString -> String unpackPSfromUTF8 ps = case BI.toForeignPtr ps of (_, _, 0) -> "" (x, s, l) -> unsafePerformIO $ withForeignPtr x $ \ p -> do outbuf <- mallocArray l lout <- fromIntegral `fmap` utf8_to_ints outbuf (p `plusPtr` s) (fromIntegral l) when (lout < 0) $ error "Bad UTF8!" str <- (map (chr . fromIntegral)) `fmap` peekArray lout outbuf free outbuf return str foreign import ccall unsafe "static fpstring.h utf8_to_ints" utf8_to_ints :: Ptr Int -> Ptr Word8 -> CInt -> IO CInt {-# INLINE ifHeadThenTail #-} ifHeadThenTail :: Word8 -> B.ByteString -> Maybe B.ByteString ifHeadThenTail c s = case uncons s of Just (w, t) | w == c -> Just t _ -> Nothing isSpaceWord8 :: Word8 -> Bool isSpaceWord8 w = w == 32 || w == 9 || w == 10 || w == 13 {-# INLINE isSpaceWord8 #-} firstnonspace :: Ptr Word8 -> Int -> Int -> IO Int firstnonspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if isSpaceWord8 w then firstnonspace ptr (n + 1) m else return n firstspace :: Ptr Word8 -> Int -> Int -> IO Int firstspace !ptr !n !m | n >= m = return n | otherwise = do w <- peekElemOff ptr n if (not . isSpaceWord8) w then firstspace ptr (n + 1) m else return n dropSpace :: B.ByteString -> B.ByteString dropSpace (BI.PS x s l) = BI.inlinePerformIO $ withForeignPtr x $ \ p -> do i <- firstnonspace (p `plusPtr` s) 0 l return $! if i == l then B.empty else BI.PS x (s + i) (l - i) {-# INLINE dropSpace #-} breakSpace :: B.ByteString -> (B.ByteString, B.ByteString) breakSpace (BI.PS x s l) = BI.inlinePerformIO $ withForeignPtr x $ \ p -> do i <- firstspace (p `plusPtr` s) 0 l return $! case () of _ | i == 0 -> (B.empty, BI.PS x s l) | i == l -> (BI.PS x s l, B.empty) | otherwise -> (BI.PS x s i, BI.PS x (s + i) (l - i)) {-# INLINE breakSpace #-} {-# INLINE is_funky #-} is_funky :: B.ByteString -> Bool is_funky ps = case BI.toForeignPtr ps of (x, s, l) -> unsafePerformIO $ withForeignPtr x $ \ p -> (/= 0) `fmap` has_funky_char (p `plusPtr` s) (fromIntegral l) foreign import ccall unsafe "fpstring.h has_funky_char" has_funky_char :: Ptr Word8 -> CInt -> IO CInt {-# INLINE hashPS #-} hashPS :: B.ByteString -> Int32 hashPS ps = case BI.toForeignPtr ps of (x, s, l) -> unsafePerformIO $ withForeignPtr x $ \ p -> do hash (p `plusPtr` s) l hash :: Ptr Word8 -> Int -> IO Int32 hash ptr len = f (0 :: Int32) ptr len where f h _ 0 = return h f h p n = do x <- peek p let !h' = (fromIntegral x) + (rotateL h 8) f h' (p `advancePtr` 1) (n - 1) {-# INLINE substrPS #-} substrPS :: B.ByteString -> B.ByteString -> Maybe Int substrPS tok str | B.null tok = Just 0 | B.length tok > B.length str = Nothing | otherwise = do n <- BC.elemIndex (BC.head tok) str let ttok = B.tail tok reststr = B.drop (n + 1) str if ttok == B.take (B.length ttok) reststr then Just n else ((n + 1) +) `fmap` substrPS tok reststr {-# INLINE breakFirstPS #-} breakFirstPS :: Char -> B.ByteString -> Maybe (B.ByteString, B.ByteString) breakFirstPS c p = case BC.elemIndex c p of Nothing -> Nothing Just n -> Just (B.take n p, B.drop (n + 1) p) {-# INLINE breakLastPS #-} breakLastPS :: Char -> B.ByteString -> Maybe (B.ByteString, B.ByteString) breakLastPS c p = case BC.elemIndexEnd c p of Nothing -> Nothing Just n -> Just (B.take n p, B.drop (n + 1) p) {-# INLINE linesPS #-} linesPS :: B.ByteString -> [B.ByteString] linesPS ps | B.null ps = [B.empty] | otherwise = BC.split '\n' ps unlinesPS :: [B.ByteString] -> B.ByteString unlinesPS [] = BC.empty unlinesPS x = BC.init $ BC.unlines x {-# INLINE unlinesPS #-} foreign import ccall unsafe "static zlib.h gzopen" c_gzopen :: CString -> CString -> IO (Ptr ()) foreign import ccall unsafe "static zlib.h gzclose" c_gzclose :: Ptr () -> IO () foreign import ccall unsafe "static zlib.h gzread" c_gzread :: Ptr () -> Ptr Word8 -> CInt -> IO CInt foreign import ccall unsafe "static zlib.h gzwrite" c_gzwrite :: Ptr () -> Ptr Word8 -> CInt -> IO CInt gzReadFilePS :: FilePath -> IO B.ByteString gzReadFilePS f = do h <- openBinaryFile f ReadMode header <- B.hGet h 2 if header /= BC.pack "\US\139" then do hClose h mmapFilePS f else do hSeek h SeekFromEnd (-4) len <- hGetLittleEndInt h hClose h let decompress = GZ.decompressWith GZ.defaultDecompressParams{GZ.decompressBufferSize = len} fmap (B.concat . BL.toChunks . decompress) $ fmap (BL.fromChunks . (: [])) $ B.readFile f BL.readFile f withCString f $ \ fstr -> withCString "rb" $ \ rb -> do gzf <- c_gzopen fstr rb when (gzf == nullPtr) $ fail $ "problem opening file " ++ f fp <- BI.mallocByteString len debugForeignPtr fp $ "gzReadFilePS " ++ f lread <- withForeignPtr fp $ \ p -> c_gzread gzf p (fromIntegral len) c_gzclose gzf when (fromIntegral lread /= len) $ fail $ "problem gzreading file " ++ f return $ fromForeignPtr fp 0 len hGetLittleEndInt :: Handle -> IO Int hGetLittleEndInt h = do b1 <- ord `fmap` hGetChar h b2 <- ord `fmap` hGetChar h b3 <- ord `fmap` hGetChar h b4 <- ord `fmap` hGetChar h return $ b1 + 256 * b2 + 65536 * b3 + 16777216 * b4 gzWriteFilePS :: FilePath -> B.ByteString -> IO () gzWriteFilePS f ps = gzWriteFilePSs f [ps] gzWriteFilePSs :: FilePath -> [B.ByteString] -> IO () gzWriteFilePSs f pss = BL.writeFile f $ GZ.compress $ BL.fromChunks pss withCString f $ \ fstr -> withCString "wb" $ \ wb -> do gzf <- c_gzopen fstr wb when (gzf == nullPtr) $ fail $ "problem gzopening file for write: " ++ f mapM_ (gzWriteToGzf gzf) pss `catch` \ _ -> fail $ "problem gzwriting file: " ++ f c_gzclose gzf gzWriteToGzf :: Ptr () -> B.ByteString -> IO () gzWriteToGzf gzf ps = case BI.toForeignPtr ps of (_, _, 0) -> return () (x, s, l) -> do lw <- withForeignPtr x $ \ p -> c_gzwrite gzf (p `plusPtr` s) (fromIntegral l) when (fromIntegral lw /= l) $ fail $ "problem in gzWriteToGzf" mmapFilePS :: FilePath -> IO B.ByteString mmapFilePS f = do x <- mmapFileByteString f Nothing `catch` (\ _ -> do size <- fileSize `fmap` getSymbolicLinkStatus f if size == 0 then return B.empty else performGC >> mmapFileByteString f Nothing) return x mmapFilePS = B.readFile foreign import ccall unsafe "static fpstring.h conv_to_hex" conv_to_hex :: Ptr Word8 -> Ptr Word8 -> CInt -> IO () fromPS2Hex :: B.ByteString -> B.ByteString fromPS2Hex ps = case BI.toForeignPtr ps of (x, s, l) -> BI.unsafeCreate (2 * l) $ \ p -> withForeignPtr x $ \ f -> conv_to_hex p (f `plusPtr` s) $ fromIntegral l foreign import ccall unsafe "static fpstring.h conv_from_hex" conv_from_hex :: Ptr Word8 -> Ptr Word8 -> CInt -> IO () fromHex2PS :: B.ByteString -> B.ByteString fromHex2PS ps = case BI.toForeignPtr ps of (x, s, l) -> BI.unsafeCreate (l `div` 2) $ \ p -> withForeignPtr x $ \ f -> conv_from_hex p (f `plusPtr` s) (fromIntegral $ l `div` 2) betweenLinesPS :: B.ByteString -> B.ByteString -> B.ByteString -> Maybe (B.ByteString) betweenLinesPS start end ps = case break (start ==) (linesPS ps) of (_, _ : rest@(bs1 : _)) -> case BI.toForeignPtr bs1 of (ps1, s1, _) -> case break (end ==) rest of (_, bs2 : _) -> case BI.toForeignPtr bs2 of (_, s2, _) -> Just $ fromForeignPtr ps1 s1 (s2 - s1) _ -> Nothing _ -> Nothing break_after_nth_newline :: Int -> B.ByteString -> Maybe (B.ByteString, B.ByteString) break_after_nth_newline 0 the_ps | B.null the_ps = Just (B.empty, B.empty) break_after_nth_newline n the_ps = case BI.toForeignPtr the_ps of (fp, the_s, l) -> unsafePerformIO $ withForeignPtr fp $ \ p -> do let findit 0 s | s == end = return $ Just (the_ps, B.empty) findit _ s | s == end = return Nothing findit 0 s = let left_l = s - the_s in return $ Just (fromForeignPtr fp the_s left_l, fromForeignPtr fp s (l - left_l)) findit i s = do w <- peekElemOff p s if w == nl then findit (i - 1) (s + 1) else findit i (s + 1) nl = BI.c2w '\n' end = the_s + l findit n the_s break_before_nth_newline :: Int -> B.ByteString -> (B.ByteString, B.ByteString) break_before_nth_newline 0 the_ps | B.null the_ps = (B.empty, B.empty) break_before_nth_newline n the_ps = case BI.toForeignPtr the_ps of (fp, the_s, l) -> unsafePerformIO $ withForeignPtr fp $ \ p -> do let findit _ s | s == end = return (the_ps, B.empty) findit i s = do w <- peekElemOff p s if w == nl then if i == 0 then let left_l = s - the_s in return (fromForeignPtr fp the_s left_l, fromForeignPtr fp s (l - left_l)) else findit (i - 1) (s + 1) else findit i (s + 1) nl = BI.c2w '\n' end = the_s + l findit n the_s haskell-src-exts-1.23.1/tests/examples/GadtRecordFields.hs.prettyprinter.golden0000644000000000000000000000016013534314633026041 0ustar0000000000000000{-# LANGUAGE GADTs #-} data Ty where TCon :: {field1 :: Int, field2 :: Bool} -> Ty TCon2 :: Ty haskell-src-exts-1.23.1/tests/examples/InfixParser.hs.prettyprinter.golden0000644000000000000000000000021013534314633025122 0ustar0000000000000000module InfixParser where type Parse a b = [a] -> [(b, [a])] (<|>) :: Parse a b -> Parse a b -> Parse a b (p1 <|> p2) i = p1 i ++ p2 i haskell-src-exts-1.23.1/tests/examples/QualifiedQQuote.hs.prettyprinter.golden0000644000000000000000000000014313534314633025737 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import qualified Language.Haskell.TH as T x :: T.DecsQ x = [T.d|id|] haskell-src-exts-1.23.1/tests/examples/EmptyCase.hs.prettyprinter.golden0000644000000000000000000000013313534314633024566 0ustar0000000000000000{-# LANGUAGE EmptyCase #-} {-# LANGUAGE LambdaCase #-} f x = case x of { } g x = \case { } haskell-src-exts-1.23.1/tests/examples/NPlusK.hs.prettyprinter.golden0000644000000000000000000000005613534314633024054 0ustar0000000000000000{-# LANGUAGE NPlusKPatterns #-} f (n + 3) = n haskell-src-exts-1.23.1/tests/examples/UnicodeSubscript.hs.prettyprinter.golden0000644000000000000000000000044713534314633026171 0ustar0000000000000000{-# LANGUAGE UnicodeSyntax #-} module Main where data Point = Point{pointX, pointY :: Double, name :: String} deriving (Show) distance :: Point -> Point -> Double distance x y = let t = (pointX x - pointX y) ^ 2 t‚ = (pointY x - pointY y) ^ 2 in sqrt $ t + t‚ haskell-src-exts-1.23.1/tests/examples/SingleClassAsst.hs.prettyprinter.golden0000644000000000000000000000006513534314633025742 0ustar0000000000000000module Test where foo :: (Eq a) => a -> a foo x = x haskell-src-exts-1.23.1/tests/examples/InfixApp.hs.prettyprinter.golden0000644000000000000000000000001313534314633024407 0ustar0000000000000000f = -w / 2 haskell-src-exts-1.23.1/tests/examples/DataKinds.hs.prettyprinter.golden0000644000000000000000000000105013534314632024534 0ustar0000000000000000{-# LANGUAGE KindSignatures #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE PolyKinds #-} class C1 (a :: Bool) where c :: proxy a -> Int class C2 (a :: [*]) data Baz = Baz data Foo = Foo class C3 (a :: [(Baz, Foo)]) class C4 (a :: (*)) class C5 (a :: App foo baz) class C6 (a :: (parens)) data X (a :: [*]) x1 = undefined :: X '[Int] x2 = undefined :: X '[Int, Double] data Y (a :: (*, Bool)) y1 = undefined :: Y '(Double, True) y2 = undefined :: Y '(Double, 'False) z1 = undefined :: X [a -> b, X '[]] z2 = undefined :: Y (a -> b, True) haskell-src-exts-1.23.1/tests/examples/SafeImports3.hs.prettyprinter.golden0000644000000000000000000000006613534314633025220 0ustar0000000000000000{-# LANGUAGE Trustworthy #-} import safe Prelude as P haskell-src-exts-1.23.1/tests/examples/PartialSignatures.hs.prettyprinter.golden0000644000000000000000000001037113534314633026342 0ustar0000000000000000{-# LANGUAGE GADTs, NamedWildCards, ScopedTypeVariables #-} bar :: Int -> _ Int bar x = Foo True () x addAndOr1 :: _ addAndOr1 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr2 :: _ -> _ addAndOr2 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr3 :: _ -> _ -> _ addAndOr3 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr4 :: (_ _ _) -> (_ _ _) -> (_ _ _) addAndOr4 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr5 :: (_, _) -> (_, _) -> (_, _) addAndOr5 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y addAndOr6 :: (Int, _) -> (Bool, _) -> (_ Int Bool) addAndOr6 (a, b) (c, d) = (a `plus` d, b || c) where plus :: Int -> Int -> Int x `plus` y = x + y bar :: _ -> _ bar x = not x alpha :: _ alpha = 3 bravo :: _ => _ bravo = 3 bravo :: _ => _ bravo = 3 barry :: _a -> (_b _a, _b _) barry x = (Left "x", Right x) foo :: a ~ Bool => (a, _) foo = (True, False) every :: _ -> _ -> Bool every _ [] = True every p (x : xs) = p x && every p xs every :: (_a -> Bool) -> [_a] -> Bool every _ [] = True every p (x : xs) = p x && every p xs bar :: Bool -> Bool bar x = (x :: _) bar :: _a -> _a bar True = (False :: _a) bar False = (True :: _a) arbitCs1 :: _ => a -> String arbitCs1 x = show (succ x) ++ show (x == x) arbitCs2 :: (Show a, _) => a -> String arbitCs2 x = arbitCs1 x arbitCs3 :: (Show a, Enum a, _) => a -> String arbitCs3 x = arbitCs1 x arbitCs4 :: (Eq a, _) => a -> String arbitCs4 x = arbitCs1 x arbitCs5 :: (Eq a, Enum a, Show a, _) => a -> String arbitCs5 x = arbitCs1 x foo :: _ => String foo = "x" foo :: _ => a foo = 3 foo :: _ => a foo = 3 fall :: forall a . _ -> a fall v = v bar :: _a -> _a bar x = not x foo :: (forall a . [a] -> [a]) -> _ foo x = (x [True, False], x ['a', 'b']) foo :: (forall a . [a] -> [a]) -> (_, _ _) foo x = (x [True, False], x ['a', 'b']) monoLoc :: forall a . a -> ((a, String), (a, _)) monoLoc x = (g True, g False) where g :: t -> (a, String) g _ = (x, "foo") data NukeMonad a b c instance Functor (NukeMonad a b) where fmap = undefined instance Applicative (NukeMonad a b) where pure = undefined (<*>) = undefined instance Monad (NukeMonad a b) where return = undefined (>>=) = undefined isMeltdown :: NukeMonad param1 param2 Bool isMeltdown = undefined unlessMeltdown :: _nm () -> _nm () unlessMeltdown c = do m <- isMeltdown if m then return () else c monoLoc :: forall a . a -> ((a, String), (a, String)) monoLoc x = (g True, g 'v') where g :: b -> (a, _) g y = (x, "foo") foo :: (_a, b) -> (a, _b) foo (x, y) = (x, y) f :: (_) => a -> a -> Bool f x y = x == y foo :: _ Just foo = Just id foo :: Bool -> _ Just foo = Just id bar :: Bool -> Bool bar (x :: _) = True orr :: a -> a -> a orr = undefined g :: _ g = f `orr` True f :: _ f = g test3 :: _ test3 x = const (let x :: _b x = True in False) $ const (let x :: _b x = 'a' in True) $ not x foo :: _a -> _ foo x = let v = not x g :: _a -> _a g x = x in (g 'x') showTwo :: Show _a => _a -> String showTwo x = show x bar :: _ -> Bool bar _ = True data GenParser tok st a = GenParser tok st a skipMany' :: GenParser tok st a -> GenParser tok st () skipMany' = undefined skipMany :: _ -> _ () skipMany = skipMany' somethingShowable :: Show _x => _x -> _ somethingShowable x = show (not x) data I a = I a instance Functor I where fmap f (I a) = I (f a) newtype B t a = B a instance Functor (B t) where fmap f (B a) = B (f a) newtype H f = H (f ()) h1 :: _ => _ h1 f b = (H . fmap (const ())) (fmap f b) h2 :: _ h2 f b = (H . fmap (const ())) (fmap f b) app1 :: H (B t) app1 = h1 (H . I) (B ()) app2 :: H (B t) app2 = h2 (H . I) (B ()) foo f = g where g r = x where x :: _ x = r unc :: (_ -> _ -> _) -> (_, _) -> _ unc = uncurry unc :: (_a -> _b -> _c) -> (_a, _b) -> _c unc = uncurry foo :: (Show _a, _) => _a -> _ foo x = show (succ x) bar :: _ -> _ -> _ bar x y = y x haskell-src-exts-1.23.1/tests/examples/IndentedWhere.hs.prettyprinter.golden0000644000000000000000000000004713534314633025425 0ustar0000000000000000f x = g where g :: Int g = 0 haskell-src-exts-1.23.1/tests/examples/EmptyInstance.hs.prettyprinter.golden0000644000000000000000000000006013534314633025456 0ustar0000000000000000instance Traversable Tree where x :: Int x = 1 haskell-src-exts-1.23.1/tests/examples/CApiFFI.hs.prettyprinter.golden0000644000000000000000000000004413534314632024035 0ustar0000000000000000{-# LANGUAGE CApiFFI #-} foo = capi haskell-src-exts-1.23.1/tests/examples/TensorTests.hs.prettyprinter.golden0000644000000000000000000000104213534314633025171 0ustar0000000000000000{-# LANGUAGE ConstraintKinds, FlexibleContexts, DataKinds, NoImplicitPrelude, RebindableSyntax, ScopedTypeVariables, TypeFamilies, TypeOperators, UndecidableInstances #-} module TensorTests (tensorTests) where type TMRParams = ('(,) <$> Tensors) <*> MRCombos tmrParams :: Proxy TMRParams tmrParams = Proxy type TrEmParams = ('(,) <$> Tensors) <*> MM'RCombos tremParams :: Proxy TrEmParams tremParams = Proxy type NormParams = ('(,) <$> '[RT]) <*> (Filter Liftable MRCombos) type instance Apply Liftable '(m, zq) = Int64 :== (LiftOf zq) haskell-src-exts-1.23.1/tests/examples/EmptyWhere.hs.prettyprinter.golden0000644000000000000000000000002013534314633024760 0ustar0000000000000000foo = 5 where haskell-src-exts-1.23.1/tests/examples/RoleAnnotations2.hs.prettyprinter.golden0000644000000000000000000000021313534314633026074 0ustar0000000000000000{-# LANGUAGE RoleAnnotations #-} data Foo a = Foo a type role Foo representational main = print $ foo 1 foo :: Int -> Int foo role = 42 haskell-src-exts-1.23.1/tests/examples/QuasiQuoteOld.hs.prettyprinter.golden0000644000000000000000000000020313534314633025431 0ustar0000000000000000{-# LANGUAGE QuasiQuotes #-} import Here str :: String str = [here|test test test test |] main :: IO () main = do putStrLn str haskell-src-exts-1.23.1/tests/examples/TySplice2.hs.prettyprinter.golden0000644000000000000000000000007713534314633024521 0ustar0000000000000000{-# LANGUAGE TemplateHaskell #-} t1 :: $( [t| Int |] ) t1 = 1 haskell-src-exts-1.23.1/tests/examples/TyQuasiQuote.hs.prettyprinter.golden0000644000000000000000000000012513534314633025312 0ustar0000000000000000{-# LANGUAGE QuasiQuotes, TemplateHaskell #-} f :: [qq| something in here |] f = () haskell-src-exts-1.23.1/tests/examples/ParallelArrays.hs.prettyprinter.golden0000644000000000000000000000021013534314633025606 0ustar0000000000000000{-# LANGUAGE ParallelArrays #-} dotp_double :: [:Double:] -> [:Double:] -> Double dotp_double xs ys = sumP [:x * y| x <- xs| y <- ys:] haskell-src-exts-1.23.1/tests/examples/PatternSynonymSignatures.hs.prettyprinter.golden0000644000000000000000000000034313534314633027756 0ustar0000000000000000{-# LANGUAGE PatternSynonyms #-} pattern Syn :: Typ pattern Syn :: () => () => Typ pattern Syn :: Show a => Show b => Typ pattern Syn :: Show b => Typ pattern Syn :: Show b => () => Typ pattern Syn :: () => Show b => Typ haskell-src-exts-1.23.1/tests/examples/DsStrictData.hs.prettyprinter.golden0000644000000000000000000000242113534314633025227 0ustar0000000000000000{-# LANGUAGE ScopedTypeVariables, StrictData, GADTs #-} module Main where import qualified Control.Exception as E import System.IO.Unsafe (unsafePerformIO) data Strict a = S a data Strict2 b = S2 !b data Strict3 c where S3 :: c -> Strict3 c data UStrict = US {-# UNPACK #-} Int data Lazy d = L ~d data Lazy2 e where L2 :: ~e -> Lazy2 e main :: IO () main = do print (isBottom (S bottom)) print (isBottom (S2 bottom)) print (isBottom (US bottom)) print (isBottom (S3 bottom)) putStrLn "" print (not (isBottom (L bottom))) print (not (isBottom (L2 bottom))) print (not (isBottom (Just bottom))) bottom :: a bottom = error "_|_" isBottom :: a -> Bool isBottom f = unsafePerformIO $ (E.evaluate f >> return False) `E.catches` [E.Handler (\ (_ :: E.ArrayException) -> return True), E.Handler (\ (_ :: E.ErrorCall) -> return True), E.Handler (\ (_ :: E.NoMethodError) -> return True), E.Handler (\ (_ :: E.NonTermination) -> return True), E.Handler (\ (_ :: E.PatternMatchFail) -> return True), E.Handler (\ (_ :: E.RecConError) -> return True), E.Handler (\ (_ :: E.RecSelError) -> return True), E.Handler (\ (_ :: E.RecUpdError) -> return True)] haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces1.hs.prettyprinter.golden0000644000000000000000000000021513534314633026537 0ustar0000000000000000{-# LANGUAGE ExplicitNamespaces #-} import Data.Array.Repa (type (++)) import Data.Array.Repa (type (++)) import Data.Array.Repa (type (++)) haskell-src-exts-1.23.1/tests/examples/DerivingStrategies.hs.prettyprinter.golden0000644000000000000000000000100013534314632026467 0ustar0000000000000000{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE StandaloneDeriving #-} module DerivingStrategies where class C a class D a newtype Foo a = MkFoo a deriving () deriving stock (Eq, Ord) deriving newtype Show deriving anyclass C deriving stock instance Read a => Read (Foo a) deriving newtype instance Num a => Num (Foo a) deriving anyclass instance D (Foo a) haskell-src-exts-1.23.1/tests/examples/EqualityConstraints1.hs.prettyprinter.golden0000644000000000000000000000006413534314633027005 0ustar0000000000000000{-# LANGUAGE GADTs #-} one :: a ~ Int => a one = 1 haskell-src-exts-1.23.1/tests/examples/GenericTree.hs.prettyprinter.golden0000644000000000000000000000032613534314633025074 0ustar0000000000000000{-# LANGUAGE RankNTypes #-} module GenericTree where import Data.Typeable dynRep :: (Typeable a) => a -> (TypeRep, forall b . (Typeable b) => b -> (Maybe b)) dynRep a = (typeOf a, \ _ -> cast a) haskell-src-exts-1.23.1/tests/examples/TypeErrorMessage.hs.prettyprinter.golden0000644000000000000000000000042213534314633026135 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/TypeErrorMessage.hs" 2 1) "At least one of ExplicitForAll or TypeOperators language extensions needs to be enabled. Please add: {-# LANGUAGE ExplicitForAll #-} or {-# LANGUAGE TypeOperators #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/GhcDeriving.hs.prettyprinter.golden0000644000000000000000000000017313534314633025071 0ustar0000000000000000newtype CodeGenModule a = CGM (StateT CGMState IO a) deriving (Monad, MonadState [s], MonadIO) haskell-src-exts-1.23.1/tests/examples/Vta2.hs.prettyprinter.golden0000644000000000000000000000055613534314633023521 0ustar0000000000000000{-# LANGUAGE RankNTypes, TypeApplications #-} module Vta2 where checkIf :: Bool -> (forall a . a -> a) -> (Bool, Int) checkIf _ = if True then \ f -> (f True, f 5) else \ f -> (f False, f @Int 3) checkCase :: Bool -> (forall a . a -> a) -> (Bool, Int) checkCase _ = case True of True -> \ f -> (f True, f 5) False -> \ f -> (f False, f @Int 3) haskell-src-exts-1.23.1/tests/examples/ClassDeclSrcSpan.hs.prettyprinter.golden0000644000000000000000000000011413534314632026021 0ustar0000000000000000class C1 a where toString :: a -> String t1 :: String t1 = "Hello" haskell-src-exts-1.23.1/tests/examples/Directory.hs.prettyprinter.golden0000644000000000000000000003047213534314633024651 0ustar0000000000000000{-# LANGUAGE ForeignFunctionInterface, NondecreasingIndentation #-} module System.Directory (createDirectory, createDirectoryIfMissing, removeDirectory, removeDirectoryRecursive, renameDirectory, getDirectoryContents, getCurrentDirectory, setCurrentDirectory, getHomeDirectory, getAppUserDataDirectory, getUserDocumentsDirectory, getTemporaryDirectory, removeFile, renameFile, copyFile, canonicalizePath, makeRelativeToCurrentDirectory, findExecutable, doesFileExist, doesDirectoryExist, Permissions(Permissions, readable, writable, executable, searchable), getPermissions, setPermissions, copyPermissions, getModificationTime) where import Prelude hiding (catch) import qualified Prelude import Control.Monad (guard) import System.Environment (getEnv) import System.FilePath import System.IO import System.IO.Error hiding (catch, try) import Control.Monad (when, unless) import Control.Exception.Base import Foreign import Foreign.C import System.Time (ClockTime(..)) import GHC.IO.Exception (IOException(..), IOErrorType(..), ioException) import System.Posix.Types import System.Posix.Internals import qualified System.Win32 as Win32 data Permissions = Permissions{readable, writable, executable, searchable :: Bool} deriving (Eq, Ord, Read, Show) getPermissions :: FilePath -> IO Permissions getPermissions name = do withFilePath name $ \ s -> do allocaBytes sizeof_stat $ \ p_stat -> do throwErrnoIfMinus1_ "getPermissions" $ c_stat s p_stat mode <- st_mode p_stat let usr_read = mode .&. s_IRUSR let usr_write = mode .&. s_IWUSR let usr_exec = mode .&. s_IXUSR let is_dir = mode .&. s_IFDIR return (Permissions{readable = usr_read /= 0, writable = usr_write /= 0, executable = is_dir == 0 && usr_exec /= 0, searchable = is_dir /= 0 && usr_exec /= 0}) setPermissions :: FilePath -> Permissions -> IO () setPermissions name (Permissions r w e s) = do allocaBytes sizeof_stat $ \ p_stat -> do withFilePath name $ \ p_name -> do throwErrnoIfMinus1_ "setPermissions" $ do c_stat p_name p_stat mode <- st_mode p_stat let mode1 = modifyBit r mode s_IRUSR let mode2 = modifyBit w mode1 s_IWUSR let mode3 = modifyBit (e || s) mode2 s_IXUSR c_wchmod p_name mode3 where modifyBit :: Bool -> CMode -> CMode -> CMode modifyBit False m b = m .&. (complement b) modifyBit True m b = m .|. b foreign import ccall unsafe "_wchmod" c_wchmod :: CWString -> CMode -> IO CInt copyPermissions :: FilePath -> FilePath -> IO () copyPermissions source dest = do allocaBytes sizeof_stat $ \ p_stat -> do withFilePath source $ \ p_source -> do withFilePath dest $ \ p_dest -> do throwErrnoIfMinus1_ "copyPermissions" $ c_stat p_source p_stat mode <- st_mode p_stat throwErrnoIfMinus1_ "copyPermissions" $ c_wchmod p_dest mode createDirectory :: FilePath -> IO () createDirectory path = do Win32.createDirectory path Nothing createDirectoryIfMissing :: Bool -> FilePath -> IO () createDirectoryIfMissing create_parents path0 | create_parents = createDirs (parents path0) | otherwise = createDirs (take 1 (parents path0)) where parents = reverse . scanl1 () . splitDirectories . normalise createDirs [] = return () createDirs (dir : []) = createDir dir throw createDirs (dir : dirs) = createDir dir $ \ _ -> do createDirs dirs createDir dir throw createDir :: FilePath -> (IOException -> IO ()) -> IO () createDir dir notExistHandler = do r <- try $ createDirectory dir case (r :: Either IOException ()) of Right () -> return () Left e | isDoesNotExistError e -> notExistHandler e | isAlreadyExistsError e -> (do withFileStatus "createDirectoryIfMissing" dir $ \ st -> do isDir <- isDirectory st if isDir then return () else throw e) `catch` ((\ _ -> return ()) :: IOException -> IO ()) | otherwise -> throw e removeDirectory :: FilePath -> IO () removeDirectory path = Win32.removeDirectory path removeDirectoryRecursive :: FilePath -> IO () removeDirectoryRecursive startLoc = do cont <- getDirectoryContents startLoc sequence_ [rm (startLoc x) | x <- cont, x /= "." && x /= ".."] removeDirectory startLoc where rm :: FilePath -> IO () rm f = do temp <- try (removeFile f) case temp of Left e -> do isDir <- doesDirectoryExist f unless isDir $ throw (e :: SomeException) removeDirectoryRecursive f Right _ -> return () removeFile :: FilePath -> IO () removeFile path = Win32.deleteFile path renameDirectory :: FilePath -> FilePath -> IO () renameDirectory opath npath = do withFileStatus "renameDirectory" opath $ \ st -> do is_dir <- isDirectory st if (not is_dir) then ioException (ioeSetErrorString (mkIOError InappropriateType "renameDirectory" Nothing (Just opath)) "not a directory") else do Win32.moveFileEx opath npath Win32.mOVEFILE_REPLACE_EXISTING renameFile :: FilePath -> FilePath -> IO () renameFile opath npath = do withFileOrSymlinkStatus "renameFile" opath $ \ st -> do is_dir <- isDirectory st if is_dir then ioException (ioeSetErrorString (mkIOError InappropriateType "renameFile" Nothing (Just opath)) "is a directory") else do Win32.moveFileEx opath npath Win32.mOVEFILE_REPLACE_EXISTING copyFile :: FilePath -> FilePath -> IO () copyFile fromFPath toFPath = copy `Prelude.catch` (\ exc -> throw $ ioeSetLocation exc "copyFile") where copy = bracket (openBinaryFile fromFPath ReadMode) hClose $ \ hFrom -> bracketOnError openTmp cleanTmp $ \ (tmpFPath, hTmp) -> do allocaBytes bufferSize $ copyContents hFrom hTmp hClose hTmp ignoreIOExceptions $ copyPermissions fromFPath tmpFPath renameFile tmpFPath toFPath openTmp = openBinaryTempFile (takeDirectory toFPath) ".copyFile.tmp" cleanTmp (tmpFPath, hTmp) = do ignoreIOExceptions $ hClose hTmp ignoreIOExceptions $ removeFile tmpFPath bufferSize = 1024 copyContents hFrom hTo buffer = do count <- hGetBuf hFrom buffer bufferSize when (count > 0) $ do hPutBuf hTo buffer count copyContents hFrom hTo buffer ignoreIOExceptions io = io `catch` ioExceptionIgnorer ioExceptionIgnorer :: IOException -> IO () ioExceptionIgnorer _ = return () canonicalizePath :: FilePath -> IO FilePath canonicalizePath fpath = do path <- Win32.getFullPathName fpath return (normalise path) makeRelativeToCurrentDirectory :: FilePath -> IO FilePath makeRelativeToCurrentDirectory x = do cur <- getCurrentDirectory return $ makeRelative cur x findExecutable :: String -> IO (Maybe FilePath) findExecutable binary = Win32.searchPath Nothing binary ('.' : exeExtension) getDirectoryContents :: FilePath -> IO [FilePath] getDirectoryContents path = modifyIOError ((`ioeSetFileName` path) . (`ioeSetLocation` "getDirectoryContents")) $ do bracket (Win32.findFirstFile (path "*")) (\ (h, _) -> Win32.findClose h) (\ (h, fdat) -> loop h fdat []) where loop :: Win32.HANDLE -> Win32.FindData -> [FilePath] -> IO [FilePath] loop h fdat acc = do filename <- Win32.getFindDataFileName fdat more <- Win32.findNextFile h fdat if more then loop h fdat (filename : acc) else return (filename : acc) getCurrentDirectory :: IO FilePath getCurrentDirectory = do Win32.getCurrentDirectory setCurrentDirectory :: FilePath -> IO () setCurrentDirectory path = Win32.setCurrentDirectory path doesDirectoryExist :: FilePath -> IO Bool doesDirectoryExist name = (withFileStatus "doesDirectoryExist" name $ \ st -> isDirectory st) `catch` ((\ _ -> return False) :: IOException -> IO Bool) doesFileExist :: FilePath -> IO Bool doesFileExist name = (withFileStatus "doesFileExist" name $ \ st -> do b <- isDirectory st return (not b)) `catch` ((\ _ -> return False) :: IOException -> IO Bool) getModificationTime :: FilePath -> IO ClockTime getModificationTime name = do withFileStatus "getModificationTime" name $ \ st -> do modificationTime st withFileStatus :: String -> FilePath -> (Ptr CStat -> IO a) -> IO a withFileStatus loc name f = do modifyIOError (`ioeSetFileName` name) $ allocaBytes sizeof_stat $ \ p -> withFilePath (fileNameEndClean name) $ \ s -> do throwErrnoIfMinus1Retry_ loc (c_stat s p) withFileOrSymlinkStatus :: String -> FilePath -> (Ptr CStat -> IO a) -> IO a withFileOrSymlinkStatus loc name f = do modifyIOError (`ioeSetFileName` name) $ allocaBytes sizeof_stat $ \ p -> withFilePath name $ \ s -> do throwErrnoIfMinus1Retry_ loc (lstat s p) modificationTime :: Ptr CStat -> IO ClockTime modificationTime stat = do mtime <- st_mtime stat let realToInteger = round . realToFrac :: Real a => a -> Integer return (TOD (realToInteger (mtime :: CTime)) 0) isDirectory :: Ptr CStat -> IO Bool isDirectory stat = do mode <- st_mode stat return (s_isdir mode) fileNameEndClean :: String -> String fileNameEndClean name = if isDrive name then addTrailingPathSeparator name else dropTrailingPathSeparator name foreign import ccall unsafe "HsDirectory.h __hscore_S_IRUSR" s_IRUSR :: CMode foreign import ccall unsafe "HsDirectory.h __hscore_S_IWUSR" s_IWUSR :: CMode foreign import ccall unsafe "HsDirectory.h __hscore_S_IXUSR" s_IXUSR :: CMode foreign import ccall unsafe "__hscore_S_IFDIR" s_IFDIR :: CMode foreign import ccall unsafe "__hscore_long_path_size" long_path_size :: Int getHomeDirectory :: IO FilePath getHomeDirectory = modifyIOError ((`ioeSetLocation` "getHomeDirectory")) $ do r <- try $ Win32.sHGetFolderPath nullPtr Win32.cSIDL_PROFILE nullPtr 0 case (r :: Either IOException String) of Right s -> return s Left _ -> do r1 <- try $ Win32.sHGetFolderPath nullPtr Win32.cSIDL_WINDOWS nullPtr 0 case r1 of Right s -> return s Left e -> ioError (e :: IOException) getAppUserDataDirectory :: String -> IO FilePath getAppUserDataDirectory appName = do modifyIOError ((`ioeSetLocation` "getAppUserDataDirectory")) $ do s <- Win32.sHGetFolderPath nullPtr Win32.cSIDL_APPDATA nullPtr 0 return (s ++ '\\' : appName) getUserDocumentsDirectory :: IO FilePath getUserDocumentsDirectory = do modifyIOError ((`ioeSetLocation` "getUserDocumentsDirectory")) $ do Win32.sHGetFolderPath nullPtr Win32.cSIDL_PERSONAL nullPtr 0 getTemporaryDirectory :: IO FilePath getTemporaryDirectory = do Win32.getTemporaryDirectory exeExtension :: String exeExtension = "exe" haskell-src-exts-1.23.1/tests/examples/ExtraEndBrace.hs.prettyprinter.golden0000644000000000000000000000011313534314633025341 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ExtraEndBrace.hs" 3 20) "Unexpected }" haskell-src-exts-1.23.1/tests/examples/RecordInfixSelector.hs.prettyprinter.golden0000644000000000000000000000012313534314633026610 0ustar0000000000000000data RecordWithInfixSelector = Cons{(<>) :: Int -> Int} idRecord = Cons{(<>) = id} haskell-src-exts-1.23.1/tests/examples/HappyDoAction.hs.prettyprinter.golden0000644000000000000000000000133513534314633025403 0ustar0000000000000000{-# LANGUAGE MagicHash #-} module HappyDoAction where foo :: Int# happyDoAction i tk st = case action of 0# -> happyFail i tk st -1# -> happyAccept i tk st n | (n <# (0# :: Int#)) -> (happyReduceArr ! rule) i tk st where rule = (I# ((negateInt# ((n +# (1# :: Int#)))))) n -> happyShift new_state i tk st where new_state = (n -# (1# :: Int#)) where off = indexShortOffAddr happyActOffsets st off_i = (off +# i) check = if (off_i >=# (0# :: Int#)) then (indexShortOffAddr happyCheck off_i ==# i) else False action | check = indexShortOffAddr happyTable off_i | otherwise = indexShortOffAddr happyDefActions st haskell-src-exts-1.23.1/tests/examples/RealGHC.lhs.prettyprinter.golden0000644000000000000000000003730613534314633024271 0ustar0000000000000000{-# OPTIONS -w #-} {-# LANGUAGE PatternGuards #-} module Rules (RuleBase, emptyRuleBase, mkRuleBase, extendRuleBaseList, unionRuleBase, pprRuleBase, ruleCheckProgram, mkSpecInfo, extendSpecInfo, addSpecInfo, addIdSpecialisations, rulesOfBinds, getRules, pprRulesForUser, lookupRule, mkLocalRule, roughTopNames) where import CoreSyn import OccurAnal (occurAnalyseExpr) import CoreFVs (exprFreeVars, exprsFreeVars, bindFreeVars, rulesFreeVars) import CoreUtils (tcEqExprX, exprType) import PprCore (pprRules) import Type (Type, TvSubstEnv) import Coercion (coercionKind) import TcType (tcSplitTyConApp_maybe) import CoreTidy (tidyRules) import Id import IdInfo (SpecInfo(SpecInfo)) import Var (Var) import VarEnv import VarSet import Name (Name, NamedThing(..)) import NameEnv import Unify (ruleMatchTyX, MatchEnv(..)) import BasicTypes (Activation) import StaticFlags (opt_PprStyle_Debug) import Outputable import FastString import Maybes import OrdList import Bag import Util import Data.List mkLocalRule :: RuleName -> Activation -> Name -> [CoreBndr] -> [CoreExpr] -> CoreExpr -> CoreRule mkLocalRule name act fn bndrs args rhs = Rule{ru_name = name, ru_fn = fn, ru_act = act, ru_bndrs = bndrs, ru_args = args, ru_rhs = rhs, ru_rough = roughTopNames args, ru_local = True} roughTopNames :: [CoreExpr] -> [Maybe Name] roughTopNames args = map roughTopName args roughTopName :: CoreExpr -> Maybe Name roughTopName (Type ty) = case tcSplitTyConApp_maybe ty of Just (tc, _) -> Just (getName tc) Nothing -> Nothing roughTopName (App f a) = roughTopName f roughTopName (Var f) | isGlobalId f = Just (idName f) | otherwise = Nothing roughTopName other = Nothing ruleCantMatch :: [Maybe Name] -> [Maybe Name] -> Bool ruleCantMatch (Just n1 : ts) (Just n2 : as) = n1 /= n2 || ruleCantMatch ts as ruleCantMatch (t : ts) (a : as) = ruleCantMatch ts as ruleCantMatch ts as = False pprRulesForUser :: [CoreRule] -> SDoc pprRulesForUser rules = withPprStyle defaultUserStyle $ pprRules $ sortLe le_rule $ tidyRules emptyTidyEnv rules where le_rule r1 r2 = ru_name r1 <= ru_name r2 mkSpecInfo :: [CoreRule] -> SpecInfo mkSpecInfo rules = SpecInfo rules (rulesFreeVars rules) extendSpecInfo :: SpecInfo -> [CoreRule] -> SpecInfo extendSpecInfo (SpecInfo rs1 fvs1) rs2 = SpecInfo (rs2 ++ rs1) (rulesFreeVars rs2 `unionVarSet` fvs1) addSpecInfo :: SpecInfo -> SpecInfo -> SpecInfo addSpecInfo (SpecInfo rs1 fvs1) (SpecInfo rs2 fvs2) = SpecInfo (rs1 ++ rs2) (fvs1 `unionVarSet` fvs2) addIdSpecialisations :: Id -> [CoreRule] -> Id addIdSpecialisations id [] = id addIdSpecialisations id rules = setIdSpecialisation id $ extendSpecInfo (idSpecialisation id) rules rulesOfBinds :: [CoreBind] -> [CoreRule] rulesOfBinds binds = concatMap (concatMap idCoreRules . bindersOf) binds getRules :: RuleBase -> Id -> [CoreRule] getRules rule_base fn | isLocalId fn = idCoreRules fn | otherwise = WARN (not (isPrimOpId fn) && notNull (idCoreRules fn), ppr fn <+> ppr (idCoreRules fn)) idCoreRules fn ++ (lookupNameEnv rule_base (idName fn) `orElse` []) type RuleBase = NameEnv [CoreRule] emptyRuleBase = emptyNameEnv mkRuleBase :: [CoreRule] -> RuleBase mkRuleBase rules = extendRuleBaseList emptyRuleBase rules extendRuleBaseList :: RuleBase -> [CoreRule] -> RuleBase extendRuleBaseList rule_base new_guys = foldl extendRuleBase rule_base new_guys unionRuleBase :: RuleBase -> RuleBase -> RuleBase unionRuleBase rb1 rb2 = plusNameEnv_C (++) rb1 rb2 extendRuleBase :: RuleBase -> CoreRule -> RuleBase extendRuleBase rule_base rule = extendNameEnv_Acc (:) singleton rule_base (ruleIdName rule) rule pprRuleBase :: RuleBase -> SDoc pprRuleBase rules = vcat [pprRules (tidyRules emptyTidyEnv rs) | rs <- nameEnvElts rules] lookupRule :: (Activation -> Bool) -> InScopeSet -> Id -> [CoreExpr] -> [CoreRule] -> Maybe (CoreRule, CoreExpr) lookupRule is_active in_scope fn args rules = case go [] rules of [] -> Nothing (m : ms) -> Just (findBest (fn, args) m ms) where rough_args = map roughTopName args go :: [(CoreRule, CoreExpr)] -> [CoreRule] -> [(CoreRule, CoreExpr)] go ms [] = ms go ms (r : rs) = case (matchRule is_active in_scope args rough_args r) of Just e -> go ((r, e) : ms) rs Nothing -> go ms rs findBest :: (Id, [CoreExpr]) -> (CoreRule, CoreExpr) -> [(CoreRule, CoreExpr)] -> (CoreRule, CoreExpr) findBest target (rule, ans) [] = (rule, ans) findBest target (rule1, ans1) ((rule2, ans2) : prs) | rule1 `isMoreSpecific` rule2 = findBest target (rule1, ans1) prs | rule2 `isMoreSpecific` rule1 = findBest target (rule2, ans2) prs | debugIsOn = let pp_rule rule | opt_PprStyle_Debug = ppr rule | otherwise = doubleQuotes (ftext (ru_name rule)) in pprTrace "Rules.findBest: rule overlap (Rule 1 wins)" (vcat [if opt_PprStyle_Debug then ptext (sLit "Expression to match:") <+> ppr fn <+> sep (map ppr args) else empty, ptext (sLit "Rule 1:") <+> pp_rule rule1, ptext (sLit "Rule 2:") <+> pp_rule rule2]) $ findBest target (rule1, ans1) prs | otherwise = findBest target (rule1, ans1) prs where (fn, args) = target isMoreSpecific :: CoreRule -> CoreRule -> Bool isMoreSpecific (BuiltinRule{}) r2 = True isMoreSpecific r1 (BuiltinRule{}) = False isMoreSpecific (Rule{ru_bndrs = bndrs1, ru_args = args1}) (Rule{ru_bndrs = bndrs2, ru_args = args2}) = isJust (matchN in_scope bndrs2 args2 args1) where in_scope = mkInScopeSet (mkVarSet bndrs1) noBlackList :: Activation -> Bool noBlackList act = False matchRule :: (Activation -> Bool) -> InScopeSet -> [CoreExpr] -> [Maybe Name] -> CoreRule -> Maybe CoreExpr matchRule is_active in_scope args rough_args (BuiltinRule{ru_name = name, ru_try = match_fn}) = case match_fn args of Just expr -> Just expr Nothing -> Nothing matchRule is_active in_scope args rough_args (Rule{ru_name = rn, ru_act = act, ru_rough = tpl_tops, ru_bndrs = tpl_vars, ru_args = tpl_args, ru_rhs = rhs}) | not (is_active act) = Nothing | ruleCantMatch tpl_tops rough_args = Nothing | otherwise = case matchN in_scope tpl_vars tpl_args args of Nothing -> Nothing Just (binds, tpl_vals) -> Just (mkLets binds $ rule_fn `mkApps` tpl_vals) where rule_fn = occurAnalyseExpr (mkLams tpl_vars rhs) matchN :: InScopeSet -> [Var] -> [CoreExpr] -> [CoreExpr] -> Maybe ([CoreBind], [CoreExpr]) matchN in_scope tmpl_vars tmpl_es target_es = do (tv_subst, id_subst, binds) <- go init_menv emptySubstEnv tmpl_es target_es return (fromOL binds, map (lookup_tmpl tv_subst id_subst) tmpl_vars') where (init_rn_env, tmpl_vars') = mapAccumL rnBndrL (mkRnEnv2 in_scope) tmpl_vars init_menv = ME{me_tmpls = mkVarSet tmpl_vars', me_env = init_rn_env} go menv subst [] es = Just subst go menv subst ts [] = Nothing go menv subst (t : ts) (e : es) = do subst1 <- match menv subst t e go menv subst1 ts es lookup_tmpl :: TvSubstEnv -> IdSubstEnv -> Var -> CoreExpr lookup_tmpl tv_subst id_subst tmpl_var' | isTyVar tmpl_var' = case lookupVarEnv tv_subst tmpl_var' of Just ty -> Type ty Nothing -> unbound tmpl_var' | otherwise = case lookupVarEnv id_subst tmpl_var' of Just e -> e other -> unbound tmpl_var' unbound var = pprPanic "Template variable unbound in rewrite rule" (ppr var $$ ppr tmpl_vars $$ ppr tmpl_vars' $$ ppr tmpl_es $$ ppr target_es) type SubstEnv = (TvSubstEnv, IdSubstEnv, OrdList CoreBind) type IdSubstEnv = IdEnv CoreExpr emptySubstEnv :: SubstEnv emptySubstEnv = (emptyVarEnv, emptyVarEnv, nilOL) match :: MatchEnv -> SubstEnv -> CoreExpr -> CoreExpr -> Maybe SubstEnv match menv subst (Var v1) e2 | Just subst <- match_var menv subst v1 e2 = Just subst match menv subst e1 (Note n e2) = match menv subst e1 e2 match menv subst e1 (Var v2) | isCheapUnfolding unfolding = match menv subst e1 (unfoldingTemplate unfolding) where rn_env = me_env menv unfolding = idUnfolding (lookupRnInScope rn_env (rnOccR rn_env v2)) match menv subst@(tv_subst, id_subst, binds) e1 (Let bind e2) | all freshly_bound bndrs, not (any locally_bound bind_fvs) = match (menv{me_env = rn_env'}) (tv_subst, id_subst, binds `snocOL` bind') e1 e2' where rn_env = me_env menv bndrs = bindersOf bind bind_fvs = varSetElems (bindFreeVars bind) locally_bound x = inRnEnvR rn_env x freshly_bound x = not (x `rnInScope` rn_env) bind' = bind e2' = e2 rn_env' = extendRnInScopeList rn_env bndrs match menv subst (Lit lit1) (Lit lit2) | lit1 == lit2 = Just subst match menv subst (App f1 a1) (App f2 a2) = do subst' <- match menv subst f1 f2 match menv subst' a1 a2 match menv subst (Lam x1 e1) (Lam x2 e2) = match menv' subst e1 e2 where menv' = menv{me_env = rnBndr2 (me_env menv) x1 x2} match menv subst (Lam x1 e1) e2 = match menv' subst e1 (App e2 (varToCoreExpr new_x)) where (rn_env', new_x) = rnBndrL (me_env menv) x1 menv' = menv{me_env = rn_env'} match menv subst e1 (Lam x2 e2) = match menv' subst (App e1 (varToCoreExpr new_x)) e2 where (rn_env', new_x) = rnBndrR (me_env menv) x2 menv' = menv{me_env = rn_env'} match menv subst (Case e1 x1 ty1 alts1) (Case e2 x2 ty2 alts2) = do subst1 <- match_ty menv subst ty1 ty2 subst2 <- match menv subst1 e1 e2 let menv' = menv{me_env = rnBndr2 (me_env menv) x1 x2} match_alts menv' subst2 alts1 alts2 match menv subst (Type ty1) (Type ty2) = match_ty menv subst ty1 ty2 match menv subst (Cast e1 co1) (Cast e2 co2) = do subst1 <- match_ty menv subst co1 co2 match menv subst1 e1 e2 match menv subst e1 e2 = Nothing match_var :: MatchEnv -> SubstEnv -> Var -> CoreExpr -> Maybe SubstEnv match_var menv subst@(tv_subst, id_subst, binds) v1 e2 | v1' `elemVarSet` me_tmpls menv = case lookupVarEnv id_subst v1' of Nothing | any (inRnEnvR rn_env) (varSetElems (exprFreeVars e2)) -> Nothing | otherwise -> do tv_subst' <- Unify.ruleMatchTyX menv tv_subst (idType v1') (exprType e2) return (tv_subst', extendVarEnv id_subst v1' e2, binds) Just e1' | tcEqExprX (nukeRnEnvL rn_env) e1' e2 -> Just subst | otherwise -> Nothing | otherwise = case e2 of Var v2 | v1' == rnOccR rn_env v2 -> Just subst other -> Nothing where rn_env = me_env menv v1' = rnOccL rn_env v1 match_alts :: MatchEnv -> SubstEnv -> [CoreAlt] -> [CoreAlt] -> Maybe SubstEnv match_alts menv subst [] [] = return subst match_alts menv subst ((c1, vs1, r1) : alts1) ((c2, vs2, r2) : alts2) | c1 == c2 = do subst1 <- match menv' subst r1 r2 match_alts menv subst1 alts1 alts2 where menv' :: MatchEnv menv' = menv{me_env = rnBndrs2 (me_env menv) vs1 vs2} match_alts menv subst alts1 alts2 = Nothing match_ty :: MatchEnv -> SubstEnv -> Type -> Type -> Maybe SubstEnv match_ty menv (tv_subst, id_subst, binds) ty1 ty2 = do tv_subst' <- Unify.ruleMatchTyX menv tv_subst ty1 ty2 return (tv_subst', id_subst, binds) ruleCheckProgram :: (Activation -> Bool) -> String -> RuleBase -> [CoreBind] -> SDoc ruleCheckProgram is_active rule_pat rule_base binds | isEmptyBag results = text "Rule check results: no rule application sites" | otherwise = vcat [text "Rule check results:", line, vcat [p $$ line | p <- bagToList results]] where results = unionManyBags (map (ruleCheckBind (RuleCheckEnv is_active rule_pat rule_base)) binds) line = text (replicate 20 '-') data RuleCheckEnv = RuleCheckEnv{rc_is_active :: Activation -> Bool, rc_pattern :: String, rc_rule_base :: RuleBase} ruleCheckBind :: RuleCheckEnv -> CoreBind -> Bag SDoc ruleCheckBind env (NonRec b r) = ruleCheck env r ruleCheckBind env (Rec prs) = unionManyBags [ruleCheck env r | (b, r) <- prs] ruleCheck :: RuleCheckEnv -> CoreExpr -> Bag SDoc ruleCheck env (Var v) = emptyBag ruleCheck env (Lit l) = emptyBag ruleCheck env (Type ty) = emptyBag ruleCheck env (App f a) = ruleCheckApp env (App f a) [] ruleCheck env (Note n e) = ruleCheck env e ruleCheck env (Cast e co) = ruleCheck env e ruleCheck env (Let bd e) = ruleCheckBind env bd `unionBags` ruleCheck env e ruleCheck env (Lam b e) = ruleCheck env e ruleCheck env (Case e _ _ as) = ruleCheck env e `unionBags` unionManyBags [ruleCheck env r | (_, _, r) <- as] ruleCheckApp env (App f a) as = ruleCheck env a `unionBags` ruleCheckApp env f (a : as) ruleCheckApp env (Var f) as = ruleCheckFun env f as ruleCheckApp env other as = ruleCheck env other ruleCheckFun :: RuleCheckEnv -> Id -> [CoreExpr] -> Bag SDoc ruleCheckFun env fn args | null name_match_rules = emptyBag | otherwise = unitBag (ruleAppCheck_help (rc_is_active env) fn args name_match_rules) where name_match_rules = filter match (getRules (rc_rule_base env) fn) match rule = (rc_pattern env) `isPrefixOf` unpackFS (ruleName rule) ruleAppCheck_help :: (Activation -> Bool) -> Id -> [CoreExpr] -> [CoreRule] -> SDoc ruleAppCheck_help is_active fn args rules = vcat [text "Expression:" <+> ppr (mkApps (Var fn) args), vcat (map check_rule rules)] where n_args = length args i_args = args `zip` [1 :: Int ..] rough_args = map roughTopName args check_rule rule = rule_herald rule <> colon <+> rule_info rule rule_herald (BuiltinRule{ru_name = name}) = ptext (sLit "Builtin rule") <+> doubleQuotes (ftext name) rule_herald (Rule{ru_name = name}) = ptext (sLit "Rule") <+> doubleQuotes (ftext name) rule_info rule | Just _ <- matchRule noBlackList emptyInScopeSet args rough_args rule = text "matches (which is very peculiar!)" rule_info (BuiltinRule{}) = text "does not match" rule_info (Rule{ru_name = name, ru_act = act, ru_bndrs = rule_bndrs, ru_args = rule_args}) | not (is_active act) = text "active only in later phase" | n_args < n_rule_args = text "too few arguments" | n_mismatches == n_rule_args = text "no arguments match" | n_mismatches == 0 = text "all arguments match (considered individually), but rule as a whole does not" | otherwise = text "arguments" <+> ppr mismatches <+> text "do not match (1-indexing)" where n_rule_args = length rule_args n_mismatches = length mismatches mismatches = [i | (rule_arg, (arg, i)) <- rule_args `zip` i_args, not (isJust (match_fn rule_arg arg))] lhs_fvs = exprsFreeVars rule_args match_fn rule_arg arg = match menv emptySubstEnv rule_arg arg where in_scope = lhs_fvs `unionVarSet` exprFreeVars arg menv = ME{me_env = mkRnEnv2 (mkInScopeSet in_scope), me_tmpls = mkVarSet rule_bndrs} haskell-src-exts-1.23.1/tests/examples/FixityTests.hs.prettyparser.golden0000644000000000000000000000000613534314633025003 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/T13050.hs.prettyparser.golden0000644000000000000000000000000613534314633023300 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Directory.hs.prettyparser.golden0000644000000000000000000000000613534314632024447 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Bundles.hs.prettyparser.golden0000644000000000000000000000000613534314632024077 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Testing.hs.prettyparser.golden0000644000000000000000000000000613534314633024121 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyList.hs.prettyparser.golden0000644000000000000000000000000613534314633024436 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DsStrictData.hs.prettyparser.golden0000644000000000000000000000000613534314633025035 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds2.hs.prettyparser.golden0000644000000000000000000000000613534314632025702 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixFunBind.hs.prettyparser.golden0000644000000000000000000000000613534314633025027 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnindentedPragmaClose.hs.prettyparser.golden0000644000000000000000000000000613534314633026717 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TyQuasiQuote.hs.prettyparser.golden0000644000000000000000000000000613534314633025121 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/completesig01.hs.prettyparser.golden0000644000000000000000000000000613534314633025160 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixBang.hs.prettyparser.golden0000644000000000000000000000000613534314633024351 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonyms3.hs.prettyparser.golden0000644000000000000000000000000613534314633025764 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiCtxt.hs.prettyparser.golden0000644000000000000000000000000613534314633024441 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TemplateHaskellQuotedNames.hs.prettyparser.golden0000644000000000000000000000000613534314633027731 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTypes.hs.prettyparser.golden0000644000000000000000000000000613534314633024044 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedRecordfieldPuns.hs.prettyparser.golden0000644000000000000000000000000613534314633027420 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiLinePragma.hs.prettyparser.golden0000644000000000000000000000000613534314633025536 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonymImport.hs.prettyparser.golden0000644000000000000000000000000613534314633026711 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyFunDepPremise.hs.prettyparser.golden0000644000000000000000000000000613534314633026231 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ImplicitWhereBlocks.hs.prettyparser.golden0000644000000000000000000000000613534314633026407 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere2.hs.prettyparser.golden0000644000000000000000000000000613534314633025332 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyInstance.hs.prettyparser.golden0000644000000000000000000000000613534314633025267 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere.hs.prettyparser.golden0000644000000000000000000000000613534314633025250 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeFunctions.hs.prettyparser.golden0000644000000000000000000000000613534314633025316 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/WhereBlock.hs.prettyparser.golden0000644000000000000000000000000613534314633024531 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RoleAnnotations2.hs.prettyparser.golden0000644000000000000000000000000613534314633025705 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingStrategies.hs.prettyparser.golden0000644000000000000000000000000613534314632026305 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InlineConlike.hs.prettyparser.golden0000644000000000000000000000000613534314633025227 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ReadP.hs.prettyparser.golden0000644000000000000000000000000613534314633023477 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeRelation.hs.prettyparser.golden0000644000000000000000000000000613534314633025570 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiParam.hs.prettyparser.golden0000644000000000000000000000000613534314633024557 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeOperatorAsVariable.hs.prettyparser.golden0000644000000000000000000000000613534314633027073 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BangViewPat.hs.prettyparser.golden0000644000000000000000000000000613534314632024652 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RelaxedDo.hs.prettyparser.golden0000644000000000000000000000000613534314633024353 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ContextOrdering.hs.prettyparser.golden0000644000000000000000000000000613534314632025621 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NonDecreasing.hs.prettyparser.golden0000644000000000000000000000017513534314633025232 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NonDecreasing.hs" 8 3) "Parse error: Last statement in a do-block must be an expression" haskell-src-exts-1.23.1/tests/examples/PolyKinds.hs.prettyparser.golden0000644000000000000000000000000613534314633024420 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataHeadParen.hs.prettyparser.golden0000644000000000000000000000000613534314632025124 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ViewPatterns.hs.prettyparser.golden0000644000000000000000000000000613534314633025137 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Nounpack2.hs.prettyparser.golden0000644000000000000000000000000613534314633024344 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeEqualityParen.hs.prettyparser.golden0000644000000000000000000000000613534314633026131 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ArityMismatch.hs.prettyparser.golden0000644000000000000000000000012613534314632025264 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ArityMismatch.hs" 3 1) "arity mismatch for 'foo'" haskell-src-exts-1.23.1/tests/examples/Completesig03A.hs.prettyparser.golden0000644000000000000000000000000613534314632025222 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SpecializeInstance.hs.prettyparser.golden0000644000000000000000000000000613534314633026261 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/AtSign.hs.prettyparser.golden0000644000000000000000000000000613534314632023670 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTSplices.hs.prettyparser.golden0000644000000000000000000000000613534314633024466 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PackageImportsMissing.hs.prettyparser.golden0000644000000000000000000000030513534314633026751 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/PackageImportsMissing.hs" 3 17) "PackageImports language extension is not enabled. Please add {-# LANGUAGE PackageImports #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/RecordWildcardError.hs.prettyparser.golden0000644000000000000000000000030513534314633026410 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcardError.hs" 1 12) "RecordWildCards language extension is not enabled. Please add {-# LANGUAGE RecordWildCards #-} pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/HexPrec.hs.prettyparser.golden0000644000000000000000000000000613534314633024042 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TabWhitespace.hs.prettyparser.golden0000644000000000000000000000000613534314633025227 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyAnn.hs.prettyparser.golden0000644000000000000000000000000613534314633024237 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordWildcard.hs.prettyparser.golden0000644000000000000000000000011513534314633025375 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/RecordWildcard.hs" 3 9) "Parse error: ," haskell-src-exts-1.23.1/tests/examples/RecordPatternSynonyms.hs.prettyparser.golden0000644000000000000000000000000613534314633027040 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingVia2.hs.prettyparser.golden0000644000000000000000000000000613534314632024774 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TupleSections.hs.prettyparser.golden0000644000000000000000000000000613534314633025305 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PackageImports.hs.prettyparser.golden0000644000000000000000000000000613534314633025415 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NoStartNumIdents.hs.prettyparser.golden0000644000000000000000000000013213551227111025716 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NoStartNumIdents.hs" 2 1) "Parse error in pattern: 1" haskell-src-exts-1.23.1/tests/examples/ForallInInstance.hs.prettyparser.golden0000644000000000000000000000000613534314633025677 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CxtWhitespace.hs.prettyparser.golden0000644000000000000000000000000613534314632025256 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HaddockComments.hs.prettyparser.golden0000644000000000000000000000000613534314633025547 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteSplice.hs.prettyparser.golden0000644000000000000000000000000613534314633025744 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Vta1.hs.prettyparser.golden0000644000000000000000000000000613534314633023317 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FamilyKindSig.hs.prettyparser.golden0000644000000000000000000000000613534314633025176 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordPuns.hs.prettyparser.golden0000644000000000000000000000000613534314633024570 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecursiveDo.hs.prettyparser.golden0000644000000000000000000000000613534314633024736 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSyntax.hs.prettyparser.golden0000644000000000000000000000000613534314633025301 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ForeignImportJavascript.hs.prettyparser.golden0000644000000000000000000000000613534314633027317 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtDeriving.hs.prettyparser.golden0000644000000000000000000000000613534314633025053 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteLines.hs.prettyparser.golden0000644000000000000000000000000613534314633025577 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixParser.hs.prettyparser.golden0000644000000000000000000000000613534314633024736 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DoubleHashOp.hs.prettyparser.golden0000644000000000000000000000000613534314633025021 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CStyleLinePragmas.hs.prettyparser.golden0000644000000000000000000000012013534314632026026 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/CStyleLinePragmas.hs" 1 1) "Parse error: #" haskell-src-exts-1.23.1/tests/examples/ParallelListComp.hs.prettyparser.golden0000644000000000000000000000000613534314633025713 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/OverloadedLabels.hs.prettyparser.golden0000644000000000000000000000000613534314633025713 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedWhere.hs.prettyparser.golden0000644000000000000000000000000613534314633025231 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/WildcardTyFam.hs.prettyparser.golden0000644000000000000000000000000613534314633025176 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TrailingWhere3.hs.prettyparser.golden0000644000000000000000000000000613534314633025333 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BlockArguments.hs.prettyparser.golden0000644000000000000000000001036213603723515025432 0ustar0000000000000000Roundtrip test failed AST 1: Module () (Just (ModuleHead () (ModuleName () "BlockArguments") Nothing Nothing)) [LanguagePragma () [Ident () "BlockArguments"]] [] [PatBind () (PVar () (Ident () "foo")) (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "x"))) (QVarOp () (UnQual () (Symbol () ">"))) (Lit () (Int () 0 "0"))))) (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (Var () (UnQual () (Ident () "x")))),Qualifier () (Var () (UnQual () (Ident () "exitFailure")))]))) Nothing,PatBind () (PVar () (Ident () "bar")) (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fptr")))) (Lambda () [PVar () (Ident () "ptr")] (App () (App () (App () (Var () (UnQual () (Ident () "c_memcpy"))) (Var () (UnQual () (Ident () "buf")))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "size"))))))) Nothing,FunBind () [Match () (Ident () "baz") [PVar () (Ident () "arg1"),PVar () (Ident () "arg2"),PVar () (Ident () "arg3"),PVar () (Ident () "arg4")] (UnGuardedRhs () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "initialValue"))) (QVarOp () (UnQual () (Symbol () "&"))) (App () (App () (Var () (UnQual () (Ident () "someFunction"))) (Var () (UnQual () (Ident () "arg1")))) (Var () (UnQual () (Ident () "arg2"))))) (QVarOp () (UnQual () (Symbol () ">>="))) (App () (Var () (UnQual () (Ident () "traverse"))) (Lambda () [PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "y")]] (InfixApp () (Do () [Generator () (PVar () (Ident () "a")) (App () (Var () (UnQual () (Ident () "f"))) (Var () (UnQual () (Ident () "x")))),Generator () (PVar () (Ident () "b")) (App () (Var () (UnQual () (Ident () "g"))) (Var () (UnQual () (Ident () "y")))),Qualifier () (App () (App () (Var () (UnQual () (Ident () "h"))) (Var () (UnQual () (Ident () "a")))) (Var () (UnQual () (Ident () "b"))))]) (QVarOp () (UnQual () (Symbol () ">>="))) (App () (App () (Var () (UnQual () (Ident () "anotherFunction"))) (Var () (UnQual () (Ident () "arg3")))) (Var () (UnQual () (Ident () "arg4"))))))))) Nothing]] AST 2: Module () (Just (ModuleHead () (ModuleName () "BlockArguments") Nothing Nothing)) [LanguagePragma () [Ident () "BlockArguments"]] [] [PatBind () (PVar () (Ident () "foo")) (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "x"))) (QVarOp () (UnQual () (Symbol () ">"))) (Lit () (Int () 0 "0"))))) (Paren () (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (Var () (UnQual () (Ident () "x")))),Qualifier () (Var () (UnQual () (Ident () "exitFailure")))])))) Nothing,PatBind () (PVar () (Ident () "bar")) (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fptr")))) (Paren () (Lambda () [PVar () (Ident () "ptr")] (App () (App () (App () (Var () (UnQual () (Ident () "c_memcpy"))) (Var () (UnQual () (Ident () "buf")))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "size")))))))) Nothing,FunBind () [Match () (Ident () "baz") [PVar () (Ident () "arg1"),PVar () (Ident () "arg2"),PVar () (Ident () "arg3"),PVar () (Ident () "arg4")] (UnGuardedRhs () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "initialValue"))) (QVarOp () (UnQual () (Symbol () "&"))) (App () (App () (Var () (UnQual () (Ident () "someFunction"))) (Var () (UnQual () (Ident () "arg1")))) (Var () (UnQual () (Ident () "arg2"))))) (QVarOp () (UnQual () (Symbol () ">>="))) (App () (Var () (UnQual () (Ident () "traverse"))) (Paren () (Lambda () [PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "y")]] (InfixApp () (Do () [Generator () (PVar () (Ident () "a")) (App () (Var () (UnQual () (Ident () "f"))) (Var () (UnQual () (Ident () "x")))),Generator () (PVar () (Ident () "b")) (App () (Var () (UnQual () (Ident () "g"))) (Var () (UnQual () (Ident () "y")))),Qualifier () (App () (App () (Var () (UnQual () (Ident () "h"))) (Var () (UnQual () (Ident () "a")))) (Var () (UnQual () (Ident () "b"))))]) (QVarOp () (UnQual () (Symbol () ">>="))) (App () (App () (Var () (UnQual () (Ident () "anotherFunction"))) (Var () (UnQual () (Ident () "arg3")))) (Var () (UnQual () (Ident () "arg4")))))))))) Nothing]] haskell-src-exts-1.23.1/tests/examples/EmptyContext.hs.prettyparser.golden0000644000000000000000000000000613534314633025147 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Vta2.hs.prettyparser.golden0000644000000000000000000000000613534314633023320 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ForeignImport.hs.prettyparser.golden0000644000000000000000000000000613534314633025270 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InjectiveTypeFamilies.hs.prettyparser.golden0000644000000000000000000000000613534314633026740 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SpecializePhaseControl.hs.prettyparser.golden0000644000000000000000000000000613534314633027116 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSuperscript.hs.prettyparser.golden0000644000000000000000000000000613534314633026336 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FFIExtensions.hs.prettyparser.golden0000644000000000000000000000000613534314633025170 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExtraEndBrace.hs.prettyparser.golden0000644000000000000000000000011313534314633025152 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ExtraEndBrace.hs" 3 20) "Unexpected }" haskell-src-exts-1.23.1/tests/examples/PatternSynonyms2.hs.prettyparser.golden0000644000000000000000000000000613534314633025763 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unicode.hs.prettyparser.golden0000644000000000000000000000000613534314633024072 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/AtOperator.hs.prettyparser.golden0000644000000000000000000000000613534314632024563 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingParen.hs.prettyparser.golden0000644000000000000000000000000613534314632025240 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtRecordFields.hs.prettyparser.golden0000644000000000000000000000000613534314633025651 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonyms.hs.prettyparser.golden0000644000000000000000000000000613534314633025701 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unpack.hs.prettyparser.golden0000644000000000000000000000000613534314633023725 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataKinds.hs.prettyparser.golden0000644000000000000000000000000613534314632024345 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds3.hs.prettyparser.golden0000644000000000000000000000000613534314632025703 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/t412.hs.prettyparser.golden0000644000000000000000000000000613534314633023176 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Rules.hs.prettyparser.golden0000644000000000000000000000000613534314633023576 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParallelArrays.hs.prettyparser.golden0000644000000000000000000000000613534314633025422 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/StarInType.hs.prettyparser.golden0000644000000000000000000000000613534314633024546 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HashOperator.hs.prettyparser.golden0000644000000000000000000000000613534314633025103 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ClassContext.hs.prettyparser.golden0000644000000000000000000000000613534314632025115 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/AmbiguousFixities.hs.prettyparser.golden0000644000000000000000000000007713665335376026170 0ustar0000000000000000ParseFailed (SrcLoc "" (-1) (-1)) "Ambiguous infix expression" haskell-src-exts-1.23.1/tests/examples/PartialSignatures.hs.prettyparser.golden0000644000000000000000000000000613534314633026145 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeIdents.hs.prettyparser.golden0000644000000000000000000000000613551222517025237 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatSynFix.hs.prettyparser.golden0000644000000000000000000000000613534314633024371 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParenFunBind.hs.prettyparser.golden0000644000000000000000000000000613534314633025017 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HappyDoAction.hs.prettyparser.golden0000644000000000000000000000000613534314633025206 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Attributes.hs.prettyparser.golden0000644000000000000000000000000613534314632024631 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/List2.hs.prettyparser.golden0000644000000000000000000000000613534314633023501 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedTopLevelWhere.hs.prettyparser.golden0000644000000000000000000000013413534314633026706 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedTopLevelWhere.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/ClassInstType.hs.prettyparser.golden0000644000000000000000000000000613534314632025250 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InstanceSigs.hs.prettyparser.golden0000644000000000000000000000000613534314633025076 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedModule2.hs.prettyparser.golden0000644000000000000000000000000613534314633025466 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeOperatorsTest.hs.prettyparser.golden0000644000000000000000000000000613534314633026164 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ScopedTypeVariables.hs.prettyparser.golden0000644000000000000000000000000613534314633026414 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NegativePatterns.hs.prettyparser.golden0000644000000000000000000000000613534314633025767 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FFIInterruptible.hs.prettyparser.golden0000644000000000000000000000000613534314633025661 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DoRec.hs.prettyparser.golden0000644000000000000000000000000613534314633023500 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstraintKinds.hs.prettyparser.golden0000644000000000000000000000000613534314632025620 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MultiWayIf.hs.prettyparser.golden0000644000000000000000000000000613534314633024536 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PrimitiveIntHexLiteral.hs.prettyparser.golden0000644000000000000000000000104413534314633027114 0ustar0000000000000000Roundtrip test failed AST 1: Module () Nothing [LanguagePragma () [Ident () "MagicHash"]] [] [PatBind () (PVar () (Ident () "minInt")) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "I#"))) (Paren () (Lit () (PrimInt () 9223372036854775808 "0x8000000000000000"))))) Nothing] AST 2: Module () Nothing [LanguagePragma () [Ident () "MagicHash"]] [] [PatBind () (PVar () (Ident () "minInt")) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "I#"))) (Paren () (Lit () (PrimInt () 9223372036854775808 "9223372036854775808"))))) Nothing] haskell-src-exts-1.23.1/tests/examples/FamilyVarid.hs.prettyparser.golden0000644000000000000000000000000613534314633024713 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IllDataTypeDecl.hs.prettyparser.golden0000644000000000000000000000000613534314633025450 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnboxedSingleton.hs.prettyparser.golden0000644000000000000000000000000613534314633025773 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/OptionsPragma.hs.prettyparser.golden0000644000000000000000000000000613534314633025267 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/HaskellParser.hs.prettyparser.golden0000644000000000000000000000000613534314633025244 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Fixity2.hs.prettyparser.golden0000644000000000000000000000000613534314633024042 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GroupKeyword.hs.prettyparser.golden0000644000000000000000000000000613534314633025145 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DeriveGeneric.hs.prettyparser.golden0000644000000000000000000000000613534314632025216 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice2.hs.prettyparser.golden0000644000000000000000000000000613534314633024322 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BangPatterns.hs.prettyparser.golden0000644000000000000000000000000613534314632025073 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DefaultSignatures.hs.prettyparser.golden0000644000000000000000000000000613534314632026134 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MagicHashUnboxedTuples.hs.prettyparser.golden0000644000000000000000000000000613534314633027052 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GadtStrictness.hs.prettyparser.golden0000644000000000000000000000000613534314633025445 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Bug.hs.prettyparser.golden0000644000000000000000000000000613534314632023220 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedDot.hs.prettyparser.golden0000644000000000000000000000000613534314633025056 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RoleAnnotations.hs.prettyparser.golden0000644000000000000000000000000613534314633025623 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory2.hs.prettyparser.golden0000644000000000000000000000000613534314633024465 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeSubscript.hs.prettyparser.golden0000644000000000000000000000000613534314633025771 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces4.hs.prettyparser.golden0000644000000000000000000000000613534314633026351 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PolyKindSigs.hs.prettyparser.golden0000644000000000000000000000000613534314633025063 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/THTypedSplices.hs.prettyparser.golden0000644000000000000000000000000613546001445025345 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ClassDeclSrcSpan.hs.prettyparser.golden0000644000000000000000000000000613534314632025632 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice.hs.prettyparser.golden0000644000000000000000000000000613534314633024240 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/T11727.hs.prettyparser.golden0000644000000000000000000000000613534314633023311 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ClosedTypeFamily.hs.prettyparser.golden0000644000000000000000000000000613534314632025720 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingVia.hs.prettyparser.golden0000644000000000000000000000000613534314632024712 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExprHole.hs.prettyparser.golden0000644000000000000000000000000613534314633024232 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnboxedTuples.hs.prettyparser.golden0000644000000000000000000000000613534314633025305 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports3.hs.prettyparser.golden0000644000000000000000000000000613534314633025023 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LambdaCase.hs.prettyparser.golden0000644000000000000000000000000613534314633024460 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/t403.hs.prettyparser.golden0000644000000000000000000000000613534314633023176 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExtraPrettyParentheses.hs.prettyparser.golden0000644000000000000000000000357713534314633027221 0ustar0000000000000000Roundtrip test failed AST 1: Module () Nothing [] [] [DataDecl () (DataType ()) Nothing (DHApp () (DHead () (Ident () "Q")) (UnkindedVar () (Ident () "a"))) [QualConDecl () Nothing Nothing (ConDecl () (Ident () "Q") [TyVar () (Ident () "a"),TyVar () (Ident () "a")])] [],FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PLit () (Negative ()) (Int () 1 "1")] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "negate"))) (Var () (UnQual () (Ident () "x"))))) Nothing],FunBind () [InfixMatch () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "x")]) (Symbol () "<>") [PApp () (UnQual () (Ident () "Nothing")) []] (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "x"))))) Nothing],FunBind () [Match () (Ident () "f") [PParen () (PInfixApp () (PLit () (Negative ()) (Int () 1 "1")) (UnQual () (Ident () "Q")) (PWildCard ()))] (UnGuardedRhs () (Con () (Special () (UnitCon ())))) Nothing]] AST 2: Module () Nothing [] [] [DataDecl () (DataType ()) Nothing (DHApp () (DHead () (Ident () "Q")) (UnkindedVar () (Ident () "a"))) [QualConDecl () Nothing Nothing (ConDecl () (Ident () "Q") [TyVar () (Ident () "a"),TyVar () (Ident () "a")])] [],FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PParen () (PLit () (Negative ()) (Int () 1 "1"))] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "negate"))) (Var () (UnQual () (Ident () "x"))))) Nothing],FunBind () [InfixMatch () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "x")]) (Symbol () "<>") [PApp () (UnQual () (Ident () "Nothing")) []] (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "x"))))) Nothing],FunBind () [Match () (Ident () "f") [PParen () (PInfixApp () (PLit () (Negative ()) (Int () 1 "1")) (UnQual () (Ident () "Q")) (PWildCard ()))] (UnGuardedRhs () (Con () (Special () (UnitCon ())))) Nothing]] haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces3.hs.prettyparser.golden0000644000000000000000000000000613534314633026350 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedModule1.hs.prettyparser.golden0000644000000000000000000000000613534314633025465 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteUnit.hs.prettyparser.golden0000644000000000000000000000000613534314633025444 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/CApiFFI.hs.prettyparser.golden0000644000000000000000000000000613534314632023644 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GenericTree.hs.prettyparser.golden0000644000000000000000000000000613534314633024700 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/MagicHashN.hs.prettyparser.golden0000644000000000000000000000000613534314633024446 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Overlapping.hs.prettyparser.golden0000644000000000000000000000000613534314633024772 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ByteStringUtils.hs.prettyparser.golden0000644000000000000000000041320613534314632025630 0ustar0000000000000000Roundtrip test failed AST 1: Module () (Just (ModuleHead () (ModuleName () "ByteStringUtils") Nothing (Just (ExportSpecList () [EVar () (UnQual () (Ident () "unsafeWithInternals")),EVar () (UnQual () (Ident () "unpackPSfromUTF8")),EVar () (UnQual () (Ident () "gzReadFilePS")),EVar () (UnQual () (Ident () "mmapFilePS")),EVar () (UnQual () (Ident () "gzWriteFilePS")),EVar () (UnQual () (Ident () "gzWriteFilePSs")),EVar () (UnQual () (Ident () "ifHeadThenTail")),EVar () (UnQual () (Ident () "dropSpace")),EVar () (UnQual () (Ident () "breakSpace")),EVar () (UnQual () (Ident () "linesPS")),EVar () (UnQual () (Ident () "unlinesPS")),EVar () (UnQual () (Ident () "hashPS")),EVar () (UnQual () (Ident () "breakFirstPS")),EVar () (UnQual () (Ident () "breakLastPS")),EVar () (UnQual () (Ident () "substrPS")),EVar () (UnQual () (Ident () "readIntPS")),EVar () (UnQual () (Ident () "is_funky")),EVar () (UnQual () (Ident () "fromHex2PS")),EVar () (UnQual () (Ident () "fromPS2Hex")),EVar () (UnQual () (Ident () "betweenLinesPS")),EVar () (UnQual () (Ident () "break_after_nth_newline")),EVar () (UnQual () (Ident () "break_before_nth_newline")),EVar () (UnQual () (Ident () "intercalate"))])))) [LanguagePragma () [Ident () "BangPatterns",Ident () "ForeignFunctionInterface",Ident () "CPP"]] [ImportDecl {importAnn = (), importModule = ModuleName () "Prelude", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () True [IVar () (Ident () "catch")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "B"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Char8", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BC"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Internal", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BI"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "intercalate"),IVar () (Ident () "uncons")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Internal", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "fromForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Control.Exception", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "catch")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO.Unsafe", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "unsafePerformIO")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Storable", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "peekElemOff"),IVar () (Ident () "peek")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Marshal.Alloc", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "free")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Marshal.Array", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "mallocArray"),IVar () (Ident () "peekArray"),IVar () (Ident () "advancePtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.C.Types", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "CInt")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Bits", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "rotateL")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Char", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "chr"),IVar () (Ident () "ord"),IVar () (Ident () "isSpace")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Word", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "Word8")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Int", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "Int32")])},ImportDecl {importAnn = (), importModule = ModuleName () "Control.Monad", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "when")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "nullPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "ForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "plusPtr"),IAbs () (NoNamespace ()) (Ident () "Ptr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "withForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "addForeignPtrFinalizer")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "FunPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Lazy", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BL"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Codec.Compression.GZip", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "GZ"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.C.String", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "CString"),IVar () (Ident () "withCString")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO.MMap", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "mmapFileByteString")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.Mem", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "performGC")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.Posix.Files", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "fileSize"),IVar () (Ident () "getSymbolicLinkStatus")])}] [TypeSig () [Ident () "debugForeignPtr"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "ForeignPtr"))) (TyVar () (Ident () "a"))) (TyFun () (TyCon () (UnQual () (Ident () "String"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h debug_alloc") (Ident () "debug_alloc") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyVar () (Ident () "a"))) (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h & debug_free") (Ident () "debug_free") (TyApp () (TyCon () (UnQual () (Ident () "FunPtr"))) (TyParen () (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyVar () (Ident () "a"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")] (UnGuardedRhs () (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Var () (UnQual () (Ident () "n")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "cname")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Qualifier () (App () (App () (Var () (UnQual () (Ident () "debug_alloc"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "cname")))),Qualifier () (App () (App () (Var () (UnQual () (Ident () "addForeignPtrFinalizer"))) (Var () (UnQual () (Ident () "debug_free")))) (Var () (UnQual () (Ident () "fp"))))])))))) Nothing,Match () (Ident () "debugForeignPtr") [PWildCard (),PWildCard ()] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Con () (Special () (UnitCon ()))))) Nothing],TypeSig () [Ident () "unsafeWithInternals"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyParen () (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyVar () (Ident () "a")))))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyVar () (Ident () "a"))))),FunBind () [Match () (Ident () "unsafeWithInternals") [PVar () (Ident () "ps"),PVar () (Ident () "f")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (Var () (UnQual () (Ident () "f"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Var () (UnQual () (Ident () "l"))))))) Nothing])) Nothing],TypeSig () [Ident () "readIntPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (UnQual () (Ident () "Int")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))]))),PatBind () (PVar () (Ident () "readIntPS")) (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BC") (Ident () "readInt"))) (QVarOp () (UnQual () (Symbol () "."))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "dropWhile"))) (Var () (UnQual () (Ident () "isSpace")))))) Nothing,TypeSig () [Ident () "unpackPSfromUTF8"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "String")))),FunBind () [Match () (Ident () "unpackPSfromUTF8") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PWildCard (),PWildCard (),PLit () (Signless ()) (Int () 0 "0")]) (UnGuardedRhs () (Lit () (String () "" ""))) Nothing,Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "outbuf")) (App () (Var () (UnQual () (Ident () "mallocArray"))) (Var () (UnQual () (Ident () "l")))),Generator () (PVar () (Ident () "lout")) (InfixApp () (Var () (UnQual () (Ident () "fromIntegral"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (App () (Var () (UnQual () (Ident () "utf8_to_ints"))) (Var () (UnQual () (Ident () "outbuf")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l"))))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "lout"))) (QVarOp () (UnQual () (Symbol () "<"))) (Lit () (Int () 0 "0"))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (UnQual () (Ident () "error"))) (Lit () (String () "Bad UTF8!" "Bad UTF8!")))),Generator () (PVar () (Ident () "str")) (InfixApp () (Paren () (App () (Var () (UnQual () (Ident () "map"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "chr"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "fromIntegral"))))))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "peekArray"))) (Var () (UnQual () (Ident () "lout")))) (Var () (UnQual () (Ident () "outbuf"))))),Qualifier () (App () (Var () (UnQual () (Ident () "free"))) (Var () (UnQual () (Ident () "outbuf")))),Qualifier () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "str"))))]))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h utf8_to_ints") (Ident () "utf8_to_ints") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Int")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),InlineSig () True Nothing (UnQual () (Ident () "ifHeadThenTail")),TypeSig () [Ident () "ifHeadThenTail"] (TyFun () (TyCon () (UnQual () (Ident () "Word8"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))))),FunBind () [Match () (Ident () "ifHeadThenTail") [PVar () (Ident () "c"),PVar () (Ident () "s")] (UnGuardedRhs () (Case () (App () (Var () (UnQual () (Ident () "uncons"))) (Var () (UnQual () (Ident () "s")))) [Alt () (PApp () (UnQual () (Ident () "Just")) [PTuple () Boxed [PVar () (Ident () "w"),PVar () (Ident () "t")]]) (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "c"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "t"))))]) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing],TypeSig () [Ident () "isSpaceWord8"] (TyFun () (TyCon () (UnQual () (Ident () "Word8"))) (TyCon () (UnQual () (Ident () "Bool")))),FunBind () [Match () (Ident () "isSpaceWord8") [PVar () (Ident () "w")] (UnGuardedRhs () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 32 "0x20"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 9 "0x09"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 10 "0x0A"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 13 "0x0D"))))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "isSpaceWord8")),TypeSig () [Ident () "firstnonspace"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))))),FunBind () [Match () (Ident () "firstnonspace") [PBangPat () (PVar () (Ident () "ptr")),PBangPat () (PVar () (Ident () "n")),PBangPat () (PVar () (Ident () "m"))] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () ">="))) (Var () (UnQual () (Ident () "m"))))] (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "n")))),Qualifier () (If () (App () (Var () (UnQual () (Ident () "isSpaceWord8"))) (Var () (UnQual () (Ident () "w")))) (App () (App () (App () (Var () (UnQual () (Ident () "firstnonspace"))) (Var () (UnQual () (Ident () "ptr")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "m")))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))))])]) Nothing],TypeSig () [Ident () "firstspace"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))))),FunBind () [Match () (Ident () "firstspace") [PBangPat () (PVar () (Ident () "ptr")),PBangPat () (PVar () (Ident () "n")),PBangPat () (PVar () (Ident () "m"))] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () ">="))) (Var () (UnQual () (Ident () "m"))))] (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "n")))),Qualifier () (If () (App () (Paren () (InfixApp () (Var () (UnQual () (Ident () "not"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "isSpaceWord8"))))) (Var () (UnQual () (Ident () "w")))) (App () (App () (App () (Var () (UnQual () (Ident () "firstspace"))) (Var () (UnQual () (Ident () "ptr")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "m")))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))))])]) Nothing],TypeSig () [Ident () "dropSpace"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "dropSpace") [PParen () (PApp () (Qual () (ModuleName () "BI") (Ident () "PS")) [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")])] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BI") (Ident () "inlinePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "i")) (App () (App () (App () (Var () (UnQual () (Ident () "firstnonspace"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "l")))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$!"))) (If () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "l")))) (Var () (Qual () (ModuleName () "B") (Ident () "empty"))) (App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "i")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "i"))))))))]))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "dropSpace")),TypeSig () [Ident () "breakSpace"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])),FunBind () [Match () (Ident () "breakSpace") [PParen () (PApp () (Qual () (ModuleName () "BI") (Ident () "PS")) [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")])] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BI") (Ident () "inlinePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "i")) (App () (App () (App () (Var () (UnQual () (Ident () "firstspace"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "l")))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$!"))) (Case () (Con () (Special () (UnitCon ()))) [Alt () (PWildCard ()) (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0")))] (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "l")))]),GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "l"))))] (Tuple () Boxed [App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "l"))),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Tuple () Boxed [App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "i"))),App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "i")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "i")))))])]) Nothing]))]))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakSpace")),InlineSig () True Nothing (UnQual () (Ident () "is_funky")),TypeSig () [Ident () "is_funky"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "Bool")))),FunBind () [Match () (Ident () "is_funky") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (RightSection () (QVarOp () (UnQual () (Symbol () "/="))) (Lit () (Int () 0 "0"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "has_funky_char"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l"))))))))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "fpstring.h has_funky_char") (Ident () "has_funky_char") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt")))))),InlineSig () True Nothing (UnQual () (Ident () "hashPS")),TypeSig () [Ident () "hashPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "Int32")))),FunBind () [Match () (Ident () "hashPS") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Qualifier () (App () (App () (Var () (UnQual () (Ident () "hash"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Var () (UnQual () (Ident () "l"))))]))))) Nothing])) Nothing],TypeSig () [Ident () "hash"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int32")))))),FunBind () [Match () (Ident () "hash") [PVar () (Ident () "ptr"),PVar () (Ident () "len")] (UnGuardedRhs () (App () (App () (App () (Var () (UnQual () (Ident () "f"))) (Paren () (ExpTypeSig () (Lit () (Int () 0 "0")) (TyCon () (UnQual () (Ident () "Int32")))))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "len"))))) (Just (BDecls () [FunBind () [Match () (Ident () "f") [PVar () (Ident () "h"),PWildCard (),PLit () (Signless ()) (Int () 0 "0")] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "h"))))) Nothing,Match () (Ident () "f") [PVar () (Ident () "h"),PVar () (Ident () "p"),PVar () (Ident () "n")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "x")) (App () (Var () (UnQual () (Ident () "peek"))) (Var () (UnQual () (Ident () "p")))),LetStmt () (BDecls () [PatBind () (PBangPat () (PVar () (Ident () "h'"))) (UnGuardedRhs () (InfixApp () (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "x"))))) (QVarOp () (UnQual () (Symbol () "+"))) (Paren () (App () (App () (Var () (UnQual () (Ident () "rotateL"))) (Var () (UnQual () (Ident () "h")))) (Lit () (Int () 8 "8")))))) Nothing]),Qualifier () (App () (App () (App () (Var () (UnQual () (Ident () "f"))) (Var () (UnQual () (Ident () "h'")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "advancePtr"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1")))))])) Nothing]]))],InlineSig () True Nothing (UnQual () (Ident () "substrPS")),TypeSig () [Ident () "substrPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyCon () (UnQual () (Ident () "Int")))))),FunBind () [Match () (Ident () "substrPS") [PVar () (Ident () "tok"),PVar () (Ident () "str")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "tok"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Lit () (Int () 0 "0"))),GuardedRhs () [Qualifier () (InfixApp () (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "tok")))) (QVarOp () (UnQual () (Symbol () ">"))) (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "str")))))] (Con () (UnQual () (Ident () "Nothing"))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "n")) (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndex"))) (Paren () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "head"))) (Var () (UnQual () (Ident () "tok")))))) (Var () (UnQual () (Ident () "str")))),LetStmt () (BDecls () [PatBind () (PVar () (Ident () "ttok")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "B") (Ident () "tail"))) (Var () (UnQual () (Ident () "tok"))))) Nothing,PatBind () (PVar () (Ident () "reststr")) (UnGuardedRhs () (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "str"))))) Nothing]),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "ttok"))) (QVarOp () (UnQual () (Symbol () "=="))) (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Paren () (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "ttok")))))) (Var () (UnQual () (Ident () "reststr"))))) (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "n")))) (InfixApp () (LeftSection () (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1")))) (QVarOp () (UnQual () (Symbol () "+")))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "substrPS"))) (Var () (UnQual () (Ident () "tok")))) (Var () (UnQual () (Ident () "reststr"))))))])]) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakFirstPS")),TypeSig () [Ident () "breakFirstPS"] (TyFun () (TyCon () (UnQual () (Ident () "Char"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "breakFirstPS") [PVar () (Ident () "c"),PVar () (Ident () "p")] (UnGuardedRhs () (Case () (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndex"))) (Var () (UnQual () (Ident () "c")))) (Var () (UnQual () (Ident () "p")))) [Alt () (PApp () (UnQual () (Ident () "Nothing")) []) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing,Alt () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "n")]) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "p"))),App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "p")))]))) Nothing])) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakLastPS")),TypeSig () [Ident () "breakLastPS"] (TyFun () (TyCon () (UnQual () (Ident () "Char"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "breakLastPS") [PVar () (Ident () "c"),PVar () (Ident () "p")] (UnGuardedRhs () (Case () (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndexEnd"))) (Var () (UnQual () (Ident () "c")))) (Var () (UnQual () (Ident () "p")))) [Alt () (PApp () (UnQual () (Ident () "Nothing")) []) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing,Alt () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "n")]) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "p"))),App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "p")))]))) Nothing])) Nothing],InlineSig () True Nothing (UnQual () (Ident () "linesPS")),TypeSig () [Ident () "linesPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "linesPS") [PVar () (Ident () "ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "ps"))))] (List () [Var () (Qual () (ModuleName () "B") (Ident () "empty"))]),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "split"))) (Lit () (Char () '\n' "\\n"))) (Var () (UnQual () (Ident () "ps"))))]) Nothing],TypeSig () [Ident () "unlinesPS"] (TyFun () (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "unlinesPS") [PList () []] (UnGuardedRhs () (Var () (Qual () (ModuleName () "BC") (Ident () "empty")))) Nothing,Match () (Ident () "unlinesPS") [PVar () (Ident () "x")] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BC") (Ident () "init"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "unlines"))) (Var () (UnQual () (Ident () "x")))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "unlinesPS")),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzopen") (Ident () "c_gzopen") (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyParen () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzclose") (Ident () "c_gzclose") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzread") (Ident () "c_gzread") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzwrite") (Ident () "c_gzwrite") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),TypeSig () [Ident () "gzReadFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "gzReadFilePS") [PVar () (Ident () "f")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "h")) (App () (App () (Var () (UnQual () (Ident () "openBinaryFile"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "ReadMode")))),Generator () (PVar () (Ident () "header")) (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "hGet"))) (Var () (UnQual () (Ident () "h")))) (Lit () (Int () 2 "2"))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "header"))) (QVarOp () (UnQual () (Symbol () "/="))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "pack"))) (Lit () (String () "\US\139" "\\31\\139")))) (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "hClose"))) (Var () (UnQual () (Ident () "h")))),Qualifier () (App () (Var () (UnQual () (Ident () "mmapFilePS"))) (Var () (UnQual () (Ident () "f"))))]) (Do () [Qualifier () (App () (App () (App () (Var () (UnQual () (Ident () "hSeek"))) (Var () (UnQual () (Ident () "h")))) (Con () (UnQual () (Ident () "SeekFromEnd")))) (Paren () (NegApp () (Lit () (Int () 4 "4"))))),Generator () (PVar () (Ident () "len")) (App () (Var () (UnQual () (Ident () "hGetLittleEndInt"))) (Var () (UnQual () (Ident () "h")))),Qualifier () (App () (Var () (UnQual () (Ident () "hClose"))) (Var () (UnQual () (Ident () "h")))),LetStmt () (BDecls () [PatBind () (PVar () (Ident () "decompress")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "GZ") (Ident () "decompressWith"))) (RecUpdate () (Var () (Qual () (ModuleName () "GZ") (Ident () "defaultDecompressParams"))) [FieldUpdate () (Qual () (ModuleName () "GZ") (Ident () "decompressBufferSize")) (Var () (UnQual () (Ident () "len")))]))) Nothing]),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "fmap"))) (Paren () (InfixApp () (Var () (Qual () (ModuleName () "B") (Ident () "concat"))) (QVarOp () (UnQual () (Symbol () "."))) (InfixApp () (Var () (Qual () (ModuleName () "BL") (Ident () "toChunks"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "decompress"))))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "fmap"))) (Paren () (InfixApp () (Var () (Qual () (ModuleName () "BL") (Ident () "fromChunks"))) (QVarOp () (UnQual () (Symbol () "."))) (RightSection () (QConOp () (Special () (Cons ()))) (List () []))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "readFile"))) (Var () (UnQual () (Ident () "f")))) (Var () (Qual () (ModuleName () "BL") (Ident () "readFile")))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "fstr")] (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Lit () (String () "rb" "rb"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "rb")] (Do () [Generator () (PVar () (Ident () "gzf")) (App () (App () (Var () (UnQual () (Ident () "c_gzopen"))) (Var () (UnQual () (Ident () "fstr")))) (Var () (UnQual () (Ident () "rb")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "gzf"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nullPtr")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem opening file " "problem opening file ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Generator () (PVar () (Ident () "fp")) (App () (Var () (Qual () (ModuleName () "BI") (Ident () "mallocByteString"))) (Var () (UnQual () (Ident () "len")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "debugForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "gzReadFilePS " "gzReadFilePS ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f"))))),Generator () (PVar () (Ident () "lread")) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (App () (Var () (UnQual () (Ident () "c_gzread"))) (Var () (UnQual () (Ident () "gzf")))) (Var () (UnQual () (Ident () "p")))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "len")))))))),Qualifier () (App () (Var () (UnQual () (Ident () "c_gzclose"))) (Var () (UnQual () (Ident () "gzf")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "lread")))) (QVarOp () (UnQual () (Symbol () "/="))) (Var () (UnQual () (Ident () "len")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzreading file " "problem gzreading file ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "len")))))])))))]))])) Nothing],TypeSig () [Ident () "hGetLittleEndInt"] (TyFun () (TyCon () (UnQual () (Ident () "Handle"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))),FunBind () [Match () (Ident () "hGetLittleEndInt") [PVar () (Ident () "h")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "b1")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b2")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b3")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b4")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "b1"))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 256 "256")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b2"))))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 65536 "65536")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b3"))))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 16777216 "16777216")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b4"))))))])) Nothing],TypeSig () [Ident () "gzWriteFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteFilePS") [PVar () (Ident () "f"),PVar () (Ident () "ps")] (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "gzWriteFilePSs"))) (Var () (UnQual () (Ident () "f")))) (List () [Var () (UnQual () (Ident () "ps"))]))) Nothing],TypeSig () [Ident () "gzWriteFilePSs"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyFun () (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteFilePSs") [PVar () (Ident () "f"),PVar () (Ident () "pss")] (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BL") (Ident () "writeFile"))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (Qual () (ModuleName () "GZ") (Ident () "compress"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (App () (App () (Var () (Qual () (ModuleName () "BL") (Ident () "fromChunks"))) (Var () (UnQual () (Ident () "pss")))) (Var () (UnQual () (Ident () "withCString")))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "fstr")] (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Lit () (String () "wb" "wb"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "wb")] (Do () [Generator () (PVar () (Ident () "gzf")) (App () (App () (Var () (UnQual () (Ident () "c_gzopen"))) (Var () (UnQual () (Ident () "fstr")))) (Var () (UnQual () (Ident () "wb")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "gzf"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nullPtr")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzopening file for write: " "problem gzopening file for write: ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (App () (App () (Var () (UnQual () (Ident () "mapM_"))) (Paren () (App () (Var () (UnQual () (Ident () "gzWriteToGzf"))) (Var () (UnQual () (Ident () "gzf")))))) (Var () (UnQual () (Ident () "pss")))) (QVarOp () (UnQual () (Ident () "catch"))) (Lambda () [PWildCard ()] (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzwriting file: " "problem gzwriting file: ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f"))))))),Qualifier () (App () (Var () (UnQual () (Ident () "c_gzclose"))) (Var () (UnQual () (Ident () "gzf"))))])))))))) Nothing],TypeSig () [Ident () "gzWriteToGzf"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteToGzf") [PVar () (Ident () "gzf"),PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PWildCard (),PWildCard (),PLit () (Signless ()) (Int () 0 "0")]) (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Con () (Special () (UnitCon ()))))) Nothing,Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "lw")) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (App () (Var () (UnQual () (Ident () "c_gzwrite"))) (Var () (UnQual () (Ident () "gzf")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l")))))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "lw")))) (QVarOp () (UnQual () (Symbol () "/="))) (Var () (UnQual () (Ident () "l")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lit () (String () "problem in gzWriteToGzf" "problem in gzWriteToGzf"))))])) Nothing])) Nothing],TypeSig () [Ident () "mmapFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "mmapFilePS") [PVar () (Ident () "f")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "x")) (InfixApp () (App () (App () (Var () (UnQual () (Ident () "mmapFileByteString"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "Nothing")))) (QVarOp () (UnQual () (Ident () "catch"))) (Paren () (Lambda () [PWildCard ()] (Do () [Generator () (PVar () (Ident () "size")) (InfixApp () (Var () (UnQual () (Ident () "fileSize"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "getSymbolicLinkStatus"))) (Var () (UnQual () (Ident () "f"))))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "size"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0"))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (Qual () (ModuleName () "B") (Ident () "empty")))) (InfixApp () (Var () (UnQual () (Ident () "performGC"))) (QVarOp () (UnQual () (Symbol () ">>"))) (App () (App () (Var () (UnQual () (Ident () "mmapFileByteString"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "Nothing"))))))])))),Qualifier () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "x"))))])) Nothing],PatBind () (PVar () (Ident () "mmapFilePS")) (UnGuardedRhs () (Var () (Qual () (ModuleName () "B") (Ident () "readFile")))) Nothing,ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h conv_to_hex") (Ident () "conv_to_hex") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),TypeSig () [Ident () "fromPS2Hex"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "fromPS2Hex") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "unsafeCreate"))) (Paren () (InfixApp () (Lit () (Int () 2 "2")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "l")))))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "f")] (InfixApp () (App () (App () (Var () (UnQual () (Ident () "conv_to_hex"))) (Var () (UnQual () (Ident () "p")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "f"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l")))))))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h conv_from_hex") (Ident () "conv_from_hex") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),TypeSig () [Ident () "fromHex2PS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "fromHex2PS") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "unsafeCreate"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Ident () "div"))) (Lit () (Int () 2 "2"))))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "f")] (App () (App () (App () (Var () (UnQual () (Ident () "conv_from_hex"))) (Var () (UnQual () (Ident () "p")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "f"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "fromIntegral"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Ident () "div"))) (Lit () (Int () 2 "2"))))))))))) Nothing])) Nothing],TypeSig () [Ident () "betweenLinesPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyParen () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))))))),FunBind () [Match () (Ident () "betweenLinesPS") [PVar () (Ident () "start"),PVar () (Ident () "end"),PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (App () (Var () (UnQual () (Ident () "break"))) (LeftSection () (Var () (UnQual () (Ident () "start"))) (QVarOp () (UnQual () (Symbol () "=="))))) (Paren () (App () (Var () (UnQual () (Ident () "linesPS"))) (Var () (UnQual () (Ident () "ps")))))) [Alt () (PTuple () Boxed [PWildCard (),PInfixApp () (PWildCard ()) (Special () (Cons ())) (PAsPat () (Ident () "rest") (PParen () (PInfixApp () (PVar () (Ident () "bs1")) (Special () (Cons ())) (PWildCard ()))))]) (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "bs1")))) [Alt () (PTuple () Boxed [PVar () (Ident () "ps1"),PVar () (Ident () "s1"),PWildCard ()]) (UnGuardedRhs () (Case () (App () (App () (Var () (UnQual () (Ident () "break"))) (LeftSection () (Var () (UnQual () (Ident () "end"))) (QVarOp () (UnQual () (Symbol () "=="))))) (Var () (UnQual () (Ident () "rest")))) [Alt () (PTuple () Boxed [PWildCard (),PInfixApp () (PVar () (Ident () "bs2")) (Special () (Cons ())) (PWildCard ())]) (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "bs2")))) [Alt () (PTuple () Boxed [PWildCard (),PVar () (Ident () "s2"),PWildCard ()]) (UnGuardedRhs () (InfixApp () (Con () (UnQual () (Ident () "Just"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "ps1")))) (Var () (UnQual () (Ident () "s1")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s2"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "s1")))))))) Nothing])) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing])) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing],TypeSig () [Ident () "break_after_nth_newline"] (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "break_after_nth_newline") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "the_ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "the_ps"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]))]) Nothing,Match () (Ident () "break_after_nth_newline") [PVar () (Ident () "n"),PVar () (Ident () "the_ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "the_ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "the_s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [LetStmt () (BDecls () [FunBind () [Match () (Ident () "findit") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [Var () (UnQual () (Ident () "the_ps")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))])))]) Nothing,Match () (Ident () "findit") [PWildCard (),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (App () (Var () (UnQual () (Ident () "return"))) (Con () (UnQual () (Ident () "Nothing"))))]) Nothing,Match () (Ident () "findit") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "s")] (UnGuardedRhs () (Let () (BDecls () [PatBind () (PVar () (Ident () "left_l")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "the_s"))))) Nothing]) (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "the_s")))) (Var () (UnQual () (Ident () "left_l"))),App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "s")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "left_l")))))]))))) Nothing,Match () (Ident () "findit") [PVar () (Ident () "i"),PVar () (Ident () "s")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "s")))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nl")))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "i")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))))])) Nothing],PatBind () (PVar () (Ident () "nl")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "c2w"))) (Lit () (Char () '\n' "\\n")))) Nothing,PatBind () (PVar () (Ident () "end")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "the_s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "l"))))) Nothing]),Qualifier () (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "the_s"))))]))))) Nothing])) Nothing],TypeSig () [Ident () "break_before_nth_newline"] (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))]))),FunBind () [Match () (Ident () "break_before_nth_newline") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "the_ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "the_ps"))))] (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))])]) Nothing,Match () (Ident () "break_before_nth_newline") [PVar () (Ident () "n"),PVar () (Ident () "the_ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "the_ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "the_s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [LetStmt () (BDecls () [FunBind () [Match () (Ident () "findit") [PWildCard (),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (App () (Var () (UnQual () (Ident () "return"))) (Tuple () Boxed [Var () (UnQual () (Ident () "the_ps")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]))]) Nothing,Match () (Ident () "findit") [PVar () (Ident () "i"),PVar () (Ident () "s")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "s")))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nl")))) (If () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0"))) (Let () (BDecls () [PatBind () (PVar () (Ident () "left_l")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "the_s"))))) Nothing]) (App () (Var () (UnQual () (Ident () "return"))) (Tuple () Boxed [App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "the_s")))) (Var () (UnQual () (Ident () "left_l"))),App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "s")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "left_l")))))]))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1")))))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "i")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))))])) Nothing],PatBind () (PVar () (Ident () "nl")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "c2w"))) (Lit () (Char () '\n' "\\n")))) Nothing,PatBind () (PVar () (Ident () "end")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "the_s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "l"))))) Nothing]),Qualifier () (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "the_s"))))]))))) Nothing])) Nothing]] AST 2: Module () (Just (ModuleHead () (ModuleName () "ByteStringUtils") Nothing (Just (ExportSpecList () [EVar () (UnQual () (Ident () "unsafeWithInternals")),EVar () (UnQual () (Ident () "unpackPSfromUTF8")),EVar () (UnQual () (Ident () "gzReadFilePS")),EVar () (UnQual () (Ident () "mmapFilePS")),EVar () (UnQual () (Ident () "gzWriteFilePS")),EVar () (UnQual () (Ident () "gzWriteFilePSs")),EVar () (UnQual () (Ident () "ifHeadThenTail")),EVar () (UnQual () (Ident () "dropSpace")),EVar () (UnQual () (Ident () "breakSpace")),EVar () (UnQual () (Ident () "linesPS")),EVar () (UnQual () (Ident () "unlinesPS")),EVar () (UnQual () (Ident () "hashPS")),EVar () (UnQual () (Ident () "breakFirstPS")),EVar () (UnQual () (Ident () "breakLastPS")),EVar () (UnQual () (Ident () "substrPS")),EVar () (UnQual () (Ident () "readIntPS")),EVar () (UnQual () (Ident () "is_funky")),EVar () (UnQual () (Ident () "fromHex2PS")),EVar () (UnQual () (Ident () "fromPS2Hex")),EVar () (UnQual () (Ident () "betweenLinesPS")),EVar () (UnQual () (Ident () "break_after_nth_newline")),EVar () (UnQual () (Ident () "break_before_nth_newline")),EVar () (UnQual () (Ident () "intercalate"))])))) [LanguagePragma () [Ident () "BangPatterns",Ident () "ForeignFunctionInterface",Ident () "CPP"]] [ImportDecl {importAnn = (), importModule = ModuleName () "Prelude", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () True [IVar () (Ident () "catch")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "B"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Char8", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BC"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Internal", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BI"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "intercalate"),IVar () (Ident () "uncons")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Internal", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "fromForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Control.Exception", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "catch")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO.Unsafe", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "unsafePerformIO")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Storable", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "peekElemOff"),IVar () (Ident () "peek")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Marshal.Alloc", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "free")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Marshal.Array", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "mallocArray"),IVar () (Ident () "peekArray"),IVar () (Ident () "advancePtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.C.Types", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "CInt")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Bits", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "rotateL")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Char", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "chr"),IVar () (Ident () "ord"),IVar () (Ident () "isSpace")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Word", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "Word8")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.Int", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "Int32")])},ImportDecl {importAnn = (), importModule = ModuleName () "Control.Monad", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "when")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "nullPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "ForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "plusPtr"),IAbs () (NoNamespace ()) (Ident () "Ptr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "withForeignPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.ForeignPtr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "addForeignPtrFinalizer")])},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.Ptr", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "FunPtr")])},ImportDecl {importAnn = (), importModule = ModuleName () "Data.ByteString.Lazy", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "BL"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Codec.Compression.GZip", importQualified = True, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Just (ModuleName () "GZ"), importSpecs = Nothing},ImportDecl {importAnn = (), importModule = ModuleName () "Foreign.C.String", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IAbs () (NoNamespace ()) (Ident () "CString"),IVar () (Ident () "withCString")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.IO.MMap", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "mmapFileByteString")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.Mem", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "performGC")])},ImportDecl {importAnn = (), importModule = ModuleName () "System.Posix.Files", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Just (ImportSpecList () False [IVar () (Ident () "fileSize"),IVar () (Ident () "getSymbolicLinkStatus")])}] [TypeSig () [Ident () "debugForeignPtr"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "ForeignPtr"))) (TyVar () (Ident () "a"))) (TyFun () (TyCon () (UnQual () (Ident () "String"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h debug_alloc") (Ident () "debug_alloc") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyVar () (Ident () "a"))) (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h & debug_free") (Ident () "debug_free") (TyApp () (TyCon () (UnQual () (Ident () "FunPtr"))) (TyParen () (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyVar () (Ident () "a"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")] (UnGuardedRhs () (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Var () (UnQual () (Ident () "n")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "cname")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Qualifier () (App () (App () (Var () (UnQual () (Ident () "debug_alloc"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "cname")))),Qualifier () (App () (App () (Var () (UnQual () (Ident () "addForeignPtrFinalizer"))) (Var () (UnQual () (Ident () "debug_free")))) (Var () (UnQual () (Ident () "fp"))))])))))) Nothing,Match () (Ident () "debugForeignPtr") [PWildCard (),PWildCard ()] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Con () (Special () (UnitCon ()))))) Nothing],TypeSig () [Ident () "unsafeWithInternals"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyParen () (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyVar () (Ident () "a")))))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyVar () (Ident () "a"))))),FunBind () [Match () (Ident () "unsafeWithInternals") [PVar () (Ident () "ps"),PVar () (Ident () "f")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (Var () (UnQual () (Ident () "f"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Var () (UnQual () (Ident () "l"))))))) Nothing])) Nothing],TypeSig () [Ident () "readIntPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (UnQual () (Ident () "Int")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))]))),PatBind () (PVar () (Ident () "readIntPS")) (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BC") (Ident () "readInt"))) (QVarOp () (UnQual () (Symbol () "."))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "dropWhile"))) (Var () (UnQual () (Ident () "isSpace")))))) Nothing,TypeSig () [Ident () "unpackPSfromUTF8"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "String")))),FunBind () [Match () (Ident () "unpackPSfromUTF8") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PWildCard (),PWildCard (),PLit () (Signless ()) (Int () 0 "0")]) (UnGuardedRhs () (Lit () (String () "" ""))) Nothing,Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "outbuf")) (App () (Var () (UnQual () (Ident () "mallocArray"))) (Var () (UnQual () (Ident () "l")))),Generator () (PVar () (Ident () "lout")) (InfixApp () (Var () (UnQual () (Ident () "fromIntegral"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (App () (Var () (UnQual () (Ident () "utf8_to_ints"))) (Var () (UnQual () (Ident () "outbuf")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l"))))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "lout"))) (QVarOp () (UnQual () (Symbol () "<"))) (Lit () (Int () 0 "0"))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (UnQual () (Ident () "error"))) (Lit () (String () "Bad UTF8!" "Bad UTF8!")))),Generator () (PVar () (Ident () "str")) (InfixApp () (Paren () (App () (Var () (UnQual () (Ident () "map"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "chr"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "fromIntegral"))))))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "peekArray"))) (Var () (UnQual () (Ident () "lout")))) (Var () (UnQual () (Ident () "outbuf"))))),Qualifier () (App () (Var () (UnQual () (Ident () "free"))) (Var () (UnQual () (Ident () "outbuf")))),Qualifier () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "str"))))]))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h utf8_to_ints") (Ident () "utf8_to_ints") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Int")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),InlineSig () True Nothing (UnQual () (Ident () "ifHeadThenTail")),TypeSig () [Ident () "ifHeadThenTail"] (TyFun () (TyCon () (UnQual () (Ident () "Word8"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))))),FunBind () [Match () (Ident () "ifHeadThenTail") [PVar () (Ident () "c"),PVar () (Ident () "s")] (UnGuardedRhs () (Case () (App () (Var () (UnQual () (Ident () "uncons"))) (Var () (UnQual () (Ident () "s")))) [Alt () (PApp () (UnQual () (Ident () "Just")) [PTuple () Boxed [PVar () (Ident () "w"),PVar () (Ident () "t")]]) (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "c"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "t"))))]) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing],TypeSig () [Ident () "isSpaceWord8"] (TyFun () (TyCon () (UnQual () (Ident () "Word8"))) (TyCon () (UnQual () (Ident () "Bool")))),FunBind () [Match () (Ident () "isSpaceWord8") [PVar () (Ident () "w")] (UnGuardedRhs () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 32 "32"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 9 "9"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 10 "10"))) (QVarOp () (UnQual () (Symbol () "||"))) (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 13 "13"))))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "isSpaceWord8")),TypeSig () [Ident () "firstnonspace"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))))),FunBind () [Match () (Ident () "firstnonspace") [PBangPat () (PVar () (Ident () "ptr")),PBangPat () (PVar () (Ident () "n")),PBangPat () (PVar () (Ident () "m"))] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () ">="))) (Var () (UnQual () (Ident () "m"))))] (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "n")))),Qualifier () (If () (App () (Var () (UnQual () (Ident () "isSpaceWord8"))) (Var () (UnQual () (Ident () "w")))) (App () (App () (App () (Var () (UnQual () (Ident () "firstnonspace"))) (Var () (UnQual () (Ident () "ptr")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "m")))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))))])]) Nothing],TypeSig () [Ident () "firstspace"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))))),FunBind () [Match () (Ident () "firstspace") [PBangPat () (PVar () (Ident () "ptr")),PBangPat () (PVar () (Ident () "n")),PBangPat () (PVar () (Ident () "m"))] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () ">="))) (Var () (UnQual () (Ident () "m"))))] (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "n")))),Qualifier () (If () (App () (Paren () (InfixApp () (Var () (UnQual () (Ident () "not"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "isSpaceWord8"))))) (Var () (UnQual () (Ident () "w")))) (App () (App () (App () (Var () (UnQual () (Ident () "firstspace"))) (Var () (UnQual () (Ident () "ptr")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "m")))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "n")))))])]) Nothing],TypeSig () [Ident () "dropSpace"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "dropSpace") [PParen () (PApp () (Qual () (ModuleName () "BI") (Ident () "PS")) [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")])] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BI") (Ident () "inlinePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "i")) (App () (App () (App () (Var () (UnQual () (Ident () "firstnonspace"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "l")))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$!"))) (If () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "l")))) (Var () (Qual () (ModuleName () "B") (Ident () "empty"))) (App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "i")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "i"))))))))]))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "dropSpace")),TypeSig () [Ident () "breakSpace"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])),FunBind () [Match () (Ident () "breakSpace") [PParen () (PApp () (Qual () (ModuleName () "BI") (Ident () "PS")) [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")])] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BI") (Ident () "inlinePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Generator () (PVar () (Ident () "i")) (App () (App () (App () (Var () (UnQual () (Ident () "firstspace"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "l")))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$!"))) (Case () (Con () (Special () (UnitCon ()))) [Alt () (PWildCard ()) (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0")))] (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "l")))]),GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "l"))))] (Tuple () Boxed [App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "l"))),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Tuple () Boxed [App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Var () (UnQual () (Ident () "s")))) (Var () (UnQual () (Ident () "i"))),App () (App () (App () (Con () (Qual () (ModuleName () "BI") (Ident () "PS"))) (Var () (UnQual () (Ident () "x")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "i")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "i")))))])]) Nothing]))]))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakSpace")),InlineSig () True Nothing (UnQual () (Ident () "is_funky")),TypeSig () [Ident () "is_funky"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "Bool")))),FunBind () [Match () (Ident () "is_funky") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (RightSection () (QVarOp () (UnQual () (Symbol () "/="))) (Lit () (Int () 0 "0"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "has_funky_char"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l"))))))))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "fpstring.h has_funky_char") (Ident () "has_funky_char") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt")))))),InlineSig () True Nothing (UnQual () (Ident () "hashPS")),TypeSig () [Ident () "hashPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (UnQual () (Ident () "Int32")))),FunBind () [Match () (Ident () "hashPS") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [Qualifier () (App () (App () (Var () (UnQual () (Ident () "hash"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Var () (UnQual () (Ident () "l"))))]))))) Nothing])) Nothing],TypeSig () [Ident () "hash"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int32")))))),FunBind () [Match () (Ident () "hash") [PVar () (Ident () "ptr"),PVar () (Ident () "len")] (UnGuardedRhs () (App () (App () (App () (Var () (UnQual () (Ident () "f"))) (Paren () (ExpTypeSig () (Lit () (Int () 0 "0")) (TyCon () (UnQual () (Ident () "Int32")))))) (Var () (UnQual () (Ident () "ptr")))) (Var () (UnQual () (Ident () "len"))))) (Just (BDecls () [FunBind () [Match () (Ident () "f") [PVar () (Ident () "h"),PWildCard (),PLit () (Signless ()) (Int () 0 "0")] (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "h"))))) Nothing,Match () (Ident () "f") [PVar () (Ident () "h"),PVar () (Ident () "p"),PVar () (Ident () "n")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "x")) (App () (Var () (UnQual () (Ident () "peek"))) (Var () (UnQual () (Ident () "p")))),LetStmt () (BDecls () [PatBind () (PBangPat () (PVar () (Ident () "h'"))) (UnGuardedRhs () (InfixApp () (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "x"))))) (QVarOp () (UnQual () (Symbol () "+"))) (Paren () (App () (App () (Var () (UnQual () (Ident () "rotateL"))) (Var () (UnQual () (Ident () "h")))) (Lit () (Int () 8 "8")))))) Nothing]),Qualifier () (App () (App () (App () (Var () (UnQual () (Ident () "f"))) (Var () (UnQual () (Ident () "h'")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "advancePtr"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1")))))])) Nothing]]))],InlineSig () True Nothing (UnQual () (Ident () "substrPS")),TypeSig () [Ident () "substrPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyCon () (UnQual () (Ident () "Int")))))),FunBind () [Match () (Ident () "substrPS") [PVar () (Ident () "tok"),PVar () (Ident () "str")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "tok"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Lit () (Int () 0 "0"))),GuardedRhs () [Qualifier () (InfixApp () (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "tok")))) (QVarOp () (UnQual () (Symbol () ">"))) (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "str")))))] (Con () (UnQual () (Ident () "Nothing"))),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (Do () [Generator () (PVar () (Ident () "n")) (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndex"))) (Paren () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "head"))) (Var () (UnQual () (Ident () "tok")))))) (Var () (UnQual () (Ident () "str")))),LetStmt () (BDecls () [PatBind () (PVar () (Ident () "ttok")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "B") (Ident () "tail"))) (Var () (UnQual () (Ident () "tok"))))) Nothing,PatBind () (PVar () (Ident () "reststr")) (UnGuardedRhs () (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "str"))))) Nothing]),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "ttok"))) (QVarOp () (UnQual () (Symbol () "=="))) (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Paren () (App () (Var () (Qual () (ModuleName () "B") (Ident () "length"))) (Var () (UnQual () (Ident () "ttok")))))) (Var () (UnQual () (Ident () "reststr"))))) (App () (Con () (UnQual () (Ident () "Just"))) (Var () (UnQual () (Ident () "n")))) (InfixApp () (LeftSection () (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1")))) (QVarOp () (UnQual () (Symbol () "+")))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (App () (Var () (UnQual () (Ident () "substrPS"))) (Var () (UnQual () (Ident () "tok")))) (Var () (UnQual () (Ident () "reststr"))))))])]) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakFirstPS")),TypeSig () [Ident () "breakFirstPS"] (TyFun () (TyCon () (UnQual () (Ident () "Char"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "breakFirstPS") [PVar () (Ident () "c"),PVar () (Ident () "p")] (UnGuardedRhs () (Case () (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndex"))) (Var () (UnQual () (Ident () "c")))) (Var () (UnQual () (Ident () "p")))) [Alt () (PApp () (UnQual () (Ident () "Nothing")) []) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing,Alt () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "n")]) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "p"))),App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "p")))]))) Nothing])) Nothing],InlineSig () True Nothing (UnQual () (Ident () "breakLastPS")),TypeSig () [Ident () "breakLastPS"] (TyFun () (TyCon () (UnQual () (Ident () "Char"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "breakLastPS") [PVar () (Ident () "c"),PVar () (Ident () "p")] (UnGuardedRhs () (Case () (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "elemIndexEnd"))) (Var () (UnQual () (Ident () "c")))) (Var () (UnQual () (Ident () "p")))) [Alt () (PApp () (UnQual () (Ident () "Nothing")) []) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing,Alt () (PApp () (UnQual () (Ident () "Just")) [PVar () (Ident () "n")]) (UnGuardedRhs () (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "take"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "p"))),App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "drop"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "n"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (Var () (UnQual () (Ident () "p")))]))) Nothing])) Nothing],InlineSig () True Nothing (UnQual () (Ident () "linesPS")),TypeSig () [Ident () "linesPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "linesPS") [PVar () (Ident () "ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "ps"))))] (List () [Var () (Qual () (ModuleName () "B") (Ident () "empty"))]),GuardedRhs () [Qualifier () (Var () (UnQual () (Ident () "otherwise")))] (App () (App () (Var () (Qual () (ModuleName () "BC") (Ident () "split"))) (Lit () (Char () '\n' "\\n"))) (Var () (UnQual () (Ident () "ps"))))]) Nothing],TypeSig () [Ident () "unlinesPS"] (TyFun () (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "unlinesPS") [PList () []] (UnGuardedRhs () (Var () (Qual () (ModuleName () "BC") (Ident () "empty")))) Nothing,Match () (Ident () "unlinesPS") [PVar () (Ident () "x")] (UnGuardedRhs () (InfixApp () (Var () (Qual () (ModuleName () "BC") (Ident () "init"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "unlines"))) (Var () (UnQual () (Ident () "x")))))) Nothing],InlineSig () True Nothing (UnQual () (Ident () "unlinesPS")),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzopen") (Ident () "c_gzopen") (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyFun () (TyCon () (UnQual () (Ident () "CString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyParen () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzclose") (Ident () "c_gzclose") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzread") (Ident () "c_gzread") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static zlib.h gzwrite") (Ident () "c_gzwrite") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "CInt"))))))),TypeSig () [Ident () "gzReadFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "gzReadFilePS") [PVar () (Ident () "f")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "h")) (App () (App () (Var () (UnQual () (Ident () "openBinaryFile"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "ReadMode")))),Generator () (PVar () (Ident () "header")) (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "hGet"))) (Var () (UnQual () (Ident () "h")))) (Lit () (Int () 2 "2"))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "header"))) (QVarOp () (UnQual () (Symbol () "/="))) (App () (Var () (Qual () (ModuleName () "BC") (Ident () "pack"))) (Lit () (String () "\US\139" "\\US\\139")))) (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "hClose"))) (Var () (UnQual () (Ident () "h")))),Qualifier () (App () (Var () (UnQual () (Ident () "mmapFilePS"))) (Var () (UnQual () (Ident () "f"))))]) (Do () [Qualifier () (App () (App () (App () (Var () (UnQual () (Ident () "hSeek"))) (Var () (UnQual () (Ident () "h")))) (Con () (UnQual () (Ident () "SeekFromEnd")))) (Paren () (NegApp () (Lit () (Int () 4 "4"))))),Generator () (PVar () (Ident () "len")) (App () (Var () (UnQual () (Ident () "hGetLittleEndInt"))) (Var () (UnQual () (Ident () "h")))),Qualifier () (App () (Var () (UnQual () (Ident () "hClose"))) (Var () (UnQual () (Ident () "h")))),LetStmt () (BDecls () [PatBind () (PVar () (Ident () "decompress")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "GZ") (Ident () "decompressWith"))) (RecUpdate () (Var () (Qual () (ModuleName () "GZ") (Ident () "defaultDecompressParams"))) [FieldUpdate () (Qual () (ModuleName () "GZ") (Ident () "decompressBufferSize")) (Var () (UnQual () (Ident () "len")))]))) Nothing]),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "fmap"))) (Paren () (InfixApp () (Var () (Qual () (ModuleName () "B") (Ident () "concat"))) (QVarOp () (UnQual () (Symbol () "."))) (InfixApp () (Var () (Qual () (ModuleName () "BL") (Ident () "toChunks"))) (QVarOp () (UnQual () (Symbol () "."))) (Var () (UnQual () (Ident () "decompress"))))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "fmap"))) (Paren () (InfixApp () (Var () (Qual () (ModuleName () "BL") (Ident () "fromChunks"))) (QVarOp () (UnQual () (Symbol () "."))) (RightSection () (QConOp () (Special () (Cons ()))) (List () []))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (Qual () (ModuleName () "B") (Ident () "readFile"))) (Var () (UnQual () (Ident () "f")))) (Var () (Qual () (ModuleName () "BL") (Ident () "readFile")))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "fstr")] (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Lit () (String () "rb" "rb"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "rb")] (Do () [Generator () (PVar () (Ident () "gzf")) (App () (App () (Var () (UnQual () (Ident () "c_gzopen"))) (Var () (UnQual () (Ident () "fstr")))) (Var () (UnQual () (Ident () "rb")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "gzf"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nullPtr")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem opening file " "problem opening file ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Generator () (PVar () (Ident () "fp")) (App () (Var () (Qual () (ModuleName () "BI") (Ident () "mallocByteString"))) (Var () (UnQual () (Ident () "len")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "debugForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "gzReadFilePS " "gzReadFilePS ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f"))))),Generator () (PVar () (Ident () "lread")) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (App () (Var () (UnQual () (Ident () "c_gzread"))) (Var () (UnQual () (Ident () "gzf")))) (Var () (UnQual () (Ident () "p")))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "len")))))))),Qualifier () (App () (Var () (UnQual () (Ident () "c_gzclose"))) (Var () (UnQual () (Ident () "gzf")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "lread")))) (QVarOp () (UnQual () (Symbol () "/="))) (Var () (UnQual () (Ident () "len")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzreading file " "problem gzreading file ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Lit () (Int () 0 "0"))) (Var () (UnQual () (Ident () "len")))))])))))]))])) Nothing],TypeSig () [Ident () "hGetLittleEndInt"] (TyFun () (TyCon () (UnQual () (Ident () "Handle"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (UnQual () (Ident () "Int"))))),FunBind () [Match () (Ident () "hGetLittleEndInt") [PVar () (Ident () "h")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "b1")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b2")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b3")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Generator () (PVar () (Ident () "b4")) (InfixApp () (Var () (UnQual () (Ident () "ord"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "hGetChar"))) (Var () (UnQual () (Ident () "h"))))),Qualifier () (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (InfixApp () (InfixApp () (Var () (UnQual () (Ident () "b1"))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 256 "256")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b2"))))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 65536 "65536")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b3"))))) (QVarOp () (UnQual () (Symbol () "+"))) (InfixApp () (Lit () (Int () 16777216 "16777216")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "b4"))))))])) Nothing],TypeSig () [Ident () "gzWriteFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteFilePS") [PVar () (Ident () "f"),PVar () (Ident () "ps")] (UnGuardedRhs () (App () (App () (Var () (UnQual () (Ident () "gzWriteFilePSs"))) (Var () (UnQual () (Ident () "f")))) (List () [Var () (UnQual () (Ident () "ps"))]))) Nothing],TypeSig () [Ident () "gzWriteFilePSs"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyFun () (TyList () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteFilePSs") [PVar () (Ident () "f"),PVar () (Ident () "pss")] (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BL") (Ident () "writeFile"))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (Qual () (ModuleName () "GZ") (Ident () "compress"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (App () (App () (Var () (Qual () (ModuleName () "BL") (Ident () "fromChunks"))) (Var () (UnQual () (Ident () "pss")))) (Var () (UnQual () (Ident () "withCString")))) (Var () (UnQual () (Ident () "f")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "fstr")] (InfixApp () (App () (Var () (UnQual () (Ident () "withCString"))) (Lit () (String () "wb" "wb"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "wb")] (Do () [Generator () (PVar () (Ident () "gzf")) (App () (App () (Var () (UnQual () (Ident () "c_gzopen"))) (Var () (UnQual () (Ident () "fstr")))) (Var () (UnQual () (Ident () "wb")))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "gzf"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nullPtr")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzopening file for write: " "problem gzopening file for write: ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f")))))),Qualifier () (InfixApp () (App () (App () (Var () (UnQual () (Ident () "mapM_"))) (Paren () (App () (Var () (UnQual () (Ident () "gzWriteToGzf"))) (Var () (UnQual () (Ident () "gzf")))))) (Var () (UnQual () (Ident () "pss")))) (QVarOp () (UnQual () (Ident () "catch"))) (Lambda () [PWildCard ()] (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Lit () (String () "problem gzwriting file: " "problem gzwriting file: ")) (QVarOp () (UnQual () (Symbol () "++"))) (Var () (UnQual () (Ident () "f"))))))),Qualifier () (App () (Var () (UnQual () (Ident () "c_gzclose"))) (Var () (UnQual () (Ident () "gzf"))))])))))))) Nothing],TypeSig () [Ident () "gzWriteToGzf"] (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (Special () (UnitCon ())))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ())))))),FunBind () [Match () (Ident () "gzWriteToGzf") [PVar () (Ident () "gzf"),PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PWildCard (),PWildCard (),PLit () (Signless ()) (Int () 0 "0")]) (UnGuardedRhs () (App () (Var () (UnQual () (Ident () "return"))) (Con () (Special () (UnitCon ()))))) Nothing,Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "lw")) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (App () (App () (App () (Var () (UnQual () (Ident () "c_gzwrite"))) (Var () (UnQual () (Ident () "gzf")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "p"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l")))))))),Qualifier () (InfixApp () (App () (Var () (UnQual () (Ident () "when"))) (Paren () (InfixApp () (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "lw")))) (QVarOp () (UnQual () (Symbol () "/="))) (Var () (UnQual () (Ident () "l")))))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "fail"))) (QVarOp () (UnQual () (Symbol () "$"))) (Lit () (String () "problem in gzWriteToGzf" "problem in gzWriteToGzf"))))])) Nothing])) Nothing],TypeSig () [Ident () "mmapFilePS"] (TyFun () (TyCon () (UnQual () (Ident () "FilePath"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))))),FunBind () [Match () (Ident () "mmapFilePS") [PVar () (Ident () "f")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "x")) (InfixApp () (App () (App () (Var () (UnQual () (Ident () "mmapFileByteString"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "Nothing")))) (QVarOp () (UnQual () (Ident () "catch"))) (Paren () (Lambda () [PWildCard ()] (Do () [Generator () (PVar () (Ident () "size")) (InfixApp () (Var () (UnQual () (Ident () "fileSize"))) (QVarOp () (UnQual () (Ident () "fmap"))) (App () (Var () (UnQual () (Ident () "getSymbolicLinkStatus"))) (Var () (UnQual () (Ident () "f"))))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "size"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0"))) (App () (Var () (UnQual () (Ident () "return"))) (Var () (Qual () (ModuleName () "B") (Ident () "empty")))) (InfixApp () (Var () (UnQual () (Ident () "performGC"))) (QVarOp () (UnQual () (Symbol () ">>"))) (App () (App () (Var () (UnQual () (Ident () "mmapFileByteString"))) (Var () (UnQual () (Ident () "f")))) (Con () (UnQual () (Ident () "Nothing"))))))])))),Qualifier () (App () (Var () (UnQual () (Ident () "return"))) (Var () (UnQual () (Ident () "x"))))])) Nothing],PatBind () (PVar () (Ident () "mmapFilePS")) (UnGuardedRhs () (Var () (Qual () (ModuleName () "B") (Ident () "readFile")))) Nothing,ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h conv_to_hex") (Ident () "conv_to_hex") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),TypeSig () [Ident () "fromPS2Hex"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "fromPS2Hex") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "unsafeCreate"))) (Paren () (InfixApp () (Lit () (Int () 2 "2")) (QVarOp () (UnQual () (Symbol () "*"))) (Var () (UnQual () (Ident () "l")))))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "f")] (InfixApp () (App () (App () (Var () (UnQual () (Ident () "conv_to_hex"))) (Var () (UnQual () (Ident () "p")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "f"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Var () (UnQual () (Ident () "fromIntegral"))) (Var () (UnQual () (Ident () "l")))))))))) Nothing])) Nothing],ForImp () (CCall ()) (Just (PlayRisky ())) (Just "static fpstring.h conv_from_hex") (Ident () "conv_from_hex") (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyApp () (TyCon () (UnQual () (Ident () "Ptr"))) (TyCon () (UnQual () (Ident () "Word8")))) (TyFun () (TyCon () (UnQual () (Ident () "CInt"))) (TyApp () (TyCon () (UnQual () (Ident () "IO"))) (TyCon () (Special () (UnitCon ()))))))),TypeSig () [Ident () "fromHex2PS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))),FunBind () [Match () (Ident () "fromHex2PS") [PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "x"),PVar () (Ident () "s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "unsafeCreate"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Ident () "div"))) (Lit () (Int () 2 "2"))))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "x")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "f")] (App () (App () (App () (Var () (UnQual () (Ident () "conv_from_hex"))) (Var () (UnQual () (Ident () "p")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "f"))) (QVarOp () (UnQual () (Ident () "plusPtr"))) (Var () (UnQual () (Ident () "s")))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "fromIntegral"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Ident () "div"))) (Lit () (Int () 2 "2"))))))))))) Nothing])) Nothing],TypeSig () [Ident () "betweenLinesPS"] (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyParen () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")))))))),FunBind () [Match () (Ident () "betweenLinesPS") [PVar () (Ident () "start"),PVar () (Ident () "end"),PVar () (Ident () "ps")] (UnGuardedRhs () (Case () (App () (App () (Var () (UnQual () (Ident () "break"))) (LeftSection () (Var () (UnQual () (Ident () "start"))) (QVarOp () (UnQual () (Symbol () "=="))))) (Paren () (App () (Var () (UnQual () (Ident () "linesPS"))) (Var () (UnQual () (Ident () "ps")))))) [Alt () (PTuple () Boxed [PWildCard (),PInfixApp () (PWildCard ()) (Special () (Cons ())) (PAsPat () (Ident () "rest") (PParen () (PInfixApp () (PVar () (Ident () "bs1")) (Special () (Cons ())) (PWildCard ()))))]) (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "bs1")))) [Alt () (PTuple () Boxed [PVar () (Ident () "ps1"),PVar () (Ident () "s1"),PWildCard ()]) (UnGuardedRhs () (Case () (App () (App () (Var () (UnQual () (Ident () "break"))) (LeftSection () (Var () (UnQual () (Ident () "end"))) (QVarOp () (UnQual () (Symbol () "=="))))) (Var () (UnQual () (Ident () "rest")))) [Alt () (PTuple () Boxed [PWildCard (),PInfixApp () (PVar () (Ident () "bs2")) (Special () (Cons ())) (PWildCard ())]) (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "bs2")))) [Alt () (PTuple () Boxed [PWildCard (),PVar () (Ident () "s2"),PWildCard ()]) (UnGuardedRhs () (InfixApp () (Con () (UnQual () (Ident () "Just"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "ps1")))) (Var () (UnQual () (Ident () "s1")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s2"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "s1")))))))) Nothing])) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing])) Nothing,Alt () (PWildCard ()) (UnGuardedRhs () (Con () (UnQual () (Ident () "Nothing")))) Nothing])) Nothing],TypeSig () [Ident () "break_after_nth_newline"] (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyApp () (TyCon () (UnQual () (Ident () "Maybe"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))])))),FunBind () [Match () (Ident () "break_after_nth_newline") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "the_ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "the_ps"))))] (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]))]) Nothing,Match () (Ident () "break_after_nth_newline") [PVar () (Ident () "n"),PVar () (Ident () "the_ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "the_ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "the_s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [LetStmt () (BDecls () [FunBind () [Match () (Ident () "findit") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [Var () (UnQual () (Ident () "the_ps")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))])))]) Nothing,Match () (Ident () "findit") [PWildCard (),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (App () (Var () (UnQual () (Ident () "return"))) (Con () (UnQual () (Ident () "Nothing"))))]) Nothing,Match () (Ident () "findit") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "s")] (UnGuardedRhs () (Let () (BDecls () [PatBind () (PVar () (Ident () "left_l")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "the_s"))))) Nothing]) (InfixApp () (Var () (UnQual () (Ident () "return"))) (QVarOp () (UnQual () (Symbol () "$"))) (App () (Con () (UnQual () (Ident () "Just"))) (Tuple () Boxed [App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "the_s")))) (Var () (UnQual () (Ident () "left_l"))),App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "s")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "left_l")))))]))))) Nothing,Match () (Ident () "findit") [PVar () (Ident () "i"),PVar () (Ident () "s")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "s")))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nl")))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "i")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))))])) Nothing],PatBind () (PVar () (Ident () "nl")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "c2w"))) (Lit () (Char () '\n' "\\n")))) Nothing,PatBind () (PVar () (Ident () "end")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "the_s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "l"))))) Nothing]),Qualifier () (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "the_s"))))]))))) Nothing])) Nothing],TypeSig () [Ident () "break_before_nth_newline"] (TyFun () (TyCon () (UnQual () (Ident () "Int"))) (TyFun () (TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))) (TyTuple () Boxed [TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString")),TyCon () (Qual () (ModuleName () "B") (Ident () "ByteString"))]))),FunBind () [Match () (Ident () "break_before_nth_newline") [PLit () (Signless ()) (Int () 0 "0"),PVar () (Ident () "the_ps")] (GuardedRhss () [GuardedRhs () [Qualifier () (App () (Var () (Qual () (ModuleName () "B") (Ident () "null"))) (Var () (UnQual () (Ident () "the_ps"))))] (Tuple () Boxed [Var () (Qual () (ModuleName () "B") (Ident () "empty")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))])]) Nothing,Match () (Ident () "break_before_nth_newline") [PVar () (Ident () "n"),PVar () (Ident () "the_ps")] (UnGuardedRhs () (Case () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "toForeignPtr"))) (Var () (UnQual () (Ident () "the_ps")))) [Alt () (PTuple () Boxed [PVar () (Ident () "fp"),PVar () (Ident () "the_s"),PVar () (Ident () "l")]) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "unsafePerformIO"))) (QVarOp () (UnQual () (Symbol () "$"))) (InfixApp () (App () (Var () (UnQual () (Ident () "withForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (QVarOp () (UnQual () (Symbol () "$"))) (Lambda () [PVar () (Ident () "p")] (Do () [LetStmt () (BDecls () [FunBind () [Match () (Ident () "findit") [PWildCard (),PVar () (Ident () "s")] (GuardedRhss () [GuardedRhs () [Qualifier () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "end"))))] (App () (Var () (UnQual () (Ident () "return"))) (Tuple () Boxed [Var () (UnQual () (Ident () "the_ps")),Var () (Qual () (ModuleName () "B") (Ident () "empty"))]))]) Nothing,Match () (Ident () "findit") [PVar () (Ident () "i"),PVar () (Ident () "s")] (UnGuardedRhs () (Do () [Generator () (PVar () (Ident () "w")) (App () (App () (Var () (UnQual () (Ident () "peekElemOff"))) (Var () (UnQual () (Ident () "p")))) (Var () (UnQual () (Ident () "s")))),Qualifier () (If () (InfixApp () (Var () (UnQual () (Ident () "w"))) (QVarOp () (UnQual () (Symbol () "=="))) (Var () (UnQual () (Ident () "nl")))) (If () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "=="))) (Lit () (Int () 0 "0"))) (Let () (BDecls () [PatBind () (PVar () (Ident () "left_l")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "the_s"))))) Nothing]) (App () (Var () (UnQual () (Ident () "return"))) (Tuple () Boxed [App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "the_s")))) (Var () (UnQual () (Ident () "left_l"))),App () (App () (App () (Var () (UnQual () (Ident () "fromForeignPtr"))) (Var () (UnQual () (Ident () "fp")))) (Var () (UnQual () (Ident () "s")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "l"))) (QVarOp () (UnQual () (Symbol () "-"))) (Var () (UnQual () (Ident () "left_l")))))]))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "i"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (Int () 1 "1"))))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1")))))) (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "i")))) (Paren () (InfixApp () (Var () (UnQual () (Ident () "s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Lit () (Int () 1 "1"))))))])) Nothing],PatBind () (PVar () (Ident () "nl")) (UnGuardedRhs () (App () (Var () (Qual () (ModuleName () "BI") (Ident () "c2w"))) (Lit () (Char () '\n' "\\n")))) Nothing,PatBind () (PVar () (Ident () "end")) (UnGuardedRhs () (InfixApp () (Var () (UnQual () (Ident () "the_s"))) (QVarOp () (UnQual () (Symbol () "+"))) (Var () (UnQual () (Ident () "l"))))) Nothing]),Qualifier () (App () (App () (Var () (UnQual () (Ident () "findit"))) (Var () (UnQual () (Ident () "n")))) (Var () (UnQual () (Ident () "the_s"))))]))))) Nothing])) Nothing]] haskell-src-exts-1.23.1/tests/examples/BracketInstanceHead.hs.prettyparser.golden0000644000000000000000000000000613534314632026325 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory.hs.prettyparser.golden0000644000000000000000000000000613534314633024403 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSynonymSignatures.hs.prettyparser.golden0000644000000000000000000000000613534314633027563 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyCase.hs.prettyparser.golden0000644000000000000000000000000613534314633024376 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports2.hs.prettyparser.golden0000644000000000000000000000000613534314633025022 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Overlapable.hs.prettyparser.golden0000644000000000000000000000000613534314633024740 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Unicode2.hs.prettyparser.golden0000644000000000000000000000000613534314633024154 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RegularPatterns.hs.prettyparser.golden0000644000000000000000000000000613534314633025626 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces2.hs.prettyparser.golden0000644000000000000000000000000613534314633026347 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteOld.hs.prettyparser.golden0000644000000000000000000000000613534314633025243 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice4.hs.prettyparser.golden0000644000000000000000000000000613534314633024324 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsBad.hs.prettyparser.golden0000644000000000000000000000013013534314632026034 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BinaryLiteralsBad.hs" 3 1) "arity mismatch for 'f'" haskell-src-exts-1.23.1/tests/examples/MinimalPragma.hs.prettyparser.golden0000644000000000000000000000000613534314633025222 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DerivingViaStealing.hs.prettyparser.golden0000644000000000000000000000000613534314632026401 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/PatternSplice.hs.prettyparser.golden0000644000000000000000000000000613534314633025261 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuantifiedConstraints.hs.prettyparser.golden0000644000000000000000000000000613556712523027031 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixApp.hs.prettyparser.golden0000644000000000000000000000000613534314633024222 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IndentedWhereBlock.hs.prettyparser.golden0000644000000000000000000000013113534314633026203 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/IndentedWhereBlock.hs" 8 1) "Parse error: virtual }" haskell-src-exts-1.23.1/tests/examples/SimpleDeriving.hs.prettyparser.golden0000644000000000000000000000000613534314633025425 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EqualityConstraints1.hs.prettyparser.golden0000644000000000000000000000000613534314633026612 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QuasiQuoteQual2.hs.prettyparser.golden0000644000000000000000000000000613534314633025511 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EmptyWhere.hs.prettyparser.golden0000644000000000000000000000000613534314633024575 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/InfixTypeMinus.hs.prettyparser.golden0000644000000000000000000000000613534314633025437 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeListCons.hs.prettyparser.golden0000644000000000000000000000000613534314633025104 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NestedAsPat.hs.prettyparser.golden0000644000000000000000000000000613534314633024657 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/FlexibleContextsWithoutVars.hs.prettyparser.golden0000644000000000000000000000000613534314633030206 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RCategory3.hs.prettyparser.golden0000644000000000000000000000000613534314633024466 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GADTRecord2.hs.prettyparser.golden0000644000000000000000000000000613534314633024444 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ArrowBrackets.hs.prettyparser.golden0000644000000000000000000000000613603723515025255 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ConstructorAndClassOperators.hs.prettyparser.golden0000644000000000000000000000000613534314632030340 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TySplice3.hs.prettyparser.golden0000644000000000000000000000000613534314633024323 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/NegPrimWordLiteral.hs.prettyparser.golden0000644000000000000000000000021013534314633026213 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/NegPrimWordLiteral.hs" 3 1) "Parse error: negative primitive word literal: - 9223372036854775808##" haskell-src-exts-1.23.1/tests/examples/BadStringLineBreak.hs.prettyparser.golden0000644000000000000000000000014013534314632026134 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/BadStringLineBreak.hs" 3 27) "Improperly terminated string" haskell-src-exts-1.23.1/tests/examples/NPlusK.hs.prettyparser.golden0000644000000000000000000000000613534314633023660 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/IfThenElseLayout.hs.prettyparser.golden0000644000000000000000000000000613534314633025670 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/brackets.hs.prettyparser.golden0000644000000000000000000000011513534314633024303 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/brackets.hs" 17 3) "Parse error: \10631" haskell-src-exts-1.23.1/tests/examples/SCCPragmas.hs.prettyparser.golden0000644000000000000000000000000613534314633024427 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/EqualityConstraints2.hs.prettyparser.golden0000644000000000000000000000040313534314633026614 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/EqualityConstraints2.hs" 1 19) "At least one of TypeFamilies or GADTs language extensions needs to be enabled. Please add: {-# LANGUAGE TypeFamilies #-} or {-# LANGUAGE GADTs #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/BinaryLiteralsGood.hs.prettyparser.golden0000644000000000000000000001515313534314632026251 0ustar0000000000000000Roundtrip test failed AST 1: Module () Nothing [LanguagePragma () [Ident () "BinaryLiterals"],LanguagePragma () [Ident () "MagicHash"]] [ImportDecl {importAnn = (), importModule = ModuleName () "GHC.Types", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Nothing}] [PatBind () (PVar () (Ident () "main")) (UnGuardedRhs () (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 0 "0b0")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 0 "0b0")),App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 1 "0b1")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 1 "0b1")),App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 201 "0b11001001")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 201 "0b11001001")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 255 "0b11111111")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 255 "0b11111111"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 0 "0b0")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 1 "0b1")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 201 "0b11001001")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 3 "0b11")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 255 "0b11111111")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 1 "0b00000000000000000000000000000000000000000000000000000000000000000000000000001"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [Lit () (Int () 0 "0b0"),Lit () (Int () 1 "0b1"),Lit () (Int () 2 "0b10"),Lit () (Int () 3 "0b11"),Lit () (Int () 4 "0b100"),Lit () (Int () 5 "0b101"),Lit () (Int () 6 "0b110"),ExpTypeSig () (Lit () (Int () 7 "0b111")) (TyCon () (UnQual () (Ident () "Integer"))),NegApp () (Lit () (Int () 0 "0b0")),NegApp () (Lit () (Int () 1 "0b1")),NegApp () (Lit () (Int () 2 "0b10")),NegApp () (Lit () (Int () 3 "0b11")),NegApp () (Lit () (Int () 4 "0b100")),NegApp () (Lit () (Int () 5 "0b101")),NegApp () (Lit () (Int () 6 "0b110")),NegApp () (Lit () (Int () 7 "0b111")),Lit () (Int () 340282366920938463463374607431768211455 "0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111"),NegApp () (Lit () (Int () 340282366920938463463374607431768211455 "0b11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [InfixApp () (Con () (UnQual () (Ident () "I8#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 128 "0B10000000")),App () (Con () (UnQual () (Ident () "I8#"))) (Lit () (PrimInt () 127 "0B1111111"))]))])) Nothing] AST 2: Module () Nothing [LanguagePragma () [Ident () "BinaryLiterals"],LanguagePragma () [Ident () "MagicHash"]] [ImportDecl {importAnn = (), importModule = ModuleName () "GHC.Types", importQualified = False, importSrc = False, importSafe = False, importPkg = Nothing, importAs = Nothing, importSpecs = Nothing}] [PatBind () (PVar () (Ident () "main")) (UnGuardedRhs () (Do () [Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 0 "0")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 0 "0")),App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 1 "1")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 1 "1")),App () (Con () (UnQual () (Ident () "I#"))) (Lit () (PrimInt () 1 "1")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 1 "1")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 201 "201")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 201 "201")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 255 "255")),InfixApp () (Con () (UnQual () (Ident () "I#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 255 "255"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 0 "0")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 1 "1")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 201 "201")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 3 "3")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 255 "255")),App () (Con () (UnQual () (Ident () "W#"))) (Lit () (PrimWord () 1 "1"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [Lit () (Int () 0 "0"),Lit () (Int () 1 "1"),Lit () (Int () 2 "2"),Lit () (Int () 3 "3"),Lit () (Int () 4 "4"),Lit () (Int () 5 "5"),Lit () (Int () 6 "6"),ExpTypeSig () (Lit () (Int () 7 "7")) (TyCon () (UnQual () (Ident () "Integer"))),NegApp () (Lit () (Int () 0 "0")),NegApp () (Lit () (Int () 1 "1")),NegApp () (Lit () (Int () 2 "2")),NegApp () (Lit () (Int () 3 "3")),NegApp () (Lit () (Int () 4 "4")),NegApp () (Lit () (Int () 5 "5")),NegApp () (Lit () (Int () 6 "6")),NegApp () (Lit () (Int () 7 "7")),Lit () (Int () 340282366920938463463374607431768211455 "340282366920938463463374607431768211455"),NegApp () (Lit () (Int () 340282366920938463463374607431768211455 "340282366920938463463374607431768211455"))])),Qualifier () (App () (Var () (UnQual () (Ident () "print"))) (List () [InfixApp () (Con () (UnQual () (Ident () "I8#"))) (QVarOp () (UnQual () (Symbol () "-"))) (Lit () (PrimInt () 128 "128")),App () (Con () (UnQual () (Ident () "I8#"))) (Lit () (PrimInt () 127 "127"))]))])) Nothing] haskell-src-exts-1.23.1/tests/examples/Fixity3.hs.prettyparser.golden0000644000000000000000000000000613534314633024043 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeErrorMessage.hs.prettyparser.golden0000644000000000000000000000042213534314633025746 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/TypeErrorMessage.hs" 2 1) "At least one of ExplicitForAll or TypeOperators language extensions needs to be enabled. Please add: {-# LANGUAGE ExplicitForAll #-} or {-# LANGUAGE TypeOperators #-} language pragma at the top of your module." haskell-src-exts-1.23.1/tests/examples/Lib.hs.prettyparser.golden0000644000000000000000000000000613534314633023212 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SingleClassAsst.hs.prettyparser.golden0000644000000000000000000000000613534314633025546 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LanguagePragma.hs.prettyparser.golden0000644000000000000000000000000613534314633025357 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RecordInfixSelector.hs.prettyparser.golden0000644000000000000000000000000613534314633026421 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QualifiedQQuote.hs.prettyparser.golden0000644000000000000000000000000613534314633025546 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ExplicitNamespaces1.hs.prettyparser.golden0000644000000000000000000000000613534314633026346 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/SafeImports1.hs.prettyparser.golden0000644000000000000000000000000613534314633025021 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/Ppr048.hs.prettyparser.golden0000644000000000000000000000010713534314633023503 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/Ppr048.hs" 3 9) "Parse error: foo" haskell-src-exts-1.23.1/tests/examples/TensorTests.hs.prettyparser.golden0000644000000000000000000000000613534314633025001 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ArrowLayout.hs.prettyparser.golden0000644000000000000000000000000613534314632024773 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/ParallelArrays2.hs.prettyparser.golden0000644000000000000000000000011713534314633025507 0ustar0000000000000000ParseFailed (SrcLoc "tests/examples/ParallelArrays2.hs" 2 17) "Parse error: :" haskell-src-exts-1.23.1/tests/examples/QuasiQuoteToplevel.hs.prettyparser.golden0000644000000000000000000000000613534314633026317 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/TypeInstances.hs.prettyparser.golden0000644000000000000000000000000613534314633025275 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/QQType.hs.prettyparser.golden0000644000000000000000000000000613534314633023667 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GhcDeriving.hs.prettyparser.golden0000644000000000000000000000000613534314633024675 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/UnicodeArrow.hs.prettyparser.golden0000644000000000000000000000000613534314633025105 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/GADTRecord.hs.prettyparser.golden0000644000000000000000000000000613534314633024362 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/DataKinds2.hs.prettyparser.golden0000644000000000000000000000000613534314632024427 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/LineOptionsPragma.hs.prettyparser.golden0000644000000000000000000000000613534314633026077 0ustar0000000000000000Match haskell-src-exts-1.23.1/tests/examples/RealGHC.lhs.prettyparser.golden0000644000000000000000000000000613534314633024065 0ustar0000000000000000Match